FMX.Stringgrid und BindSourceDB, kann man die Columns die man sehen will einstellen?

[QuickAndDirty]

Hallo
Ich habe ein FMX TStringgrid
das ist per TLinkGridToDataSource
mit einem TBindSourceDB control verbunden.

Zur Laufzeit weise ich dem TBindSourceDB.dataset eine TFDQuery instanz zu.

Alles funktioniert und wird angezeigt

Man kann zur Laufzeit die Breite der Columns im Gitter und ihre reihenfolge per drag'n'drop verändern...die funktionalität ist irgendwie schon in dem TStringGrid drin.

Ich möchte die Reihenfolge udn Breite der Felder per code abspeichern und setzen können.

Delphi-Quellcode:

   LinkGridToDataSource.Columns.Items[i].Width := StrToIntDef(ColWidthsArr[i], 20);
   LinkGridToDataSource.Columns.Items[i].Index := StrToIntDef(ColIndexArr[i], i);

Das funktioniert schon mal nicht


und direkt im Dataset die Fields[i].displaywidth Eigenschaft ändern auch nicht.
Ich habe schon einige sachen ausprobiert..

wie macht ihr sowas?