Edit Felder voneinander Abhängig / Umrechnung

[Matze]

Moin,

ein gutes Anfängertutorial bzw. einen Crashkurs findest du hier, dann fällt dir das Programmieren sicher leichter, denn die Grundlagen brauchst du unbedingt.

Aber kurz zum Problem: Du könntest es beispielsweise so (für jedes Edit extra) lösen:

Delphi-Quellcode:

procedure TForm1.Edit1Change(Sender: TObject);
begin
  try
    Edit2.Text := FloatToStr(StrToFloat(Edit1.Text) * Faktor);
    Edit3.Text := FloatToStr(StrToFloat(Edit1.Text) * Anderer_Faktor);
  except
  end;
end;

Der Button ist übrigens dann überflüssig, das geschieht alles "live".

Der leere except-Block ist eigentlich keine saubere Lösung, doch in diesem Fall würde ich sagen, kann man das mal so machen, dass nicht bei jeder Fehleingabe bzw. beim Leeren des Edits eine Fehlermeldung erscheint.