D5 /W10 Kein Scrollen im Quellcode mit Mausrad

[Alleby]

Zitat von Uwe Raabe:

Zitat von Frickler:

kann ich sehr wohl im Quelltext (d.h. in der IDE) mit dem Mausrad scrollen.

Auch wenn unter Windows 10 das seitenweise Scrollen eingestellt ist? (Eventuell die IDE dann neu starten)

Ja darum geht es! Und die IDE muss nach dem Ändern der Einstellung neu gestartet werden. Das hat mich auch sehr lange irritiert.

[EWeiss]

Zitat von Alleby:

Zitat von Uwe Raabe:

Zitat von Frickler:

kann ich sehr wohl im Quelltext (d.h. in der IDE) mit dem Mausrad scrollen.

Auch wenn unter Windows 10 das seitenweise Scrollen eingestellt ist? (Eventuell die IDE dann neu starten)

Ja darum geht es! Und die IDE muss nach dem Ändern der Einstellung neu gestartet werden. Das hat mich auch sehr lange irritiert.

Trotz allem funktioniert es nicht.

Denke das es ohne eigenen Hook in die IDE selbst es nicht funktionieren wird.
Scheint so das Seitenweise scrollen von der IDE nicht unterstützt wird.. Echt lustig so was.
Ok.. bin raus wurde alles gesagt.

PS:

Zitat:

und "Bildlauf 1 Bildschirmseite" entspricht "WheelScrollLines = MAX(Cardinal)".

Normaler weise wird MAX(Cardinal) vom System verwaltet.
Was ich damit sagen will..

Delphi-Quellcode:

    WM_MOUSEWHEEL:
      begin
        SendMessageW(WinHandle, WM_SETREDRAW, Integer(False), 0);
        If wP > 0 Then
          direction := -1
        else
          direction := 1; // wird ignoriert wenn unter Windows bsp. 3 Zeilen scrollen eingestellt ist

        if ListCount(WinHandle) > 0 then
        begin
          if (ListGetTopIndex(WinHandle) = 1) and (direction = -1) then
          begin
            ListSetTopIndex(WinHandle, 1);
            Result := 1;
            exit;
          end;
          ListSetTopIndex(WinHandle, ListGetTopIndex(WinHandle) + direction);
        end;
      end;

gruss