[Raccoon]

Hi,
I have a question about the TsMagnifier:

How can I move the control for example when I'm holding down the mouse button?
I tried:

CODE

TPoint p;
GetCursorPos(&p);

mag->Hide();
mag->Execute(p.x, p.y);

Ok, this is working, but my CPU usage goes up to ~50%. Is there no other way to move the glass?

Best regards
Alexander

[Support]

Hello

You can change the magnifier form directly using such code :

CODE

uses sConst;
…
if Assigned(acMagnForm) and acMagnForm.Visible then acMagnForm.Left := …

acMagnForm : TWinControl is declared in the sConst unit.

[Raccoon]

QUOTE (Support @ May 15 2010, 02:19 PM)

Hello

You can change the magnifier form directly using such code :

CODE

uses sConst;
…
if Assigned(acMagnForm) and acMagnForm.Visible then acMagnForm.Left := …

acMagnForm : TWinControl is declared in the sConst unit.

Thx, i will try.

[Author]

Posts