Nicht Verkleiner wenn man auf die Titelleiste klickt

[ferby]

Hallo,

Wenn ein Programm Maximiert ist und mann macht einen Doppelklick auf die Titelleiste dann wird es Verkleinert. Kann ich einstellen das das nicht funktioniert???



Gruß,
Ferby

[Yadon]

Hi,


im OI ist WindowsState generell auf "wsMaximized" gestellt, dann brauchst Du nur unter BorderIcons im OI die BiMinimize auf "False" zu stellen

Das gleiche gilt eigentlich, wenn Du es im OnResize-Ereignis machen willst. Dann eben von Hand einstellen.

Yadon

[ferby]

Hallo,

Ich habe genau das gemacht was du gesagt hast, ich kann noch immer per doppelklick auf die Titelleiste das Fenster verkleinern.

??????

Kann mir wer weiter helfen?

[Wuaegner]

Zitat:

im OI ist WindowsState generell auf "wsMaximized" gestellt, dann brauchst Du nur unter BorderIcons im OI die BiMinimize auf "False" zu stellen

Das heißt ja IMHO auch nur dass das Minimierensymbol nicht erscheint. Hat ja nichts damit zu tun dass man das Fenster dann nicht mehr minimieren kann, z.B über Doppelklick auf die Titelleiste.

[ferby]

Hi,

Das heißt es gibt keine möglichkeit das zu unterdrücken, oder?

[tuxhol]

Das Verhindern der Größenänderung ist relativ einfach - das Problem dabei ist nur, daß Windows bei einem Resize auch gerne die Position des Fensters ändert. Größe wird dann nicht verändert, aber Position schon (störend)
Nach einigen Versuchen habe ich folgende Lösung für Dich:

Delphi-Quellcode:

procedure TForm1.FormResize(Sender: TObject);
begin
  Form1.WindowState := wsMaximized;
  Form1.Position    := poScreenCenter;
end;

Könnte ein bißchen flackern, funktioniert aber :-D

[ferby]

Hi,

Naja wäre eine Lösung, aber das Fenster wird trodzdem klein, und dann wieder groß, ich will das gar nichts passiert.....


Trotzdem danke für deinen Lösungsvorschlag.

[Yadon]

Hi,

ich hatte Deine Frage zu schnell gelesen, sorry. Aber da kann man nichts machen, außer 'nem üblen Trick, das ganze klappt, wenn das Form immer maximiert ist. Aber das ist wirklich unschön, klappt aber. Du mußt nur vor dem Compilieren das Form maximieren. Dann kann man es aber niemals verkleinern. Ist ja auch ein bißchen blöd. Nur Minimieren geht dann, wenn man in der Taskleiste draufklickt.

Yadon

[gmarts]

Dann zeig dein Form am besten nicht in der Taskbar an, sondern nur im Tray.

[ferby]

Hi,

naja schad das nicht möglich ist......
kann man nichts machen........

[gmarts]

Zitat:

Zitat von ferby

naja schad das nicht möglich ist......
kann man nichts machen........

:(

Nicht resignieren. Es gibt bestimmt eine Lösung, die wird aber sicher nicht trivial sein. :thumb:
Viel Glück!

[tuxhol]

Folgende Möglichkeit fällt mir noch ein:
Unterdrück doch einfach die Titelleiste. Wenn keine da ist, kann man schließlich auch nicht maximieren :idea:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
Var
 Save : LongInt;
Begin
 If BorderStyle=bsNone then Exit;
 Save:=GetWindowLong(Handle,gwl_Style);
 If (Save and ws_Caption)=ws_Caption then Begin
   Case BorderStyle of
     bsSingle,
     bsSizeable : SetWindowLong(Handle,gwl_Style,Save and
       (Not(ws_Caption)) or ws_border);
     bsDialog : SetWindowLong(Handle,gwl_Style,Save and
       (Not(ws_Caption)) or ds_modalframe or ws_dlgframe);
   End;
   Height:=Height-getSystemMetrics(sm_cyCaption);
   Refresh;
 End;
end;

Damit sollte das Problem gelöst sein.
Falls Du aus ästhetischen Gründen dennoch eine Titelleiste brauchst, nimmst Du entweder ein Label dafür und plazierst es hübsch oben über die ganze Breite oder einen Screenshot von Deiner alten Titelleiste, den Du in ein Image packst...

[ferby]

Hallo,

Danke für deine Lösung.

[Christian Seehase]

Moin ferby,

such' hier mal nach WM_NCLBUTTONDBLCLK