ocket] Check Remote Port
Hello,
Why don't you use events ? ICS is so good event oriented.
regards.
ccg> Hello,
ccg>Is there any easier way to check if a port is open on a remote
ccg> server at runtime ?
ccg> var
ccg>SocketError: Integer;
ccg> procedure TF
> Is there any easier way to check if a port is open on a remote server
at runtime ?
The only reliable way to check for open port is to try to connect to it. If
you get error 10061, then the port is not opened at server side.
Btw: In you code, it is better to not use a wait loop. Instead use t
Hello,
Why don't you use events ? ICS is so good event oriented.
regards.
ccg> Hello,
ccg>Is there any easier way to check if a port is open on a remote server
ccg> at runtime ?
ccg> var
ccg>SocketError: Integer;
ccg> procedure TForm1.SessionConnected(Sender: TObject; ErrCode: Word);
c
Hello,
Is there any easier way to check if a port is open on a remote server
at runtime ?
var
SocketError: Integer;
procedure TForm1.SessionConnected(Sender: TObject; ErrCode: Word);
begin
SocketError := ErrCode;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
WSocket: TWSock