Einzelnen Beitrag anzeigen

derPat17

Registriert seit: 30. Jan 2017
17 Beiträge
 
#14

AW: Wenn Abfage Hilfe

  Alt 1. Feb 2017, 18:08
ok klappt soweit, ich habe nun

procedure TForm1.BitBtn2Click(Sender: TObject);
begin
If edit1.text='F' and Labelnote.Caption:='E1'
then labelausgabe.Caption:='RICHTIG!'
else labelausgabe.Caption:='FALSCH!';
end;

es kommt aber
[Error]Unit1.pas(468): Operator not applicable to this operand type
(und er makiert die then zeile)

wenn ich aber das "and" weglasse, funktioniert es, aber er soll doch vergleichen. (Also wenn das und das dann...)

MFG

Geändert von derPat17 ( 1. Feb 2017 um 18:19 Uhr)
  Mit Zitat antworten Zitat