Zitat von
wicht:
... ich glaube, dass das nur Probleme bringt, wenn man nicht weiß, wie man das zu benutzen hat...
Denke ich nämlich auch.
Ich persönlich favorisiere ...
Delphi-Quellcode:
procedure TForm1.ButtonDeleteClick(Sender: TObject);
begin
if not MessageDlg ('Sicher?', mtConfirmation, [mbYes, mbNo], 0) = IDNO then
Exit;
DeleteFiles;
RefreshView;
end;
... vor ...
Delphi-Quellcode:
procedure TForm1.ButtonDeleteClick(Sender: TObject);
begin
if MessageDlg ('Sicher?', mtConfirmation, [mbYes, mbNo], 0) = IDYES then
begin
DeleteFiles;
RefreshView;
end;
end;
... Macht zwar das gleiche, aber meine Leertaste wirds mir danken.