Größenänderung eines Form nicht zulassen

[mlspider]

Hallo,

mal ne ganz banale Frage. Gibt es im Objectinspector eine Einstellung, die verhindert, daß man mit der Maus ein Form größer oder kleiner ziehen kann, oder muß die per Quellcode erledigt werden.

Danke

[Binärbaum]

In den Events eines Formulars gibt es OnCanResize. Dort muss man einfach die Variable CanResize auf False setzen, und schon bleibt die Größe so, wie sie ist.

MfG
Binärbaum

[mlspider]

Hab ich's mir doch gedacht. Die Lösung konnte ja nur banal sein. Danke.

[alcaeus]

Hallo mlspider,

evtl. kannst du auch mit den Constraints arbeiten, damit kannst du die Groesse beschraenken (Min/MaxWidth/Height)

Greetz
alcaeus

[Motzi]

Warum so kompliziert?? Einfach den BorderStyle auf bsSingle oder bsDialog.. je nachdem..

[mlspider]

Hallo Motzi. Kann ich bei mir nur auf bsNone setzen, da ich ein Skin verwende.

[bigg]

(Constraints)

[mlspider]

Danke für Dein Beispiel. Ich hab es einfach OnCanResize gelößt:

Delphi-Quellcode:

procedure TForm1.FormCanResize(Sender: TObject; var NewWidth,
  NewHeight: Integer; var Resize: Boolean);
begin
 Resize:=False;
end;

[Binärbaum]

Zitat:

Zitat von mlspider

... Ich hab es einfach OnCanResize gelößt:

Delphi-Quellcode:

procedure TForm1.FormCanResize(Sender: TObject; var NewWidth,
  NewHeight: Integer; var Resize: Boolean);
begin
 Resize:=False;
end;

Das ist meiner Meinung nach auch die beste und gleichzeitig einfachste Lösung. :wink:

MfG
Binärbaum

[Quake]

Wie bekommt man es aber hin, das sich der Mauszeiger nicht ändert wenn man über die Kante des Forms geht?

[jim_raynor]

BorderStyle des Formulares auf bsSingle oder bsNone oder bsDialog setzen ...

[Quake]

Das funktioniert aber so nicht. Oder liegt es daran, dass die forms MDI-Childs sind?

[EDIT]Es funktioniert nur mit dsDialog nicht, mit dsSingle hast du Recht.[/EDIT]

[jim_raynor]

Zitat:

Zitat von Quake

Das funktioniert aber so nicht. Oder liegt es daran, dass die forms MDI-Childs sind?

Bei MDI-Childs funktioniert das tatsächlich nicht. Das könnte man nur durch fiese und unschöne Tricks lösen.

[Motzi]

Delphi-Quellcode:

SetWindowLong(Handle, GWL_STYLE, GetWindowLong(Handle, GWL_STYLE) and not WS_SIZEBOX);

alternativ dazu kann man auch CreateParams überschreiben und den Window-Style dort setzen...