DIV und MOD

[MarkusB]

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