IntToStr mal anders

[Progman]

Delphi-Quellcode:

{------------------------------------------------------------------}
{  Function to convert int to string. (No sysutils = smaller EXE)  }
{------------------------------------------------------------------}
function IntToStr(Num : Integer) : String;  // using SysUtils increase file size by 100K
begin
  Str(Num, result);
end;

So wird es in einigen Anwendungen gemacht, die auf SysUtils verzichten wollen.

[sirius]

Zitat:

Der sieht aber nicht sehr platformunabhängig aus (System.).

Das ist die Unit System in der die Funktion LStrFrom Pchar verwendet wird --> Mache aus einem PChar einen AnsiString, denn der vorherige Code erzeugt nur einen PChar und in Psacal sieht man sowas nicht gern :zwinker:
Und die Funktionen sind platformunabhängig