Форум: "Начинающим";
Текущий архив: 2008.07.06;
Скачать: [xml.tar.bz2];

Вниз

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

← →
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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.043 c