Moin MathiasSimmack !
Ich hoffe, dass mein Posting ein bisschen Klarheit im Kopf des armen icke schafft. Nachdem ich alle Postings gelesen habe, bin ich zum Schluss gekommen, dass das einzige was geklärt wurde ist, dass man mit Strings nicht rechnen kann und
mod und
div Integers erwarten. Alles andere ist, meiner Meinung nach, entweder unnötig kompliziert, irreführend oder einfach falsch.
Ein Beispiel:
Geklärt würde:
Zitat:
Erstens:
div und
mod sind Integer-Befehle, können also nur mit Integer-TYpen etwas anfange.
Zweitens:
FloatToStr gibt einen
String zurück, mit Strings kannst du nicht rechen.
... und danach kommt so was:
Zitat:
Delphi-Quellcode:
var
str_restmin : String;
str_restsec : String;
int_restmin : Integer;
int_restsec : Integer;
begin
str_restmin := FloatToStr(Gesamt);
int_restmin := str_restmin DIV 60; // Diese beiden Zeilen entsprechen: restmin := FloatToStr(gesamt) DIV 60
str_restsec := FloatToStr(Gesamt);
int_restsec := str_restmin MOD 60;
end;
... einfach zum Heulen.
Noch ein Beispiel:
Zitat:
Delphi-Quellcode:
function Real_Div(AZahl1,AZahl2:Extended):Integer;
begin
Result := Trunc(AZahl1 / AZahl2);
end
Delphi-Quellcode:
function Real_Mod(AZahl1,AZahl2:Extended):Extended;
begin
Result := AZahl1 - Trunc(AZahl1 / AZahl2) * AZahl2;
end
... dazu kann ich nur sagen: „Warum einfach, wenn es auch kompliziert geht?“
Viele Grüße
Markus
