diff options
41 files changed, 68 insertions, 67 deletions
diff --git a/examples/apps/docedit/extrafpc.cfg b/examples/apps/docedit/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/apps/docedit/extrafpc.cfg +++ b/examples/apps/docedit/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/corelib/canvastest/extrafpc.cfg b/examples/corelib/canvastest/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/corelib/canvastest/extrafpc.cfg +++ b/examples/corelib/canvastest/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/corelib/eventtest/extrafpc.cfg b/examples/corelib/eventtest/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/corelib/eventtest/extrafpc.cfg +++ b/examples/corelib/eventtest/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/corelib/helloworld/extrafpc.cfg b/examples/corelib/helloworld/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/corelib/helloworld/extrafpc.cfg +++ b/examples/corelib/helloworld/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/alignment/extrafpc.cfg b/examples/gui/alignment/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/alignment/extrafpc.cfg +++ b/examples/gui/alignment/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/alignment_resize/extrafpc.cfg b/examples/gui/alignment_resize/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/alignment_resize/extrafpc.cfg +++ b/examples/gui/alignment_resize/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/animation/extrafpc.cfg b/examples/gui/animation/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/animation/extrafpc.cfg +++ b/examples/gui/animation/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/bevel/extrafpc.cfg b/examples/gui/bevel/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/bevel/extrafpc.cfg +++ b/examples/gui/bevel/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/calendar/extrafpc.cfg b/examples/gui/calendar/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/calendar/extrafpc.cfg +++ b/examples/gui/calendar/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/colorlistbox/extrafpc.cfg b/examples/gui/colorlistbox/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/colorlistbox/extrafpc.cfg +++ b/examples/gui/colorlistbox/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/combobox/extrafpc.cfg b/examples/gui/combobox/extrafpc.cfg index a68a9d08..775d592f 100644 --- a/examples/gui/combobox/extrafpc.cfg +++ b/examples/gui/combobox/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib;../common +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/command_interface/extrafpc.cfg b/examples/gui/command_interface/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/command_interface/extrafpc.cfg +++ b/examples/gui/command_interface/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/compileall.sh b/examples/gui/compileall.sh index 151c6666..1fed112d 100755 --- a/examples/gui/compileall.sh +++ b/examples/gui/compileall.sh @@ -5,7 +5,7 @@ do DIR=`dirname $f` PROJECT=`basename $f` LPRNAME=`basename $PROJECT .lpr` - echo Doing $LPRNAME + echo Doing $LPRNAME in $DIR cd $DIR if [ ! -d units ]; then echo 'Missing units dir' diff --git a/examples/gui/customstyles/extrafpc.cfg b/examples/gui/customstyles/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/customstyles/extrafpc.cfg +++ b/examples/gui/customstyles/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/dbtest/extrafpc.cfg b/examples/gui/dbtest/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/dbtest/extrafpc.cfg +++ b/examples/gui/dbtest/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/edits/extrafpc.cfg b/examples/gui/edits/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/edits/extrafpc.cfg +++ b/examples/gui/edits/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/filedialog/extrafpc.cfg b/examples/gui/filedialog/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/filedialog/extrafpc.cfg +++ b/examples/gui/filedialog/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/filegrid/extrafpc.cfg b/examples/gui/filegrid/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/filegrid/extrafpc.cfg +++ b/examples/gui/filegrid/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/fontselect/extrafpc.cfg b/examples/gui/fontselect/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/fontselect/extrafpc.cfg +++ b/examples/gui/fontselect/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/gauges/extrafpc.cfg b/examples/gui/gauges/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/gauges/extrafpc.cfg +++ b/examples/gui/gauges/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/gridtest/extrafpc.cfg b/examples/gui/gridtest/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/gridtest/extrafpc.cfg +++ b/examples/gui/gridtest/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/hintwindow/extrafpc.cfg b/examples/gui/hintwindow/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/hintwindow/extrafpc.cfg +++ b/examples/gui/hintwindow/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/hintwindow/edittest.lpi b/examples/gui/hintwindow/hintwindowtest.lpi index 51bbf198..312b1b3b 100644 --- a/examples/gui/hintwindow/edittest.lpi +++ b/examples/gui/hintwindow/hintwindowtest.lpi @@ -9,8 +9,8 @@ </Flags> <SessionStorage Value="InProjectDir"/> <MainUnit Value="0"/> - <IconPath Value="./"/> <TargetFileExt Value=""/> + <Title Value="hintwindowtest"/> </General> <VersionInfo> <ProjectVersion Value=""/> @@ -33,8 +33,9 @@ </RequiredPackages> <Units Count="1"> <Unit0> - <Filename Value="edittest.lpr"/> + <Filename Value="hintwindowtest.lpr"/> <IsPartOfProject Value="True"/> + <UnitName Value="hintwindowtest"/> </Unit0> </Units> </ProjectOptions> diff --git a/examples/gui/hintwindow/edittest.lpr b/examples/gui/hintwindow/hintwindowtest.lpr index 5e9a97d8..59319057 100644 --- a/examples/gui/hintwindow/edittest.lpr +++ b/examples/gui/hintwindow/hintwindowtest.lpr @@ -1,4 +1,4 @@ -program edittest; +program hintwindowtest; {$mode objfpc}{$H+} @@ -126,36 +126,36 @@ begin case (Sender as TfpgRadioButton).tag of 0: begin - edtFloat.DecimalSeparator := '.'; - edtCurrency.DecimalSeparator := '.'; + edtFloat.CustomDecimalSeparator := '.'; + edtCurrency.CustomDecimalSeparator := '.'; if chbSpace.Checked then begin - edtInteger.ThousandSeparator := ' '; - edtFloat.ThousandSeparator := ' '; - edtCurrency.ThousandSeparator := ' '; + edtInteger.CustomThousandSeparator := ' '; + edtFloat.CustomThousandSeparator := ' '; + edtCurrency.CustomThousandSeparator := ' '; end else begin - edtInteger.ThousandSeparator := ','; - edtFloat.ThousandSeparator := ','; - edtCurrency.ThousandSeparator := ','; + edtInteger.CustomThousandSeparator := ','; + edtFloat.CustomThousandSeparator := ','; + edtCurrency.CustomThousandSeparator := ','; end; end; 1: begin - edtFloat.DecimalSeparator := ','; - edtCurrency.DecimalSeparator := ','; + edtFloat.CustomDecimalSeparator := ','; + edtCurrency.CustomDecimalSeparator := ','; if chbSpace.Checked then begin - edtInteger.ThousandSeparator := ' '; - edtFloat.ThousandSeparator := ' '; - edtCurrency.ThousandSeparator := ' '; + edtInteger.CustomThousandSeparator := ' '; + edtFloat.CustomThousandSeparator := ' '; + edtCurrency.CustomThousandSeparator := ' '; end else begin - edtInteger.ThousandSeparator := '.'; - edtFloat.ThousandSeparator := '.'; - edtCurrency.ThousandSeparator := '.'; + edtInteger.CustomThousandSeparator := '.'; + edtFloat.CustomThousandSeparator := '.'; + edtCurrency.CustomThousandSeparator := '.'; end; end; end; @@ -191,15 +191,15 @@ procedure TMainForm.chbSpaceChange(Sender: TObject); begin if chbSpace.Checked then begin - edtInteger.ThousandSeparator := ' '; - edtFloat.ThousandSeparator := ' '; - edtCurrency.ThousandSeparator := ' '; + edtInteger.CustomThousandSeparator := ' '; + edtFloat.CustomThousandSeparator := ' '; + edtCurrency.CustomThousandSeparator := ' '; end else if rbPoint.Checked then - edtInteger.ThousandSeparator := ',' + edtInteger.CustomThousandSeparator := ',' else - edtInteger.ThousandSeparator := '.'; + edtInteger.CustomThousandSeparator := '.'; end; procedure TMainForm.chbFloatDecChange(Sender: TObject); @@ -451,7 +451,7 @@ begin Name := 'edtInteger'; SetPosition(24, 108, 120, 22); ShowThousand := True; - ThousandSeparator := ','; + CustomThousandSeparator := ','; onChange := @edtIntegerChange; Hint := 'integer edit control'; end; @@ -462,7 +462,7 @@ begin Name := 'edtFloat'; SetPosition(24, 164, 120, 22); ShowThousand := True; - ThousandSeparator := ','; + CustomThousandSeparator := ','; onChange := @edtFloatChange; Hint := 'float edit control'; end; @@ -473,7 +473,7 @@ begin Name := 'edtCurrency'; SetPosition(24, 220, 120, 22); // ShowThousand := True; - ThousandSeparator := ','; + CustomThousandSeparator := ','; // Decimals := 2; Value := -123.45; onChange := @edtCurrencyChange; @@ -700,7 +700,7 @@ begin {@VFD_BODY_END: MainForm} - if edtFloat.DecimalSeparator = '.' then + if edtFloat.CustomDecimalSeparator = '.' then rbPoint.Checked := True else rbComma.Checked := True; diff --git a/examples/gui/imgtest/extrafpc.cfg b/examples/gui/imgtest/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/imgtest/extrafpc.cfg +++ b/examples/gui/imgtest/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/listbox/extrafpc.cfg b/examples/gui/listbox/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/listbox/extrafpc.cfg +++ b/examples/gui/listbox/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/listviewtest/extrafpc.cfg b/examples/gui/listviewtest/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/listviewtest/extrafpc.cfg +++ b/examples/gui/listviewtest/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/memo/extrafpc.cfg b/examples/gui/memo/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/memo/extrafpc.cfg +++ b/examples/gui/memo/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/menutest/extrafpc.cfg b/examples/gui/menutest/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/menutest/extrafpc.cfg +++ b/examples/gui/menutest/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/modalforms/extrafpc.cfg b/examples/gui/modalforms/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/modalforms/extrafpc.cfg +++ b/examples/gui/modalforms/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/panel/extrafpc.cfg b/examples/gui/panel/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/panel/extrafpc.cfg +++ b/examples/gui/panel/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/splashscreen/extrafpc.cfg b/examples/gui/splashscreen/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/splashscreen/extrafpc.cfg +++ b/examples/gui/splashscreen/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/splitter/extrafpc.cfg b/examples/gui/splitter/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/splitter/extrafpc.cfg +++ b/examples/gui/splitter/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/sprites/extrafpc.cfg b/examples/gui/sprites/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/sprites/extrafpc.cfg +++ b/examples/gui/sprites/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/stdimages/extrafpc.cfg b/examples/gui/stdimages/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/stdimages/extrafpc.cfg +++ b/examples/gui/stdimages/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/tabtest/extrafpc.cfg b/examples/gui/tabtest/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/tabtest/extrafpc.cfg +++ b/examples/gui/tabtest/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/timertest/extrafpc.cfg b/examples/gui/timertest/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/timertest/extrafpc.cfg +++ b/examples/gui/timertest/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/treeviewtest/extrafpc.cfg b/examples/gui/treeviewtest/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/treeviewtest/extrafpc.cfg +++ b/examples/gui/treeviewtest/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/examples/gui/wulinetest/extrafpc.cfg b/examples/gui/wulinetest/extrafpc.cfg index 073dc4b6..775d592f 100644 --- a/examples/gui/wulinetest/extrafpc.cfg +++ b/examples/gui/wulinetest/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../../../lib +-Fu../../../lib/$fpctarget -Xs -XX -CX diff --git a/extras/tiopf/gui/tiListMediators.pas b/extras/tiopf/gui/tiListMediators.pas index 1135d1d5..f80b18b7 100644 --- a/extras/tiopf/gui/tiListMediators.pas +++ b/extras/tiopf/gui/tiListMediators.pas @@ -144,7 +144,7 @@ begin if TtiObject(FView.Items.Item[i].UserData) = AValue then begin FView.ItemIndex := i; - HandleSelectionChanged; + HandleSelectionChanged; {$Note Is this line required?} Exit; //==> end; end; diff --git a/uidesigner/extrafpc.cfg b/uidesigner/extrafpc.cfg index 5fad92be..06ab13a9 100644 --- a/uidesigner/extrafpc.cfg +++ b/uidesigner/extrafpc.cfg @@ -1,5 +1,5 @@ -FUunits --Fu../lib +-Fu../lib/$fpctarget -Xs -XX -CX |