internet i rejestry

0

Witam mam takie pytanko jak <ort>zapomąsą </ort>standardowo dostepnych komponentow lub api sprawdzis czy komputer połączony jest z internetem????

  1. Jak sprawdzić czy jakis program korzysta właśnie z jakiegoś klucza w rejestrze, myślałem żeby napisać program coś jakby monitor rejestru????

Z góry dziękuje

// popraw temat, bo nie mówi absolutnie nic o pytaniu; poza tym proponuję użyć wyszukiwarki i/lub googla - Ł

0

jesli chodzi o pierwsze, to najprosciej zainstaluj sobie pakiet komponentow INDY.
Tam znajdziesz komponent do wysylania pingow (fachowiej mowiac obslugi protokolu ICMP). Ale Tobie starczy tylko ping.
sciagnij sobie, poczytaj dokumentacje i pytaj.
Jesli chodzi o drugie pytanie, to poszukaj w FAQach.

0

Punkt 1:

Sposób pierwszy:
W sekcji "Interface" dodaj:

function InetIsOffline(Flag: Integer): Boolean; stdcall; external 'URL.DLL';

// wywołanie funkcji
 if InetIsOffline(0) then ShowMessage('Jestem offline')
else ShowMessage('Jestem online');

Sposób drugi i lepszy :)

uses WinInet;

function Connected: Boolean;
var
 Flags: DWORD;
begin
 Flags := INTERNET_CONNECTION_MODEM or INTERNET_CONNECTION_LAN or
 INTERNET_CONNECTION_PROXY or INTERNET_CONNECTION_MODEM_BUSY;
 Result := InternetGetConnectedState(@Flags, 0); // sprawdz polaczenie.
end;

// wywołanie funkcji

if Connected then ShowMessage('Jesteś Online') else ShowMessage('Nie ma połączenia z Internetem');

1 użytkowników online, w tym zalogowanych: 0, gości: 1