Disable luk-knappen ved Højreklik på Programmet i process linien

Jeg synes det virker lidt underligt at du vil forhindre alle de ting der er standard i windows programmer.
Men hvis du absolut vil er det nemt nok:
  private
    { Private declarations }
    OkAtLukke: Boolean;
I formens OnCloseQuery event:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose := OkAtLukke;
end;
Og i din lukke knap:
procedure TForm1.LukProgramClick(Sender: TObject);
begin
  OkAtLukke := True;
  Close;
end;
Med dette kode styrer du både Alt-F4, X-knappen og luk i processlinien.

tolderlund...
Det jeg er igang med er et "tag en test" program... og hvis de lukker programmet inden de er færdige skal programmet tælle det som en fejl... De må max fejle testen 9 gange... Derfor er jeg nød til at lukke af for muligheden for at de kan lukke programmet alle andre steder end på den knap der først registrere det som en fejl og derefter lukker programmet....

Mere så du nu ved hvad det drejer sig om ;)

Jeg kigger lige på det ;)

Takker for hjælpen :D
//'bramsing'