Forum: Multimedia
Delphi
by Schubi,
2. Feb 2004
ScreenToClient Sagt dir die Koordinaten im Client wenn du die Screen-Koordinaten übergibst. Wenn dein Form also Top = 100 Sitzt (Screen) und die Titelzeile 23 hoch ist, gibt ScreenToClient(Point(?,130))
einen Y-Wert von 7 zurück, weil das Form bei 100 + 23 für den Titel sind 123 wo dein Client beginnt, und von da aus sinds noch 7 bis zur 130
Umgedreht, gleiches Beispiel:...
Forum: Multimedia
Delphi
by Schubi,
2. Feb 2004
Ruhig Blut...Alles kein Problem:
P := ScreenToClient(Point(Form1.Left,Form1.Top));
P.X := 0 - P.X;
P.Y := 0 - P.Y;
Label13.Caption := IntToStr(P.X);
Label14.Caption := IntToStr(P.Y);
Achso: var P : TPoint