Клиент-сервер

[cenitelas]

Здравствуйте! У меня такая проблема, есть клиент и есть сервер. На клиенте расположен Image. Когда я на сервере нажимаю на кнопку то отправляю клиенту например "1".В клиенте, если пришло "1" то image1.top:=image1.top-1; тоесть картинка поднимает на 1 позицию вверх. В сети работает все нормально. Тоесть если я зажимаю кнопку то картинка движится в верх. и на клиенте все отображается быстро. Но если подключится через интернет то картинка просто тормозит, как будто данные теряются. Прошу помочь!
Код простой, но всеже вот:

PHP код:

procedure TForm1.Button1Click(Sender: TObject);
begin
ServerSocket1.Active:=true;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Clientsocket1.Host:=edit1.Text;
Clientsocket1.Active:=true;
end;


procedure TForm1.ClientSocket1Read(Sender: TObject; Socket: TCustomWinSocket);
begin
p1:=clientsocket1.Socket.ReceiveText;
if p1='1' then
Image1.Top:=image1.Top-1;
end;

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key=VK_UP then
begin
  serversocket1.Socket.Connections[0].Sendtext('1');
end;
end;
end.