connected then showmessage
dit1.Text); tClient.Active := False; tClient.Connect; tClient.Connect; if tClient.Connected then ShowMessage('连接成功') else ShowMessage('连接失败');end;procedure TForm1.FormCreate(Sender: TObject);begin Edit1.Text := '8888'; Edit2.Text :...
基于12个网页-相关网页
connected then showmessage
已连接，然后showmessage
以上为机器翻译结果，长、整句建议使用 人工翻译 。