FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Where I can found these functions?
Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Where I can found these functions?
Posted: Thu Nov 16, 2006 12:27 AM

On tregla class I saw :
GflPolyLine and GflLine
Where I can found these functions ?

Best Regards, Saludos



Falconi Silvio
Posts: 4840
Joined: Fri Nov 18, 2005 04:52 PM
Where I can found these functions?
Posted: Thu Nov 16, 2006 05:53 PM

Silvio,

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

James

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10
Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Where I can found these functions?
Posted: Thu Nov 16, 2006 06:07 PM

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
Posts: 824
Joined: Thu Oct 13, 2005 07:39 AM
Where I can found these functions?
Posted: Fri Nov 17, 2006 08:50 AM

what is this class for ?

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

Stefan

kind regards

Stefan
Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Where I can found these functions?
Posted: Sat Nov 18, 2006 10:42 PM

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

Continue the discussion