Page 1 of 1
Where I can found these functions?
Posted: Thu Nov 16, 2006 12:27 am
by Silvio
On tregla class I saw :
GflPolyLine and GflLine
Where I can found these functions ?
Posted: Thu Nov 16, 2006 5:53 pm
by James Bott
Silvio,
TRegla does not appear to be a FW class. Is this a third party product?
James
Posted: Thu Nov 16, 2006 6:07 pm
by Silvio
yes it is of Jose Ignacio Jimenez Alarcon
but there is another version correct by thefull
I have the Alarcon's class and I'll want the tregla modify bt rafa carmona(thefull)
I write they but they have not still answered me !!!!!!!!!!!!!!!
If you succeed to contact they.....
Posted: Fri Nov 17, 2006 8:50 am
by StefanHaupt
what is this class for ?
I have a version without these missing functions, i send you to your private email.
Stefan
Posted: Sat Nov 18, 2006 10:42 pm
by Silvio
there is anothe method into tregla :
METHOD SetSel(aPosic) CLASS TRegla
LOCAL hDc
LOCAL InicX,FinX,InicY,Finy
InicX :=iif(::lHorizontal,aPosic[2],::nWidth)
InicY :=iif(::lHorizontal,::nHeight,aPosic[1])
FinX :=iif(::lHorizontal,aPosic[2],0)
FinY :=iif(::lHorizontal,0,aPosic[1])
hDc:=::GetDc()
IF ::lHorizontal
GflPolyLine(hDc,{InicX,InicX-3,InicX+3,InicX},{InicY,InicY-5,InicY-5,InicY})
ELSE
GflPolyLine(hDc,{InicX,InicX-5,InicX-5,InicX},{InicY,InicY-3,InicY+3,InicY})
ENDIF
GflLine(hDc,InicX,InicY,FinX,FinY)
::ReleaseDc()
RETURN NIL