Class TProject (unit Project)

Inherits from

TComponent

Constructors


constructor Create(AComponent:TComponent);



Functions

procedure Free;

Init & Exit

procedure Loaded;

Protected declarations

write version resource


procedure ReadFromDelphiIni;

protected procedures } {$IFDEF WIN32

procedure WriteState(Writer:TWriter);


procedure WriteToDelphiIni;


procedure WriteVersionResource;

Denne blok udførers kun ved 1) Start af applikation

function GetVersion :string;

Version number } { Private declarations - property read

property functions (read)


procedure SetBackupFiles(value:string);

property procedures (write)

procedure SetBackupPath (value:string);


procedure SetCompany (value:string);


procedure SetCopyright (value:string);


procedure SetLog (value:TStrings);


procedure SetNotes (value:TStrings);

nu må backups gerne ske

procedure SetProjectPath(value:string);


procedure SetResFile (value:string);

Private declarations - property write

procedure SetVersion (value:string);


Properties

property AutoBackup : Boolean

Backup properties

property AutoNaming : Boolean

Published declarations

property BackupFiles : string


property BackupPath : string


property Build : Integer


property Charset : TCharset


property Comment : string


property Company : string

version resource properties

property Copyright : string


property Description : string


property FileType : TFileType


property Language : TLanguage


property Log : TStrings


property Notes : TStrings


property OriginalName : string


property PrivateBuild : string


property Productname : string


property ProductVersion : string


property ProjectPath : string


property ResourceFile : string


property SmartBackup : boolean


property SpecialBuild : string


property Trademarks : string


property Version : string


Events

Variables

FAutobackup : boolean;

Styrer automatisk navngivning af project

FAutoNaming : Boolean;

Perform backup checking Archive bit

FBackupfiles : string;

manuel backup via bekræft eller automatisk

FBackupPath : string;

hvilke filer der skal kopieres

FBuild : Integer;

hvor de skal kopieres fra

FCharset : TCharset;

default : lanUK_English

FComment : string;

stored in Ini-file

FCompany : string;

Resourcefile name

FCopyright : string;

stored in Ini-file

FDescription : string;

default :

FFileType : TFileType;

default : csMultilinqual

FLanguage : TLanguage;

default :

FLog : TStrings;


FNotes : TStrings;

build nr, incr.

FOriginalName : string;

default : <0.

FPrivateBuild : string;

default :

FProductname : string;

default :

FProductVersion : string;

default :

FProjectPath : string;

hvor de skal kopieres til (main-dir)

FResFile : string;


FSmartBackup : boolean;

default : ffProgram } { Auto defined properties } { Internalname, { TProject.

FSpecialBuild : string;

default :

FTrademarks : string;

default :
FVersion : string;

project noter / log

NoBackUp : Boolean;

user defined properties


Constructors


constructor Create(AComponent:TComponent);


Functions


procedure Free;

Init & Exit


procedure Loaded;

Protected declarations

write version resource


procedure ReadFromDelphiIni;

protected procedures } {$IFDEF WIN32


procedure WriteState(Writer:TWriter);


procedure WriteToDelphiIni;


procedure WriteVersionResource;

Denne blok udførers kun ved 1) Start af applikation


function GetVersion :string;

Version number } { Private declarations - property read

property functions (read)


procedure SetBackupFiles(value:string);

property procedures (write)


procedure SetBackupPath (value:string);


procedure SetCompany (value:string);


procedure SetCopyright (value:string);


procedure SetLog (value:TStrings);


procedure SetNotes (value:TStrings);

nu må backups gerne ske


procedure SetProjectPath(value:string);


procedure SetResFile (value:string);

Private declarations - property write


procedure SetVersion (value:string);


Properties


property AutoBackup : Boolean

Backup properties


property AutoNaming : Boolean

Published declarations


property BackupFiles : string


property BackupPath : string


property Build : Integer


property Charset : TCharset


property Comment : string


property Company : string

version resource properties


property Copyright : string


property Description : string


property FileType : TFileType


property Language : TLanguage


property Log : TStrings


property Notes : TStrings


property OriginalName : string


property PrivateBuild : string


property Productname : string


property ProductVersion : string


property ProjectPath : string


property ResourceFile : string


property SmartBackup : boolean


property SpecialBuild : string


property Trademarks : string


property Version : string


Events


Variables


FAutobackup : boolean;

Styrer automatisk navngivning af project


FAutoNaming : Boolean;

Perform backup checking Archive bit


FBackupfiles : string;

manuel backup via bekræft eller automatisk


FBackupPath : string;

hvilke filer der skal kopieres


FBuild : Integer;

hvor de skal kopieres fra


FCharset : TCharset;

default : lanUK_English


FComment : string;

stored in Ini-file


FCompany : string;

Resourcefile name


FCopyright : string;

stored in Ini-file


FDescription : string;

default :


FFileType : TFileType;

default : csMultilinqual


FLanguage : TLanguage;

default :


FLog : TStrings;


FNotes : TStrings;

build nr, incr. ved component write state


FOriginalName : string;

default : <0.0.0>


FPrivateBuild : string;

default :


FProductname : string;

default :


FProductVersion : string;

default :


FProjectPath : string;

hvor de skal kopieres til (main-dir)


FResFile : string;


FSmartBackup : boolean;

default : ffProgram } { Auto defined properties } { Internalname, { TProject.name } { Fileversion , { TProject.version + TProject.build } { FileFlags } { ffprerease when version < 1.0, special/private build } { property data buffers etc


FSpecialBuild : string;

default :


FTrademarks : string;

default :


FVersion : string;

project noter / log


NoBackUp : Boolean;

user defined properties