Falls Variable(n) vorhanden mache das sonst mache dies

[p80286]

Hallo Thknub,

hast Du es mal mit dem Debugger versucht? mit [F7] und [F8] geht einem manchmal ein ganzer Kronleuchter auf.

Bei mir erhalte ich bei folgendem Sourcecode:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  a : real;
begin
  form1.Edit3.Text:='xxx';
  a:=strtofloat(form1.Edit3.text);
end;

"xxx ist kein gültiger Gleitkommawert"

Da hat er recht! Du solltest deine Eingabetextfelder zumindestens mit "0.0" vorbelegen!

Buchstaben und andere Fehleingaben mußt Du dann auch noch herausklauben.

Viel Spaß

K-H