Функция wsprintf...
Лёха © (2005-01-28 21:30:00)
Скачал исходники одной проги и увидил такую функцию:
function ByteToHex(Value: Integer): string;
const F: PChar = '%02x'#0;
var Res: PChar;
begin
GetMem(Res, 3);
asm
push Value
push F
push Res
call wsprintf
add esp, 0Ch
end;
Result:= String(Res);
FreeMem(Res);
end;
Здесь используется wsprintf.
Вот вопрос: А можно таким образом создать функцию IntToStr
или StrToInt и т.д.
Нужно это, чтобы не использовать SysUtils и уменьшить размер
проги(т.к. пишется она на WinAPI)!
Игорь Шевченко (2005-01-28 21:56:00) [1]
Можно. А можно использовать str и val, они тоже не в SysUtils.
И проще.
Наверх 
ЧАТ |
Орешник |
|
