Hab im Moment keinen Plan, wie ich das machen könnte.
Hab schon etwas rumprobiert:
Code:
...
procedure WMWindowPosChanging(var Msg: TWMWindowPosChanging); message WM_WindowPosChanging;
...
implementation
...
procedure TfmBar.WMWindowPosChanging;
begin
if (Msg.WindowPos.x>=fmMain.Top-10) and (Msg.WindowPos.x<=fmMain.Top+10)
then Msg.WindowPos.x:=fmMain.Top;
inherited
end;
Weis nicht was der Code eigentlich macht.
@Sprint: Wie kann ich denn neue Werte setzen?