Discussion :

[Booster2ooo]

J'utilise
IEApp := CreateOleObject('InternetExplorer.Application');
Dans un programme et j'aimerai savoir si, une fois la fenetre IE ouverte, il etait possible de recuprer le contenu de la barre d'état (status bar) d'IE ?
J'ai testé IEApp.Get_StatusText(String); ca fonctionne pas :/

Merci

[Booster2ooo]

Un autre poste en rapport avec celui-ci:
http://www.developpez.net/forums/sho...11#post3274111

[Booster2ooo]

J'ai testé IEApp.Get_StatusText(String); ca fonctionne pas :/

J'ai aussi testé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Status: widestring;
...
Status := IEApp.Get_StatusText;

Passe pas (Method Get_StatusText not supported by automation object)


Edit: mm chose avec .Get_HWND >_<

Edit2:
J'ai essayé:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
    hIEWind := FindWindow('IEFrame', nil);
    if hIEWind <> 0 then
    hIEChild := FindWindowEx(hIEWind, 0, 'TabWindowClass', nil);
    if hIEChild <> 0 then
    SendMessage(hIEChild, WM_GETTEXT, 255, integer(@Buffer));
    ShowMessage(Buffer);

Ca me retourne le nom de la fenetre :/
J'ai vu que le Control ID etait A001, mais je ne sait pas si c'est pour toutes les version d'IE. Quelqu'un sait comment récupérer le texte quand on a la control id?

[Booster2ooo]

Résolu:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
    hIEWind := FindWindow('IEFrame', nil);
    if hIEWind <> 0 then
    hIEChild := FindWindowEx(hIEWind, 0, 'TabWindowClass', nil);
    if hIEChild <> 0 then
    hIEChild := FindWindowEx(hIEChild, 0, 'msctls_statusbar32', nil);
    if hIEChild <> 0 then
    SendMessage(hIEChild, WM_GETTEXT, 255, integer(@Buffer));