Problem mit 'if' 'then'

[DanNyy]

Ich habe folgendes Problem.
Ich möchte ein 'if' 'then' Befehl erstellen bekomme aber immer einen Fehler, dass Delphi dies nicht compilieren kann. Funktionieren also keine 'if' Befehle mit Zeichen (+,-,*,/)? Mit Zahlen funktioniert es. Wenn es im falschen Forumbereich ist sorry. Mein erster Beitrag in dem Forum.

Code:

procedure TForm12.Button15Click(Sender: TObject);
var
  a,b,c,d: Real;
begin
  a:=StrToFloat(Edit2.Text);
  b:=StrToFloat(Edit1.Text);
  c:=StrToFloat(Edit3.Text);
  if c='+' then d:=a+b;
  Edit1.Text:=FloatToStr(d);

end;