Subject | IBOAdmin for D5 |
---|---|
Author | Mark Pickersgill |
Post date | 2004-07-25T12:53:11Z |
Hello,
as requested, there is a file, IBOAdmin.zip in the newsgroup's file
area.
This has some modifications that allows the IBOAdmin suite to be
compiled under Delphi 5.
I have only used the Backup and Restore services with it, but I don't
see any reason why the other services shouldn't work under D5.
Please let me know if it still compiles under Delphi 6 and 7. :)
Changes made to provide Delphi 5 compatability:
Added
IBOAdmin_D5.cfg (copy of IBOAdmin.cfg)
IBOAdmin_D5.dof (copy of IBOAdmin.dof)
IBOAdmin_D5.res (copy of IBOAdmin.res)
IBOAdmin_D5.dpk
Modified
IBOAdminReg.pas (just formatting)
IBOAdminUtils.pas (added SInvalidTimeStamp resource string for D5)
(only compiled the ConvertErrorFmt with 'local'
call type if not D5)
IBOInstall.pas (added RaiseLastOSError if D5, that simply calls
RaiseLastWin32Error)
IBOServices.pas (added LoginDialogExProc variable)
(in TIBOCustomService.Loaded, simply raise the
exception if D5)
LMIBOExtract.pas (don't use Types if D5)
(declare TBooleanDynArray type if D5)
enjoy,
Mark
as requested, there is a file, IBOAdmin.zip in the newsgroup's file
area.
This has some modifications that allows the IBOAdmin suite to be
compiled under Delphi 5.
I have only used the Backup and Restore services with it, but I don't
see any reason why the other services shouldn't work under D5.
Please let me know if it still compiles under Delphi 6 and 7. :)
Changes made to provide Delphi 5 compatability:
Added
IBOAdmin_D5.cfg (copy of IBOAdmin.cfg)
IBOAdmin_D5.dof (copy of IBOAdmin.dof)
IBOAdmin_D5.res (copy of IBOAdmin.res)
IBOAdmin_D5.dpk
Modified
IBOAdminReg.pas (just formatting)
IBOAdminUtils.pas (added SInvalidTimeStamp resource string for D5)
(only compiled the ConvertErrorFmt with 'local'
call type if not D5)
IBOInstall.pas (added RaiseLastOSError if D5, that simply calls
RaiseLastWin32Error)
IBOServices.pas (added LoginDialogExProc variable)
(in TIBOCustomService.Loaded, simply raise the
exception if D5)
LMIBOExtract.pas (don't use Types if D5)
(declare TBooleanDynArray type if D5)
enjoy,
Mark