Class TfrmPrintFrequency

DescriptionHierarchyFieldsMethodsProperties

Unit

Declaration

type TfrmPrintFrequency = class(TfrmCustomGoPhast)

Description

TfrmPrintFrequency is used to edit frmGoPhast.Model.PrintFrequency.

Hierarchy

Overview

Fields

Implicit btnAdd: TButton;
Implicit btnCancel: TBitBtn;
Implicit btnDelete: TButton;
Implicit btnHelp: TBitBtn;
Implicit btnInsert: TButton;
Implicit btnOK: TBitBtn;
Implicit cbSaveFinalHeads: TCheckBox;
Implicit pnlBottom: TPanel;
Implicit rdgPrintFrequency: TRbwRowDataGrid;
Private FFrames: TObjectList;

Methods

Implicit procedure btnAddClick(Sender: TObject);
Implicit procedure btnOKClick(Sender: TObject);
Implicit procedure btnDeleteClick(Sender: TObject);
Implicit procedure btnInsertClick(Sender: TObject);
Implicit procedure FormCreate(Sender: TObject); override;
Implicit procedure FormResize(Sender: TObject);
Implicit procedure FormDestroy(Sender: TObject);
Implicit procedure rdgPrintFrequencyColSize(Sender: TObject; ACol, PriorWidth: Integer);
Implicit procedure rdgPrintFrequencySelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);
Implicit procedure rdgPrintFrequencySetEditText(Sender: TObject; ACol, ARow: Integer; const Value: WideString);
Implicit procedure rdgPrintFrequencyTopLeftChanged(Sender: TObject);
Implicit procedure SplitterMoved(Sender: TObject);
Private procedure frameEnter(Sender: TObject);
Private procedure GetData;
Private procedure InitializeColumn(const ACol: integer; const PrintFreq: TPrintFrequencyItem);
Private procedure SetData;

Description

Fields

Implicit btnAdd: TButton;

btnAdd: TButton; See btnAddClick.

Implicit btnCancel: TBitBtn;

btnCancel: TBitBtn; Clicking btnCancel closes TfrmPrintFrequency without doing anything.

Implicit btnDelete: TButton;

btnDelete: TButton; See btnDeleteClick.

Implicit btnHelp: TBitBtn;

btnHelp: TBitBtn; Clicking btnHelp displays help on TfrmPrintFrequency.

Implicit btnInsert: TButton;

btnInsert: TButton; See btnInsertClick.

Implicit btnOK: TBitBtn;

btnOK: TBitBtn; See btnOKClick.

Implicit cbSaveFinalHeads: TCheckBox;

cbSaveFinalHeads: TCheckBox; cbSaveFinalHeads specifies the value of frmGoPhast.Model.PrintFrequency.SaveFinalHeads.

Implicit pnlBottom: TPanel;

pnlBottom: TPanel; pnlBottom holds the controls at the bottom of TfrmPrintFrequency.

Implicit rdgPrintFrequency: TRbwRowDataGrid;

rdgPrintFrequency: TRbwRowDataGrid; rdgPrintFrequency holds nearly all the data for frmGoPhast.Model.PrintFrequency (TPrintFrequencyCollection).

Private FFrames: TObjectList;

FFrames: TObjectList; FFrames holds a series of TObjectLists each of which holds a series of TframePrintFrequencys

Methods

Implicit procedure btnAddClick(Sender: TObject);

btnAddClick adds a new time for print frequency.

Implicit procedure btnOKClick(Sender: TObject);

btnOKClick calls SetData.

Implicit procedure btnDeleteClick(Sender: TObject);

btnDeleteClick deletes a time for print frequency.

Implicit procedure btnInsertClick(Sender: TObject);

btnInsertClick deletes a time for print frequency.

Implicit procedure FormCreate(Sender: TObject); override;

FormCreate initializes TfrmPrintFrequency.

Implicit procedure FormResize(Sender: TObject);

FormResize calls rdgPrintFrequencyTopLeftChanged.

Implicit procedure FormDestroy(Sender: TObject);

FormDestroy destroys FFrames.

Implicit procedure rdgPrintFrequencyColSize(Sender: TObject; ACol, PriorWidth: Integer);

rdgPrintFrequencyColSize updates the widths of the TframePrintFrequencys in rdgPrintFrequency.

Implicit procedure rdgPrintFrequencySelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);

rdgPrintFrequencySelectCell updates CanSelect

Implicit procedure rdgPrintFrequencySetEditText(Sender: TObject; ACol, ARow: Integer; const Value: WideString);

rdgPrintFrequencySetEditText updates rdgPrintFrequency.Cells[ACol, Ord(pfrName)] with the new time.

Implicit procedure rdgPrintFrequencyTopLeftChanged(Sender: TObject);

rdgPrintFrequencyTopLeftChanged repositions the TframePrintFrequencys in rdgPrintFrequency.

Implicit procedure SplitterMoved(Sender: TObject);

SplitterMoved is the OnSplitterMoved event-handler for the TSpliters in TframePrintFrequency. It resizes the column in rdgPrintFrequency to accomodate the new size.

Private procedure frameEnter(Sender: TObject);

frameEnter sets rdgPrintFrequency.Selection

Private procedure GetData;

GetData retrieves frmGoPhast.Model.PrintFrequency.)}

Private procedure InitializeColumn(const ACol: integer; const PrintFreq: TPrintFrequencyItem);

InitializeColumn initializes a new column in rdgPrintFrequency.

Private procedure SetData;

SetData sets the value of frmGoPhast.Model.PrintFrequency.


Generated by PasDoc 0.10.0 on 2006-10-31 09:56:36