PESQUISAR STRINGS

PROGRAM 05/12/2009 22:23:59
#329233
Bom pessoal, to com uma duvida aqui, de como ENCONTRAR strgins em outros processos,

No mesmo Form eu sei, eu utilizo:
a = InStr([Ô]1[Ô], Form1.Caption, [Ô]Form[Ô])
If a <> 0 Then Label1.Caption = [Ô]Achamos[Ô]

e como eu mudo pra procurar em todos os processos?
Agradeço!
MARCOSLING 05/12/2009 22:51:38
#329234 Resposta escolhida
como assim [Ô]em todos os processos[Ô]?
PROGRAM 05/12/2009 23:40:01
#329236
Tipo, todos os processos que estão abertos no momento, ou seja, por algum acaso do destino a calculadora esteja aberta, e meu programa procura pela string: [Ô]calc[Ô], então mostra uma Msgbox.
MARCOSLING 06/12/2009 12:29:22
#329243
Nesse caso vc poderia utilizar uma API (FindWindow) para saber um determinado processo está aberto.

pesquise sobre FindWindow
PROGRAM 06/12/2009 18:19:35
#329252
Sim, eu já tentei utiliza-lo, mas não conseguir aplica-lo nesse code:
a = InStr([Ô]1[Ô], Form1.Caption, [Ô]Form[Ô])
If a <> 0 Then Label1.Caption = [Ô]Achamos[Ô]

pode tentar me ajudar?
MARCOSLING 06/12/2009 19:23:55
#329254
Citação:

PROGRAM escreveu:
Sim, eu já tentei utiliza-lo, mas não conseguir aplica-lo nesse code:
a = InStr([Ô]1[Ô], Form1.Caption, [Ô]Form[Ô])
If a <> 0 Then Label1.Caption = [Ô]Achamos[Ô]

pode tentar me ajudar?



Mas, utilizando a API, não faz sentido utilizar esse seu código...
PROGRAM 06/12/2009 19:46:17
#329255
Pronto, consegui fazer um code Ideal, porem to com um problema:

Ele vai lista as janelas no listbox, como eu faço para esse code pesquisa no listbox?

a = InStr([Ô]1[Ô], List1.List, [Ô]Cheat[Ô])
If a <> 0 Then Label6.Caption = [Ô]Achamos[Ô]

não pega =/
Tópico encerrado , respostas não são mais permitidas
Voltar