Where I can found these functions?

Post Reply
User avatar
Silvio
Posts: 3107
Joined: Fri Oct 07, 2005 6:28 pm
Location: Teramo,Italy

Where I can found these functions?

Post by Silvio »

On tregla class I saw :
GflPolyLine and GflLine
Where I can found these functions ?
Best Regards, Saludos

Falconi Silvio
User avatar
James Bott
Posts: 4654
Joined: Fri Nov 18, 2005 4:52 pm
Location: San Diego, California, USA
Contact:

Post by James Bott »

Silvio,

TRegla does not appear to be a FW class. Is this a third party product?

James
User avatar
Silvio
Posts: 3107
Joined: Fri Oct 07, 2005 6:28 pm
Location: Teramo,Italy

Post 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.....
Best Regards, Saludos

Falconi Silvio
StefanHaupt
Posts: 824
Joined: Thu Oct 13, 2005 7:39 am
Location: Germany

Post by StefanHaupt »

what is this class for ?

I have a version without these missing functions, i send you to your private email.

Stefan
User avatar
Silvio
Posts: 3107
Joined: Fri Oct 07, 2005 6:28 pm
Location: Teramo,Italy

Post 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
Best Regards, Saludos

Falconi Silvio
Post Reply