Zitat von
SimonRap:
...
Delphi-Quellcode:
procedure bla(blabla);
VAR x,x2,y,y2:INTEGER; xy:TPoint;
min4.ScreenToClient(xy);//min4=Timage;
x:=xy.X;
...
...
ähm ich dachte an den "BLAs" sieht man, dass ich das auf die Schnelle getippt hab... Hab begin^^
(glaub sogar, wenn ichs nich hätte würde er meckern)
...
xy := min4.ScreenToClient(Point(0,0))
...
Klar.. mist... sag ich doch: denkfehler^^
Is ja ne Function...
...
aber nun die Showmessage:
'-794 -128 866 134'
Hm... irgendwas stimmt da nich^^
(also ich hab jetzt:
Delphi-Quellcode:
{GAANZ WICHTIG:} begin {*zwinker* @ wicht ;-)}
xy := min4.ScreenToClient(Point(0,0));
x:=xy.X;
y:=xy.Y;
)
Wie kommt der denn jetzt auf minus?
mfg simon