| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Непонятно

Res ©   (2008-06-09 00:17:00) 

Здравствуйте, необходимо преобразовать 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'", непонятно...

---

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

> Res   (09.06.08 00:17)  

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

---

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

Туплю, сорри

---

Наверх