diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-10-21 16:57:31 +0200 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-10-21 16:57:31 +0200 |
| commit | d1b0ae55c3a2a70737f298a61952bacb2d8a021e (patch) | |
| tree | 0f7a84408c16e5aacea71d9302696c93b1bc0b7d | |
| parent | ea885c0f15852e6aeee9316908ef8ca67feb5ea5 (diff) | |
| download | fpGUI-d1b0ae55c3a2a70737f298a61952bacb2d8a021e.tar.xz | |
colorlistbox demo event handlers are now moved to private.
This adheres to general coding style.
| -rw-r--r-- | examples/gui/colorlistbox/frmMain.pas | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/examples/gui/colorlistbox/frmMain.pas b/examples/gui/colorlistbox/frmMain.pas index abe358ce..f5ceb6ce 100644 --- a/examples/gui/colorlistbox/frmMain.pas +++ b/examples/gui/colorlistbox/frmMain.pas @@ -13,13 +13,6 @@ type TMainForm = class(TfpgForm) private - procedure chkColorNameChange(Sender: TObject); - procedure ckdReorderChanged(Sender: TObject); - procedure cbName1Change(Sender: TObject); - procedure btnName1Clicked(Sender: TObject); - procedure SetBGColor(Sender: TObject); - procedure PopulatePaletteColorCombo; - public {@VFD_HEAD_BEGIN: MainForm} cbName1: TfpgComboBox; lblName4: TfpgLabel; @@ -32,6 +25,13 @@ type chkColorName: TfpgCheckBox; chkReorder: TfpgCheckBox; {@VFD_HEAD_END: MainForm} + procedure chkColorNameChange(Sender: TObject); + procedure ckdReorderChanged(Sender: TObject); + procedure cbName1Change(Sender: TObject); + procedure btnName1Clicked(Sender: TObject); + procedure SetBGColor(Sender: TObject); + procedure PopulatePaletteColorCombo; + public procedure AfterCreate; override; end; |