TClientSocket не отправляет запрос

[Cold_Night]

Привет всем! У меня такая проблема: по нажатию на кнопку TButton отправляется POST-запрос через TClientSocket:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if not ClientSocket1.Active then ClientSocket1.Open;
  ClientSocket1.Socket.SendText(Request);
end;

Но если он вначале не открыт, то по нажатию на кнопку просто открывается коннект (хост и порт прописаны в свойствах, Request содержит правильный текст запроса), и запрос не отправляется почему-то.
Как исправить? Заранее спасибо