Discussion :

[cincap]

Bonjour à toutes et à tous,

A titre d'information, j'ai souvent remarqué suivant le type de souris et dans le cas de plusieurs composants les mêmes que l'action avec le clickdroit n'est pas rapide.

Dans le cas de 8 Timage sur la fiche et avec ce code, cela se remarque.

Code :

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

1
2
3
4
5
6
7
 
procedure TFormtest.Image1MouseUp(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
 
If (Button = mbright) then monaction;
end;

Vous allez me répondre que setfocus serait idéal mais je ne vois pas l'effet.

Code :

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

1
2
3
4
5
6
7
8
 
 
procedure TFormtest.Image1MouseUp(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
setfocus ;
If (Button = mbright) then mon action;
end;

Merci de votre attention.

@+,

Cincap

[Kaféine]

Salut,

J'ai pas compris ce que tu veux dire !?

[cincap]

@ Kaféine, Bonjour, en fait sur ma fiche j'ai 8 Timage et si je clique avec le click droit sur le Timage 1, j'obtiens une action mais si après je clique directement avec le click droit sur le Timage 8, je dois m'y reprendre à 2 fois ou attendre quelques milliseconde ou cliquer avant avec le click gauche pour dire que c'est le Timage 8 sélectionné et ensuite click droit pour l'action alors c'est correct.

Je me demandais si il y avait une possibilité de dire (toujours avec le click droit) que le Timage 8 est sélectionné et ensuite faire l'action.

@+,

Cincap

[Andnotor]

Un TImage n'étant pas un contrôle de saisie, il n'aura jamais la focalisation .

Avec ton code, on ne remarque rien du tout ! (Et la souris n'est pas en cause non plus). Les seules choses qui puissent arriver est que l'exécution de MonAction soit relativement long ou qu'une autre application ait installé un hook souris, effectue une action sur le bouton droit et ainsi retarde le traitement dans ton soft.

[cincap]

@ AndNotOr, Bonsoir, c'est bien cela la raison, c'est l'action qui est en cause (traitement de redimensionnement ect..).

Par contre lors du click gauche sur le Timage puis droit pour l'action, le résultat est plus rapide, peut être utilisé ce click avant l'action ?

Enfin,

Merci à tous.

@+,

Cincap