diff options
| author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-08-22 08:06:44 +0000 |
|---|---|---|
| committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-08-22 08:06:44 +0000 |
| commit | 9dcbacc1b11c874d3e1ec3ee864418478ec9e00e (patch) | |
| tree | d26363fb24ad045e9c7a08a0e0a3848fc6ea1ecc /examples/gui | |
| parent | 7fa36a99aa445bde5cbb9435d34ba1e400dd9413 (diff) | |
| download | fpGUI-9dcbacc1b11c874d3e1ec3ee864418478ec9e00e.tar.xz | |
* Minor improvements to the File Dialog.
* Added some documenation comments explaining the File Dialog Filters property.
* Extended the FileDialog example using custom Filters.
Diffstat (limited to 'examples/gui')
| -rw-r--r-- | examples/gui/filedialog/filedialog.lpr | 1 | ||||
| -rw-r--r-- | examples/gui/menutest/menutest.lpi | 3 |
2 files changed, 3 insertions, 1 deletions
diff --git a/examples/gui/filedialog/filedialog.lpr b/examples/gui/filedialog/filedialog.lpr index a5ff4d2a..d7b1f176 100644 --- a/examples/gui/filedialog/filedialog.lpr +++ b/examples/gui/filedialog/filedialog.lpr @@ -42,6 +42,7 @@ var begin dlg := TfpgFileDialog.Create(nil); try + dlg.Filter := 'All Files (*)|*|Object Pascal (*.pas;*.lpr;*.pp)|*.pas;*.lpr;*.pp|Lazarus Project (*.lpi)|*.lpi'; if dlg.RunOpenFile then edFilename.Text := dlg.FileName; finally diff --git a/examples/gui/menutest/menutest.lpi b/examples/gui/menutest/menutest.lpi index 4ca22ab9..7a9e8f6b 100644 --- a/examples/gui/menutest/menutest.lpi +++ b/examples/gui/menutest/menutest.lpi @@ -46,7 +46,8 @@ <Generate Value="Faster"/> </CodeGeneration> <Other> - <CustomOptions Value="-FUunits"/> + <CustomOptions Value="-FUunits +"/> <CompilerPath Value="$(CompPath)"/> </Other> </CompilerOptions> |