CardinalToBytes + BytesToCardinal

[jfheins]

Zitat von jokerfacehro:

ok zeigt ma bitte

Delphi-Quellcode:

function CardinalToBytes(const Num: integer):string; 
begin 
  setlength(Result, sizeof(integer));
  CopyMemory(@Result[1], @num, sizeof(integer));
end;

Das wäre jetzt meine erste Idee, wenn ich so eine Funktion schreiben müsste

Btw.: Funktionsname und Argument widersprechen sich