Unit GridLay

Classes

Functions

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.

Types

TGridLayoutOption
TGridLayoutOptions

Constants

glAll

Variables


Functions


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.

Types


TGridLayoutOption = ( glWidths, glOrder, glVisible);

TGridLayoutOptions = set of TGridLayoutOption

Constants

glAll = [ glWidths, glOrder, glVisible]


Variables