Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by daschaos,
10. Mär 2008
Ausgeführt wurde alles, funktioniert hat es leider nich... so gehts aber jetzt:
procedure CMMouseWheel(var Message: TCMMouseWheel);
var
ScrollDelta: Integer;
begin
ScrollDelta := 0;
inherited;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by daschaos,
10. Mär 2008
Ich versuche meine Komponente, abgeleitet von TCustomPanel, auch auf das Scrollen des Mausrads reagieren zu lassen, allerdings macht er da nur groben Unfug :(. Der Scrollbalken bewegt sich garnich und die Ausgabe der Komponente wird völlig zertsört... Wenn ich die Scrollbars "von Hand" verschiebe funktioniert alles einwandfrei, nur wäre es halt schick, wenn man auch per drehen des Mausrads...