Serwer proxy na elementach tsocket

Witam

Chcialem napisac sobie serwer proxy ale mam z tym problem, moj kod wyglada tak:

procedure TForm1.ClientSocket1Read(Sender: TObject;
  Socket: TCustomWinSocket);
begin
  Edit1.Text:=Socket.ReceiveText;
  memo1.Lines.Add(Edit1.Text);
  ServerSocket1.Socket.SendText(Edit1.Text);
end;


procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
  Socket: TCustomWinSocket);
begin
  Edit2.Text:=Socket.ReceiveText;
  memo2.Lines.Add(Edit2.Text);
  ClientSocket1.Socket.SendText(Edit2.Text);
end;

ale za kazdym razem dostaje blad o asynchronizacji... nie wazne z jakiego portu wysylam ...

Przegladalem forum i bylo dosc duzo opisane o tserversocket i tclientsocket ale tylko jako 1 element w 1 aplikacji a ja w sumie potrzebuje te 2 elementy w 1 aplikacji... tserversocket odbiera dane zapisuje do edita a nastepnie tclientsocket wysyla to co jest w edit'cie.

Widze ze nie ma nikogo kto by sie znal na tsocketach :(
a moze ktokowliek wie jak zrobic przekierowanie okreslonego portu na konkretne ip? moze byc na innych komponentach np. Wsocket