Autor Beitrag
der Berliner
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 417

Win Xp Home
delphi 2005
BeitragVerfasst: Mo 13.03.06 16:21 
Hallo..
Kann man Programmtechnisch das Mausrad abschalten und bei Bedarf wieder anschalten ?

Danke im vorraus.
der Berliner Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 417

Win Xp Home
delphi 2005
BeitragVerfasst: Mo 13.03.06 20:24 
Wollte das nur mal in Erinnerung rufen.
gruß
Born-to-Frag
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 1094

Win XP SP2, Win 2000 SP4
Delphi 7, 2k5
BeitragVerfasst: Mo 13.03.06 22:01 
Da das jetzt schon der X-te Thread ist den du nach < 24Stunden hoch holst: Schiebepostings sind erst nach 24h erlaubt ;)

_________________
Theorie ist wenn man alles weiß, aber nichts funktioniert. Praxis ist wenn alles funktioniert, aber niemand weiß warum.
Microsoft vereint Theorie und Praxis: Nichts funktioniert und niemand weiß warum.
der Berliner Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 417

Win Xp Home
delphi 2005
BeitragVerfasst: Di 14.03.06 17:29 
user profile iconBorn-to-Frag hat folgendes geschrieben:
der X-te Thread ;)


Hi..glaube dieser Fehler is mir erst 2 mal unterlaufen..kommt nich wieder vor :wink:
der Berliner Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 417

Win Xp Home
delphi 2005
BeitragVerfasst: Mi 15.03.06 16:56 
Titel: Ich Habs
Ich habs selbst rausgefunden :D

Ins Form.create oder Form.Activate kommt folgendes
ausblenden Delphi-Quelltext
1:
Application.OnMessage := HandleOnMessage; // alle Messages abfragen					


Dann eine Procedure schreiben
ausblenden Delphi-Quelltext
1:
procedure TFormXXX.HandleOnMessage (var Msg: TMsg; var Handled: Boolean);					


und in die Procedure
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
case Msg.message of 
  WM_MOUSEWHEEL: // das Mausrad wurde bewegt 
  begin 
    Handled := True; // Message wurde behandelt 
  end;


Stammt aus Delphi-PRAXIS.

Gruß