Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Größenänderung eines Formulars verbieten (https://www.delphipraxis.net/52221-groessenaenderung-eines-formulars-verbieten.html)

MARGERSCH 25. Aug 2005 15:37


Größenänderung eines Formulars verbieten
 
Hallo,

Ich möchte in einem Formular jegliche Größenänderung verbieten.
Bislang habe ich im Ereignis OnCanResize : Resize = False gesetzt. Damit ist auch
keine Größenänderung möglich. Allerdings wird dem Benutzer vom Cursor vermittelt,
dass er die Größe verändern darf. Das will ich eigentlich nicht.

Gibt es für Formulare eine Eigenschaft, die jegliche Größenänderung unmöglich macht?

Danke
Martin

alcaeus 25. Aug 2005 15:38

Re: Größenänderung eines Formulars verbieten
 
Moin Martin,

du musst nur die BorderStyle-Property deines Forms auf bsSingle setzen.

Greetz
alcaeus

dfried 25. Aug 2005 16:10

Re: Größenänderung eines Formulars verbieten
 
Also bei D7 gibt es das Property "Constraints" wenn du dort Min/Maxheight und Min/MaxWidth setzt kann das Form nicht mehr in der Größe verändert werden.

Gruß
Daniel

alcaeus 25. Aug 2005 16:25

Re: Größenänderung eines Formulars verbieten
 
Zitat:

Zitat von dfried
Also bei D7 gibt es das Property "Constraints" wenn du dort Min/Maxheight und Min/MaxWidth setzt kann das Form nicht mehr in der Größe verändert werden.

Der Cursor aendert sich aber immer noch zum typischen Resize-Cursor, und das will er ja nicht ;)
Wie gesagt, BorderStyle auf bsSingle aendert das Verhalten, so dass kein Resize mehr moeglich ist.

Greetz
alcaeus

100nF 25. Aug 2005 17:29

Re: Größenänderung eines Formulars verbieten
 
vielleicht hilft dir dieser code weiter...

Delphi-Quellcode:
private
 
procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND;

  {...}
implementation

procedure TForm1.WMSysCommand(var Msg: TWMSysCommand);
begin
  if (Msg.CmdType and $FFF0) = SC_SIZE then
  begin
    Msg.Result := 0;
    Exit;
  end;
  inherited;
end;
EDIT: sry, hab geglaubt dass damit kein resize-cursor erscheint, hab mich aber getäuscht :shock:

Dschingis 15. Jan 2007 11:08

Re: Größenänderung eines Formulars verbieten
 
Beim Ausprobieren mit Delphi 10 habe ich gefunden, daß die Einstellung bsToolWindow der Eigenschaft BorderStyle sowohl Größenänderung als auch die Anzeige der Resize-Cursors verhindert.


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:20 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz