Thema: Stringgrid

Einzelnen Beitrag anzeigen

Benutzerbild von ConnorMcLeod
ConnorMcLeod

Registriert seit: 13. Okt 2010
Ort: Bayern
490 Beiträge
 
Delphi 10.4 Sydney
 
#8

AW: Stringgrid

  Alt 19. Dez 2011, 19:18
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.
Nr.1 Delphi-Tool: [F7]
  Mit Zitat antworten Zitat