Discussion :

[HopeLeaves]

Bonjour,

Mon probleme est le suivant, je voudrai donné le focus a mon application des lors que la souris passe dans une certaine zone de l'ecran.

Je sais faire le test pour la position de la souris avec getCursorPos, mais je ne reussi pas a donné le focus a mon application. ( comme si on avait cliqué dans la barre de titre de l'appli. )

Comment faire ?

merci

[anapurna]

salut

passe par les api windows

@+ Phil

[Cl@udius]

Salut,

Pour compléter la réponse d'Anapurna tu peux utiliser la fonction SetForegroundWindow(hWND);
hWND étant le handle de ton application.

@+

[HopeLeaves]

oui, mais non.

Utilisé l'API windows, ca me parrait tres logique, mais pour ce qui est de setForegroundWindow(), ca ne fait que mettre la fenetre au premier plan, manifestement.

Comme Application.bringToFront();

je veux vraiment lui donné le focus.

merci.

[anapurna]

salut

regarde les souces que j'ai laissé poue le dephi
il y a l'info que tu veut

@+ Phil

[Cl@udius]

je veux vraiment lui donné le focus.

Extrait de la MSDN:

The SetForegroundWindow function puts the thread that created the specified window into the foreground and activates the window.

En théorie celà devrait également donner le focus à ton appli !!!
Il y a autre chose !

@+

[Pedro]

Salut
Et SetFocus ne marcherait pas?

[HopeLeaves]

Set Focus ne marche pas,

Set foreground, a pour effet de faire clignoté l'appli dans la barre de tache.

Mais ca fait toujours pas ce que je veux.

[illuzmax]

J'ai exactement le Meme probleme

Si quelqu'un connait une autre solution

[anapurna]

salut

donc deux etapes a faire

1°) Placer la fenetre en TOPMOST

Code :

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

SetWindowPos(fhwnd, HWND_TOPMOST, nVert,nHorz,0,0 , SWP_SHOWWINDOW)

ensuite pour rafraichir l'ecran le cas echeant

Code :

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

1
2
3
4
5
6
7
8
9
 
Procedure refreshWindow(hwndGen : HWND );
var rcWnd : TRECT ;
begin
  SetFocus(hwndGen);
  GetClientRect(hwndGen,rcWnd);
  InvalidateRect(hwndGen,@rcWnd,FALSE);
  UpdateWindow(hwndGen);
end;

@+ Phil

[Rayek]

Set Focus ne marche pas,

Set foreground, a pour effet de faire clignoté l'appli dans la barre de tache.

Mais ca fait toujours pas ce que je veux.

Apres le SetForeGroundwindow(handle) fait SetActiveWindow(handle)

[HopeLeaves]

setActive windows ne fonctionne pas. ca semble ne rien faire.

Anapurna, je ne comprend pas ce que ton code fait ...
plus d'explications seraient bienvenue.

De plus, setFocus et GetClientRect ne prennent apparement pas d'argument.

Merci

[HopeLeaves]

bon, alors :

Si on fait SetForeGroundWindow(Application.handle), ca passe l'appli au premier plan.

Reste ensuite a faire :

Code :

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

1
2
3
 
  mouse_event(MOUSEEVENTF_RIGHTDOWN, 0, 0, 0, 0);
  mouse_event(MOUSEEVENTF_RIGHTUP, 0, 0, 0, 0);

Pour simuler un click de souris (bouton droit), ce qui active vraiment la fenetre.
Reste a supposé que le bouton droit n'y a aucun n'effet, sinon, faut desactivé l'effet a ce moment là.

C'est pas forcement une solution propore, mais au moin ca marche.

Merci a vous tous.