Eines ist mir aufgefallen. Du definierst eine Klasse TPoint. Diesen Bezeichner gibt es in Delphi 7 schon:
type TPoint = packed record
x:LongInt;
y:LongInt;
end;
Ich verwende den Typ im Zusammenhang der Formatierung meiner Forms. Die Funktion ScreenToClient machte dann Ärger.
Evtl. gibt es noch einen anderen Workaround?
Gibt es: Schreib an den relevanten Stellen statt
TPoint
explizit
Windows.TPoint
(oder
Types.TPoint
) bzw.
TGoogleZeugs.TPoint
.
