Una ayudita con coordenadas

Post Reply
User avatar
AngelSalom
Posts: 664
Joined: Fri Oct 07, 2005 7:38 am
Location: Vinaros (Castellón ) - España
Contact:

Una ayudita con coordenadas

Post by AngelSalom »

Buenasss.
Vereis esto :

aDim :=GetLbxCols (oLbx); nLast:=Len(aDim)
aSizes:=GetDimSizes(aDim)
aPos :=GetDimPos (aSizes)

nTop :=aDim[1,1]
nBottom:=nTop+oLbx:nHeightCell
nLeft :=aDim[1,2]
nRight :=aDim[nLast-1,4]+14

Lo uso para coger las coordenadas y editar una línea en un browse.
Pues bien desde que uso tsbrowse la coordenada nTop no me va demasiado bien, en función del tipo de letra que tiene el browse se me destartala.
Sabeis si hay otra forma de averiguar la coordenada correcta
Gracias.

Un saludo y feliz año!
Angel Salom
http://www.visionwin.com
---------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.0
Post Reply