PhotoFiltre

Le forum officiel de PhotoFiltre
It is currently 16 Jun 2019 12:59

All times are UTC + 1 hour [ DST ]




Post new topic Reply to topic  [ 3 posts ] 
Author Message
 Post subject: WellMouse => Marche pô
PostPosted: 07 Nov 2005 21:53 
Offline
Développeur
Développeur(se)|Développeur|Développeuse
User avatar

Joined: 28 Apr 2004 8:45
Posts: 985
Location: 78
Gender: Male
PhotoFiltre version: 6
Operating System: xp seven
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:
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:


Top
 Profile  
 
 Post subject:
PostPosted: 07 Nov 2005 23:08 
Offline
Administrateur(trice)
Administrateur(trice)|Administrateur|Administratrice

Joined: 28 Oct 2003 23:49
Posts: 11158
Gender: None specified
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é ?


Top
 Profile  
 
 Post subject:
PostPosted: 07 Nov 2005 23:23 
Offline
Développeur
Développeur(se)|Développeur|Développeuse
User avatar

Joined: 28 Apr 2004 8:45
Posts: 985
Location: 78
Gender: Male
PhotoFiltre version: 6
Operating System: xp seven
Antonio wrote:
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 wrote:
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 !!


Top
 Profile  
 
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 3 posts ] 

All times are UTC + 1 hour [ DST ]


Who is online

Users browsing this forum: No registered users and 1 guest


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum

Search for:
Jump to:  
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group