Witam !
Mam może i głupie pytanie dotyczące artykułu:
<font color="green">Jak natomiast wykryć, że na danej maszynie nie jest otwarty dany port (co oznacza, że program nie jest uruchomiony) lub, że maszyna o danym IP nie jest w sieci? Wygeneruj zdarzenie OnCreate:
procedure TMainForm.ClientError(Sender: TObject; Socket: TCustomWinSocket;
ErrorEvent: TErrorEvent; var ErrorCode: Integer);
begin
case ErrorCode of
10060: ShowMessage('Komputer z którym chcesz się połączyć nie jest podłączony do sieci!');
10061: ShowMessage('Na danym komputerze port nie jest aktywny');
end;
ErrorCode := 0;
end; </span>
Gdzie tą procedurę umieścić? Co ma do tego OnCreate?
W jaki sposób obsłużyć błąd 10060 ?