[delphi] dbgrid -> weg met die scrollbars ?

[Verwijderd]

hoi,

ik heb een dbgrid in delphi maar om een of andere reden krijg ik de horizontale en de verticale scrollbars niet weg. Voor de horizontale staat de column width op 150 terwijl de width van de dbgrid op 160 staat, daan kan het dus niet aan liggen. Ook de ColumnResize in de options van de dbgrid staat op false. HELLUP !!!

avb

[Paul]

Bij options de indicator weghalen
Deze is breder dan 10 px...

Zonder indicator, en met 1 column van 150 breed, moet je dbgrid 154 breed zijn, wil je geen horizontale scrolbar krijgen.
Na wat gevogel kom ik op :
Width := totalColumnWidth + numberOfColumns + 3;
Hang me er niet aan op, maar zo kom ik uit in D5


Voor de verticale scrolbar kan ik alleen maar concluderen dat je teveel rijen hebt anders heb je als het goed is geen scrolbar.

[Verwijderd]

Ik heb even zitten vogelen en onderstaande werkt:

code:

type
  TMyGrid=class(TCustomGrid)
  published
    property ScrollBars;
  end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  TMyGrid(DBGrid1).ScrollBars := ssVertical;
end;

Gek genoeg geeft ssVertical geheel geen scrollbars en ssNone wel de vertical scrollbar.

Niet zo'n aardige methode maar het werkt wel!