Ĺadny brzuch
Jest jakaś szansa zalogować się na ten program z Delphi i zadzwonić (tylko zadzwonić bez potrzeby rozmowy) ??
P.S Ten program umożliwia dzwonienie za free z długością połączenia 20 sekund... zamierzam wykorzystać to jako dzwonek.
:ban: linkę być chociaż podał. jak potrzebujesz pomocy to nie każ ludziom szukać tego co Ty potrzebujesz
Jedyne co mi przychodzi go głowy (może wynajduję koło na nowo - nie wiem nie bijcie) to programowe wykonywanie czynności w tym programie, zaczynając od ShellExecute, FindWindow i FindWindowEx poprzez wstawianie tekstu (zapewne numeru) kończąc na symulowaniu naciśnięcia przycisku dzwonienia i przerwaniu połaczenia po jakimś tam czasie.
:ban: linkę być chociaż podał. jak potrzebujesz pomocy to nie każ ludziom szukać tego co Ty potrzebujesz
Sniffer + debugger + mózg = może się uda ^_^ BTW 20 sekund?! Moja siorka wczoraj gadała z psiapsiółką 9'41'' ;)
Po pierwsze w funkcji FindWindow pierwszy parametr to nazwa klasy a nie caption :) Powinno być:
WinHandle := FindWindow(nil, 'VoipCheap - gumis007');
Aby dowiedzieć się nazwy klasy danej kontrolnki mozesz uzyc np. programiku Hawkeye - autorstwa Lofix'a. Jest gdzieś w Pole do popisu. :)
A co do wstwiania tekstu to może tak:
var tekst: Pchar; begin .... tekst := Pchar(edit1.text); SendMessage(WinHandle, WM_SETTEXT, 0, Integer(tekst)); ... end;
Przy pomocy np PE Explorera czy nawet Restoratra możesz dowiedzieć się ID'ów (nie wiem jak to się nazywa) danych kontrolek i wtedy aby wywołać kliknięcie danej kontrolni znając jej ID możesz napisać tylko:
SendMessage(WinHandle, WM_COMMAND, TU_ID, 0);
Bez zabawy z FindWindowEx :)
Użytkownik p1101 edytował ten post 02 wrzesień 2005, 06:32
Otóż ten prgoram ma taką samą klasę okna jak okno Emule, toteż zmieniło mi nazwę okna emule na numer który wpisałem heheheh, a tak pozatym to działa ale musi być wyłączony eMule :)
Użytkownik krzysiek007 edytował ten post 02 wrzesień 2005, 20:55
Ale przecież możesz użyć też drugiego parametru prawda? Tak jak napisałem wczesniej - bez podawania klasy.
WinHandle := FindWindow(nil, 'VoipCheap - gumis007');
A zmienia Ci się caption bo masz uchwyt okna głównego - a musisz mieć uchwyt kontrolki, do której chcesz wstawić tekst (FindWindowEx).
Użytkownik p1101 edytował ten post 03 wrzesień 2005, 12:29
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
P.S Ten program umożliwia dzwonienie za free z długością połączenia 20 sekund... zamierzam wykorzystać to jako dzwonek.
:ban: linkę być chociaż podał. jak potrzebujesz pomocy to nie każ ludziom szukać tego co Ty potrzebujesz
Jedyne co mi przychodzi go głowy (może wynajduję koło na nowo - nie wiem nie bijcie) to programowe wykonywanie czynności w tym programie, zaczynając od ShellExecute, FindWindow i FindWindowEx poprzez wstawianie tekstu (zapewne numeru) kończąc na symulowaniu naciśnięcia przycisku dzwonienia i przerwaniu połaczenia po jakimś tam czasie.
:ban: linkę być chociaż podał. jak potrzebujesz pomocy to nie każ ludziom szukać tego co Ty potrzebujesz
Sniffer + debugger + mózg = może się uda ^_^ BTW 20 sekund?! Moja siorka wczoraj gadała z psiapsiółką 9'41'' ;)
Po pierwsze w funkcji FindWindow pierwszy parametr to nazwa klasy a nie caption :) Powinno być:
WinHandle := FindWindow(nil, 'VoipCheap - gumis007');
Aby dowiedzieć się nazwy klasy danej kontrolnki mozesz uzyc np. programiku Hawkeye - autorstwa Lofix'a. Jest gdzieś w Pole do popisu. :)
A co do wstwiania tekstu to może tak:
var tekst: Pchar; begin .... tekst := Pchar(edit1.text); SendMessage(WinHandle, WM_SETTEXT, 0, Integer(tekst)); ... end;
Przy pomocy np PE Explorera czy nawet Restoratra możesz dowiedzieć się ID'ów (nie wiem jak to się nazywa) danych kontrolek i wtedy aby wywołać kliknięcie danej kontrolni znając jej ID możesz napisać tylko:
SendMessage(WinHandle, WM_COMMAND, TU_ID, 0);
Bez zabawy z FindWindowEx :)
Użytkownik p1101 edytował ten post 02 wrzesień 2005, 06:32
Otóż ten prgoram ma taką samą klasę okna jak okno Emule, toteż zmieniło mi nazwę okna emule na numer który wpisałem heheheh, a tak pozatym to działa ale musi być wyłączony eMule :)
Użytkownik krzysiek007 edytował ten post 02 wrzesień 2005, 20:55
Ale przecież możesz użyć też drugiego parametru prawda? Tak jak napisałem wczesniej - bez podawania klasy.
WinHandle := FindWindow(nil, 'VoipCheap - gumis007');
A zmienia Ci się caption bo masz uchwyt okna głównego - a musisz mieć uchwyt kontrolki, do której chcesz wstawić tekst (FindWindowEx).
Użytkownik p1101 edytował ten post 03 wrzesień 2005, 12:29