| Class TWidgetEditDlg (unit WdgEdt) |
TForm
| Constructors |
| Functions |
procedure BoldClick(Sender: TObject);
procedure ColorGridClick(Sender: TObject);
procedure ColorGridDrawCell(Sender: TObject; Col, Row: longint;
Rect: TRect; State: TGridDrawState);
procedure ComboBox1Change(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure GlyphGridClick(Sender: TObject);
procedure GlyphGridSelectCell(Sender: TObject; Col, Row: longint;
var CanSelect: Boolean);
procedure ItalicClick(Sender: TObject);
procedure UpDown1Click(Sender: TObject; Button: TUDBtnType);
procedure UpDown2Click(Sender: TObject; Button: TUDBtnType);
procedure DrawPanel;A design mistake!! This routine has to parallel TWidget.
| Properties |
| Events |
| Variables |
Bold : TCheckBox;
Button1 : TButton;
Button2 : TButton;
ColorGrid : TStringGrid;
ComboBox1 : TComboBox;
FontLabel : TLabel;
GlyphGrid : TStringGrid;
Italic : TCheckBox;
Panel1 : TPanel;
UpDown1 : TUpDown;
UpDown2 : TUpDown;
Glyph : char;
OffsetLeft : integer;
OffSetTop : integer;| Constructors |
| Functions |
procedure BoldClick(Sender: TObject);
procedure ColorGridClick(Sender: TObject);
procedure ColorGridDrawCell(Sender: TObject; Col, Row: longint;
Rect: TRect; State: TGridDrawState);
procedure ComboBox1Change(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure GlyphGridClick(Sender: TObject);
procedure GlyphGridSelectCell(Sender: TObject; Col, Row: longint;
var CanSelect: Boolean);draw the glyph centered
procedure ItalicClick(Sender: TObject);
procedure UpDown1Click(Sender: TObject; Button: TUDBtnType);
procedure UpDown2Click(Sender: TObject; Button: TUDBtnType);
procedure DrawPanel;Public declarations
A design mistake!! This routine has to parallel TWidget.DrawWidget or else the drawing is off.
| Properties |
| Events |
| Variables |
Bold : TCheckBox;
Button1 : TButton;
Button2 : TButton;
ColorGrid : TStringGrid;
ComboBox1 : TComboBox;
FontLabel : TLabel;
GlyphGrid : TStringGrid;
Italic : TCheckBox;
Panel1 : TPanel;
UpDown1 : TUpDown;
UpDown2 : TUpDown;
Glyph : char;Private declarations
OffsetLeft : integer;
OffSetTop : integer;