Главная страница | назад





Article #16969: Testing if you are connected to the internet

 Question and Answer Database

FAQ1969D.txt - Testing if you are connected to the internet

Category   :Internet/WEB
Platform   :All-32Bit
Product    :

Question:
How can I tell at runtime if I am connected to the internet?

Answer:
You can use the TCP component to retrieve the Local IP 
address. If it is "0.0.0.0" then there is no connection.

Example:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if TCP1.LocalIp = '0.0.0.0' then
    ShowMessage('Your not connected!');
end;


4/2/99 11:47:13 AM
 

Last Modified: 01-SEP-99