hilfe !!

[Gast]

Hallo könnt ihr mir helfen ... ??

Ich möchte die _,_,x Button (also minimieren, maximieren, schleßen) in der Programmleiste (ganz oben) sperren oder nicht anzeigen lassen geht das ???






Patrick Knott

[woki]

Hallo,

von den zwei Möglichkeiten (totlegen oder gar nicht erst anzeigen) ist gar nicht erst anzeigen wohl vorzuziehen, schau Dir mal die Eigenschaft "Bordericons" der Forms an, im Objektinspektor.


Grüße
Woki

[Daniel]

Hallo knotti,

bitte gibt diwesem Thread einen sinnvollen, sachlichen Namen. Begriffe wie 'Hilfe' u.ä. sagen leider gar nichts über das Thema aus, um das es bei Deiner Frage geht.

[Daniel B]

Hallo und herzlich Willkommen im Forum!

Das um das X auszuschalten:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject); 
begin 
  EnableMenuItem(GetSystemMenu( Form1.Handle, LongBool(False)), 
                 SC_CLOSE, MF_BYCOMMAND or MF_GRAYED); 
end;

Und das um es ganz verschwinden zu lassen:

Delphi-Quellcode:

procedure TFMain.FormCreate(Sender: TObject); 
Var 
  hMenuHandle:Integer; 
begin 
  hMenuHandle := GetSystemMenu(Handle, FALSE); 
  if (hMenuHandle <> 0) then 
    DeleteMenu(hMenuHandle, SC_CLOSE, MF_BYCOMMAND);
end;

Die anderen beide ganz kann man im OI aussschalten, oder gleich alle drei verschwinden lassen, das geht dann unter FormStyle z.B..

Grüsse, Daniel

[Gast]

Danke !!!!


Vielen Dank !!




Was haltet ihr vom Desig ???



Ps. Wieviele -------- (Striche) muss ich im Menü einbauen das es eine horzontale Linie ergibt ???

[MrKnogge]

Zitat von knotti2012:

Danke !!!!


Vielen Dank !!




Was haltet ihr vom Desig ???



Ps. Wieviele -------- (Striche) muss ich im Menü einbauen das es eine horzontale Linie ergibt ???

Eigentlich ja :
"Neue Frage, neuer Thread !"

Aber es ist einfach ein -

[Daniel B]

Mach Bitte eine neuen Thread auf, für die neue Frage, das ist hier üblich, daher schliesse ich es mal an dieser Stelle, Dein Programm kannst Du übrigens auch unter Freeware vorstellen, hat hier auch nichts verloren!

Grüsse, Daniel

*** LOCKED ***