Form schließen wenn Mauszeiger d.Form verläßt ?

[Neuni]

Die position bekommt man auch über:

Code:

var MausPos: TPoint;
    Pos1, Pos2 : integer;

begin
GetCursorPos(MausPos);
Pos1 := MausPos.x;
Pos2 := MausPos.y;
end;

Da brauchste doch keine Komponente!