Du könntest die Scrollbars verbreitern:
Delphi-Quellcode:
procedure SetScroll;
var
NonClient: TNonClientMetrics;
begin
NonClient.cbSize := SizeOf(TNonClientMetrics);
SystemParametersInfo(SPI_GETNONCLIENTMETRICS,
SizeOf(TNonClientMetrics),@NonClient,0);
NonClient.iScrollWidth := 35;
NonClient.iScrollHeight := 35;
SystemParametersInfo(SPI_SETNONCLIENTMETRICS,
SizeOf(TNonClientMetrics),@NonClient,SPIF_SENDCHANGE);
end;
funkt bei meinen Touchanwendungen bestens.