POP клиент на Delphi через сокеты

[Shnaps151]

Здравствуйте, пишу лабу, а в частности клиент для протокола РОР3 через сокеты, без использования уже готовых компонентов (например из набора Инди). Так вот, суть проблемы такова:
При отправке комманд на сервер не получаю ответа, хотя после установки соединения или же отправки некорректной комманды ответ приходит. Не могу разобраться сам, поэтому обращаюсь за помощью

procedure TForm1.Button1Click(Sender: TObject);
begin
 if (Edit1.Text<>'') then
  begin
    POP.Socket.SendText(Edit1.Text);
    Memo1.Lines.Add('<'+TimeToStr(GetTime)+'>'+Edit1.Text);
    Sleep(300);
    //Memo1.Lines.Add('<'+TimeToStr(GetTime)+'> Ñåðâåð: '+POP.Socket.ReceiveText);
    Edit1.Text:= '';
  end;
end;

procedure TForm1.POPConnect(Sender: TObject; Socket: TCustomWinSocket);
begin
  Memo1.Lines.Add('<'+TimeToStr(GetTime)+'> Ïîäêëþ÷åíèå ê '+POP.Host+' âûïîëíåíî');
  Button1.Enabled:=true;
  Button2.Enabled:=false;
  Button3.Enabled:=true;
end;

procedure TForm1.POPRead(Sender: TObject; Socket: TCustomWinSocket);
begin
  Memo1.Lines.Add('<'+TimeToStr(GetTime)+'> Ñåðâåð: '+POP.Socket.ReceiveText);
end;

[Shnaps151]

Разобрался сам, все оказалось просто) к коменде необходимо добавить два символа: #10 и #13 (энтер и перевод каретки вроде)