FiveTech Software tech support forums

gooooood mr guru Antonio

I am working in order to implement one class on 32 bit From year 2000 I am trying to recreate the Tgant class It is called Tplan to understand How it work I tried to modify the sample of Tgant class of Arthuro and I remake the sample . Now you can see that I have arrived to a sure result, this my cl...

Dear Antonio,
I hope you insert it on new release of fwh...

...and for a dialog with folders

Antonio you can create also dialogs with folder trasparent ?
I'd like see the source code here...

OKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK


I resolve IT

NOw RUn OKKKKKKKK

thanks to all

Falconi Silvio

to understand well I explain you in a program I run this function oGraficos:Rectang( nLinea+nVertic+4, nColumnaInicio+nHoriz, nLinea+nVertic+10, nColumnaFinal+nHoriz ,oPen5,dati->(Recno()) ) oGraficos is a object of a class and into class there is this method : METHOD Rectang( nTop, nLeft, nBottom, ...

thanks EMG

but I must give to my func ncolor variable
it create a rect with
from this command I can create a brush with the ncolor of the open I give to it

can I found the color of the open and insert to brush ?

I made a Class 32 bit It is called Tplan and it is created seeing the Tgant class 16 bit I need it for my application, But Arthuro does not have never intentional to give sources to me and I have created it I'm working because there is still something that does not work I tried to use the tgant's sa...

I must refill a rect : METHOD Rectang( nTop, nLeft, nBottom, nRight, oPen ,nRecord) CLASS XXXXXXX local hPen := if( oPen = nil, 0, oPen:hPen ) Local nX := oPen:nWidth / 2 IIF( nRecord == nil , nRecord := 0 , ) ::GetDC() MoveTo( ::hDC, nLeft, nTop ) LineTo( ::hDC, nRight, nBottom, hPen ) FillRect( nT...

How can I know all the func of riched20.dll
where I can found information on this dll

thank to all
this class printer is modified by klm but in xharbout not runned : now run ok

in xharbour or habour in a class there is this line :
but when i compiled make an error How ca I resolve it

Regards,
silvio

I must fill of a color an rectag I use a define to INSERT A bRUSH DEFINE BRUSH oPen1 COLOR CLR_HBLUE DEFINE BRUSH oPen2 COLOR CLR_HRED MY FUNC IS CALLED FLOODY(NTOP,NLEFT,NBOTTOM,NRIGHT,NCOLOR,NUMBER) bUT i NOT kNOW HOW FLOODFILL A RECTANG i TRY WITH : LOCAL oBrush, hOld hBru := CreateSolidBrush( nC...

Well, When the new version of Wbrowse ( you sad on xmas that the new version is the 1.8 release) for Xharbour ? I use from many application this your class Can you insert also thepossiblity to show coloured headers as Win xP theme ? Tell me if you are ready with this version ... We wait ....You Best...

I resolve it

I put on top of program main

EXTERNAL OrdKeyCount, OrdKeyGoTo, OrdKeyNo, Ordcreate

now run ok