Class TfrmFormulaErrors

DescriptionHierarchyFieldsMethodsProperties

Unit

Declaration

type TfrmFormulaErrors = class(TfrmCustomGoPhast)

Description

TfrmFormulaErrors displays warning messages to the user when a formula has been found to be in error.

Hierarchy

Overview

Fields

Implicit btnClose: TBitBtn;
Implicit btnCopy: TButton;
Implicit btnHelp: TBitBtn;
Implicit Label1: TLabel;
Implicit pnlBottom: TPanel;
Implicit pnlTop: TPanel;
Implicit Timer: TTimer;
Implicit sgErrors: TRbwDataGrid4;
Implicit btnClear: TButton;
Implicit btnSave: TButton;
Implicit sdErrors: TSaveDialog;
Private FErrorCount: integer;
Private FDelayShowing: boolean;
Private FErrorAdded: Boolean;

Methods

Implicit procedure btnCopyClick(Sender: TObject);
Implicit procedure FormCreate(Sender: TObject); override;
Implicit procedure FormResize(Sender: TObject);
Implicit procedure FormShow(Sender: TObject);
Implicit procedure TimerTimer(Sender: TObject);
Implicit procedure btnClearClick(Sender: TObject);
Implicit procedure btnSaveClick(Sender: TObject);
Private procedure SetDelayShowing(const Value: boolean);
Private procedure GetErrorMessages(Lines: TStringList);
Public procedure AddFormulaError(const ObjectName, DataSetName, Formula, ErrorMessage: string);

Properties

Public property DelayShowing: boolean read FDelayShowing write SetDelayShowing;

Description

Fields

Implicit btnClose: TBitBtn;

btnClose: TBitBtn; btnClose closes the dialog box.

Implicit btnCopy: TButton;

btnCopy: TButton; btnCopy copies the error message to the clipboard.

Implicit btnHelp: TBitBtn;

btnHelp: TBitBtn; btnHelp displays help for the TfrmFormulaErrors. See btnCopyClick.

Implicit Label1: TLabel;

Label1: TLabel; Label1 displays static text.

Implicit pnlBottom: TPanel;

pnlBottom: TPanel; pnlBottom is the panel at the bottom of the dialog box that holds the buttons.

Implicit pnlTop: TPanel;

pnlTop: TPanel; pnlTop is the panel at the top of the dialog box that holds the caption.

Implicit Timer: TTimer;

Timer: TTimer; Timer is a timer used to prevent the dialog box to be shown for 0.1 seconds after an error message has been added.

Implicit sgErrors: TRbwDataGrid4;
 
Implicit btnClear: TButton;
 
Implicit btnSave: TButton;
 
Implicit sdErrors: TSaveDialog;
 
Private FErrorCount: integer;

FErrorCount is the number of errors that have been added.

Private FDelayShowing: boolean;
 
Private FErrorAdded: Boolean;
 

Methods

Implicit procedure btnCopyClick(Sender: TObject);

btnCopyClick copies the error messages to the clipboard.

Implicit procedure FormCreate(Sender: TObject); override;

FormCreate initializes the dialog box.

Implicit procedure FormResize(Sender: TObject);

FormResize resizes the columns.

Implicit procedure FormShow(Sender: TObject);

FormShow reinitializes the dialog box.

Implicit procedure TimerTimer(Sender: TObject);

TimerTimer shows the dialog box.

Implicit procedure btnClearClick(Sender: TObject);
 
Implicit procedure btnSaveClick(Sender: TObject);
 
Private procedure SetDelayShowing(const Value: boolean);
 
Private procedure GetErrorMessages(Lines: TStringList);
 
Public procedure AddFormulaError(const ObjectName, DataSetName, Formula, ErrorMessage: string);

AddFormulaError adds an error message to TfrmFormulaErrors.

Properties

Public property DelayShowing: boolean read FDelayShowing write SetDelayShowing;
 

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