ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/iblocaldb/gui/IBXUpgradeDatabaseDlg.pas
(Generate patch)

Comparing ibx/trunk/iblocaldb/gui/IBXUpgradeDatabaseDlg.pas (file contents):
Revision 209 by tony, Wed Mar 14 12:48:51 2018 UTC vs.
Revision 272 by tony, Mon Feb 4 13:34:37 2019 UTC

# Line 188 | Line 188 | begin
188        UpdateAvailable := FUpgradeConf.GetUpgradeInfo(CurVersionNo+1,UpgradeInfo);
189        if UpdateAvailable then
190        begin
191 <        if UpgradeInfo.BackupDB then
191 >        if UpgradeInfo.BackupDB and (FBackupService <> nil) then
192          begin
193            CreateDir(ExtractFileDir(FArchiveStub));
194            DBArchive := FArchiveStub + '.' + IntToStr(CurrentDBVersionNo) + '.gbk';

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines