From 94f88fbfcf7eba45dc2b81f6f7e91ab32e8b9b14 Mon Sep 17 00:00:00 2001 From: alexs75 Date: Tue, 18 Aug 2020 08:30:06 +0000 Subject: [PATCH] RxFPC:fix store RxDBGridCollumn.Width in storage git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7616 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/rx/trunk/rxdb/rxdbgrid.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/components/rx/trunk/rxdb/rxdbgrid.pas b/components/rx/trunk/rxdb/rxdbgrid.pas index 5806c83ec..cb7184dd9 100644 --- a/components/rx/trunk/rxdb/rxdbgrid.pas +++ b/components/rx/trunk/rxdb/rxdbgrid.pas @@ -3788,7 +3788,8 @@ begin C := TRxColumn(Columns[i]); FPropertyStorageLink.Storage.WriteString(S1 + sCaption, StrToHexText(C.Title.Caption)); - FPropertyStorageLink.Storage.WriteInteger(S1 + sWidth, C.Width); + //FPropertyStorageLink.Storage.WriteInteger(S1 + sWidth, C.Width); + FPropertyStorageLink.Storage.WriteInteger(S1 + sWidth, C.StoredWidth); FPropertyStorageLink.Storage.WriteInteger(S1 + sIndex, C.Index); FPropertyStorageLink.Storage.WriteInteger(S1 + sVisible, Ord(C.Visible)); end;