Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by ralfiii,
26. Jun 2012
Hab ich ja geschrieben (siehe vorletzte Zeile vom vorigen Posting): wenn man das macht, kommt zwar der zweite Call nicht mehr, Controls die den Scroll-Event gerne hätten können dann nicht mehr mit Mausrad gesteuert werden.
Und: Das ist nur ein Workaround und keine Erklärung für das Verhalten. Kann man also sagen dass das ein Fehler in Delphi ist?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by ralfiii,
26. Jun 2012
Hallo!
Ich vermute mal schwer hier sitzt in Delphi (überprüft in 2007 und 2010) der Wurm drin.
Man erzeuge ein Formular, setzte ein Memo drauf und dann folgenden Code in OnMouseWheel:
procedure TForm1.FormMouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer;
MousePos: TPoint; var Handled: Boolean);
begin
Memo1.Lines.Add(IntToHex(Word(Shift), 4));