Afsluting af et program!!!

Du skal indsætte følgende kode under formens OnCloseQuery event:

procedure TFrmMain.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
if MessageDlg(\'Er du sikker?\',
    mtConfirmation, [mbYes, mbNo], 0) = mrYes
  then begin
    canclose:=true;
  end else begin
    canclose:=false;
  end;
end;

Hvis du vil have yderligere hjælp til MessageDlg så kan du slå den op i hjælpefilen, så kan du se hvad du ellers kan få den til at vise af beskedtyper og knapper etc.

Virker dette ogsp hvis jeg allerede har lavet formen \"Er du sikker\"

Jeg har lavet en button med \"JA\" på, skal så dobbelt klikke på knappen, skrive det ovenover??

nej, ovenstående kode benytter ikke en ekstra form, så den har du ikke brug for. du skal bare indsætte koden under din hovedforms CloseQuery event.