Fenster "unverschiebbar" machen

[Christian Seehase]

Moin phXql,

Zitat von phXql:

OT: wie kann man denn nun ein fenster mit der tastatur verschieben?

Mit ALT-Space das Systemmenü öffnen, dann den Menüpunkt "Verschieben".
Jetzt ist der Cursor ein Kreuz mit Pfeilspitzen, und das Fenster lässt sich mit den Cursortasten bewegen.

Analog funktionier das auch mit dem Ändern der Grösse.

BTW: Das EnableMenuItem funktioniert nur mit SC_CLOSE

[NicoDE]

Zitat von Christian Seehase:

Das EnableMenuItem funktioniert nur mit SC_CLOSE

Hm ?

Delphi-Quellcode:

procedure TForm1.WMInitMenu(var Message: TWMInitMenu);
begin
  EnableMenuItem(Message.Menu, SC_MOVE, MF_BYCOMMAND  or MF_GRAYED);
  DrawMenuBar(Handle);
end;

[Christian Seehase]

Moin Nico,

danke, man muss es natürlich auch an der richtigen Stelle machen

Stellt sich mir nur noch die Frage, warum es mit dem SC_CLOSE auch an anderer Stelle funktioniert.

[Motzi]

Also ich würd bei WM_WINDOWPOSCHANGING ansetzen und dort die aktuelle Fensterposition als neue Fensterposition festlegen...

[NicoDE]

Zitat von Christian Seehase:

Stellt sich mir nur noch die Frage, warum es mit dem SC_CLOSE auch an anderer Stelle funktioniert.

Mehr oder weniger aus Kompatibilitätsgründen (CS_NOCLOSE kann nachträglich geändert werden, ändert aber nicht unter allen Shell-Versionen das Systemmenü).