ReadGridLayout -
ReadGridLayout will get three strings from the given IniFile,
identified by the given section and id, and by the ORDER,
VISIBLE and WIDTHS suffixes.
WriteGridLayout -
WriteGridLayout will put three strings to the given IniFile,
identified by the given section and id, and by the ORDER,
VISIBLE and WIDTHS suffixes.
TGridLayoutOption
TGridLayoutOptions
glAll
procedure ReadGridLayout( var tbl: TTable; opt: TGridLayoutOptions; var ini: TIniFile; section, id: string);
ReadGridLayout will get three strings from the given IniFile,
identified by the given section and id, and by the ORDER,
VISIBLE and WIDTHS suffixes.
These strings are then parsed using StrParse to break them
down into three lists of values for the visibility, order and
display width of each fieldin the table.
The alfabetical sequence of the field names is used as an
index into these three lists.
procedure WriteGridLayout( var tbl: TTable; opt: TGridLayoutOptions; var ini: TIniFile; section, id: string);
WriteGridLayout will put three strings to the given IniFile,
identified by the given section and id, and by the ORDER,
VISIBLE and WIDTHS suffixes.
It is supposed to do the exact reverse of ReadGridLayout.
TGridLayoutOption = ( glWidths, glOrder, glVisible);
TGridLayoutOptions = set of TGridLayoutOption
glAll = [ glWidths, glOrder, glVisible]