Как преобразовать integer в PChar ?

← →
Roxtady (2002-08-21 23:23) [0]

Без использования inttostr и т.д. Так как не хочется подключать sysutils в проект

← →
ZZ © (2002-08-21 23:45) [1]

Ctrl+C/Ctrl+V

← →
Jeer © (2002-08-22 00:04) [2]

Напиши свой sysutils

← →
Ученик © (2002-08-22 00:11) [3]

function MakeItAString(I: Longint): string;

{ Convert any integer type to a string }
var
S: string[11];
begin
Str(I, S);
Result:= S;
end;

PChar(MakeItAString(I))

← →
Jeer © (2002-08-22 00:12) [4]

Заодно скажу, что задача не определена.
Какое (bin,hex,dec) представление 32р-го целого числа в строке надо получить ?

← →
Ученик © (2002-08-22 00:21) [5]

>Jeer © (22.08.02 00:12)
А что IntToStr это все умеет ? :)

← →
Jeer © (2002-08-22 00:24) [6]

Это умеют "и т.д. ";))

← →
Fog © (2002-08-22 11:47) [7]

А че мучиться:
PChar(IntToStr(число));

← →
Roxtady (2002-08-22 11:49) [8]

Jeer, естественно, dec.

Просто sysutils сильно увеличивает размер приложения. А ведь часто нужно значение возвращаемое WinApi функцией типа int вывести на экран. А messagebox работает с PChar. Как бы решить данную проблему ?

wvsprintf(Buffer, "%x", @i);

← →
Roxtady (2002-08-22 16:22) [10]

Ученик, спасибо ! Замечу только, что %x - это шестнадцатеричный формат. А я хотел бы десятичный. Соответственно, нужно писать %i или %d

>Roxtady (22.08.02 16:22)
Да, спасибо, я в курсе, это для т.д. :-)

Как преобразовать integer в PChar ? Найти похожие ветки