Witam mam takie pytanko jak <ort>zapomąsą </ort>standardowo dostepnych komponentow lub api sprawdzis czy komputer połączony jest z internetem????
Z góry dziękuje
// popraw temat, bo nie mówi absolutnie nic o pytaniu; poza tym proponuję użyć wyszukiwarki i/lub googla - Ł
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.
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');
Zarejestruj się i dołącz do największej społeczności programistów w Polsce.
Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.