Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  AW: Anfängerproblem !?

   
    by DeddyH, 31. Jan 2013
  Da fehlen ein begin und ein end.begin
  if edit3.text='0' then
  begin
  showmessage('Zahl 3 bitte ändern')
  end else
  begin //hier
  label1.Color:=clred;
  label1.Caption:= Floattostr(strtofloat(Edit1.Text)/strtofloat(edit2.text)/strtofloat(edit3.text));
  end; //und hier
  end;