Subject | Re: [firebird-support] Backup database via code, while in use? |
---|---|
Author | Nando Dessena |
Post date | 2004-12-08T07:57:05Z |
Alan,
A> Maybe IBBackupService works
thanks for the benefit of the doubt. :-/
A> - but it does not appear on the component
A> pallete of Delphi7 unless you have a gds32.dll visible to Delpih (in the
A> system32 dir) with the legacy version number stamped on it.
A> I have tried this and confirmed it.
Then my copy of Delphi 7 must be magic, as I do see it. ;-)
I think you have at least three options (more if you are of an
"hacking" type):
- put a suitably-timestamped gds32.dll in the system path, install the
IBX package in Delphi and confirm that the Admin components are there.
From now on you can ditch it and use whatever renamed dll as gds32.dll
because IBX won't do that check anymore until you re-install it. That
might be what happened on my machine.
or
- use a resource editor of your choice (I like ResHack), open the
renamed fbembed and stamp the VersionInfo resource with a suitable
number.
or
- remove the check from IBDBReg.pas and recompile the IBX package. Here's
the code:
try
IB60Client := (GetGDSLibrary.GetIBClientVersion >= 6);
if (GetGDSLibrary.TryIBLoad) and IB60Client then
RegisterComponents(IBPalette2, [TIBConfigService, TIBBackupService,
TIBRestoreService, TIBValidationService, TIBStatisticalService,
TIBLogService, TIBSecurityService, TIBServerProperties, TIBLicensingService,
TIBInstall, TIBUninstall]);
except
// Eat the exception if the TryIBLoad fails. This will load the main components
// but delay the actual exception about the missing client dll until use
// of a component - as per Sparky
end;
You might guess what's the part you should wipe.
or
- use IBOAdmin. I thought you were using IBO so what's the point in
using the IBX services?
or
- use the services API directly.
A> Maybe it does work though once it is in the application.
Yeah, maybe... ;-)
Ciao
--
Nando Dessena
http://www.flamerobin.org
======================================================
I support Firebird, I am a Firebird Foundation member!
Join today at http://www.firebirdsql.org/ff/foundation
======================================================
A> Maybe IBBackupService works
thanks for the benefit of the doubt. :-/
A> - but it does not appear on the component
A> pallete of Delphi7 unless you have a gds32.dll visible to Delpih (in the
A> system32 dir) with the legacy version number stamped on it.
A> I have tried this and confirmed it.
Then my copy of Delphi 7 must be magic, as I do see it. ;-)
I think you have at least three options (more if you are of an
"hacking" type):
- put a suitably-timestamped gds32.dll in the system path, install the
IBX package in Delphi and confirm that the Admin components are there.
From now on you can ditch it and use whatever renamed dll as gds32.dll
because IBX won't do that check anymore until you re-install it. That
might be what happened on my machine.
or
- use a resource editor of your choice (I like ResHack), open the
renamed fbembed and stamp the VersionInfo resource with a suitable
number.
or
- remove the check from IBDBReg.pas and recompile the IBX package. Here's
the code:
try
IB60Client := (GetGDSLibrary.GetIBClientVersion >= 6);
if (GetGDSLibrary.TryIBLoad) and IB60Client then
RegisterComponents(IBPalette2, [TIBConfigService, TIBBackupService,
TIBRestoreService, TIBValidationService, TIBStatisticalService,
TIBLogService, TIBSecurityService, TIBServerProperties, TIBLicensingService,
TIBInstall, TIBUninstall]);
except
// Eat the exception if the TryIBLoad fails. This will load the main components
// but delay the actual exception about the missing client dll until use
// of a component - as per Sparky
end;
You might guess what's the part you should wipe.
or
- use IBOAdmin. I thought you were using IBO so what's the point in
using the IBX services?
or
- use the services API directly.
A> Maybe it does work though once it is in the application.
Yeah, maybe... ;-)
Ciao
--
Nando Dessena
http://www.flamerobin.org
======================================================
I support Firebird, I am a Firebird Foundation member!
Join today at http://www.firebirdsql.org/ff/foundation
======================================================