Class

TfrmRemCoverPreview

Module

fRemCoverPreview

Last Modified

7/15/2014 3:26:38 PM

Scope

Interfaced

Inherits from

TfrmBase508Form

Declaration


TfrmRemCoverPreview = class(TfrmBase508Form)
  pnlBtns: TPanel;
  btnOK: TButton;
  lvMain: TListView;
  procedure FormCreate(Sender: TObject);
  procedure lvMainColumnClick(Sender: TObject; Column: TListColumn);
  procedure lvMainCompare(Sender: TObject; Item1, Item2: TListItem;
    Data: Integer; var Compare: Integer);
private
  FSortCol: integer;
  FSortUp: boolean;
public
  { Public declarations }
end;

DFM Objects


frmRemCoverPreview : TfrmRemCoverPreview
 ├pnlBtns : TPanel
 │ └btnOK : TButton
 ├lvMain : TListView
 └amgrMain : TVA508AccessibilityManager

Class Hierarchy


Class Fields

Name Type Scope Comments
btnOK TButton Public/Published -
FSortCol Integer Private -
FSortUp Boolean Private -
lvMain TListView Public/Published -
pnlBtns TPanel Public/Published -

Methods

Name Declaration Scope Comments
FormCreate procedure FormCreate(Sender: TObject); Public/Published -
lvMainColumnClick procedure lvMainColumnClick(Sender: TObject; Column: TListColumn); Public/Published -
lvMainCompare procedure lvMainCompare(Sender: TObject; Item1, Item2: TListItem; Data: Integer; var Compare: Integer); Public/Published -

Referenced By (2)

Module (line) Referrer Type
fRemCoverSheet (1695) - Read
fRemCoverSheet (1733) - Read