Hallo,
habe so ein wenig Schwierigkeiten mit dem Stringgrid.
Ich benötige ein pixelgenaues Scrollen der horizontalen ScrollBar. In den Options habe ich goThumpTracking aktiviert. Wenn man also mit der Maus den Scrollbalken an sich bewegt, erfolgt ein pixelgenaues Update auf das Grid.
Klicke ich aber auf die Pfeile rechts und links springt die Anzeige des Grids.
In einem Delphi-Forum habe ich gelesen, dass es aber bei Lazarus möglich sein soll, dieses pixelgenaue Scrollen mit der horizontalen Scrollbar umzusetzen.
Hat jemand eine Idee, was da gemacht werden muss.
Vielen Dank.
Stringgrid pixelgenaues scrollen (horizontal)
Re: Stringgrid pixelgenaues scrollen (horizontal)
Unter Options schon mal goSmoothScroll gesetzt?
Re: Stringgrid pixelgenaues scrollen (horizontal)
goSmoothScroll ist gesetzt
Re: Stringgrid pixelgenaues scrollen (horizontal)
Ich weiß zwar nicht wofür das gut sein soll, aber du kannst einen Hack machen (zumindest bei mir unter Windows 7 funktioniert das):
Code: Alles auswählen
uses ..., LMessages, LCLType;
type
TStringGrid = class(Grids.TStringGrid)
procedure WMHScroll(var message : TLMHScroll); message LM_HSCROLL;
end;
...
procedure TStringGrid.WMHScroll(var message: TLMHScroll);
begin
case message.ScrollCode of
SB_PAGERIGHT, SB_LINERIGHT:
begin
message.ScrollCode := SB_THUMBPOSITION;
message.Pos := GetScrollBarPosition(SB_Horz) + 1;
end;
SB_PAGELEFT, SB_LINELEFT:
begin
message.ScrollCode := SB_THUMBPOSITION;
message.Pos := GetScrollBarPosition(SB_Horz) - 1;
end;
end;
inherited;
end;
Code: Alles auswählen
type
TLiveSelection = (lsMoney, lsChilds, lsTime);
TLive = Array[0..1] of TLiveSelection;
Re: Stringgrid pixelgenaues scrollen (horizontal)
Hallo Michl,
vielen Dank. Werde ich mich morgen dann gleich mal ransetzen.
vielen Dank. Werde ich mich morgen dann gleich mal ransetzen.
Re: Stringgrid pixelgenaues scrollen (horizontal)
Rueckmeldung:
Hi Michl,
perfekt. Ich arbeite mit Win10. Funktioniert prima, genau wie ich es mir vorgestellt habe.
Besten Dank.
Hi Michl,
perfekt. Ich arbeite mit Win10. Funktioniert prima, genau wie ich es mir vorgestellt habe.
Besten Dank.