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 )