was ist neu ¦  programmier tips ¦  indy artikel ¦  intraweb artikel ¦  informationen ¦  links ¦  interviews
 sonstiges ¦  tutorials ¦  Add&Win Gewinnspiel

Tips (1547)

Dateien (137)
Datenbanken (90)
Drucken (35)
Grafik (115)
IDE (21)
Indy (5)
Internet / LAN (131)
IntraWeb (0)
Mathematik (76)
Multimedia (45)
Oberfläche (107)
Objekte/
ActiveX (51)

OpenTools API (3)
Sonstiges (127)
Strings (83)
System (268)
VCL (243)

Tips sortiert nach
Komponente


Tip suchen

Tip hinzufügen

Add&Win Gewinnspiel

Werbung

40 Visitors Online


 
...die Schaltflächen zur Minimierung, Maximierung einer Form verstecken?
Autor: Thomas Stutz
[ Tip ausdrucken ]  

Tip Bewertung (14):  
     





{
  This article shows by example how to suppress the maximize and
  minimize buttons on an form at runtime.
  To disable an form's Minimize and Maximize buttons,
  you need to use the SetWindowLong Windows API
  function to change the style of the window.
}

{ Dieses Beispiel zeigt, wie man die Schaltflächen zur Minimierung,
  Maximierung einer Form zur Laufzeit verstecken kann.
  Man braucht dafür die SetWindowLong Windows API um den Stil
  des Fensters zu ändern.
  Der Code kann auch für non-VCL Anwendungen gebraucht werden.
}

// Add the following code to the OnCreate event
// procedure for your form (TForm1):

procedure TForm1.FormCreate(Sender: TObject);
var
  
l: DWORD;
begin
  
l := GetWindowLong(Self.Handle, GWL_STYLE);
  l := l and not (WS_MINIMIZEBOX);
  l := l and not (WS_MAXIMIZEBOX);
  l := SetWindowLong(Self.Handle, GWL_STYLE, l);
end;


 

Bewerten Sie diesen Tipp:

dürftig
ausgezeichnet


Copyright © by SwissDelphiCenter.ch
All trademarks are the sole property of their respective owners