paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-27 23:19:21 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Load- and Save-unitconfig made public.

Browse Source 
git-svn-id: trunk@22387 -
This commit is contained in:
joost 2012-09-13 20:17:18 +00:00
parent 16a26ea515
commit e27586175f
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
packages/fpmkunit/src/fpmkunit.pp
View File

@ -732,9 +732,7 @@ Type
Procedure SetVersion(const V : string); Procedure SetVersion(const V : string);
Protected Protected
procedure SetName(const AValue: String);override; procedure SetName(const AValue: String);override;
procedure LoadUnitConfigFromFile(Const AFileName: String);
procedure SaveUnitConfigToStringList(Const AStringList: TStrings;ACPU:TCPU;AOS:TOS); virtual; procedure SaveUnitConfigToStringList(Const AStringList: TStrings;ACPU:TCPU;AOS:TOS); virtual;
procedure SaveUnitConfigToFile(Const AFileName: String;ACPU:TCPU;AOS:TOS);
property Dictionary: TDictionary read GetDictionary; property Dictionary: TDictionary read GetDictionary;
Public Public
constructor Create(ACollection: TCollection); override; constructor Create(ACollection: TCollection); override;
@ -757,6 +755,8 @@ Type
function AddPackageVariant(AName: string; AIsInheritable: boolean): TPackageVariants; function AddPackageVariant(AName: string; AIsInheritable: boolean): TPackageVariants;
procedure ApplyPackageVariantToCompilerOptions(ACompilerOptions: tstrings); procedure ApplyPackageVariantToCompilerOptions(ACompilerOptions: tstrings);
procedure SetDefaultPackageVariant; procedure SetDefaultPackageVariant;
procedure LoadUnitConfigFromFile(Const AFileName: String);
procedure SaveUnitConfigToFile(Const AFileName: String;ACPU:TCPU;AOS:TOS);
Property Version : String Read GetVersion Write SetVersion; Property Version : String Read GetVersion Write SetVersion;
Property FileName : String Read GetFileName Write FFileName; Property FileName : String Read GetFileName Write FFileName;
Property HomepageURL : String Read FHomepageURL Write FHomepageURL; Property HomepageURL : String Read FHomepageURL Write FHomepageURL;