Rechner programmieren

[himitsu]

Delphi-Quellcode:

a := StrToFloat(Label1.Caption);
b := StrToFloat(Label2.Caption);

c := a / b;
d := Trunc(c);
e := Frac(c);

Label3.Caption := FloatToStr(d);
Label4.Caption := FloatToStr(e);

oder, um es mal mit nur einem Label zu machen, für's Ergebnis :angel:

Delphi-Quellcode:

...
Label3.Caption := Format('%n (Rest = %n)', [d, e]);

[Tytomik]

Vielen dank für die hilfe hat mir echt geholfen!!

[DP-Maintenance]

Dieses Thema wurde am "25. Apr 2011, 21:03 Uhr" von "Matze" aus dem Forum "Neuen Beitrag zur Code-Library hinzufügen" in das Forum "Programmieren allgemein" verschoben.

[DP-Maintenance]

Dieses Thema wurde am "25. Apr 2011, 21:06 Uhr" von "Matze" aus dem Forum "Programmieren allgemein" in das Forum "Sonstige Fragen zu Delphi" verschoben.