Показать сообщение отдельно

  #4  
Старый 09.04.2010, 00:43
JnK
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
С нами: 10060964

Репутация: 52
Arrow

Последнее дословно, наверное будет так:
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 дал в свое время мне эти функции
 
Ответить с цитированием