Class TfrmShowHideBitmaps

DescriptionHierarchyFieldsMethodsProperties

Unit

frmShowHideBitmapsUnit

Declaration

type TfrmShowHideBitmaps = class(TfrmCustomGoPhast)

Description

TfrmShowHideBitmaps is used to show or hide imported bitmaps stored in TCompressedBitmapItems.

Hierarchy

Overview

Fields

Implicit btnClose: TBitBtn;
Implicit btnHelp: TBitBtn;
Implicit btnShowAll: TButton;
Implicit btnShowNone: TButton;
Implicit btnToggle: TButton;
Implicit clbBitmaps: TCheckListBox;
Implicit pnlBottom: TPanel;

Methods

Implicit procedure clbBitmapsClickCheck(Sender: TObject);
Implicit procedure FormCreate(Sender: TObject); override;
Implicit procedure btnShowClick(Sender: TObject);
Implicit procedure btnToggleClick(Sender: TObject);
Private procedure GetData;

Description

Fields

Implicit btnClose: TBitBtn;

btnClose: TBitBtn; Clicking btnClose closes TfrmShowHideBitmaps.

Implicit btnHelp: TBitBtn;

btnHelp: TBitBtn; Clicking btnHelp displays help on TfrmShowHideBitmaps.

Implicit btnShowAll: TButton;

btnShowAll: TButton; Clicking btnShowAll causes all the checkboxes in clbBitmaps to be checked. See btnShowClick.

Implicit btnShowNone: TButton;

btnShowNone: TButton; Clicking btnShowNone causes none of the checkboxes in clbBitmaps to be checked. See btnShowClick.

Implicit btnToggle: TButton;

btnToggle: TButton; See btnToggleClick.

Implicit clbBitmaps: TCheckListBox;

clbBitmaps: TCheckListBox; clbBitmaps displays the names of the imported bitmaps. The checked state of each bitmap reflects whether it is visible or not. See clbBitmapsClickCheck.

Implicit pnlBottom: TPanel;

pnlBottom: TPanel; pnlBottom holds the buttons on the bottom of TfrmShowHideBitmaps.

Methods

Implicit procedure clbBitmapsClickCheck(Sender: TObject);

clbBitmapsClickCheck is the event-handler for clbBitmaps.OnClickCheck Clicking on a checkbox in clbBitmaps causes the Visible property of the associated TCompressedBitmapItem to be toggled.

Implicit procedure FormCreate(Sender: TObject); override;

FormCreate calls GetData.

Implicit procedure btnShowClick(Sender: TObject);

btnShowClick shows or hides all the TCompressedBitmapItems depending on whether Sender is btnShowAll or btnShowNone.

Implicit procedure btnToggleClick(Sender: TObject);

btnToggleClick causes the checked state of all the checkboxes in clbBitmaps to be toggled.

Private procedure GetData;

GetData fills clbBitmaps with the names of the imported bitmaps and sets the checked state of each line depending on the Visible property of the TCompressedBitmapItem.

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