[Delphi 4] Handle dun bouton d'une autre application...

Recherche :

Dernière réponse
Sujet : [Delphi 4] Handle dun bouton d'une autre application...
Slide	function EnumChildProc(Wnd: HWnd; Form: TForm1): Boolean; stdcall; var Buffer : array[0..99] of Char; AText : string; begin // Gets the window class and text. GetClassName(Wnd, Buffer, 100); AText := string(Buffer); GetWindowText(Wnd, Buffer, 100); AText := AText + ' (' + string(Buffer) + ')'; // Add the new child node. Form.Listbox1.items.add(AText); // Continues enumerating. Result := True; end; procedure TForm1.Button2Click(Sender: TObject); begin Listbox1.items.clear; EnumChildWindows(FindWindow(nil, 'NOM DE APLICATION'),@EnumChildProc,Lparam(Form1)); bon heu, comment on di de cliker sur un bouton ou de faire apparaitre ? :) heuuu :) Je c jsute le faire avec le handle moi :/

Dernière réponse

Sujet : [Delphi 4] Handle dun bouton d'une autre application...

Slide

function EnumChildProc(Wnd: HWnd; Form: TForm1):
Boolean; stdcall;
var
Buffer : array[0..99] of Char;
AText : string;
begin
// Gets the window class and text.
GetClassName(Wnd, Buffer, 100);
AText := string(Buffer);
GetWindowText(Wnd, Buffer, 100);
AText := AText + ' (' + string(Buffer) + ')';
// Add the new child node.
Form.Listbox1.items.add(AText);
// Continues enumerating.
Result := True;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Listbox1.items.clear;
EnumChildWindows(FindWindow(nil, 'NOM DE APLICATION'),@EnumChildProc,Lparam(Form1));

bon heu, comment on di de cliker sur un bouton ou de faire apparaitre ? :) heuuu :)
Je c jsute le faire avec le handle moi :/

Votre réponse

Nom d'utilisateur

Pour poster, vous devez être inscrit sur ce forum .... si ce n'est pas le cas, cliquez ici !

Le ton de votre message

Votre réponse

Smilies

Liste des smilies perso
Wiki smilies
Chercher un smiley

Options

Activer votre signature
Désactiver les smilies
Activer la notification par email du sujet

Aperçu

Vous avez perdu votre mot de passe ?

Vue Rapide de la discussion

Slide

antp	:non: J'ai pas dit ça (c'était par ICQ) J'ai dit que si ça ne marchait que quand le bouton était visible, c'est que c'était peut-être que la fonctionne ne donnait que les objets visibles. Faut pas tout comprendre à l'envers.

Slide

On vien de me dire que c'est la fonctionne qui donne le handle que des bouton visible... si vous avez le code pour montrer tt les handle dune fenetre disponible (invisible ou pas) je suis preneur

Slide

Je resume :

1) je compile un programme avec un bouton invisible
2) je compile un autre programme qui est sensé faire apparaitre le bouton invisible de l'autre programme

J'ai utilisé le code du dessu pour le 2 eme programme, mais, il ne trouve pas le handle du bouton invisible.
Par contre il le trouve quand il est visible...

Slide a écrit a écrit :

Je cree un aplication, un bouton, je le rend invisible (le bouton), je compille, je quitte.
Ensuite, j'utilise mon programme (avec le code du dessus) reglée comme il faut pour trouver le bouton invisible, mais, il me sort comme handle pour le bouton "0", donc, ca marche pas si bien...
(Sinon ca marche quand le bouton est visible...)

Jai pas trop bokoup bien conprit la hein, surtout quand tu compille le bouton visible qui est invisible quand tu utilise ton programme avec le code dessus. :heink:

Slide

Voila ce que j'utilise...

var
hHandle,h1 : HWND;
begin
hHandle := FindWindow(nil, 'Logiciel');
h1 :=FindWindowEx(hHandle ,0,'Button',nil);
end;
Ok, c sympas comme code non ? :) mais... ca marche pas comme je le voudrai : j'explique...

Je cree un aplication, un bouton, je le rend invisible (le bouton), je compille, je quitte.
Ensuite, j'utilise mon programme (avec le code du dessus) reglée comme il faut pour trouver le bouton invisible, mais, il me sort comme handle pour le bouton "0", donc, ca marche pas si bien...
(Sinon ca marche quand le bouton est visible...)

Voila ma question : Comment trouver le handle dun Bouton invisible ???

[jfdsdjhfuetppo]--Message édité par Slide--[/jfdsdjhfuetppo]