Главная страница
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.011 c
3-1201365475
leonidus
2008-01-26 19:37
2008.07.06
Ищу простую СУБД


2-1212855749
NewSer
2008-06-07 20:22
2008.07.06
Как сделать, чтобы копировалось и "КЛМ", и "Клм", и "КЛм"...?


2-1212666969
Mark86rus
2008-06-05 15:56
2008.07.06
Запуск DOS-Winrar со стройкой


15-1211389310
ja-maik-a
2008-05-21 21:01
2008.07.06
Обоснования выбора Delphi


2-1212725754
Прохожев
2008-06-06 08:15
2008.07.06
Перебрать все компоненты на всех формах в проекте