Vollbild trotz wsNormal

[Cöster]

Hi!

Ich hab folgendes Problem:
Der WindowState befindet sich auf wsMaximized. Dann rufe ich den Befehl

Delphi-Quellcode:

WindowState := wsNormal;

auf. Nun wird das Verkleinern-Icon zwar zum Maximieren-Icon, aber die Form bleibt im Vollbildmodus, wird also nicht auf die Größe zurückgesetzt, die sie hatte, bevor der WindowState auf wsMaximized gesetzt wurde.
Ich hoffe, mir kann jemand helfen.
Danke!!

[cruso]

Du solltest sichergehen, dass folgendes nicht der Fall ist:

Delphi-Quellcode:

Form1.Width:=Screen.Width;
Form1.Height:=Screen.Height;

[Christian Seehase]

Moin Cöster,

probiere es mal mit:

Delphi-Quellcode:

// Ersatz für WindowState := wsNormal;
  SendMessage(self.Handle,WM_SYSCOMMAND,SC_RESTORE,0);
// Ersatz für WindowState := wsMaximized;
  SendMessage(self.Handle,WM_SYSCOMMAND,SC_MAXIMIZE,0);

Wenn ich mich recht entsinne funktioniert das Setzen von WindowState unter Delphi 5 nicht immer so wie gewünscht.

[Cöster]

Problem gelöst!!!

Was ich euch nicht gesagt hab, weil ich es nicht für wichtig befunden hab, war, dass ich beim Maximieren und verkleinern auch den BorderStyle geändert hab. Aber genau darin lag das Problem:

Der Befehl

Delphi-Quellcode:

BorderStyle := bsNone;

muss vor

Delphi-Quellcode:

WindowState := wsMaximized;

stehen. Auf der anderen Seite muss erst

Delphi-Quellcode:

WindowState := wsNormal;

und dann

Delphi-Quellcode:

BorderStyle := bsSizeable;

aufgerufen werden.

Woran das liegt, weiß ich nicht :?: Wär aber interessant zu wissen, vielleicht weiß es ja jemand von euch?!

[Flocke]

Wieso machst du denn den Rahmen weg beim Maximieren? Den sieht man dann doch sowieso nicht.

[Cöster]

Zitat:

Zitat von Flocke

Wieso machst du denn den Rahmen weg beim Maximieren? Den sieht man dann doch sowieso nicht.

Doch, klar. An den Seiten vielleicht nicht, aber oben die Kopfzeile bleibt ja noch sichtbar.

[Flocke]

Ist mir dann auch eingefallen :wink: war aber nicht mehr am Rechner.