Internet forbindelse...

Ands

Hvordan kan man se om der er oprettet forbindelse til internettet???

fks. ved at downloade en fil (fks. et lille billede) og så få programmet til at sige hvis filen er hentet "Der er forbindelse til internettet" og hvis ikke filen kunne hentes så "Der er ikke forbindelse til internettet". Og så sletter programmet selv den downloadede fil bagefter. Dette kan gøre således:

Tilføj URLMon uses.

function DownloadFile(SourceFile, DestFile: string): Boolean; 
begin 
  try 
    Result := UrlDownloadToFile(nil, PChar(SourceFile), PChar(DestFile), 0, nil) = 0; 
  except 
    Result := False; 
  end; 
end; 

Koden til din knap eller hvad du nu vil bruge:

if DownloadFile('http://www.samurize.com/modules/mydownloads/images/logo-en.gif', 'C:\\test.gif') then
  ShowMessage('Der er forbindelse til internettet!')
else
  ShowMessage('Der er ikke forbindelse til internettet!');
DeleteFile('C:\\test.gif');

Ands

Hvordan kan man se om der er oprettet forbindelse til internettet???

fks. ved at downloade en fil (fks. et lille billede) og så få programmet til at sige hvis filen er hentet "Der er forbindelse til internettet" og hvis ikke filen kunne hentes så "Der er ikke forbindelse til internettet". Og så sletter programmet selv den downloadede fil bagefter. Dette kan gøre således:

Tilføj URLMon uses.

Kode 

function DownloadFile(SourceFile, DestFile: string): Boolean; 
begin 
  try 
    Result := UrlDownloadToFile(nil, PChar(SourceFile), PChar(DestFile), 0, nil) = 0; 
  except 
    Result := False; 
  end; 
end; 

Koden til din knap eller hvad du nu vil bruge:

Kode 

if DownloadFile('http://www.samurize.com/modules/mydownloads/images/logo-en.gif', 'C:\\test.gif') then
  ShowMessage('Der er forbindelse til internettet!')
else
  ShowMessage('Der er ikke forbindelse til internettet!');
DeleteFile('C:\\test.gif');

Ands

Det er netop det der jeg bruger, for når jeg går ind i programmet skal den hente en fil, sætte det ind i en edit, og derefter slette den igen..
Det virker alt sammen fint, men det er bare det at når jeg starter programmet op vil den til at ringe op til internetet, og det er her jeg vil vide om man kan se om forbindelsen er oprettet....

Ands

Hvordan kan man se om der er oprettet forbindelse til internettet???

Ands

???