Hogyan lehet kikapcsolni Auto.görgetés
Hogyan tudom kikapcsolni az automatikus görgetést.
Üdvözlünk!
A ScrollBox_e sok alkatrészeket. Mindegyikük lehet mozgatni az egér segítségével. És az a baj, hogy ha a komponens fókuszba, ScrollBox automatikusan görgeti, hogy ez a komponens látható. Ha ez nem teljesen látható, amikor rákattint az egérrel erősen eltolódott neki. (Hogyan tudom kikapcsolni a tekercset?
Én is szerettem volna annyira. de ha Auto.görgetés: = hamis, akkor eltűnik scrollbars
WM_MOUSEWHEELE lefoglaló vagy valami ilyesmi.
és mi van WM_MOUSEWHEELE? amikor tab_om viszont túl görgetés bekövetkezik
már olyan probléma volt, hogy nem a forma a következő processzor:
1. OnEnter, hogy ellenőrizzék a hangsúly
eljárás TfrmSelParams.lvEnter (Sender: TObject);
kezdődik
A TListView (Sender) do
ha Items.Count> 0, akkor kezdődik
Ha még nincs (Kiválasztott), majd
Kiválasztott: = Elemek [0];
Selected.Focused: = true;
FPos: = ScrBox.VertScrollBar.Position
vég
végén;
2. Feldolgozó üzenet CM_FOCUSCHANGED forma
eljárás TfrmSelParams.WMFocusChanged (var Msg: TMessage);
kezdődik
ha TWinControl (Msg.LParam) van TListView majd
ScrBox.VertScrollBar.Position: = FPos
végén;
I. maradt abban a helyzetben FPos csak a függőleges vonal, az Ön esetében ez valószínűleg fenn kell tartani és vízszintes.
Memória: 0.72 MB
Idő: 0.033 c