Ich stehe auf dem Schlauch. Ich mache das immer so:
Delphi-Quellcode:
var
nonClientMetrics: TNonClientMetrics;
begin
nonClientMetrics.cbSize := SizeOf(TNonClientMetrics);
SystemParametersInfo(SPI_GETNONCLIENTMETRICS, 0, @nonClientMetrics, 0);
nonClientMetrics.iScrollWidth := 99;
nonClientMetrics.iScrollHeight := 99;
SystemParametersInfo(
SPI_SETNONCLIENTMETRICS,
SizeOf(nonClientMetrics),
@nonClientMetrics,
0 // This parameter can be zero if you do not want to
// update the user profile or broadcast the
// WM_SETTINGCHANGE message
);
end;
Heraus kommt dann so etwas:
Anhang 43364 Und ist auch richtig so..
Frage mich nun warum du vorher geschrieben hast das es nicht geht.
Aber Achtung! Das verändert alle Scrollbars Systemweit..
Solange bis du es zurücksetzt.
Schlechte Lösung denk ich mal.
gruss