paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 10:49:09 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazDataDesktop: Auto size results grid columns to data width. Issue #14006, patch from Reinier Olislagers

Browse Source 
git-svn-id: trunk@37478 -
This commit is contained in:
juha 2012-06-02 08:45:53 +00:00
parent 322d349d17
commit 66f1e2dbff
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tools/lazdatadesktop/datapanel.pp
View File

@ -151,7 +151,9 @@ begin
FDBgrid:=TDBGrid.Create(Self); FDBgrid:=TDBGrid.Create(Self);
FDBGrid.Parent:=Self; FDBGrid.Parent:=Self;
FDBGrid.Align:=alClient; FDBGrid.Align:=alClient;
FDBGrid.Options:=FDBGrid.Options+[dgAutoSizeColumns];
FDBGrid.DataSource:=FDatasource; FDBGrid.DataSource:=FDatasource;
FDBGrid.AutoSizeColumns;
// Navigator; // Navigator;
FNavigator:=TDBNavigator.Create(Self); FNavigator:=TDBNavigator.Create(Self);
FNavigator.Parent:=FTopPanel; FNavigator.Parent:=FTopPanel;