Class TfrmSmoothGrid

DescriptionHierarchyFieldsMethodsProperties

Unit

Declaration

type TfrmSmoothGrid = class(TfrmCustomGoPhast)

Description

TfrmSmoothGrid is used to perform "grid-smoothing".

When "grid-smoothing" is performed, the widths of columns, rows, or layers in TPhastGrid are changed to keep the ratio between the widths of adjacent rows, columns, or layers below the "grid-smothing criterion". The "grid-smothing criterion" is generally less than or equal to 1.5.

Hierarchy

Overview

Fields

Implicit btnCancel: TBitBtn;
Implicit btnHelp: TBitBtn;
Implicit btnOK: TBitBtn;
Implicit cbColumns: TCheckBox;
Implicit cbLayers: TCheckBox;
Implicit cbRows: TCheckBox;
Implicit lblCriterion: TLabel;
Implicit rdeCriterion: TRbwDataEntry;

Methods

Implicit procedure btnOKClick(Sender: TObject);
Implicit procedure cbClick(Sender: TObject);
Implicit procedure FormCreate(Sender: TObject); override;
Private procedure SetData;
Private procedure GetData;

Description

Fields

Implicit btnCancel: TBitBtn;

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

Implicit btnHelp: TBitBtn;

btnHelp: TBitBtn; Clicking btnHelp displays help on TfrmSmoothGrid.

Implicit btnOK: TBitBtn;

btnOK: TBitBtn; See btnOKClick.

Implicit cbColumns: TCheckBox;

cbColumns: TCheckBox; cbColumns is used to specify whether the columns should be "smoothed". See cbClick.

Implicit cbLayers: TCheckBox;

cbLayers: TCheckBox; cbLayers is used to specify whether the layers should be "smoothed". See cbClick.

Implicit cbRows: TCheckBox;

cbRows: TCheckBox; cbRows is used to specify whether the rows should be "smoothed". See cbClick.

Implicit lblCriterion: TLabel;

lblCriterion: TLabel; lblCriterion displays "Grid smoothing criterion".

Implicit rdeCriterion: TRbwDataEntry;

rdeCriterion: TRbwDataEntry; rdeCriterion is used to set the grid smoothing criterion. The grid smoothing criterion is the largest ratio between adjacent column, row, or layer widths that is allowed. The grid smoothing criterion should usually be less than 1.5.

Methods

Implicit procedure btnOKClick(Sender: TObject);

btnOKClick calls SetData.

Implicit procedure cbClick(Sender: TObject);

cbClick is the OnClick event-handler for cbColumns, cbLayers, and cbRows. It enables btnOK if at least one of them is checked.

Implicit procedure FormCreate(Sender: TObject); override;
 
Private procedure SetData;

SetData uses a TUndoSmoothGrid to smooth the grid. SmoothArray is called to do the smoothing.

Private procedure GetData;
 

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