Ähm so auf den ersten Blick kann ich keinen Fehler entdecken. Aber wo hast du denn eigentlich den Server-/Client
Port deklariert ? Falls du es im Objektinspektor gemacht hast, gucke mal ob er bei beiden Programmen der gleiche ist. Vielleicht ist der Port ja auch schon belegt oder so...
Und für was ist das hier:
rechne := trunc(100 / 500 * Length(RichEdit2.Text));
und die ProgressBar ?
//EDIT: Ich hab grad gelesen den 10061 erhält man wenn der Server nicht antwortet. Also guck ob der Server active ist und die Ports gleich sind
