topic-13985

Posts: 3107

Joined: Fri Oct 07, 2005 06:28 PM

drag visualization
Posted: Wed Dec 17, 2008 01:27 PM

Antonio,
on a form whe n I take an control I want show on cursor the control and then I move the mouse on row,col and when I release the button of the mouse it draw the control on row,col ( of the mouse) .
Howe I can make it ?

Best Regards, Saludos

Falconi Silvio

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

drag visualization
Posted: Fri Dec 19, 2008 02:31 PM

Silvio,

Please review fwh\samples\TestDrp3.prg

You can change a control position doing:
oControl:nTop := ...
oControl:nLeft := ...

regards, saludos

Antonio Linares
www.fivetechsoft.com

ukoenig

Posts: 4043

Joined: Wed Dec 19, 2007 06:40 PM

Re: drag visualization
Posted: Tue Aug 11, 2009 03:24 PM

Antonio,

to make it easier, to place Logos or Vtitles on a defined Position inside a Dialog,
is it possible, to get the Screen-Position ( Top / Left ) for a given ID-Number of a Control from Resources ?

Sample :
I want to place with ABpaint a Logo above a Get-Field with ID 100 ( Position Top = 100, Left = 20 )

The Top / Left Calculation of the Logo would be :
Top = Get-Top - Space - Logo-Height
Left = Get Left

It would make it much easier, to place something on Screen in Relation to a Control.

Thank You
Best Regards
Uwe :lol:

Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.

James Bott

Posts: 4840

Joined: Fri Nov 18, 2005 04:52 PM

Re: drag visualization
Posted: Fri Aug 14, 2009 04:45 PM

Uwe,

Try:

Code (fw): Select all Collapse

nID := 100

for i:= 1 to len( oDlg:aControls )
   if oDlg:aControls[i]:nID == nID
      nTop:= oDlg:aControls[i]
      nLeft:= oDlg:aControls[i]
   endif
endif

James

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10

FiveTech Support Forums

Continue the discussion