Programowanie w języku Delphi » FAQ

Pobieranie numeru dostępowego w Delphi

Witam!

Odkryłem już w jaki sposób pobiera się numer dostępowy do Internetu. Postanowiłem więc podzielić się z Wami tą więdzą. Poniżej opisuje dokładnie co trzeba zrobić:


1) Wejdź na http://torry.net i znajdź tam komponent RasManager. Pobierz go!

2) Zainstaluj go sobie (instaluje się bez żadnych problemów) i dodaj go na formę (nazwij go RasManager).

3) Dodaj również na formę komponent TButton i TLabel. Przycisk nazwij btnGetPhoneNumber, a etykietę lblPhoneNumber.

4) W zdarzeniu OnClick komponentu btnGetPhoneNumber wpisz:

procedure TForm1.btnGetPhoneNumberClick(Sender : TObject);
begin
  lblPhoneNumber.Caption := IntToStr(RasManager.PhoneNumber);
end;

To wszystko!

6 komentarzy

roman25 2004-02-21 07:40

Jak zwykle, niektórzy komentujacy to typowe gnioty, niczego nie potrafią uszanować.

lofix 2004-02-16 10:30

Wow
Jak sprawdzic numer dostepowy w Delphi..
to Delphi gdzies dzwoni? :D

a na powaznie..to bylo walkowane do bolu w zwiazku z tym konkursem na antydialer

Marooned 2004-02-15 15:28

ja Ci mogę go podać: "*" [rotfl]
lub cokolwiek innego [green]

netvalker 2004-02-14 21:20

spróbuj w ten sposób odczytać numer dostępowy neostrady

Marooned 2004-02-14 19:02

[quote]Odkryłem już w jaki sposób...[/quote]
tiaa ;)

wotek 2005-03-17 21:02

nie przejmuj się roman25 - to typowe dle tej strony