ViewVC Help

View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing

root/public/ibx/trunk/iblocaldb/nongui/IBXCustomIBLocalDBSupport.pas

Comparing ibx/trunk/iblocaldb/nongui/IBXCustomIBLocalDBSupport.pas (file contents):
Revision 315 by tony, Thu Feb 25 11:56:36 2021 UTC vs.
Revision 380 by tony, Mon Jan 10 10:13:17 2022 UTC

#	Line 88 | Line 88 | type
88		TCustomIBLocalDBSupport = class(TComponent)
89		private
90		FMinimumVersionNo: integer;
91	+	FSectionHeaderTemplate: string;
92		{ Private declarations }
93		FServicesConnection: TIBXServicesConnection;
94		FBackupService: TIBXServerSideBackupService;
#	Line 191 | Line 192 | type
192		property RequiredVersionNo: integer read FRequiredVersionNo write FRequiredVersionNo;
193		property MinimumVersionNo: integer read FMinimumVersionNo write FMinimumVersionNo;
194		property UpgradeConfFile: string read FUpgradeConfFile write FUpgradeConfFile;
195	+	property SectionHeaderTemplate: string read FSectionHeaderTemplate write FSectionHeaderTemplate;
196		property VendorName: string read FVendorName write FVendorName;
197		property OnGetDatabaseName: TOnGetDatabaseName read FOnGetDatabaseName write FOnGetDatabaseName;
198		property OnGetDBVersionNo: TOnGetDBVersionNo read FOnGetDBVersionNo write FOnGetDBVersionNo;
#	Line 205 | Line 207 | implementation
207		{$IFDEF Unix} uses initc, regexpr {$ENDIF}
208		{$IFDEF WINDOWS} uses Windows ,Windirs {$ENDIF}, IBUtils, IBMessages;
209
210	+	const
211	+	sSectionheader      = 'Version.%.3d';
212	+
213		resourcestring
214		sNoDowngrade = 'Database Schema is %d. Unable to downgrade to version %d';
215		sLocalDBDisabled = 'Local Database Access Disabled';
#	Line 522 | Line 527 | begin
527		FRestoreService := TIBXServerSideRestoreService.Create(self);
528		FRestoreService.ServicesConnection := ServicesConnection;
529		FRestoreService.Verbose := true;
530	+	FSectionHeaderTemplate := sSectionheader;
531		end;
532
533		destructor TCustomIBLocalDBSupport.Destroy;

Comparing ibx/trunk/iblocaldb/nongui/IBXCustomIBLocalDBSupport.pas (property svn:eol-style):
Revision 315 by tony, Thu Feb 25 11:56:36 2021 UTC vs.
Revision 380 by tony, Mon Jan 10 10:13:17 2022 UTC

#	Line 0 | Line 1
1	+	native

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines