Close-Button (X) deaktivieren?

Wolle92 · Verfasst: Mo 26.05.08 20:00

Hallo,

ich meine, das irgendwo schon einmal gelesen zu haben, finde es aber leider nicht mehr...
Wie kann man bei den Forms den Close-Button deaktivieren?
Also nicht verschwinden lassen, nur deaktivieren...

_________________
1405006117752879898543142606244511569936384000000000.

Wolle92 · Verfasst: Mo 26.05.08 20:13

habs jetzt mit folgendem Code (doch gefunden) gemacht:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

var AppSysMenu: THandle;
begin
  Form7.Button3.Enabled := false;
  AppSysMenu:=GetSystemMenu(Form7.Handle,False);
  EnableMenuItem(AppSysMenu, SC_CLOSE, MF_BYCOMMAND or MF_GRAYED);
  Form7.Show;

Und um den Button wieder zu aktivieren, einfach das or MF_GRAYED wegmachen...

_________________
1405006117752879898543142606244511569936384000000000.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme