Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: kontrolka np.winsock i czytanie zawartosci glownego paska programu
deywid



Typ: neutral
Postów: 66
Zarejestrowany: Jan 2004
kontrolka np.winsock i czytanie zawartosci glownego paska programu

jak zrobic zeby program nie szukal bibliotek
w system32 tylko w miejscu gdzie znajduje sie program?
zapomnialem
I jeszcze jedno takie...Jak znalesc czy wlaczony jest  jakis program i zczytac z niego to co ma w pasku u gory.
wiem ze temat chyba poruszany.ale ja opuscilem sie w vb pare dni minie ,wkrece sie to nie bede zadawal takich pytan

p.s sorki przez przypadek dalem posta w vba tez
.tak dawno mnie nie bylo.
ale zapracowany jestem ,a dzisiaj obronilem prace
wiec chwilka luzu sie znalazla..
pozdrawiam

[Post edytowany dnia 22-04-2005 20:46 przez deywid]

22-04-2005 20:30
Pokaż profil deywid  Wyślij email do deywid        5625009
deywid



Typ: neutral
Postów: 66
Zarejestrowany: Jan 2004

GetWindowText no dobra ale jak przechwycic uchwyt jakiegos programu zebym wiedzial skad pobrac..
np. BestPlayer. jest jakies "find" uchwytu?

hm..a co do biblioteki to nadal nie wiem

22-04-2005 21:05
Pokaż profil deywid  Wyślij email do deywid        5625009
OPAX
RatNet



Typ: neutral
Postów: 21
Zarejestrowany: Mar 2005

he mam taki sam proglem Winsock ma kontrolke " MSWINSCK.OCX", ale niewiem jak zrobic program nie szukal kontrolki (razej sie nieda) najlepiej po prodtu jak dajesz komus program to i z ta kontrolka i bedzie dzialac


_____________________________________________
Sendpack packet

22-04-2005 21:32
Pokaż profil OPAX  Wyślij email do OPAX   Odwiedź stronę OPAX       8910371
deywid



Typ: neutral
Postów: 66
Zarejestrowany: Jan 2004

nie da sie okreslic jakos sciezek dostepu do ocx .
nie wierze...

a co z tym oknem.jak pobrac uchwyt z okna jakiegos programu..ktory najpierw musze znalesc.czy jest otwarty.... np. tak jak mowilem best player

22-04-2005 21:38
Pokaż profil deywid  Wyślij email do deywid        5625009
musman
www.codec.pl



Typ: neutral
Postów: 202
Zarejestrowany: Mar 2003

witam
co do ocx i dll ktore sa potrzebne do projektu proponuje potrzebny plik wgrac do katalogu projektu i dodac go w referencjach ... nastepnie robisz instalke (blah) nie pamietam jak sie to narzedzie nazywa w vs6 ale jest tam taki wizard do klecenia instalek ... problem bedzie rozwiazany bo podczas instalacji potrzebne biblioteki zostana wgrane do wskazanego katalogu i zarejestrowane w systemie przez co nic nie trzeba robic recznie
poszukaj na msde www.msde.microsoft.com znajdziesz tam dokladnie opisany caly mechanizm jak system zachowuje sie kiedy nie ma w wyznaczonym katalogu wymaganych bibliotek i jakie systemowe katalogi sa domyslnie przeszukiwane (oczywiscie problemu nie ma jak plik jest tam gdzie trzeba)

p.s. cos mi msdn nawala wiec nie podam linka do tematu ale mysle ze nie bedziesz mial problemu z odszukaniem
p.s.2 sorry za lakoniczna odpowiedz ale jak przez mgle pamietam vs6 bo juz 1.5 roku na .net siedze

pozdrawiam

22-04-2005 23:24
Pokaż profil musman  Wyślij email do musman   Odwiedź stronę musman       13495362    3559336
deywid



Typ: neutral
Postów: 66
Zarejestrowany: Jan 2004

spoko dzieki. tez myslalem ze cos takiego moge sobie zrobic,tylko jaki jest sens robienia instalki kiedy program zajmuje 50 kB no ale jak sie nie da inaczej to trudno
Nadal ,prosze o odpowiedz z tym moim uchwytem programu.. Chce zobaczyc czy dany program jest uruchomiony np. Bestplayer.exe i pobrac uchwyt do niego jak jest
pozdrawiam

23-04-2005 09:14
Pokaż profil deywid  Wyślij email do deywid        5625009
deywid



Typ: neutral
Postów: 66
Zarejestrowany: Jan 2004

widze ze sam musze odpowiadac sobie na posty
ale nie szkodzi.... przypomnialem sobie troszke wreszcie vb oto jak napisalem programik ktory wyciaga  text z paska ,znajac jedynie jego nazwe ,grzebiac po paru funkcjach w api

Private Function Znajdz_se()

    Dim strTemp As String, lRet As Long, hInstance As Long
    Dim lpRect As RECT
    Dim hwnd As Long
    Dim aa As Long
   
    'Znajdz uchwyt okna desktopu
    hwnd = GetDesktopWindow()
    'Znajdz uchwyt do pierwszego "dziecka"
    hwnd = GetWindow(hwnd, GW_CHILD)
    'przeszukujemy wszystkie uchwyty
   
    Do Until hwnd = 0
    'Tu  sobie mozemy cos zrobic z obiektem
   
    hwnd = GetWindow(hwnd, GW_HWNDNEXT) 'uchwyt
    strTemp = String$(255, Chr(0))
    lRet = GetWindowText(hwnd, strTemp, Len(strTemp))
    Text = Left$(strTemp, lRet)
    'jezeli text nie jest pusty to sprawdza czy to jest dany program
    'w moim przypadku sprawdza czy na pasku jest gdzies text BEst (program bestplayer)
        If Text <> "" Then
            aa = InStr(1, Text, "best", 1) 'zmienna  1 powoduje ze nie rozroznia wielkosci liter
                If aa > 0 Then
                Label1.Caption = Text
                  ''w tym miejscu mamy juz caly text danego programu z paska rowny zmiennej text
                End If
        End If
 
    Loop
  End Function


========
deklaracje
    Private Type RECT
    Left As Long
    Top As Long
    Right As Long
    Bottom As Long
  End Type
  Private Declare Function GetDesktopWindow Lib "user32" () As Long
  Private Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, ByVal wCmd As Long) As Long
  Private Const GW_CHILD = 5
  Private Const GW_HWNDNEXT = 2
  Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" _
    (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
    Private Const GWL_HINSTANCE = (-6)
  Private Const GWL_STYLE = (-16)

[Post edytowany dnia 23-04-2005 14:15 przez deywid]

23-04-2005 14:11
Pokaż profil deywid  Wyślij email do deywid        5625009
deywid



Typ: neutral
Postów: 66
Zarejestrowany: Jan 2004

popatrzcie na to.wykorzystalem te api do wyswietlania  jakie okna ,widoczne i niewidoczne sa uruchomione na systemie (pokazuje niestety wraz z wewnetrznymi oknami danego programu)

http://infosport.w.interia.pl/Project1.zip

23-04-2005 14:54
Pokaż profil deywid  Wyślij email do deywid        5625009
Wszystkich odpowiedzi: 7 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1