Form auf Position halten ...

Terra · Beiträge: 307 Windows 7 Ultimate Delphi® XE3

Wollte mal fragen, wie ich es anstellen könnte, das mein Form nicht von der Maus verschoben werden kann. Es soll auf dem Bildschirm eine bestimmte Position bekommen und es ist zwingend erforderlich, das es dort auch bleibt.

Bitte nur Positionsveränderte bedingungen vorschlagen und nicht Formveränderte ...

Vielen Dank,

Terra

crowley · Verfasst: Di 05.09.06 16:49

ich habe es zwar nicht getestet, sollte aber wohl dein Problem lösen...

oft wird ja nach dem umgekehrten weg gesucht (ein formular verschieben zu können, selbst wenn man nicht die "Titelleiste" anklickt")... es sollte sich aber auch so für dich umstellen lassen... hierbei solltest du die Windows Message WM_NCHitTest abfangen:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:

type
  TForm1=class(TForm)
  private
    procedure WMNCHitTest(var AMsg: TWMNCHitTest); message WM_NCHitTest;
  end;

und dann noch die Funktion:

markieren

Delphi-Quelltext

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

procedure TForm1.WMNCHitTest (var AMsg: TWMNCHitTest);
begin
  inherited;

  if AMsg.Result = htCaption then 
    AMsg.Result := htClient;
end;

Terra · Beiträge: 307 Windows 7 Ultimate Delphi® XE3

Vielen Dank, ich werde es gleich mal ausprobieren !

Terra

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme