diff options
| author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2009-02-17 09:58:26 +0000 |
|---|---|---|
| committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2009-02-17 09:58:26 +0000 |
| commit | 71a84dc3eb2dfcdc391da78557873943edd959cd (patch) | |
| tree | 7f115a02f987465f7f91114d9412a10fd31e0fad /examples/gui | |
| parent | 1a34744695bea3bf1d663040fbe8a81f5610968b (diff) | |
| download | fpGUI-71a84dc3eb2dfcdc391da78557873943edd959cd.tar.xz | |
* Fixed memory leaks in Calendar Combobox.
Diffstat (limited to 'examples/gui')
| -rw-r--r-- | examples/gui/calendar/calendartest.lpi | 5 | ||||
| -rw-r--r-- | examples/gui/calendar/calendartest.lpr | 20 |
2 files changed, 15 insertions, 10 deletions
diff --git a/examples/gui/calendar/calendartest.lpi b/examples/gui/calendar/calendartest.lpi index 7e9271ef..33da74c7 100644 --- a/examples/gui/calendar/calendartest.lpi +++ b/examples/gui/calendar/calendartest.lpi @@ -40,6 +40,11 @@ </ProjectOptions> <CompilerOptions> <Version Value="8"/> + <Parsing> + <SyntaxOptions> + <CStyleOperator Value="False"/> + </SyntaxOptions> + </Parsing> <Other> <CompilerPath Value="$(CompPath)"/> </Other> diff --git a/examples/gui/calendar/calendartest.lpr b/examples/gui/calendar/calendartest.lpr index 1587d753..67e94651 100644 --- a/examples/gui/calendar/calendartest.lpr +++ b/examples/gui/calendar/calendartest.lpr @@ -18,16 +18,6 @@ uses type TMainForm = class(TfpgForm) private - procedure btnDateFormatClicked(Sender: TObject); - procedure btnTodayClicked(Sender: TObject); - procedure btnMinDateClicked(Sender: TObject); - procedure btnMaxDateClicked(Sender: TObject); - procedure cbWHolidayChange(Sender: TObject); - procedure cbName1Change(Sender: TObject); - procedure cbCloseOnSelectChanged(Sender: TObject); - procedure btnClearClicked(Sender: TObject); - procedure DrawCalendar(month, year: integer); - public {@VFD_HEAD_BEGIN: MainForm} btnClear: TfpgButton; lblWHoliday: TfpgLabel; @@ -47,6 +37,16 @@ type lblName1: TfpgLabel; bvlName1: TfpgBevel; {@VFD_HEAD_END: MainForm} + procedure btnDateFormatClicked(Sender: TObject); + procedure btnTodayClicked(Sender: TObject); + procedure btnMinDateClicked(Sender: TObject); + procedure btnMaxDateClicked(Sender: TObject); + procedure cbWHolidayChange(Sender: TObject); + procedure cbName1Change(Sender: TObject); + procedure cbCloseOnSelectChanged(Sender: TObject); + procedure btnClearClicked(Sender: TObject); + procedure DrawCalendar(month, year: integer); + public FDropDown: TfpgPopupCalendar; procedure AfterCreate; override; end; |