Thema: Delphi Programm Hilfe

Einzelnen Beitrag anzeigen

Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
 
Delphi 12 Athens
 
#13

AW: Programm Hilfe

  Alt 18. Okt 2011, 17:27
wie heißt der befehl der eine 4stellige zahl zerhackt
Es gibt nach meiner Kenntnis keinen. Du kannst das aber schnell selbst durch Division erledigen.

[edit] OK, ich will mal nicht so sein:
Delphi-Quellcode:
type
  TZiffern = array[1..4] of Byte;

function Zerlege(Wert: integer): TZiffern;
begin
  Result[1] := Wert mod 10000 div 1000;
  Result[2] := Wert mod 1000 div 100;
  Result[3] := Wert mod 100 div 10;
  Result[4] := Wert mod 10;
end;
Bevor jetzt aber Fragen kommen, schau in die Hilfe zu MOD und DIV und vollziehe den Code nach. [/edit]
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen

Geändert von DeddyH (18. Okt 2011 um 17:36 Uhr)
  Mit Zitat antworten Zitat