Einzelnen Beitrag anzeigen

schmitty89

Registriert seit: 21. Feb 2012
11 Beiträge
 
#12

AW: Warnen vor dem schließen

  Alt 22. Feb 2012, 15:23
Delphi-Quellcode:
procedure TForm1.OnCloseQuery(Sender: TObject; CanClose: Boolean);
begin
  if MessageDlg('Echt schließen?', mtConfirmation, [mbYes, mbNo], 0) = mrNo then
    CanClose := false;
end;
Wäre ein einfacher und sauberer Weg.
Das hat mir doch schon geholfen aber kann man das abhängig machen von dem was eingegeben wurde?
Also wenn er richtig geraten hat soll es gar nicht erst angezeigt werden, sonst schon.
Müsste man dann um das ganze eine If-schleife laufen lassen?
Könnte man das nicht einfach ans Ende dieser if bedingung setzen:

Delphi-Quellcode:
if r < z then Label2.Caption := 'Zu niedrig'
   else if r > z then Label2.Caption := 'Zu hoch'

Geändert von schmitty89 (22. Feb 2012 um 15:26 Uhr)
  Mit Zitat antworten Zitat