2 Formulare permanent parallel darstellen

bbfan · Beiträge: 164

Hallo!

Wie kann ich es erreichen, das form2 an der MainForm Form1 immer am rechten Rand andockt und dort auch kleben bleibt, wenn Form1 bewegt wird?

Viele Grüße,
BBFAN

Moderiert von Christian S.: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am Mo 25.06.2007 um 10:18

Jann1k · Verfasst: Mo 25.06.07 09:05

wenn form 1 bewegt wird setzt du left von form2 auf form1.left+form1.width, ich denke dafür wirst du in form2 ne prozedur schreiben müssen mit den parametern top und left, die dann von form1 aufgerufen wird

bbfan · Beiträge: 164

hab es jetzt so gelöst:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

procedure TForm1.OnMove(var aMsg: TWMMove);
begin
  if (v_panel <> NIL) then
   begin
    v_panel.Left:=left + width;
    v_panel.top:=top;
   end;
end;

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme