Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.07.06;
Скачать: CL | DM;

Вниз

Непонятно   Найти похожие ветки 

 
Res   (2008-06-09 00:17) [0]

Здравствуйте, необходимо преобразовать string в hex, нашел в инете такую функцию:

function StrToHex ( s: string ): string;
var
 i: integer;
begin
  for i := 1 to Length( s ) do
     case Ord( s[i] ) of
        168, 184, 224..255, 192..223:
           Result := Result + "%" + IntToHex( Ord( s[i] ), 2 );
        else
           Result := Result + s[i];
     end;
end;

При попытке преобразовать у компилятора возникает ошибка: "Incompatible types: "HWND" and "String"", непонятно...


 
Res   (2008-06-09 00:24) [1]

Туплю, сорри


 
Юрий Зотов ©   (2008-06-09 00:25) [2]

> Res   (09.06.08 00:17)  

В этом коде такой ошибки возникать не может.



Страницы: 1 вся ветка

Текущий архив: 2008.07.06;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.019 c
15-1211466716
TIF
2008-05-22 18:31
2008.07.06
Посоветуйте, плз, бесплатный хостинг (с PHP)


9-1172040240
Cerberus
2007-02-21 09:44
2008.07.06
Вопрос XProger у по его сетевому модулю.


15-1211436673
Caks
2008-05-22 10:11
2008.07.06
конвертация из basic в delphi


15-1211630959
NValera
2008-05-24 16:09
2008.07.06
IPv4 контрольная сумма


2-1212944213
Alexey
2008-06-08 20:56
2008.07.06
Запись из StringGrid в *.dbf