тогда вот еще трабла: пользуюсь Tidhttp1. с помощью него пробую отослать форму:
Код:
procedure TForm1.Button6Click(Sender: TObject);
begin
tL := TStringList.Create;
tL.Add('mailto=' + combobox1.Text);
tL.Add('subject=' + edit3.Text);
tL.Add('msg=' + memo1.Text);
try
s := IdHTTP1.Post('http://www.ganjawars.ru/sms-create.php',tL);
finally
tL.Free;
end;
при выполнении пишет ошибку HTTP 1.1 302 found чтото примерно того. можете чем нибудь помочь подсказать?