09.04.2010, 00:43
|
|
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
Провел на форуме:
188563
Репутация:
52
|
|
Последнее дословно, наверное будет так:
PHP код:
function wsprintfA(buf: pchar; format:pchar; param:char):integer; cdecl;
external user32 name 'wsprintfA';
function Jord(I:Char):String;
var
buf : array[0..255] of char;
begin
wsprintfA(buf, '%2.2x', i);
result:=buf;
end;
применять просто в цикле:
str:=str+Jord(TmpBuf[i]);
P.s. Спасибо SLESH дал в свое время мне эти функции  |
|
|