post

[Fok]

Никак немогу понять почему неработает код

var
 CM    : TidCookieManager;
 S, mail_to, mail_from, theme, content: string;
 Post: TStringList;
begin

CM := TidCookieManager.Create(IdHTTP1);
mail_to:=Edit1.Text;
mail_from:=Edit2.Text;
theme:=Edit3.Text;
content:=memo1.Lines.Text;

Post:=TStringList.Create;
Post.Add('to='+Edit1.Text);
Post.Add('from='+Edit2.Text);
Post.Add('theme='+Edit3.Text);
Post.Add('content='+memo1.Lines.Text);
    if CheckBox1.Checked then
  Post.Add('html=yes') else
  Post.Add('');
    if CheckBox2.Checked then
  Post.Add('cyr_encode=yes') else
  Post.Add('');
     if CheckBox3.Checked then
  Post.Add('hide_addr=yes') else
  Post.Add('');

Post.Add('sform=yes');
idHTTP1.post('http://mail.sm1le.ru/?send', Post);
 
end;

[Voland-791]

и в конце должно кажется быть idHTTP1.post('http://mail.sm1le.ru/?send', Post);

[Fok]

переменную S можно убрать вовсе , но всеравно работать нехочет

[MyIE]

Проверь, что возвращает тебе сервер (файл html)