| Class TInstallBuildForm (unit Bemf) |
TForm
| Constructors |
| Functions |
procedure ActualBuildBtnClick(Sender: TObject);
procedure BitBtn1Click(Sender: TObject);
procedure BuildBtnClick(Sender: TObject);
procedure BuildPathBtnClick(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure CancelBtnClick(Sender: TObject);
procedure CopyToFloppyBtnClick(Sender: TObject);
procedure DiskBtnPathClick(Sender: TObject);
procedure edExecutableChange(Sender: TObject);
procedure ExecutableBtnClick(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure OptionsBtnClick(Sender: TObject);
procedure YsflCompressAborted(Sender: TObject);
procedure YsflCompressBeforeAdding(YsflCompress: TYsflCompress;
const FileStats: TlzhFileStats);
procedure YsflCompressNewDisk(YsflCompress: TYsflCompress;
const DiskNumber: Integer; var Path: OpenString);
procedure YsflCompressStatus(YsflCompress: TYsflCompress;
const FileStats: TlzhFileStats);
procedure BuildInstallFiles;
procedure BuildPresetupFiles;
procedure CopyPresetupEXE(Dir: String);Universal constants
procedure CreateInstallDir;
procedure SetInformationButtons;| Properties |
property Install : TInstall| Events |
| Variables |
ActualBuildBtn : TButton;
Bevel1 : TBevel;
Bevel2 : TBevel;
Bevel3 : TBevel;
Bevel4 : TBevel;
Bevel5 : TBevel;
Bevel6 : TBevel;
BitBtn1 : TBitBtn;
BuildBtn : TButton;
BuildPathBtn : TSpeedButton;
Button1 : TButton;
CancelBtn : TBitBtn;
CopyToFloppyBtn : TButton;
DateLabel : TLabel;
DiskBtnPath : TSpeedButton;
edBuildPath : TEdit;
edDiskPath : TEdit;
edExecutable : TEdit;
ExecutableBtn : TSpeedButton;
FileBeingAdded : TLabel;
FileGauge : TGauge;
Header1 : THeader;
IFPackedSize : TLabel;
Label1 : TLabel;
Label10 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
Label6 : TLabel;
Label7 : TLabel;
Label8 : TLabel;
Memo1 : TMemo;
Memo2 : TMemo;
Memo3 : TMemo;
Notebook : TNotebook;
OpenExecutable : TOpenDialog;
OptionsBtn : TButton;
TotalGauge : TGauge;
TotalPackedSize : TLabel;
YsflCompress : TYsflCompress;
BuildAction : TBuildAction;
FInstall : TInstall;
InsBuildINI : TInsBuildINI;
OriginalDir : String;
PresetupSize : LongInt;
TotalPresetupBytes : LongInt;
TotalSetupBytes : LongInt;| Constructors |
| Functions |
procedure ActualBuildBtnClick(Sender: TObject);
procedure BitBtn1Click(Sender: TObject);
procedure BuildBtnClick(Sender: TObject);Get the source directory information.
procedure BuildPathBtnClick(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure CancelBtnClick(Sender: TObject);
procedure CopyToFloppyBtnClick(Sender: TObject);
procedure DiskBtnPathClick(Sender: TObject);
procedure edExecutableChange(Sender: TObject);
procedure ExecutableBtnClick(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction); Read all the options in from the YsflCompress Event handlers Build the zip that contains all files to be pre-installed on the user's computer. Build the presetup files Universal constants Copies the ysflpsu.exe file to the installation build directory. Properties Public declarations Events Variables The directory the user was in when he opened the installation builder. Current state An interfact object to the 'insbuild.ini' file that holds the options and files Private declarations
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure OptionsBtnClick(Sender: TObject);
procedure YsflCompressAborted(Sender: TObject);
procedure YsflCompressBeforeAdding(YsflCompress: TYsflCompress;
const FileStats: TlzhFileStats);
procedure YsflCompressNewDisk(YsflCompress: TYsflCompress;
const DiskNumber: Integer; var Path: OpenString);
procedure YsflCompressStatus(YsflCompress: TYsflCompress;
const FileStats: TlzhFileStats);
procedure BuildInstallFiles;
procedure BuildPresetupFiles;
procedure CopyPresetupEXE(Dir: String);
procedure CreateInstallDir;
procedure SetInformationButtons;
property Install : TInstall
ActualBuildBtn : TButton;
Bevel1 : TBevel;
Bevel2 : TBevel;
Bevel3 : TBevel;
Bevel4 : TBevel;
Bevel5 : TBevel;
Bevel6 : TBevel;
BitBtn1 : TBitBtn;
BuildBtn : TButton;
BuildPathBtn : TSpeedButton;
Button1 : TButton;
CancelBtn : TBitBtn;
CopyToFloppyBtn : TButton;
DateLabel : TLabel;
DiskBtnPath : TSpeedButton;
edBuildPath : TEdit;
edDiskPath : TEdit;
edExecutable : TEdit;
ExecutableBtn : TSpeedButton;
FileBeingAdded : TLabel;
FileGauge : TGauge;
Header1 : THeader;
IFPackedSize : TLabel;
Label1 : TLabel;
Label10 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
Label6 : TLabel;
Label7 : TLabel;
Label8 : TLabel;
Memo1 : TMemo;
Memo2 : TMemo;
Memo3 : TMemo;
Notebook : TNotebook;
OpenExecutable : TOpenDialog;
OptionsBtn : TButton;
TotalGauge : TGauge;
TotalPackedSize : TLabel;
YsflCompress : TYsflCompress;
BuildAction : TBuildAction;
FInstall : TInstall;
InsBuildINI : TInsBuildINI;
OriginalDir : String;
PresetupSize : LongInt;
TotalPresetupBytes : LongInt;
TotalSetupBytes : LongInt;