Uma ajuda por favor.......
1.º) Gente O objetivo é ao clicar em um botão, em um texto(Richedit)
ele encontre a palavra calculadora e passe o foco para a janela do
calculadora(já aberta), ou se encontrar a palavra word passe o foco
para a janela do word(já aberta). Eu fiz mas ele encontra somente
uma vez e sempre passa o foco para a mesma janela sempre.
Essa foi a rotina: Eu tenho um botão avançar, ao clicar ele vai
localizar em um dbRichEdit1.Text o texto 'Calculadora' e se ele
encontrar, localizar a janela da calculadora e passa o foco para ela.
Olha como ficou:
var
i : integer;//localizar o texto
aux: integer; //localizar o texto
H : HWnd; //achar a janela
begin
aux:=1;
for i:=0 to Length(DbRichEdit1.Text) do
begin
if (Copy(dbRichEdit1.Text,i+1,length ('clique')) ='clique') then //
compara os dois texto
H := FindWindow(Nil,'Calculadora');//localiza a janela da calculadora
ShowWindow(H, SW_SHOWDEFAULT);// mostra ela padrão
SetForegroundWindow(H); // Foca a janela da calculadora
end;
Obs. O texto está em uma tabela que é acessada em um DbRichEdit1.Text
pÔ GENTE MÉ Dáa uma ajuda! Qualquer teco eu agradeço :(
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
