La novata inutil sigue (problema con el cliente)

[SindyL34]

bueno eh de aki de nuevo lamento las molestias, el problema que tengo es con el eejemplo del chat indy

luego de hacer modificaciones checarlo y estudiarlo no eh podido quitar cierto detallito o mas bien arreglar un problema con el programa cliente

se traba

al momento de dar clic en la barra donde se pondra el texto para enviar al chat (me refiero al programa cliente) se congela. y son mas que un par de lineas que no puedo entender por que se congela o mas bien una linea, la linea donde el tpcliente envia la linea de texto

if key = #13 then
begin
IdTCPClient1.WriteLn(edMessage.Text);
edMessage.Text := '';
end;

hay otra manera de ke el cliente envie texto?