Einzelnen Beitrag anzeigen

MathiasSimmack
(Gast)

n/a Beiträge
 
#4
  Alt 4. Jan 2003, 19:04
Ich benutze die Funktionen auch immer:
Delphi-Quellcode:
function StrToIntDef(const s: string; const i: integer): integer;
var
  code : integer;
begin
  Val(s,Result,code); if(code <> 0) then
                        Result := i;
end;

function IntToStr(const i: integer): string;
begin
  Str(i,Result);
end;
Wobei es mir "Wurscht" is´, ob das Ergebnis nun String oder PChar ist. Dafür gibt´s ja:
Delphi-Quellcode:
MessageBox(0,
  pchar(inttostr(1234)),
  nil,
  0);
Kürzlich (in Popovs "Monitor TV") habe ich eine Art "FloatToStr" mit zwei Stellen nach dem Komma gebraucht; geht ebenfalls mit "Str" und sieht so aus:
Delphi-Quellcode:
function floattostr(const i: Extended): string;
begin
  Str(i:2:1,Result);
end;
Wie Sebastian sagte: mal in die Hilfe schauen.

btw: Zu meiner Standardausrüstung von API-Programmen gehört meist eine "SysUtils.inc" mit häufiger benötigten Funktionen, wie
Code:
fileexists
ExtractFilePath
ExtractFileName
CutFileExt
Format
UpperCase
LowerCase
Damit kann man recht gut arbeiten und die Programmgröße klein halten.
  Mit Zitat antworten Zitat