60 |
|
property RequiredVersionNo; |
61 |
|
property MinimumVersionNo; |
62 |
|
property UpgradeConfFile; |
63 |
+ |
property SectionHeaderTemplate; |
64 |
|
property VendorName; |
65 |
|
property OnGetDatabaseName; |
66 |
|
property OnGetDBVersionNo; |
154 |
|
): boolean; |
155 |
|
begin |
156 |
|
Result := IBXUpgradeDatabaseDlg.RunUpgradeDatabase(Database,BackupService,UpgradeConf, |
157 |
< |
ChangeFileExt(ActiveDatabasePathName,''), |
157 |
> |
SectionHeaderTemplate, ChangeFileExt(ActiveDatabasePathName,''), |
158 |
|
TargetVersionNo,@HandleGetDBVersionNo, @HandleUpgradeStepCompleted); |
159 |
|
end; |
160 |
|
|