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: TRbwDataGrid4;
Implicit pnlTop: TPanel;
Implicit rdeTime: TRbwDataEntry;
Implicit comboUnits: TJvImageComboBox;
Private FDeletingTime: Boolean;

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 rdgPrintFrequencySelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);
Implicit procedure rdgPrintFrequencyBeforeDrawCell(Sender: TObject; ACol, ARow: Integer);
Implicit procedure rdgPrintFrequencySetEditText(Sender: TObject; ACol, ARow: Integer; const Value: string);
Implicit procedure rdgPrintFrequencyColSize(Sender: TObject; ACol, PriorWidth: Integer);
Implicit procedure rdgPrintFrequencyHorizontalScroll(Sender: TObject);
Implicit procedure rdgPrintFrequencyMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
Implicit procedure rdeTimeChange(Sender: TObject);
Implicit procedure comboUnitsChange(Sender: TObject);
Implicit procedure rdgPrintFrequencyDistributeTextProgress(Sender: TObject; Position, Max: Integer);
Private procedure GetData;
Private procedure InitializeColumn(const ACol: integer; const PrintFreq: TPrintFrequencyItem);
Private procedure SetData;
Private procedure LayoutMultiEditControls;
Private procedure EnableAMultiEditControl(Grid: TRbwDataGrid4; AControl: TControl; OddCol: Boolean);

Description

Fields

Implicit btnAdd: TButton;

See btnAddClick.

Implicit btnCancel: TBitBtn;

Clicking btnCancel closes TfrmPrintFrequency without doing anything.

Implicit btnDelete: TButton;

See btnDeleteClick.

Implicit btnHelp: TBitBtn;

Clicking btnHelp displays help on TfrmPrintFrequency.

Implicit btnInsert: TButton;

See btnInsertClick.

Implicit btnOK: TBitBtn;

See btnOKClick.

Implicit cbSaveFinalHeads: TCheckBox;

cbSaveFinalHeads specifies the value of frmGoPhast.Model.PrintFrequency.SaveFinalHeads.

Implicit pnlBottom: TPanel;

pnlBottom holds the controls at the bottom of TfrmPrintFrequency.

Implicit rdgPrintFrequency: TRbwDataGrid4;

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

Implicit pnlTop: TPanel;
 
Implicit rdeTime: TRbwDataEntry;
 
Implicit comboUnits: TJvImageComboBox;
 
Private FDeletingTime: Boolean;
 

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 rdgPrintFrequencySelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);
 
Implicit procedure rdgPrintFrequencyBeforeDrawCell(Sender: TObject; ACol, ARow: Integer);
 
Implicit procedure rdgPrintFrequencySetEditText(Sender: TObject; ACol, ARow: Integer; const Value: string);
 
Implicit procedure rdgPrintFrequencyColSize(Sender: TObject; ACol, PriorWidth: Integer);
 
Implicit procedure rdgPrintFrequencyHorizontalScroll(Sender: TObject);
 
Implicit procedure rdgPrintFrequencyMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
 
Implicit procedure rdeTimeChange(Sender: TObject);
 
Implicit procedure comboUnitsChange(Sender: TObject);
 
Implicit procedure rdgPrintFrequencyDistributeTextProgress(Sender: TObject; Position, Max: Integer);
 
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.

Private procedure LayoutMultiEditControls;
 
Private procedure EnableAMultiEditControl(Grid: TRbwDataGrid4; AControl: TControl; OddCol: Boolean);
 

Generated by PasDoc 0.12.1 on 2013-05-13 15:41:39