Tested on
Lazarus 2.0.10 GTK2 - Ubuntu Mate, stringgrid's horizontal scrollbar won't disappear. Steps to reproduce the issue:
1. Run the code
2. Resize until the horizontal scrollbar shows up
3. Resize back to the wider width
4. But the horizontal scrollbar won't disappear
Vertical scrollbar does not have the problem. This issue does not happen on
Wine-Windows and
WinXP. Can you reproduce the issue on your system? Is it a bug?
unit Unit1;
{$mode objfpc}{$H+}
interface
uses
Classes, Forms, Controls, Grids, StdCtrls;
type
{ TForm1 }
TForm1 = class(TForm)
StringGrid1: TStringGrid;
procedure FormCreate(Sender: TObject);
end;
var
Form1: TForm1;
implementation
{$R *.lfm}
{ TForm1 }
procedure TForm1.FormCreate(Sender: TObject);
begin
with StringGrid1 do
begin
Anchors := [akTop, akLeft, akBottom, akRight];
ColCount := 3;
FixedCols := 0;
FixedRows := 0;
ScrollBars := ssAutoBoth;
end;
end;
end.