Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. pacsoft1

    Check Connection with Internet

    Yeah, I would just ping: procedure TfrmConnectTest.btnPingClick(Sender: TObject); begin IdIcmpClient.Ping(); end; procedure TfrmConnectTest.IdIcmpClientReply(ASender: TComponent; const AReplyStatus: TReplyStatus); begin if AReplyStatus.ReplyStatusType=rsEcho then caption:='Connected'...

Part and Inventory Search

Back
Top