| Class TWFontBank32 (unit UFontBank32) |
TForm
| Constructors |
| Functions |
procedure About1Click(Sender: TObject);
procedure bitExitClick(Sender: TObject);
procedure bitPrinterClick(Sender: TObject);
procedure bitScreenClick(Sender: TObject);
procedure cmbColorChange(Sender: TObject);
procedure ediFontKeyPress(Sender: TObject; var Key: Char);
procedure Exit1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure FormHide(Sender: TObject);
procedure FormResize(Sender: TObject);
procedure Hide1Click(Sender: TObject);
procedure lstFontListClick(Sender: TObject);
procedure Maximize1Click(Sender: TObject);
procedure pagFontsChange(Sender: TObject);
procedure radStyleClick(Sender: TObject);
procedure sedSpinChange(Sender: TObject);
procedure Information;~~~~ Information ~~~~ ~~~~ Used to do the slavery job
procedure WMGetMinMaxInfo(var MSG: TMessage);~~~~~~~~~~~~~~~~~~~ User Defined Procs ~~~~~~~~~~~~~~~~ Start ~~~~ ~~~~ WMGetMinMaxInfo ~~~~ ~~~~ Using the following procedure the form minimum ans maimum size can ~~~~ be set/Controled
| Properties |
| Events |
| Variables |
About1 : TMenuItem;
bitExit : TBitBtn;
bitPrinter : TBitBtn;
bitScreen : TBitBtn;
cmbColor : TComboBox;
ediFont : TEdit;
Exit1 : TMenuItem;
Hide1 : TMenuItem;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
lstFontList : TListBox;
Maximize1 : TMenuItem;
memAbout : TMemo;
memFont : TMemo;
N1 : TMenuItem;
N2 : TMenuItem;
pagFonts : TPageControl;
panBackAbout : THMPanel;
panBackAttrib : THMPanel;
panBackList : THMPanel;
panList : THMPanel;
panMemo : THMPanel;
panMemoAttrib : THMPanel;
panSample : THMPanel;
popFontBank32 : TPopupMenu;
radStyle : TRadioGroup;
sedSpin : TSpinEdit;
sheAbout : TTabSheet;
sheAttribute : TTabSheet;
sheFontList : TTabSheet;| Constructors |
| Functions |
procedure About1Click(Sender: TObject);---->>>> ~~~~~~~~~~~~~~~~~~~ Form Events ~~~~~~~~~~~~~~~~ Finish ~~~~~~~~~~~~~~~~~~~ Form Popup Menu(s) ~~~~~~~~~~~~~~~~ Start #### About1
procedure bitExitClick(Sender: TObject);---->>>> #### bitExit -> OnClick
procedure bitPrinterClick(Sender: TObject);---->>>> ~~~~~~~~~~~~~~~~~~~ Form Popup Menu(s) ~~~~~~~~~~~~~~~~ Finish ~~~~~~~~~~~~~~~~~~~ Form Objects ~~~~~~~~~~~~~~~~ Start #### bitPrinter -> OnClick
procedure bitScreenClick(Sender: TObject);---->>>> #### bitScreen -> OnClick
procedure cmbColorChange(Sender: TObject);---->>>> #### cmbColor -> OnChange
procedure ediFontKeyPress(Sender: TObject; var Key: Char);---->>>> #### ediFont -> OnKeyPress
procedure Exit1Click(Sender: TObject);---->>>> #### Exit1
procedure FormCreate(Sender: TObject);---->>>> ~~~~~~~~~~~~~~~~~~~ User Defined Procs ~~~~~~~~~~~~~~~~ Finish ~~~~~~~~~~~~~~~~~~~ Form Events ~~~~~~~~~~~~~~~~ Start ~~~~ OnCreate
procedure FormHide(Sender: TObject);~~~~ OnHide
procedure FormResize(Sender: TObject);~~~~ OnResize
procedure Hide1Click(Sender: TObject);---->>>> #### Hide1
procedure lstFontListClick(Sender: TObject);---->>>> #### lstFontList -> OnClick
procedure Maximize1Click(Sender: TObject);---->>>> #### Maximize1
procedure pagFontsChange(Sender: TObject);---->>>> #### pagFonts -> OnChange
procedure radStyleClick(Sender: TObject);---->>>> #### radStyle -> OnClick
procedure sedSpinChange(Sender: TObject);---->>>> #### sedSpin -> OnChange
procedure Information;Public declarations
~~~~ Information ~~~~ ~~~~ Used to do the slavery job
procedure WMGetMinMaxInfo(var MSG: TMessage);Private declarations
~~~~~~~~~~~~~~~~~~~ User Defined Procs ~~~~~~~~~~~~~~~~ Start ~~~~ ~~~~ WMGetMinMaxInfo ~~~~ ~~~~ Using the following procedure the form minimum ans maimum size can ~~~~ be set/Controled
| Properties |
| Events |
| Variables |
About1 : TMenuItem;
bitExit : TBitBtn;
bitPrinter : TBitBtn;
bitScreen : TBitBtn;
cmbColor : TComboBox;
ediFont : TEdit;
Exit1 : TMenuItem;
Hide1 : TMenuItem;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
lstFontList : TListBox;
Maximize1 : TMenuItem;
memAbout : TMemo;
memFont : TMemo;
N1 : TMenuItem;
N2 : TMenuItem;
pagFonts : TPageControl;
panBackAbout : THMPanel;
panBackAttrib : THMPanel;
panBackList : THMPanel;
panList : THMPanel;
panMemo : THMPanel;
panMemoAttrib : THMPanel;
panSample : THMPanel;
popFontBank32 : TPopupMenu;
radStyle : TRadioGroup;
sedSpin : TSpinEdit;
sheAbout : TTabSheet;
sheAttribute : TTabSheet;
sheFontList : TTabSheet;