Delphi测试端口是否有效源代码.rar
Delphi测试端口是否有效源代码,你可以手动输入各个端口,本程序可以测试到该端口是否处于开放状态,功能仅此而已,比较简单的端口测试程序。源代码如下所示: procedure TForm1.Button1Click(Sender: TObject); begin if ComPortAvailable(PAnsiChar(Edit1.Text)) then ShowMessage('端口可用') else ShowMessage('端口无效'); end;
用户评论