Как исправить кодировку?

[JGalt]

Это возможно из-за gzip? И если да, то как это обойти?

procedure TForm1.HTTPMethodButtonClick(Sender: TObject);
var
  HTTP: THTTPSend;
  Response: String;
begin
    richedit1.Clear;
    HTTP := THTTPSend.Create;
    try
    HTTP.HTTPMethod('GET', 'http://www.wildberries.ru/catalog/181/women.aspx');
    Response := String(ReadStrFromStream(HTTP.Document, HTTP.Document.Size));
    richedit1.Text := Response;
    finally
    HTTP.Free;
    end;
end;

[Lardes]

JGalt, не из-за GZip (если это не указывается в заголовках). Если будешь указывать, то читай http://www.smw75.ru/delphi-synapse-p...dannye-v-gzip/

И в чем вообще заключается "хрень"?

richedit1.Text := Response;

Может лучше заменить на

richedit1.Lines.Text := Response;