Wenn Abfage Hilfe

Thema durchsuchen

Ansicht

Themen-Optionen

Ein Thema von derPat17 · begonnen am 30. Jan 2017 · letzter Beitrag vom 5. Feb 2017

Vorheriger Beitrag

Nächster Beitrag

Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.779 Beiträge

Delphi 10.4 Sydney

#21

AW: Wenn Abfage Hilfe

1. Feb 2017, 20:04

zusammenfalten · markieren

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;