Delphi - [Delphi 7] Come

Salve a tutti, questa è la stringa per inviare un testo:

ServerSocket1.Socket.Connections[ListView1.ItemIndex].SendText(memo1.Lines.Text);

ma mettiamo che non sia connesso a nessun Client (in questo caso è connessione inversa :P), spunterebbe un errore giusto?, ecco voglio sapere come eventualmente modificare quell'errore scrivendo per esempio "connettiti al Client prima di inviare il comando!"

Grazie in anticipo!

credo che un semplice try catch basti...

nell'evento OnClientError del componente TserverSocket hai la gestione errori.
basta fare un doppioclick sull'evento e gestirlo, hai tutta la pappa già pronta

fai così:

if ListView1.ItemIndex <> -1 then
ServerSocket1.Socket.Connections[ListView1.ItemIndex].SendText(memo1.Lines.Text);

In questo modo non dovrebbe darti errore

EVVAAAIIIII
tre utenti 3 risposte diverse ... chi ha vinto la bambolina ??
G.

ti basta fare cosi per gestire gli errori:

try
ServerSocket1.Socket.Connections[ListView1.ItemIndex].SendText(memo1.Lines.Text);
except
showmessage('connettiti prima ad un client');
end;