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