Einzelnen Beitrag anzeigen

Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.755 Beiträge
 
Delphi 10.4 Sydney
 
#22

AW: Wenn Abfage Hilfe

  Alt 1. Feb 2017, 20:04
Delphi-Quellcode:
If (edit1.text = 'F') and (Labelnote.Caption = 'E1') then
  begin
    labelausgabe.Caption:='RICHTIG!'
    showMessage(Edit1.text+' '+Labelnote.Caption);
  end
else
  begin
    labelausgabe.Caption:='FALSCH!';
    showMessage(Edit1.text+' '+Labelnote.Caption);
  end;
end;
Klaus

Geändert von Klaus01 ( 1. Feb 2017 um 20:08 Uhr)
  Mit Zitat antworten Zitat