diff options
author | Graeme Geldenhuys <graemeg@gmail.com> | 2010-09-04 17:15:21 +0200 |
---|---|---|
committer | Graeme Geldenhuys <graemeg@gmail.com> | 2010-09-04 17:15:21 +0200 |
commit | d2a915623045a7e61dee64af59f2548b74305502 (patch) | |
tree | c55d4e56409346d4392e9b30ff140f7e0cc92a34 /src/corelib/fpg_utils.pas | |
parent | 81eaad1981cf3949aeaa551ec6e5df60b1dce68a (diff) | |
download | fpGUI-d2a915623045a7e61dee64af59f2548b74305502.tar.xz |
fpg_utils: Added a new function that returns a config directory for fpGUI framework itself.
This will be used by the File Dialog and Font Select dialog.
Diffstat (limited to 'src/corelib/fpg_utils.pas')
-rw-r--r-- | src/corelib/fpg_utils.pas | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/corelib/fpg_utils.pas b/src/corelib/fpg_utils.pas index 78848e40..8e866922 100644 --- a/src/corelib/fpg_utils.pas +++ b/src/corelib/fpg_utils.pas @@ -41,6 +41,7 @@ function fpgAppendPathDelim(const Path: TfpgString): TfpgString; function fpgHasSubDirs(const Dir: TfpgString; AShowHidden: Boolean): Boolean; function fpgAllFilesMask: TfpgString; function fpgConvertLineEndings(const s: TfpgString): TfpgString; +function fpgGetToolkitConfigDir: TfpgString; { This is so that when we support LTR and RTL languages, the colon will be added at the correct place. } function fpgAddColon(const AText: TfpgString): TfpgString; @@ -249,6 +250,11 @@ begin Inc(i); end; +function fpgGetToolkitConfigDir: TfpgString; +begin + Result := fpgTrimR(fpgGetAppConfigDir(False), ApplicationName, True) + FPG_CONFIG_DIR; +end; + function fpgAddColon(const AText: TfpgString): TfpgString; begin { TODO : Check language direction and add colon at appropriate end. This is very crude! } |