Telnet. Отправка команды

[Mariner_dmx]

Добрый день пользователи форума. Возникла задача для работы с Telnet. Смысл заключается в том, что нужно сделать маленькую программку в которой будет всего пара кнопок. У каждой кнопки будет записана telnet команда и при её нажатии она отправляется на Telnet сервер. Всё в принципе легко, но столкнулся с такой трудностью, что при нажатии кнопки - команда на Telnet сервер отправляется, но после этого программа виснет намертво (Само соединение проходит без проблем). Что я делаю не так или о чем я не знаю?. Cкажу сразу, что с сервера обратно получать ответ не нужно. Связь только на сервер.

procedure TForm1.Button1Click(Sender: TObject);
begin
IDTelnet1.Host := ComboBox1.Text;
IDTelnet1.Port := SpinEdit1.Value;
IDTelnet1.Connect;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
IDTelnet1.SendCmd('user '+Edit1.Text+' pass '+Edit2.Text);
end;