WellMouse => Marche pô

Discussion de programmation pour éviter d'empiéter dans les autres forums

Modérateurs : Modérateurs, Développeurs

pf
Développeur(se)|Développeur|Développeuse
Développeur(se)|Développeur|Développeuse
Messages : 974
Inscription : 28 avr. 2004 8:45
Version de PhotoFiltre : 6
Système d'exploitation : xp seven
Localisation : 78

WellMouse => Marche pô

Message par pf »

Salut,

Je n'arrive pas a capter le message MOUSEWHEEL dans les plugins :(
Pourtant, les controls standards (ComboBox par ex) le captent.

Voila le code : Dans un executable, ça marche !!

Code : Tout sélectionner

procedure TForm1.AppMessage(var Msg: TMsg; var Handled: Boolean);
var
  LowParam: SmallInt;
begin
  if Msg.message = WM_MOUSEWHEEL then 
  begin
    LowParam := HiWord(Msg.wParam);
    if LowParam > 0 then
      => ça tourne -
    else
      => ça tourne +
    Handled := true;
  end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnMessage := AppMessage; 
ect......

Au secours !!!!!! :lol:
Elle est ou l'astuce !!!!! Une explication ????? :wink:
Antonio
Administrateur(trice)|Administrateur|Administratrice
Administrateur(trice)|Administrateur|Administratrice
Messages : 12731
Inscription : 28 oct. 2003 22:49
Contact :

Message par Antonio »

Application.OnMessage := AppMessage;

==> vu que l'application c'est l'exe PhotoFiltre et non le plugin, je pense que ça doit pas être traité dans ce message. Et dans le OnMouseWhell de la fiche, tu as essayé ?
pf
Développeur(se)|Développeur|Développeuse
Développeur(se)|Développeur|Développeuse
Messages : 974
Inscription : 28 avr. 2004 8:45
Version de PhotoFiltre : 6
Système d'exploitation : xp seven
Localisation : 78

Message par pf »

Antonio a écrit : Application.OnMessage := AppMessage;
==> vu que l'application c'est l'exe PhotoFiltre et non le plugin, je pense que ça doit pas être traité dans ce message......
Je pense idem
Antonio a écrit :Et dans le OnMouseWhell de la fiche, tu as essayé ?
Heu... Non... mais j'ai une escuse.... :oops:
Je l'avais pô vu et Mr Borland me m'en a jamais parlé !!! :wink: :lol:

:arrow: Impec !! Ca marche; Pourquoi faire compliqué !!! :D
Merci !!
Répondre