Wenn du die
Unit des Formulars in eine andere
Unit einbindest, dann hast du von dort aus zugriff auf die öffentlichen Deklarationen der eingebundenen
Unit.
Du kannst also ganz leicht auf auf eine andere Form zugreifen, solange du deren
Unit da einbindest, von wo aus du darauf zugreifen willst.
Daran ist doch wohl nichts schwer zu verstehen, oder?
Weiterhin weißt du doch schon wie du die Maus auf deinen Forularen einsperrst?
Das freigeben bekommst du ja auch schon hin.
Und wie du die Maus danach wieder zurück auf die/das Formular(e) bekommst ist doch auch einfach ... du setzt einfach nochmal die entsprechende Beschränkung.
Wenn du das nun mal gründlich durch deinen Kopf gehen läßt, dann sollten dir doch mindestens 2 Lösungen einfallen?
1: du rufst ClipCursor da auf, wo du grad im QuellCode bist und holst dir die Position der gewünschten Form,
Delphi-Quellcode:
Uses ... Unit8;
maus.Left := Form8.Left;
maus.Top := Form8.Top;
maus.Right := Form8.Left + Form8.Width;
maus.Bottom := Form8.Top + Form8.Height;
ClipCursor(@maus);
2: oder du definierst dir in der Form eine Prozedur, welche den Bereich setzt und rufst diese dann einfach auf.
Delphi-Quellcode:
Type TForm1 = Class(TForm)
...
Public
Procedure EinName;
End;
Procedure TForm8.EinName;
Var maus: TRect;
Begin
maus.Left := Left;
maus.Top := Top;
maus.Right := Left + Width;
maus.Bottom := Top + Height;
ClipCursor(@maus);
End;
Delphi-Quellcode:
//andere Unit
Uses ... Unit8;
Form8.EinName;