[GriLab]

Доброго времени суток!

Возникает проблема кодировки русских символов при использовании компонентов Indy 10.5.7, как я знаю в более ранних версиях было все ОК

Использую компонент TIdHTTPServer. Клиент при запросе страницы видит "козяблики", вместо русского текста . Как исправить данную проблему?

Вод код сервера, если он чем-то может помочь:

Код:

procedure TWebServerForm.HTTPServerCommandGet(AContext: TIdContext;
  ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
var
  RequestFileName, IndexFileName: String;
begin
  AResponseInfo.Server := 'ncm_web_server';
  AResponseInfo.CacheControl := 'no-cache';
  RequestFileName := AnsiLowerCase(ARequestInfo.Document);
  try
    if RequestFileName = '/' then RequestFileName := '/index.php';
    if FileExists(ncm_WebSitePath + RequestFileName) then
    begin
      AResponseInfo.ContentStream := TFileStream.Create(ncm_WebSitePath + RequestFileName, fmOpenRead);
      AddServerEvent('файл "' + RequestFileName + '" успешно отправлен на "' + AContext.Binding.PeerIP + '".');
    end
    else
    begin
      AResponseInfo.ContentStream := TFileStream.Create(ncm_WebPagesPath + 'notfound.php', fmOpenRead);
      AddServerEvent('файл "' + RequestFileName + '" не найден на локальном компьютере.');
    end;
  except
    on E: Exception do
    begin
      AddServerEvent(E.Message);
    end;
  end;
end;

AddServerEvent - это запись текста в лог.

Заранее спасибо!

[M.A.D.M.A.N.]

Base64 в помощь.

[GriLab]

Это первая идея, которая пришла в голову.
Но вот только как браузер его расшифрует??? Писать еще и PHP?

[M.A.D.M.A.N.]

Ну можно в QuotedPrintable.

[GriLab]

MADMAN, посмотрел что это такое. Если страница большая , т.е. на ней много русского текста, то это будет ппц тормоза.

[M.A.D.M.A.N.]

Ты не пробовал перекодировать, например, в КОИ-8R или еще в какую-либо кодировку?