[timondrik]

Закончил с обной программой и перешол к парсеру ключевиков с вордстата на яндексе. Всё бы хорошо, но вот появилась проблема и видимо это кодировка. Из idHTTP методом гет передался код строницы в res.Text, а потом из res.Text в Memo. И в мемо отобразился код страници где все русские слова выглядели так ==> РџРѕРґР±РѕСЂ слоР(сразу помечу что программа пишется на borland delphi 7), только эта проблема мешает программе парсить. Как можно решить данную проблему и с чем в общем она связана?

[pesi]

Код:

AnsiToUtf8(const S: string): UTF8String - перекодирует строку в формат UTF8. 
PUCS4Chars(const S: UCS4String): PUCS4Char - возвращает указатель на первый символ строки формата UCS-4 для работы со строкой, как с последовательностью символов, заканчивающейся символом с кодом нуль. 
StringToWideChar(const Source: string; Dest: PWideChar; DestSize: Integer): PWideChar - преобразует стандартную строку к последовательности Unicode-символов, завершающейся символом с кодом нуль. 
UCS4StringToWideString(const S: UCS4String): WideString - преобразует строку формата UCS-4 к строке формата Unicode. 
Utf8Decode(const S: UTF8String): WideString - преобразует строку формата UTF-8 к строке формата Unicode. 
Utf8Encode(const WS: WideString): UTF8String - преобразует строку формата Unicode к строке формата UTF-8. 
Utf8ToAnsi(const S: UTF8String): string - преобразует строку формата UTF-8 к стандратной строке. 
WideCharLenToString(Source: PWideChar; SourceLen: Integer): string - преобразует строку формата Unicode к стандартной строке. Длина исходной строки задается параметром SourceLen. 
WideCharLenToStrVar(Source: PWideChar; SourceLen: Integer; var Dest: string) - аналог предыдущей функции - преобразует строку формата Unicode к стандартной строке. Длина исходной строки задается параметром SourceLen, а результат возвращается через параметр Dest. 
WideCharToString(Source: PWideChar): string - преобразует последовательность Unicode-символов, завершающуюся символом с кодом нуль, к стандартной строке. 
WideCharToStrVar(Source: PWideChar; var Dest: string) - аналог предыдущей функции - преобразует последовательность Unicode-символов, завершающуюся символом с кодом нуль, к стандартной строке. Результат возвращается через параметр Dest. 
WideStringToUCS4String(const S: WideString): UCS4String - преобразует строку формата Unicode к строке формата UCS-4.