TZRDesignForm

type TZRDesignForm = class(TForm)

  StatusBar: TStatusBar;

  paDialog: TPanel;

  btClose: TButton;

  pcDesign: TPageControl;

  tsBands: TTabSheet;

  tsVars: TTabSheet;

  alBands: TActionList;

  acBandsNew: TAction;

  acBandsRename: TAction;

  acBandsDelete: TAction;

  pmBands: TPopupMenu;

  pmBandsNew: TMenuItem;

  pmBandsRename: TMenuItem;

  pmBandsDelete: TMenuItem;

  ilTree: TImageList;

  alGroups: TActionList;

  acGroupsNew: TAction;

  acGroupsDelete: TAction;

  acGroupsUp: TAction;

  acGroupsDown: TAction;

  pmGroups: TPopupMenu;

  pmGroupsNew: TMenuItem;

  pmGroupsDelete: TMenuItem;

  pmGroupsSeparator: TMenuItem;

  pmGroupsUp: TMenuItem;

  pmGroupsDown: TMenuItem;

  ilButtons: TImageList;

  alVariables: TActionList;

  acVariablesField: TAction;

  acVariablesExpression: TAction;

  acVariablesTotal: TAction;

  acVariablesDelete: TAction;

  ilVariables: TImageList;

  gbBands: TGroupBox;

  tvBands: TTreeView;

  btBandsNew: TBitBtn;

  btBandsDelete: TBitBtn;

  gbGroups: TGroupBox;

  sbGroupsUp: TSpeedButton;

  sbGroupsDown: TSpeedButton;

  lbGroups: TListBox;

  btGroupsNew: TBitBtn;

  btGroupsDelete: TBitBtn;

  gbData: TGroupBox;

  laDataFields: TLabel;

  grControllers: TStringGrid;

  lbDataFields: TListBox;

  gbVariables: TGroupBox;

  laVariableFields: TLabel;

  laVariableExpressions: TLabel;

  laVariableTotals: TLabel;

  lbVariableExpressions: TListBox;

  btVariablesExpression: TBitBtn;

  btVariablesDelete: TBitBtn;

  lbVariableFields: TListBox;

  lbVariableTotals: TListBox;

  btVariablesField: TBitBtn;

  btVariablesTotal: TBitBtn;

  procedure FormDestroy();

  procedure FormCreate();

  procedure btCloseClick();

  procedure FormShow();

  procedure pcDesignChange();

  procedure lbGroupsClick();

  procedure tvBandsClick();

  procedure tvBandsChange();

  procedure grControllersSelectCell();

  procedure acBandsNewExecute();

  procedure acBandsRenameExecute();

  procedure acBandsDeleteExecute();

  procedure acGroupsNewExecute();

  procedure acGroupsDeleteExecute();

  procedure acGroupsUpExecute();

  procedure acGroupsDownExecute();

  procedure acVariablesExecute();

  procedure acVariablesDeleteExecute();

  procedure tvBandsGetImageIndex();

  procedure tvBandsKeyUp();

  procedure tvBandsEdited();

  procedure lbDataFieldsClick();

  procedure lbVariablesClick();

  procedure lbVariableFieldsDragOver();

  procedure lbVariableFieldsDragDrop();

  procedure lbDataFieldsDragOver();

  procedure lbDataFieldsDragDrop();

  procedure lbVariableTotalsDragOver();

  procedure lbVariableTotalsDragDrop();

  procedure tvBandsDragOver();

  procedure tvBandsDragDrop();

public

  property Report: TZReport; [rw]

end;

TZRDesignForm

TObject