Mit Delphi Alter berechnen

[BAMatze]

[quote="Funnygirly"]

Delphi-Quellcode:

  Tage:=IntToStr(EdtTage.Text);
  Stunden:=IntToStr(EdtStunden.Text);
  Minuten:=IntToStr(EdtMinuten.Text);
  Sekunden:=IntToStr(EdtSekunden.Text);

Versucht du hier nicht irgendwie eine Stringvariable auf eine Integer zu packen?
Wenn ich das richtig verstanden habe, dann gibst du ja das Alter in einem Edit in Jahren ein und möchtest dann das Ergebnis in Tagen, Stunden, Minuten, ... in anderen Edits auf Knopfdruck erzeugen.

versuchmal Folgendes:

Delphi-Quellcode:

procedure TFrmAlter.BtnAlterClick(Sender: TObject);
var tag,stu,min,sek:integer;
begin

  {Tage:=StrToInt(EdtTage.Text)*365;
  Stunden:=StrToInt(EdtStunden.Text)*8760;
  Minuten:=StrToInt(EdtMinuten.Text)*525600;
  Sekunden:=StrToInt(EdtSekunden.Text)*31536000;}
  
  EdtTage.Text := inttostr(strtoint(EdtJahre.text)*365)));
  EdtStunden.Text := inttostr(strtoint(EdtJahre.text)*8760)));
  EdtMinuten.Text := inttostr(strtoint(EdtJahre.text)*525600)));
  ...
end;

end.

Die Umrechnungsfaktoren beziehen sich nämlich immer auf das Jahr.

MfG
BAMatze

[Edit] Bedenke auch, dass du Schaltjahre IMO noch nicht bedacht hast [/Edit]