Delphi Programierung (physik)

[pacman1986]

Weg-Zeit-Gesetz der geradlinig gleichförmigen Bewegung s=v*t

Delphi-Quellcode:

procedure ...
begin
  if length(edit1.text) = 0 then edit1.text :=    floattostrf(strtofloat(edit2.text)*strtofloat(edit3.text),fffixed,15,2);

 if length(edit2.text) = 0 then edit2.text :=
floattostrf(strtofloat(edit1.text)/strtofloat(edit3.text),fffixed,15,2);
 
 if length(edit3.text) = 0 then edit3.text := 
floattostrf(strtofloat(edit1.text)/strtofloat(edit2.text),fffixed,15,2);
end;

edit1 = s
edit2 = v
edit3 = t

pacman

geht auch anders aber aus deinem ka von delphi hab ich gelesen das ihr neulinge seid und somit nur die allernötigsten grundlagen beherscht

korrigiert mich wenn ich mich irre

und was soll in die 2 editboxen reingeschroeben werden ? dsa multipilziert oder adiert wurde wozu
hab es grad mirbekommen. naja kannst halt noch was dazuschreiben .. edit4.text := 'es wurde addiert bla bla bla' jedesma anders ... ( und begin net vergessen )