[timondrik]

Сегодня решил перейти с D7 на D2009. По началу вроде всё хорошо и реализовал такой код:

var
  result,data:TStringList;
begin
  result:=TStringList.Create;
  data:=TStringList.Create;
  data.Add('username='+LabeledEdit1.Text);
  data.Add('password='+LabeledEdit2.Text);
  result.Text:=idHTTP1.Post('http://********/takelogin.php',data);

  if pos('Успешный вход',result.Text)>0 then
  begin
    Label1.Caption:='Успешная авторизация!!!';
  end else
    Label1.Caption:='Не успешная авторизация';

По началу всё проходило очень даже отлично авторизуется и всё хорошо. Не сохранял проект (просто для проверки надо было) и закрыл D2009. Потом решил всётаки начать с этим же кодом писать прогу которая будет выдерать нужные мне данные и html кода. Опять написал код и для проверки откомпилил. Всё ввёл правильно и на тебе авторизация не прошла, думаю в чем дело. Решил посмотреть на код html мож там что изменилось и добавил на форму Memo и дописал ещё такой код:

Memo1.Lines.Add(result.Text);

Код html вывелся и увидел что где раньше написано было Успешный вход теперь непонятные буквы, т.е. явная проблема с кодировкой. Как это исправить? В D2009 работаю первый раз, до этого таких проблем не встречалось((( Обьясните плиз в чём проблема и как исправить . В заранее спс