Menu
▾
▴
instantobjects-cvscommit — Generates a message for every commit made on CVS
You can subscribe to this list here.
| 2004 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
(13) |
Sep
(25) |
Oct
(10) |
Nov
(19) |
Dec
(20) |
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 2005 |
Jan
|
Feb
(206) |
Mar
(43) |
Apr
(25) |
May
(20) |
Jun
(69) |
Jul
(121) |
Aug
(95) |
Sep
(122) |
Oct
(213) |
Nov
(46) |
Dec
(39) |
| 2006 |
Jan
(28) |
Feb
(57) |
Mar
(21) |
Apr
(7) |
May
(11) |
Jun
(2) |
Jul
(8) |
Aug
(13) |
Sep
(2) |
Oct
(2) |
Nov
(20) |
Dec
(16) |
| 2007 |
Jan
(9) |
Feb
(15) |
Mar
|
Apr
(4) |
May
(1) |
Jun
|
Jul
|
Aug
|
Sep
(1) |
Oct
|
Nov
|
Dec
|
| 2008 |
Jan
|
Feb
(2) |
Mar
|
Apr
|
May
|
Jun
|
Jul
(3) |
Aug
(1) |
Sep
(9) |
Oct
|
Nov
(1) |
Dec
|
| 2009 |
Jan
|
Feb
|
Mar
(8) |
Apr
(1) |
May
|
Jun
|
Jul
(11) |
Aug
(57) |
Sep
(2) |
Oct
(6) |
Nov
|
Dec
(7) |
| 2010 |
Jan
(11) |
Feb
(1) |
Mar
|
Apr
(1) |
May
|
Jun
|
Jul
(1) |
Aug
(2) |
Sep
(27) |
Oct
(3) |
Nov
(7) |
Dec
(1) |
| 2011 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
(10) |
Oct
|
Nov
|
Dec
|
| 2012 |
Jan
(8) |
Feb
(1) |
Mar
|
Apr
|
May
|
Jun
|
Jul
(1) |
Aug
|
Sep
|
Oct
(3) |
Nov
(1) |
Dec
(1) |
| 2013 |
Jan
|
Feb
|
Mar
(1) |
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
| 2014 |
Jan
|
Feb
|
Mar
|
Apr
|
May
(3) |
Jun
|
Jul
|
Aug
|
Sep
(1) |
Oct
|
Nov
(4) |
Dec
|
| 2015 |
Jan
|
Feb
|
Mar
(1) |
Apr
|
May
|
Jun
(1) |
Jul
|
Aug
(1) |
Sep
(1) |
Oct
|
Nov
|
Dec
|
| 2016 |
Jan
|
Feb
|
Mar
|
Apr
|
May
(3) |
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
| 2017 |
Jan
|
Feb
|
Mar
(1) |
Apr
(4) |
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
| 2018 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
(1) |
Sep
(3) |
Oct
|
Nov
(4) |
Dec
|
| 2022 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
(1) |
|
From: Nando D. <na...@us...> - 2005-03-01 05:37:52
|
Update of /cvsroot/instantobjects/Demos/PrimerCross/Model In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29863/PrimerCross/Model Modified Files: Model.pas Log Message: fixed incorrect spacing of the IOMETADATA keyword Index: Model.pas =================================================================== RCS file: /cvsroot/instantobjects/Demos/PrimerCross/Model/Model.pas,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** Model.pas 18 Feb 2005 11:04:08 -0000 1.2 --- Model.pas 1 Mar 2005 05:37:30 -0000 1.3 *************** *** 23,27 **** TAddress = class(TInstantObject) ! { IOMETADATA City: String(30) index; Country: Reference(TCountry); State: String(4); --- 23,27 ---- TAddress = class(TInstantObject) ! {IOMETADATA City: String(30) index; Country: Reference(TCountry); State: String(4); *************** *** 53,57 **** TCountry = class(TInstantObject) ! { IOMETADATA stored; Name: String(30); } _Name: TInstantString; --- 53,57 ---- TCountry = class(TInstantObject) ! {IOMETADATA stored; Name: String(30); } _Name: TInstantString; *************** *** 68,72 **** TPhone = class(TInstantObject) ! { IOMETADATA Name: String(20); Number: String(20) mask '(000) 000-0000;0;_'; } _Name: TInstantString; --- 68,72 ---- TPhone = class(TInstantObject) ! {IOMETADATA Name: String(20); Number: String(20) mask '(000) 000-0000;0;_'; } _Name: TInstantString; *************** *** 83,87 **** TEmail = class(TInstantObject) ! { IOMETADATA Address: String(100); } _Address: TInstantString; private --- 83,87 ---- TEmail = class(TInstantObject) ! {IOMETADATA Address: String(100); } _Address: TInstantString; private *************** *** 93,97 **** TCategory = class(TInstantObject) ! { IOMETADATA stored; Name: String(30); } _Name: TInstantString; --- 93,97 ---- TCategory = class(TInstantObject) ! {IOMETADATA stored; Name: String(30); } _Name: TInstantString; *************** *** 106,110 **** TContact = class(TInstantObject) ! { IOMETADATA stored; Address: Part(TAddress); Category: Reference(TCategory); --- 106,110 ---- TContact = class(TInstantObject) ! {IOMETADATA stored; Address: Part(TAddress); Category: Reference(TCategory); *************** *** 209,213 **** TCompany = class(TContact) ! { IOMETADATA stored; Employees: References(TPerson); } _Employees: TInstantReferences; --- 209,213 ---- TCompany = class(TContact) ! {IOMETADATA stored; Employees: References(TPerson); } _Employees: TInstantReferences; |
|
From: Nando D. <na...@us...> - 2005-03-01 05:37:20
|
Update of /cvsroot/instantobjects/Demos/Intro In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29739/Intro Modified Files: Model.pas Log Message: fixed incorrect spacing of the IOMETADATA keyword Index: Model.pas =================================================================== RCS file: /cvsroot/instantobjects/Demos/Intro/Model.pas,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** Model.pas 10 Feb 2005 12:53:34 -0000 1.2 --- Model.pas 1 Mar 2005 05:37:11 -0000 1.3 *************** *** 8,12 **** type TAddress = class(TInstantObject) ! { IOMETADATA City: String(30); PostalCode: String(8); Street: String(30); } --- 8,12 ---- type TAddress = class(TInstantObject) ! {IOMETADATA City: String(30); PostalCode: String(8); Street: String(30); } *************** *** 28,32 **** TPhone = class(TInstantObject) ! { IOMETADATA Name: String(10); Number: String(10) mask '(999) 999-9999;0;_'; } _Name: TInstantString; --- 28,32 ---- TPhone = class(TInstantObject) ! {IOMETADATA Name: String(10); Number: String(10) mask '(999) 999-9999;0;_'; } _Name: TInstantString; *************** *** 43,47 **** TContact = class(TInstantObject) ! { IOMETADATA stored; Address: Part(TAddress); Name: String(30); --- 43,47 ---- TContact = class(TInstantObject) ! {IOMETADATA stored; Address: Part(TAddress); Name: String(30); *************** *** 73,77 **** TPerson = class(TContact) ! { IOMETADATA stored; DateOfBirth: DateTime; } _DateOfBirth: TInstantDateTime; --- 73,77 ---- TPerson = class(TContact) ! {IOMETADATA stored; DateOfBirth: DateTime; } _DateOfBirth: TInstantDateTime; *************** *** 84,88 **** TCompany = class(TContact) ! { IOMETADATA stored; ContactPerson: Reference(TPerson); } _ContactPerson: TInstantReference; --- 84,88 ---- TCompany = class(TContact) ! {IOMETADATA stored; ContactPerson: Reference(TPerson); } _ContactPerson: TInstantReference; |
Update of /cvsroot/instantobjects/Source/Brokers/BDE/D5 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6595/Brokers/BDE/D5 Added Files: DclIOBDE_D5.cfg DclIOBDE_D5.dof DclIOBDE_D5.dpk DclIOBDE_D5.res Iobde_D5.cfg Iobde_D5.dof Iobde_D5.dpk Iobde_D5.res Log Message: Package Restructure with _D5 Suffix --- NEW FILE: DclIOBDE_D5.res --- (This appears to be a binary file; contents omitted.) --- NEW FILE: Iobde_D5.dpk --- package Iobde_D5; {$R *.RES} {$ALIGN ON} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA ON} {$IOCHECKS ON} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION ON} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST ON} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'InstantObjects BDE Run-Time Support (Delphi 5)'} {$RUNONLY} {$IMPLICITBUILD OFF} requires IOCore, VCLBDE50; contains InstantBDEConnectionDefEdit in '..\InstantBDEConnectionDefEdit.pas' {InstantBDEConnectionDefEditForm}, InstantBDE in '..\InstantBDE.pas'; end. --- NEW FILE: Iobde_D5.cfg --- -$A+ -$B- -$C+ -$D+ -$E- -$F- -$G+ -$H+ -$I+ -$J+ -$K- -$L+ -$M- -$N+ -$O+ -$P+ -$Q- -$R- -$S- -$T- -$U- -$V+ -$W- -$X+ -$YD -$Z1 -cg -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; -H- -W- -M -$M16384,1048576 -K$00400000 -LE"c:\borland\delphi5\Projects\Bpl" -LN"c:\borland\delphi5\Projects\Bpl" -Z --- NEW FILE: DclIOBDE_D5.dof --- [Compiler] A=1 B=0 C=1 D=1 E=0 F=0 G=1 H=1 I=1 J=1 K=0 L=1 M=0 N=1 O=1 P=1 Q=0 R=0 S=0 T=0 U=0 V=1 W=0 X=1 Y=1 Z=1 ShowHints=1 ShowWarnings=1 UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; [Linker] MapFile=0 OutputObjs=0 ConsoleApp=1 DebugInfo=0 RemoteSymbols=0 MinStackSize=16384 MaxStackSize=1048576 ImageBase=4194304 ExeDescription=InstantObjects BDE Design-Time Support (Delphi 5) [Directories] OutputDir= UnitOutputDir= PackageDLLOutputDir= PackageDCPOutputDir= SearchPath= Packages= Conditionals= DebugSourceDirs= UsePackages=0 [Parameters] RunParams= HostApplication= [Version Info] IncludeVerInfo=1 AutoIncBuild=0 MajorVer=1 MinorVer=7 Release=0 Build=0 Debug=0 PreRelease=0 Special=0 Private=0 DLL=0 Locale=1040 CodePage=1252 [Version Info Keys] CompanyName=InstantObjects.org FileDescription=InstantObjects BDE Design-Time Support (Delphi 5) FileVersion=1.7.0.0 InternalName= LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=InstantObjects ProductVersion=1.7 --- NEW FILE: DclIOBDE_D5.cfg --- -$A+ -$B- -$C+ -$D+ -$E- -$F- -$G+ -$H+ -$I+ -$J+ -$K- -$L+ -$M- -$N+ -$O+ -$P+ -$Q- -$R- -$S- -$T- -$U- -$V+ -$W- -$X+ -$YD -$Z1 -cg -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; -H+ -W+ -M -$M16384,1048576 -K$00400000 -LE"c:\borland\delphi5\Projects\Bpl" -LN"c:\borland\delphi5\Projects\Bpl" -Z --- NEW FILE: DclIOBDE_D5.dpk --- package DclIOBDE_D5; {$R *.RES} {$R '..\InstantBDE.dcr'} {$ALIGN ON} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA ON} {$IOCHECKS ON} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION ON} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST ON} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'InstantObjects BDE Design-Time Support (Delphi 5)'} {$DESIGNONLY} {$IMPLICITBUILD OFF} requires IOCore, Iobde_D5; contains InstantBDEReg in '..\InstantBDEReg.pas'; end. --- NEW FILE: Iobde_D5.dof --- [Compiler] A=1 B=0 C=1 D=1 E=0 F=0 G=1 H=1 I=1 J=1 K=0 L=1 M=0 N=1 O=1 P=1 Q=0 R=0 S=0 T=0 U=0 V=1 W=0 X=1 Y=1 Z=1 ShowHints=0 ShowWarnings=0 UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; [Linker] MapFile=0 OutputObjs=0 ConsoleApp=1 DebugInfo=0 RemoteSymbols=0 MinStackSize=16384 MaxStackSize=1048576 ImageBase=4194304 ExeDescription=InstantObjects BDE Run-Time Support (Delphi 5) [Directories] OutputDir= UnitOutputDir= PackageDLLOutputDir= PackageDCPOutputDir= SearchPath= Packages=atsJCL1220rp50;atsJCL1220rp50;DsnIDE50;Vcl50;Vclx50;VclSmp50;Vcldb50;Vclbde50;ibevnt50;vcldbx50;VCLIB50;vclie50;ADSD50;dxEdtrD5;dxcomnD5;EQTLD5;ECQDBCD5;EQDBTLD5;EQGridD5;dxGrEdD5;dxExELD5;dxELibD5;Indy50;SqlDir50;atsSPI2100rp50;PivotCube;Qrpt50;ats3RD100;ABC50;ABCDB50;ABCDBD50;JzNavPanePckD5;JzDesktopAlertPckD5;dcctd5;JCWCore_D5 Conditionals= DebugSourceDirs= UsePackages=0 [Parameters] RunParams= HostApplication= [Version Info] IncludeVerInfo=1 AutoIncBuild=0 MajorVer=1 MinorVer=0 Release=0 Build=0 Debug=0 PreRelease=0 Special=0 Private=0 DLL=0 Locale=1046 CodePage=1252 [Version Info Keys] CompanyName= FileDescription= FileVersion=1.0.0.0 InternalName= LegalCopyright= LegalTrademarks= OriginalFilename= ProductName= ProductVersion=1.0.0.0 Comments= [Excluded Packages] $(DELPHI)\3rdparty\Jazmine\JCW35\Delphi 5\CalWidgets_D5.bpl=Jazmine Calendar Widgets Suite 3.5 $(DELPHI)\3rdparty\Jazmine\JCW35\Delphi 5\CalWidgets_dbD5.bpl=Jazmine Calendar Widgets 3.5 - DB $(DELPHI)\3rdparty\Jazmine\JCW35\Delphi 5\CalWidgets_QR_D5.bpl=Jazmine Calendar Widgets 3.5 - Report Engine (QuickReports) $(DELPHI)\3rdparty\Jazmine\JCW35\Delphi 5\FreeBusy_D5.bpl=Jazmine Calendar Widgets 3.5 - FreeBusy $(DELPHI)\3rdparty\Jazmine\JCW35\Delphi 5\FreeBusy_dD5.bpl=Jazmine Calendar Widgets 3.5 - FreeBusy (Design Time) $(DELPHI)\3rdparty\Jazmine\JCW35\Delphi 5\CalWidgets_dbD5d.bpl=Jazmine Calendar Widgets 3.5 DB - Design Package $(DELPHI)\3rdparty\Jazmine\JCW35\Delphi 5\CalWidgets_D5d.bpl=Jazmine Calendar Widgets 3.5 Suite - Design Package $(DELPHI)\Projects\Bpl\glmComposites.bpl=CDK Composite Package $(DELPHI)\Projects\Bpl\template.bpl=Template $(DELPHI)\Projects\Bpl\dclOQBkbmMW50.bpl=Open QBuilder IBX Engine $(DELPHI)\Projects\Bpl\dcoutbar_d5.bpl=Dream Outbar $(DELPHI)\Bin\dclite50.bpl=Borland Integrated Translation Environment $(DELPHI)\Projects\Bpl\kbmMWBOQuery.bpl=Business Query for kbmMW $(DELPHI)\Projects\Bpl\dclIndy50.bpl=Internet Direct (Indy) for D5 Property and Component Editors $(DELPHI)\3rdparty\FastReport\fr\Source\frado5.bpl=FastReport 2.5 ADO Components --- NEW FILE: Iobde_D5.res --- (This appears to be a binary file; contents omitted.) |
Update of /cvsroot/instantobjects/Source/Brokers/IBX/D5 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6595/Brokers/IBX/D5 Added Files: DclIOIBX_D5.cfg DclIOIBX_D5.dof DclIOIBX_D5.dpk DclIOIBX_D5.res Ioibx_D5.cfg Ioibx_D5.dof Ioibx_D5.dpk Ioibx_D5.res Log Message: Package Restructure with _D5 Suffix --- NEW FILE: DclIOIBX_D5.dpk --- package DclIOIBX_D5; {$R *.RES} {$R '..\InstantIBX.dcr'} {$ALIGN ON} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA ON} {$IOCHECKS ON} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION ON} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST ON} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'InstantObjects IBX Design-Time Support (Delphi 5)'} {$DESIGNONLY} {$IMPLICITBUILD OFF} requires IOCore, Ioibx_D5; contains InstantIBXReg in '..\InstantIBXReg.pas'; end. --- NEW FILE: DclIOIBX_D5.dof --- [Compiler] A=1 B=0 C=1 D=1 E=0 F=0 G=1 H=1 I=1 J=1 K=0 L=1 M=0 N=1 O=1 P=1 Q=0 R=0 S=0 T=0 U=0 V=1 W=0 X=1 Y=1 Z=1 ShowHints=1 ShowWarnings=1 UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; [Linker] MapFile=0 OutputObjs=0 ConsoleApp=1 DebugInfo=0 RemoteSymbols=0 MinStackSize=16384 MaxStackSize=1048576 ImageBase=4194304 ExeDescription=InstantObjects IBX Design-Time Support (Delphi 5) [Directories] OutputDir= UnitOutputDir= PackageDLLOutputDir= PackageDCPOutputDir= SearchPath= Packages= Conditionals= DebugSourceDirs= UsePackages=0 [Parameters] RunParams= HostApplication= [Version Info] IncludeVerInfo=1 AutoIncBuild=0 MajorVer=1 MinorVer=7 Release=0 Build=0 Debug=0 PreRelease=0 Special=0 Private=0 DLL=0 Locale=1040 CodePage=1252 [Version Info Keys] CompanyName=InstantObjects.org FileDescription=InstantObjects IBX Design-Time Support (Delphi 7) FileVersion=1.7.0.0 InternalName= LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=InstantObjects ProductVersion=1.7 --- NEW FILE: DclIOIBX_D5.res --- (This appears to be a binary file; contents omitted.) --- NEW FILE: Ioibx_D5.cfg --- -$A+ -$B- -$C+ -$D+ -$E- -$F- -$G+ -$H+ -$I+ -$J+ -$K- -$L+ -$M- -$N+ -$O+ -$P+ -$Q- -$R- -$S- -$T- -$U- -$V+ -$W- -$X+ -$YD -$Z1 -cg -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; -H+ -W+ -M -$M16384,1048576 -K$00400000 -LE"c:\borland\delphi5\Projects\Bpl" -LN"c:\borland\delphi5\Projects\Bpl" -Z --- NEW FILE: DclIOIBX_D5.cfg --- -$A+ -$B- -$C+ -$D+ -$E- -$F- -$G+ -$H+ -$I+ -$J+ -$K- -$L+ -$M- -$N+ -$O+ -$P+ -$Q- -$R- -$S- -$T- -$U- -$V+ -$W- -$X+ -$YD -$Z1 -cg -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; -H+ -W+ -M -$M16384,1048576 -K$00400000 -LE"c:\borland\delphi5\Projects\Bpl" -LN"c:\borland\delphi5\Projects\Bpl" -Z --- NEW FILE: Ioibx_D5.dpk --- package Ioibx_D5; {$R *.RES} {$ALIGN ON} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA ON} {$IOCHECKS ON} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION ON} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST ON} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'InstantObjects IBX Run-Time Support (Delphi 5)'} {$RUNONLY} {$IMPLICITBUILD OFF} requires IOCore, VCLIB50; contains InstantIBXConnectionDefEdit in '..\InstantIBXConnectionDefEdit.pas' {InstantIBXConnectionDefEditForm}, InstantIBX in '..\InstantIBX.pas'; end. --- NEW FILE: Ioibx_D5.dof --- [Compiler] A=1 B=0 C=1 D=1 E=0 F=0 G=1 H=1 I=1 J=1 K=0 L=1 M=0 N=1 O=1 P=1 Q=0 R=0 S=0 T=0 U=0 V=1 W=0 X=1 Y=1 Z=1 ShowHints=1 ShowWarnings=1 UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; [Linker] MapFile=0 OutputObjs=0 ConsoleApp=1 DebugInfo=0 RemoteSymbols=0 MinStackSize=16384 MaxStackSize=1048576 ImageBase=4194304 ExeDescription=InstantObjects IBX Run-Time Support (Delphi 5) [Directories] OutputDir= UnitOutputDir= PackageDLLOutputDir= PackageDCPOutputDir= SearchPath= Packages= Conditionals= DebugSourceDirs= UsePackages=0 [Parameters] RunParams= HostApplication= [Version Info] IncludeVerInfo=1 AutoIncBuild=0 MajorVer=1 MinorVer=7 Release=0 Build=0 Debug=0 PreRelease=0 Special=0 Private=0 DLL=0 Locale=1040 CodePage=1252 [Version Info Keys] CompanyName=InstantObjects.org FileDescription=InstantObjects IBX Run-Time Support (Delphi 5) FileVersion=1.7.0.0 InternalName= LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=InstantObjects ProductVersion=1.7 --- NEW FILE: Ioibx_D5.res --- (This appears to be a binary file; contents omitted.) |
Update of /cvsroot/instantobjects/Source/Brokers/XML/D5 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6595/Brokers/XML/D5 Added Files: DclIOXML_D5.cfg DclIOXML_D5.dof DclIOXML_D5.dpk DclIOXML_D5.res Ioxml_D5.cfg Ioxml_D5.dof Ioxml_D5.dpk Ioxml_D5.res Log Message: Package Restructure with _D5 Suffix --- NEW FILE: DclIOXML_D5.cfg --- -$A+ -$B- -$C+ -$D+ -$E- -$F- -$G+ -$H+ -$I+ -$J- -$K- -$L+ -$M- -$N+ -$O+ -$P+ -$Q- -$R- -$S- -$T- -$U- -$V+ -$W- -$X+ -$YD -$Z1 -cg -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; -H+ -W+ -M -$M16384,1048576 -K$00400000 -LE"c:\borland\delphi5\Projects\Bpl" -LN"c:\borland\delphi5\Projects\Bpl" -Z --- NEW FILE: DclIOXML_D5.dpk --- package DclIOXML_D5; {$R *.RES} {$R '..\InstantXML.dcr'} {$ALIGN ON} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA ON} {$IOCHECKS ON} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION ON} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST OFF} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'InstantObjects XML Design-Time Support (Delphi 5)'} {$DESIGNONLY} {$IMPLICITBUILD OFF} requires Ioxml_D5; contains InstantXMLReg in '..\InstantXMLReg.pas'; end. --- NEW FILE: Ioxml_D5.dpk --- package Ioxml_D5; {$R *.RES} {$ALIGN ON} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA ON} {$IOCHECKS ON} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION ON} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST OFF} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'InstantObjects XML Run-Time Support (Delphi 5)'} {$RUNONLY} {$IMPLICITBUILD OFF} requires IOCore, VCLX50; contains InstantXMLConnectionDefEdit in '..\InstantXMLConnectionDefEdit.pas' {InstantXMLConnectionDefEditForm}, InstantXML in '..\InstantXML.pas'; end. --- NEW FILE: Ioxml_D5.cfg --- -$A+ -$B- -$C+ -$D+ -$E- -$F- -$G+ -$H+ -$I+ -$J- -$K- -$L+ -$M- -$N+ -$O+ -$P+ -$Q- -$R- -$S- -$T- -$U- -$V+ -$W- -$X+ -$YD -$Z1 -cg -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; -H+ -W+ -M -$M16384,1048576 -K$00400000 -LE"c:\borland\delphi5\Projects\Bpl" -LN"c:\borland\delphi5\Projects\Bpl" -Z --- NEW FILE: DclIOXML_D5.res --- (This appears to be a binary file; contents omitted.) --- NEW FILE: DclIOXML_D5.dof --- [Compiler] A=1 B=0 C=1 D=1 E=0 F=0 G=1 H=1 I=1 J=0 K=0 L=1 M=0 N=1 O=1 P=1 Q=0 R=0 S=0 T=0 U=0 V=1 W=0 X=1 Y=1 Z=1 ShowHints=1 ShowWarnings=1 UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; [Linker] MapFile=0 OutputObjs=0 ConsoleApp=1 DebugInfo=0 RemoteSymbols=0 MinStackSize=16384 MaxStackSize=1048576 ImageBase=4194304 ExeDescription=InstantObjects XML Design-Time Support (Delphi 5) [Directories] OutputDir= UnitOutputDir= PackageDLLOutputDir= PackageDCPOutputDir= SearchPath= Packages= Conditionals= DebugSourceDirs= UsePackages=0 [Parameters] RunParams= HostApplication= [Version Info] IncludeVerInfo=1 AutoIncBuild=0 MajorVer=1 MinorVer=7 Release=0 Build=0 Debug=0 PreRelease=0 Special=0 Private=0 DLL=0 Locale=1040 CodePage=1252 [Version Info Keys] CompanyName=InstantObjects.org FileDescription=InstantObjects XML Design-Time Support (Delphi 7) FileVersion=1.7.0.0 InternalName= LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=InstantObjects ProductVersion=1.7 [HistoryLists\hlUnitAliases] Count=1 Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; [HistoryLists\hlSearchPath] Count=1 Item0=..\core [HistoryLists\hlBPLOutput] Count=1 Item0=$(DELPHI)\Lib --- NEW FILE: Ioxml_D5.dof --- [Compiler] A=1 B=0 C=1 D=1 E=0 F=0 G=1 H=1 I=1 J=0 K=0 L=1 M=0 N=1 O=1 P=1 Q=0 R=0 S=0 T=0 U=0 V=1 W=0 X=1 Y=1 Z=1 ShowHints=1 ShowWarnings=1 UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; [Linker] MapFile=0 OutputObjs=0 ConsoleApp=1 DebugInfo=0 RemoteSymbols=0 MinStackSize=16384 MaxStackSize=1048576 ImageBase=4194304 ExeDescription=InstantObjects XML Run-Time Support (Delphi 5) [Directories] OutputDir= UnitOutputDir= PackageDLLOutputDir= PackageDCPOutputDir= SearchPath= Packages= Conditionals= DebugSourceDirs= UsePackages=0 [Parameters] RunParams= HostApplication= [Version Info] IncludeVerInfo=1 AutoIncBuild=0 MajorVer=1 MinorVer=7 Release=0 Build=0 Debug=0 PreRelease=0 Special=0 Private=0 DLL=0 Locale=1040 CodePage=1252 [Version Info Keys] CompanyName=InstantObjects.org FileDescription=InstantObjects XML Run-Time Support (Delphi 7) FileVersion=1.7.0.0 InternalName= LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=InstantObjects ProductVersion=1.7 [HistoryLists\hlUnitAliases] Count=1 Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; [HistoryLists\hlSearchPath] Count=1 Item0=..\core [HistoryLists\hlBPLOutput] Count=1 Item0=$(DELPHI)\Lib --- NEW FILE: Ioxml_D5.res --- (This appears to be a binary file; contents omitted.) |
|
From: uberto b. <ub...@us...> - 2005-02-26 16:43:14
|
Update of /cvsroot/instantobjects/Source/Tests In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19768 Modified Files: InstantMock.pas TestMockBroker.pas TestMockConnector.pas Log Message: Added RelationalBroker tests Index: TestMockConnector.pas =================================================================== RCS file: /cvsroot/instantobjects/Source/Tests/TestMockConnector.pas,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** TestMockConnector.pas 22 Feb 2005 11:41:23 -0000 1.2 --- TestMockConnector.pas 26 Feb 2005 16:43:04 -0000 1.3 *************** *** 34,41 **** conn.MockManager.AddExpectation('InternalConnect'); conn.MockManager.AddExpectation('InternalCreateScheme'); ! conn.MockManager.AddExpectation('CreateBroker'); conn.MockManager.AddExpectation('InternalDisconnect'); conn.MockManager.EndSetUp; AssertEquals(4, conn.MockManager.UncoveredExpectations); conn.BuildDatabase(InstantModel); conn.MockManager.Verify; --- 34,42 ---- conn.MockManager.AddExpectation('InternalConnect'); conn.MockManager.AddExpectation('InternalCreateScheme'); ! conn.MockManager.AddExpectation('CreateBroker TInstantMockBroker'); conn.MockManager.AddExpectation('InternalDisconnect'); conn.MockManager.EndSetUp; AssertEquals(4, conn.MockManager.UncoveredExpectations); + conn.BrokerClass := TInstantMockBroker; conn.BuildDatabase(InstantModel); conn.MockManager.Verify; *************** *** 51,54 **** --- 52,56 ---- conn := TInstantMockConnector.Create(nil); try + conn.BrokerClass := TInstantMockBroker; conn.BuildDatabase(InstantModel); conn.MockManager.StartSetUp; *************** *** 71,74 **** --- 73,77 ---- conn := TInstantMockConnector.Create(nil); try + conn.BrokerClass := TInstantMockBroker; conn.BuildDatabase(InstantModel); conn.Connect; Index: TestMockBroker.pas =================================================================== RCS file: /cvsroot/instantobjects/Source/Tests/TestMockBroker.pas,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** TestMockBroker.pas 22 Feb 2005 16:56:49 -0000 1.4 --- TestMockBroker.pas 26 Feb 2005 16:43:04 -0000 1.5 *************** *** 19,22 **** --- 19,32 ---- procedure TestBuildDatabase; procedure TestStoreAndRetrieveAddress; + end; + + TTestMockRelationalBroker = class(TTestCase) + private + protected + FConn: TInstantMockConnector; + procedure SetUp; override; + procedure TearDown; override; + published + procedure TestGetBroker; procedure TestStoreAndRetrieveContact; end; *************** *** 29,33 **** begin InstantModel.LoadFromFile(ChangeFileExt(ParamStr(0),'.mdx')); - AssertNotNull(InstantModel.ClassMetadatas.Find('TContact')); end; --- 39,42 ---- *************** *** 96,109 **** end; ! procedure TTestMockBroker.TestStoreAndRetrieveContact; var c: TContact; old_id: string; ! brok: TInstantMockBroker; t: TPhone; begin InstantModel.LoadFromFile(ChangeFileExt(ParamStr(0),'.mdx')); Fconn.IsDefault := True; ! brok := Fconn.Broker as TInstantMockBroker; brok.MockManager.StartSetUp; c := TContact.Create; --- 105,159 ---- end; ! procedure TTestMockBroker.SetUp; ! begin ! inherited; ! FConn := TInstantMockConnector.Create(nil); ! FConn.BrokerClass := TInstantMockBroker; ! end; ! ! procedure TTestMockBroker.TearDown; ! begin ! FConn.Free; ! inherited; ! end; ! ! { TTestMockRelationalBroker } ! ! procedure TTestMockRelationalBroker.SetUp; ! begin ! inherited; ! FConn := TInstantMockConnector.Create(nil); ! FConn.BrokerClass := TInstantMockCRBroker; ! end; ! ! procedure TTestMockRelationalBroker.TearDown; ! begin ! inherited; ! FConn.Free; ! end; ! ! procedure TTestMockRelationalBroker.TestGetBroker; ! var ! brok: TInstantMockCRBroker; ! begin ! brok := (Fconn.Broker as TInstantMockCRBroker); ! AssertNotNull(brok); ! AssertEquals(brok.ClassType, TInstantMockCRBroker); ! brok.MockManager.StartSetUp; ! brok.MockManager.EndSetUp; ! Fconn.BuildDatabase(InstantModel); ! brok.MockManager.Verify; ! end; ! ! procedure TTestMockRelationalBroker.TestStoreAndRetrieveContact; var c: TContact; old_id: string; ! brok: TInstantMockCRBroker; t: TPhone; begin InstantModel.LoadFromFile(ChangeFileExt(ParamStr(0),'.mdx')); Fconn.IsDefault := True; ! brok := Fconn.Broker as TInstantMockCRBroker; brok.MockManager.StartSetUp; c := TContact.Create; *************** *** 127,133 **** AssertNull(c); brok.MockManager.EndSetUp; ! brok.MockManager.AddExpectation('InternalStoreObject ' + old_id); brok.MockManager.Verify; brok.MockManager.StartSetUp; c := TContact.Retrieve(old_id); try --- 177,185 ---- AssertNull(c); brok.MockManager.EndSetUp; ! brok.MockManager.AddExpectation('InternalStoreObject caFail ' + old_id); brok.MockManager.Verify; brok.MockManager.StartSetUp; + brok.MockManager.AddExpectation('InternalRetrieveObject caFail ' + old_id); + brok.MockManager.EndSetUp; c := TContact.Retrieve(old_id); try *************** *** 138,160 **** c.Free; end; - brok.MockManager.EndSetUp; - brok.MockManager.AddExpectation('InternalRetrieveObject ' + old_id); brok.MockManager.Verify; end; - procedure TTestMockBroker.SetUp; - begin - inherited; - FConn := TInstantMockConnector.Create(nil); - end; - - procedure TTestMockBroker.TearDown; - begin - FConn.Free; - inherited; - end; - initialization ! RegisterTests([TTestMockBroker]); end. \ No newline at end of file --- 190,198 ---- c.Free; end; brok.MockManager.Verify; end; initialization ! RegisterTests([TTestMockBroker, TTestMockRelationalBroker]); end. \ No newline at end of file Index: InstantMock.pas =================================================================== RCS file: /cvsroot/instantobjects/Source/Tests/InstantMock.pas,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** InstantMock.pas 22 Feb 2005 13:08:44 -0000 1.2 --- InstantMock.pas 26 Feb 2005 16:43:04 -0000 1.3 *************** *** 7,13 **** type ! TInstantMockConnector = class(TInstantConnector, IUbMockObject) private FMock: TUbMockObject; protected procedure SetMock(const Value: TUbMockObject); --- 7,17 ---- type ! TInstantBrokerClass = class of TInstantBroker; ! ! TInstantMockConnector = class(TInstantConnector) private FMock: TUbMockObject; + FBrokerClass: TInstantBrokerClass; + procedure SetBrokerClass(const Value: TInstantBrokerClass); protected procedure SetMock(const Value: TUbMockObject); *************** *** 20,24 **** procedure InternalRollbackTransaction; override; public ! property MockManager: TUbMockObject read FMock write SetMock implements IUbMockObject; class function ConnectionDefClass: TInstantConnectionDefClass; override; constructor Create(AOwner: TComponent); override; --- 24,29 ---- procedure InternalRollbackTransaction; override; public ! property MockManager: TUbMockObject read FMock write SetMock; ! property BrokerClass: TInstantBrokerClass read FBrokerClass write SetBrokerClass; class function ConnectionDefClass: TInstantConnectionDefClass; override; constructor Create(AOwner: TComponent); override; *************** *** 32,36 **** end; ! TInstantMockBroker = class(TInstantBroker, IUbMockObject) private FMock: TUbMockObject; --- 37,41 ---- end; ! TInstantMockBroker = class(TInstantBroker) private FMock: TUbMockObject; *************** *** 45,49 **** ConflictAction: TInstantConflictAction): Boolean; override; public ! property MockManager: TUbMockObject read FMock write SetMock implements IUbMockObject; constructor Create(AConnector: TInstantConnector); override; destructor Destroy; override; --- 50,73 ---- ConflictAction: TInstantConflictAction): Boolean; override; public ! property MockManager: TUbMockObject read FMock write SetMock; ! constructor Create(AConnector: TInstantConnector); override; ! destructor Destroy; override; ! end; ! ! TInstantMockCRBroker = class(TInstantCustomRelationalBroker) ! private ! FMock: TUbMockObject; ! procedure SetMock(const Value: TUbMockObject); ! protected ! function EnsureResolver(Map: TInstantAttributeMap): TInstantCustomResolver; override; ! function InternalDisposeObject(AObject: TInstantObject; ! ConflictAction: TInstantConflictAction): Boolean; override; ! function InternalRetrieveObject(AObject: TInstantObject; ! const AObjectId: String; ! ConflictAction: TInstantConflictAction): Boolean; override; ! function InternalStoreObject(AObject: TInstantObject; ! ConflictAction: TInstantConflictAction): Boolean; override; ! public ! property MockManager: TUbMockObject read FMock write SetMock; constructor Create(AConnector: TInstantConnector); override; destructor Destroy; override; *************** *** 52,55 **** --- 76,89 ---- implementation + function CaToStr(ConflictAction: TInstantConflictAction): string; + begin + if ConflictAction = caIgnore then + Result := 'caIgnore' + else if ConflictAction = caFail then + Result := 'caFail' + else + Result := '???'; + end; + { TMockIConnector } *************** *** 67,72 **** function TInstantMockConnector.CreateBroker: TInstantBroker; begin ! FMock.AddExpectation('CreateBroker'); ! Result := TInstantMockBroker.Create(Self); end; --- 101,106 ---- function TInstantMockConnector.CreateBroker: TInstantBroker; begin ! FMock.AddExpectation('CreateBroker ' + FBrokerClass.ClassName); ! Result := FBrokerClass.Create(Self); end; *************** *** 172,175 **** --- 206,215 ---- end; + procedure TInstantMockConnector.SetBrokerClass( + const Value: TInstantBrokerClass); + begin + FBrokerClass := Value; + end; + procedure TInstantMockConnector.SetMock(const Value: TUbMockObject); begin *************** *** 177,180 **** --- 217,268 ---- end; + { TInstantMockCRBroker } + + constructor TInstantMockCRBroker.Create(AConnector: TInstantConnector); + begin + inherited; + FMock := TUbMockObject.Create; + end; + + destructor TInstantMockCRBroker.Destroy; + begin + FMock.Free; + inherited; + end; + + function TInstantMockCRBroker.EnsureResolver( + Map: TInstantAttributeMap): TInstantCustomResolver; + begin + MockManager.AddExpectation('EnsureResolver'); + end; + + function TInstantMockCRBroker.InternalDisposeObject( + AObject: TInstantObject; + ConflictAction: TInstantConflictAction): Boolean; + begin + Result := True; + MockManager.AddExpectation('InternalDisposeObject ' + CaToStr(ConflictAction) + ' ' + AObject.Id); + end; + + function TInstantMockCRBroker.InternalRetrieveObject( + AObject: TInstantObject; const AObjectId: String; + ConflictAction: TInstantConflictAction): Boolean; + begin + Result := True; + MockManager.AddExpectation('InternalRetrieveObject ' + CaToStr(ConflictAction) + ' ' + AObjectId); + end; + + function TInstantMockCRBroker.InternalStoreObject(AObject: TInstantObject; + ConflictAction: TInstantConflictAction): Boolean; + begin + Result := True; + MockManager.AddExpectation('InternalStoreObject ' + CaToStr(ConflictAction) + ' ' + AObject.Id); + end; + + procedure TInstantMockCRBroker.SetMock(const Value: TUbMockObject); + begin + FMock := Value; + end; + initialization RegisterClass(TInstantMockConnectionDef); |
|
From: Ron G. <rg...@us...> - 2005-02-25 19:50:11
|
Update of /cvsroot/instantobjects/Source/Brokers/BDE/D9 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21759 Added Files: DclIOBDE.bdsproj DclIOBDE.cfg DclIOBDE.dpk IOBDE.bdsproj IOBDE.cfg IOBDE.dpk Log Message: Comiles and works in adding and deleting things. Don't trust it yet, however. Needs more testing. When I run the Performance test it shows 3300 disposes and retrieves per second. 1100 stores per second. And 350 Querys per second which seems more correct. "Use Transactions" in the Performance section of Primer demo crashes saying there are "too many record locks on table" --- NEW FILE: DclIOBDE.bdsproj --- (This appears to be a binary file; contents omitted.) --- NEW FILE: IOBDE.cfg --- -$A8 -$B- -$C+ -$D+ -$E- -$F- -$G+ -$H+ -$I+ -$J+ -$K- -$L+ -$M- -$N+ -$O+ -$P+ -$Q- -$R- -$S- -$T- -$U- -$V+ -$W- -$X+ -$YD -$Z1 -cg -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; -H+ -W+ -M -$M16384,1048576 -K$00400000 -LE"C:\Documents and Settings\Ron\My Documents\Borland Studio Projects\Bpl" -LN"C:\Documents and Settings\Ron\My Documents\Borland Studio Projects\Bpl" -Z -w-UNSAFE_TYPE -w-UNSAFE_CODE -w-UNSAFE_CAST --- NEW FILE: IOBDE.dpk --- package IOBDE; {$R *.res} {$ALIGN 8} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA ON} {$IOCHECKS ON} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION ON} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST ON} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'InstantObjects BDE Run-Time Support (Delphi 2005)'} {$LIBSUFFIX '_D9'} {$RUNONLY} {$IMPLICITBUILD OFF} requires vcl, vcldb, bdertl, IOCore; contains InstantBDEConnectionDefEdit in '..\InstantBDEConnectionDefEdit.pas' {InstantBDEConnectionDefEditForm}, InstantBDE in '..\InstantBDE.pas'; end. --- NEW FILE: IOBDE.bdsproj --- (This appears to be a binary file; contents omitted.) --- NEW FILE: DclIOBDE.dpk --- package DclIOBDE; {$R *.res} {$R '..\InstantBDE.dcr'} {$ALIGN 8} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA ON} {$IOCHECKS ON} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION ON} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST ON} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'InstantObjects BDE Design-Time Support (Delphi 2005)'} {$LIBSUFFIX '_D9'} {$DESIGNONLY} {$IMPLICITBUILD OFF} requires vcl, vcldb, bdertl, IOCore, IOBDE; contains InstantBDEReg in '..\InstantBDEReg.pas'; end. --- NEW FILE: DclIOBDE.cfg --- -$A8 -$B- -$C+ -$D+ -$E- -$F- -$G+ -$H+ -$I+ -$J+ -$K- -$L+ -$M- -$N+ -$O+ -$P+ -$Q- -$R- -$S- -$T- -$U- -$V+ -$W- -$X+ -$YD -$Z1 -cg -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; -H+ -W+ -M -$M16384,1048576 -K$00400000 -LE"C:\Documents and Settings\Ron\My Documents\Borland Studio Projects\Bpl" -LN"C:\Documents and Settings\Ron\My Documents\Borland Studio Projects\Bpl" -Z -w-UNSAFE_TYPE -w-UNSAFE_CODE -w-UNSAFE_CAST |
|
From: Ron G. <rg...@us...> - 2005-02-25 19:27:09
|
Update of /cvsroot/instantobjects/Source/Brokers/ADO/D9 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13808 Added Files: DclIOADO.bdsproj DclIOADO.cfg DclIOADO.dpk IOADO.bdsproj IOADO.cfg IOADO.dpk Log Message: Package files for compiling in D2005. Seems to work fine in the Primer demo in my basic tests. Used Access for the tests. Will see how it does on MS SQL Server 2000 later. --- NEW FILE: IOADO.dpk --- package IOADO; {$R *.res} {$ALIGN 8} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA ON} {$IOCHECKS ON} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION ON} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST ON} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'InstantObjects ADO Run-Time Support (Delphi 2005)'} {$LIBSUFFIX '_D9'} {$RUNONLY} {$IMPLICITBUILD OFF} requires vcl, vcldb, adortl, IOCore; contains InstantADOX in '..\InstantADOX.pas', InstantADOJRO in '..\InstantADOJRO.pas', InstantADOTools in '..\InstantADOTools.pas', InstantADOConnectionDefEdit in '..\InstantADOConnectionDefEdit.pas' {InstantADOConnectionDefEditForm}, InstantADO in '..\InstantADO.pas'; end. --- NEW FILE: DclIOADO.dpk --- package DclIOADO; {$R *.res} {$R '..\InstantADO.dcr'} {$ALIGN 8} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA ON} {$IOCHECKS ON} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION ON} {$OVERFLOWCHECKS ON} {$RANGECHECKS ON} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST OFF} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'InstantObjects ADO Design-Time Support (Delphi 2005)'} {$LIBSUFFIX '_D9'} {$DESIGNONLY} {$IMPLICITBUILD OFF} requires rtl, IOADO; contains InstantADOReg in '..\InstantADOReg.pas'; end. --- NEW FILE: IOADO.cfg --- -$A8 -$B- -$C+ -$D+ -$E- -$F- -$G+ -$H+ -$I+ -$J+ -$K- -$L+ -$M- -$N+ -$O+ -$P+ -$Q- -$R- -$S- -$T- -$U- -$V+ -$W- -$X+ -$YD -$Z1 -cg -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; -H+ -W+ -M -$M16384,1048576 -K$00400000 -LE"C:\Documents and Settings\Ron\My Documents\Borland Studio Projects\Bpl" -LN"C:\Documents and Settings\Ron\My Documents\Borland Studio Projects\Bpl" -Z -w-UNSAFE_TYPE -w-UNSAFE_CODE -w-UNSAFE_CAST --- NEW FILE: DclIOADO.bdsproj --- (This appears to be a binary file; contents omitted.) --- NEW FILE: DclIOADO.cfg --- -$A8 -$B- -$C+ -$D+ -$E- -$F- -$G+ -$H+ -$I+ -$J- -$K- -$L+ -$M- -$N+ -$O+ -$P+ -$Q+ -$R+ -$S- -$T- -$U- -$V+ -$W- -$X+ -$YD -$Z1 -cg -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; -H+ -W+ -M -$M16384,1048576 -K$00400000 -LE"C:\Documents and Settings\Ron\My Documents\Borland Studio Projects\Bpl" -LN"C:\Documents and Settings\Ron\My Documents\Borland Studio Projects\Bpl" -Z -w-UNSAFE_TYPE -w-UNSAFE_CODE -w-UNSAFE_CAST --- NEW FILE: IOADO.bdsproj --- (This appears to be a binary file; contents omitted.) |
|
From: Ron G. <rg...@us...> - 2005-02-25 18:36:17
|
Update of /cvsroot/instantobjects/Source/Brokers/IBX/D9 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv30275/D9 Log Message: Directory /cvsroot/instantobjects/Source/Brokers/IBX/D9 added to the repository |
|
From: Ron G. <rg...@us...> - 2005-02-25 18:35:50
|
Update of /cvsroot/instantobjects/Source/Brokers/XML/D9 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv30113/D9 Log Message: Directory /cvsroot/instantobjects/Source/Brokers/XML/D9 added to the repository |
|
From: Ron G. <rg...@us...> - 2005-02-25 18:35:22
|
Update of /cvsroot/instantobjects/Source/Brokers/DBX/D9 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29995/D9 Log Message: Directory /cvsroot/instantobjects/Source/Brokers/DBX/D9 added to the repository |
|
From: Ron G. <rg...@us...> - 2005-02-25 18:34:58
|
Update of /cvsroot/instantobjects/Source/Brokers/BDE/D9 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29802/D9 Log Message: Directory /cvsroot/instantobjects/Source/Brokers/BDE/D9 added to the repository |
|
From: Ron G. <rg...@us...> - 2005-02-25 18:33:38
|
Update of /cvsroot/instantobjects/Source/Brokers/ADO/D9 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29357/D9 Log Message: Directory /cvsroot/instantobjects/Source/Brokers/ADO/D9 added to the repository |
|
From: Ron G. <rg...@us...> - 2005-02-25 18:32:35
|
Update of /cvsroot/instantobjects/Source/Design In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29047/Design Modified Files: InstantModelExplorer.dfm InstantModelExplorer.pas Log Message: Removes a couple override functions that had no implementation code. They prevented D2005 from compiling and appeared to serve no purpose (since they didn't do anything). Index: InstantModelExplorer.pas =================================================================== RCS file: /cvsroot/instantobjects/Source/Design/InstantModelExplorer.pas,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** InstantModelExplorer.pas 11 Feb 2005 16:08:05 -0000 1.6 --- InstantModelExplorer.pas 25 Feb 2005 18:32:21 -0000 1.7 *************** *** 165,172 **** destructor Destroy; override; procedure CompileTo(FileName: string); - {$IFDEF MSWINDOWS} - procedure LoadWindowState(Desktop: TMemIniFile); override; - procedure SaveWindowState(Desktop: TMemIniFile; IsProject: Boolean); override; - {$ENDIF} procedure Refresh; procedure UpdateModel; --- 165,168 ---- *************** *** 449,465 **** end; - {$IFDEF MSWINDOWS} - procedure TInstantModelExplorerForm.LoadWindowState(Desktop: TMemIniFile); - begin - inherited; - end; - - procedure TInstantModelExplorerForm.SaveWindowState(Desktop: TMemIniFile; - IsProject: Boolean); - begin - inherited; - end; - {$ENDIF} - procedure TInstantModelExplorerForm.ModelViewChange(Sender: TObject; Node: TTreeNode); --- 445,448 ---- Index: InstantModelExplorer.dfm =================================================================== RCS file: /cvsroot/instantobjects/Source/Design/InstantModelExplorer.dfm,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** InstantModelExplorer.dfm 17 Nov 2004 20:59:49 -0000 1.3 --- InstantModelExplorer.dfm 25 Feb 2005 18:32:19 -0000 1.4 *************** *** 24,28 **** Top = 27 Width = 251 ! Height = 372 Align = alClient BevelOuter = bvNone --- 24,28 ---- Top = 27 Width = 251 ! Height = 379 Align = alClient BevelOuter = bvNone |
|
From: Ron G. <rg...@us...> - 2005-02-25 18:30:21
|
Update of /cvsroot/instantobjects/Source/Design/D9 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28462 Modified Files: DclIOCore.bdsproj DclIOCore.dpk Log Message: Fixed spot where I had forgotten to use _D9 instead of _D2005 Index: DclIOCore.dpk =================================================================== RCS file: /cvsroot/instantobjects/Source/Design/D9/DclIOCore.dpk,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** DclIOCore.dpk 25 Feb 2005 18:07:53 -0000 1.1 --- DclIOCore.dpk 25 Feb 2005 18:30:10 -0000 1.2 *************** *** 29,33 **** {$IMAGEBASE $400000} {$DESCRIPTION 'InstantObjects Design-Time Package (Delphi 2005)'} ! {$LIBSUFFIX '_D2005'} {$DESIGNONLY} {$IMPLICITBUILD OFF} --- 29,33 ---- {$IMAGEBASE $400000} {$DESCRIPTION 'InstantObjects Design-Time Package (Delphi 2005)'} ! {$LIBSUFFIX '_D9'} {$DESIGNONLY} {$IMPLICITBUILD OFF} Index: DclIOCore.bdsproj =================================================================== RCS file: /cvsroot/instantobjects/Source/Design/D9/DclIOCore.bdsproj,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** DclIOCore.bdsproj 25 Feb 2005 18:07:52 -0000 1.1 --- DclIOCore.bdsproj 25 Feb 2005 18:30:10 -0000 1.2 *************** *** 1,165 **** <?xml version="1.0" encoding="utf-8"?> <BorlandProject> ! <PersonalityInfo> ! <Option> ! <Option Name="Personality">Delphi.Personality</Option> ! <Option Name="ProjectType"></Option> ! <Option Name="Version">1.0</Option> ! <Option Name="GUID">{45D2ADE1-596A-4660-9290-E4F118982656}</Option> ! </Option> ! </PersonalityInfo> ! <Delphi.Personality> ! <Source> ! <Source Name="MainSource">DclIOCore.dpk</Source> ! </Source> ! <FileVersion> ! <FileVersion Name="Version">7.0</FileVersion> ! </FileVersion> ! <Compiler> ! <Compiler Name="A">8</Compiler> ! <Compiler Name="B">0</Compiler> ! <Compiler Name="C">1</Compiler> ! <Compiler Name="D">1</Compiler> ! <Compiler Name="E">0</Compiler> ! <Compiler Name="F">0</Compiler> ! <Compiler Name="G">1</Compiler> ! <Compiler Name="H">1</Compiler> ! <Compiler Name="I">1</Compiler> ! <Compiler Name="J">1</Compiler> ! <Compiler Name="K">0</Compiler> ! <Compiler Name="L">1</Compiler> ! <Compiler Name="M">0</Compiler> ! <Compiler Name="N">1</Compiler> ! <Compiler Name="O">1</Compiler> ! <Compiler Name="P">1</Compiler> ! <Compiler Name="Q">0</Compiler> ! <Compiler Name="R">0</Compiler> ! <Compiler Name="S">0</Compiler> ! <Compiler Name="T">1</Compiler> ! <Compiler Name="U">0</Compiler> ! <Compiler Name="V">1</Compiler> ! <Compiler Name="W">0</Compiler> ! <Compiler Name="X">1</Compiler> ! <Compiler Name="Y">1</Compiler> ! <Compiler Name="Z">1</Compiler> ! <Compiler Name="ShowHints">True</Compiler> ! <Compiler Name="ShowWarnings">True</Compiler> ! <Compiler Name="UnitAliases">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler> ! <Compiler Name="NamespacePrefix"></Compiler> ! <Compiler Name="GenerateDocumentation">False</Compiler> ! <Compiler Name="DefaultNamespace"></Compiler> ! <Compiler Name="SymbolDeprecated">True</Compiler> ! <Compiler Name="SymbolLibrary">True</Compiler> ! <Compiler Name="SymbolPlatform">True</Compiler> ! <Compiler Name="SymbolExperimental">True</Compiler> ! <Compiler Name="UnitLibrary">True</Compiler> ! <Compiler Name="UnitPlatform">True</Compiler> ! <Compiler Name="UnitDeprecated">True</Compiler> ! <Compiler Name="UnitExperimental">True</Compiler> ! <Compiler Name="HResultCompat">True</Compiler> ! <Compiler Name="HidingMember">True</Compiler> ! <Compiler Name="HiddenVirtual">True</Compiler> ! <Compiler Name="Garbage">True</Compiler> ! <Compiler Name="BoundsError">True</Compiler> ! <Compiler Name="ZeroNilCompat">True</Compiler> ! <Compiler Name="StringConstTruncated">True</Compiler> ! <Compiler Name="ForLoopVarVarPar">True</Compiler> ! <Compiler Name="TypedConstVarPar">True</Compiler> ! <Compiler Name="AsgToTypedConst">True</Compiler> ! <Compiler Name="CaseLabelRange">True</Compiler> ! <Compiler Name="ForVariable">True</Compiler> ! <Compiler Name="ConstructingAbstract">True</Compiler> ! <Compiler Name="ComparisonFalse">True</Compiler> ! <Compiler Name="ComparisonTrue">True</Compiler> ! <Compiler Name="ComparingSignedUnsigned">True</Compiler> ! <Compiler Name="CombiningSignedUnsigned">True</Compiler> ! <Compiler Name="UnsupportedConstruct">True</Compiler> ! <Compiler Name="FileOpen">True</Compiler> ! <Compiler Name="FileOpenUnitSrc">True</Compiler> ! <Compiler Name="BadGlobalSymbol">True</Compiler> ! <Compiler Name="DuplicateConstructorDestructor">True</Compiler> ! <Compiler Name="InvalidDirective">True</Compiler> ! <Compiler Name="PackageNoLink">True</Compiler> ! <Compiler Name="PackageThreadVar">True</Compiler> ! <Compiler Name="ImplicitImport">True</Compiler> ! <Compiler Name="HPPEMITIgnored">True</Compiler> ! <Compiler Name="NoRetVal">True</Compiler> ! <Compiler Name="UseBeforeDef">True</Compiler> ! <Compiler Name="ForLoopVarUndef">True</Compiler> ! <Compiler Name="UnitNameMismatch">True</Compiler> ! <Compiler Name="NoCFGFileFound">True</Compiler> ! <Compiler Name="MessageDirective">True</Compiler> ! <Compiler Name="ImplicitVariants">True</Compiler> ! <Compiler Name="UnicodeToLocale">True</Compiler> ! <Compiler Name="LocaleToUnicode">True</Compiler> ! <Compiler Name="ImagebaseMultiple">True</Compiler> ! <Compiler Name="SuspiciousTypecast">True</Compiler> ! <Compiler Name="PrivatePropAccessor">True</Compiler> ! <Compiler Name="UnsafeType">False</Compiler> ! <Compiler Name="UnsafeCode">False</Compiler> ! <Compiler Name="UnsafeCast">False</Compiler> ! <Compiler Name="OptionTruncated">True</Compiler> ! <Compiler Name="WideCharReduced">True</Compiler> ! <Compiler Name="DuplicatesIgnored">True</Compiler> ! </Compiler> ! <Linker> ! <Linker Name="MapFile">0</Linker> ! <Linker Name="OutputObjs">0</Linker> ! <Linker Name="ConsoleApp">1</Linker> ! <Linker Name="DebugInfo">False</Linker> ! <Linker Name="RemoteSymbols">False</Linker> ! <Linker Name="GenerateDRC">False</Linker> ! <Linker Name="MinStackSize">16384</Linker> ! <Linker Name="MaxStackSize">1048576</Linker> ! <Linker Name="ImageBase">4194304</Linker> ! <Linker Name="ExeDescription">InstantObjects Design-Time Package (Delphi 2005)</Linker> ! </Linker> ! <Directories> ! <Directories Name="OutputDir"></Directories> ! <Directories Name="UnitOutputDir"></Directories> ! <Directories Name="PackageDLLOutputDir"></Directories> ! <Directories Name="PackageDCPOutputDir"></Directories> ! <Directories Name="SearchPath"></Directories> ! <Directories Name="Packages"></Directories> ! <Directories Name="Conditionals"></Directories> ! <Directories Name="DebugSourceDirs"></Directories> ! <Directories Name="UsePackages">False</Directories> ! </Directories> ! <Parameters> ! <Parameters Name="RunParams"></Parameters> ! <Parameters Name="HostApplication"></Parameters> ! <Parameters Name="Launcher"></Parameters> ! <Parameters Name="UseLauncher">False</Parameters> ! <Parameters Name="DebugCWD"></Parameters> ! <Parameters Name="RemoteHost"></Parameters> ! <Parameters Name="RemotePath"></Parameters> ! <Parameters Name="RemoteLauncher"></Parameters> ! <Parameters Name="RemoteCWD"></Parameters> ! <Parameters Name="RemoteDebug">False</Parameters> ! </Parameters> ! <Language> ! <Language Name="ActiveLang"></Language> ! <Language Name="ProjectLang">$00000000</Language> ! <Language Name="RootDir"></Language> ! </Language> ! <VersionInfo> ! <VersionInfo Name="IncludeVerInfo">True</VersionInfo> ! <VersionInfo Name="AutoIncBuild">False</VersionInfo> ! <VersionInfo Name="MajorVer">1</VersionInfo> ! <VersionInfo Name="MinorVer">0</VersionInfo> ! <VersionInfo Name="Release">0</VersionInfo> ! <VersionInfo Name="Build">0</VersionInfo> ! <VersionInfo Name="Debug">False</VersionInfo> ! <VersionInfo Name="PreRelease">False</VersionInfo> ! <VersionInfo Name="Special">False</VersionInfo> ! <VersionInfo Name="Private">False</VersionInfo> ! <VersionInfo Name="DLL">False</VersionInfo> ! <VersionInfo Name="Locale">1033</VersionInfo> ! <VersionInfo Name="CodePage">1252</VersionInfo> ! </VersionInfo> ! <VersionInfoKeys> ! <VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys> ! <VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys> </VersionInfoKeys> ! </Delphi.Personality> </BorlandProject> --- 1,171 ---- <?xml version="1.0" encoding="utf-8"?> <BorlandProject> ! <PersonalityInfo> ! <Option> ! <Option Name="Personality">Delphi.Personality</Option> ! <Option Name="ProjectType"></Option> ! <Option Name="Version">1.0</Option> ! <Option Name="GUID">{45D2ADE1-596A-4660-9290-E4F118982656}</Option> ! </Option> ! </PersonalityInfo> ! <Delphi.Personality> ! <Source> ! <Source Name="MainSource">DclIOCore.dpk</Source> ! </Source> ! <FileVersion> ! <FileVersion Name="Version">7.0</FileVersion> ! </FileVersion> ! <Compiler> ! <Compiler Name="A">8</Compiler> ! <Compiler Name="B">0</Compiler> ! <Compiler Name="C">1</Compiler> ! <Compiler Name="D">1</Compiler> ! <Compiler Name="E">0</Compiler> ! <Compiler Name="F">0</Compiler> ! <Compiler Name="G">1</Compiler> ! <Compiler Name="H">1</Compiler> ! <Compiler Name="I">1</Compiler> ! <Compiler Name="J">1</Compiler> ! <Compiler Name="K">0</Compiler> ! <Compiler Name="L">1</Compiler> ! <Compiler Name="M">0</Compiler> ! <Compiler Name="N">1</Compiler> ! <Compiler Name="O">1</Compiler> ! <Compiler Name="P">1</Compiler> ! <Compiler Name="Q">0</Compiler> ! <Compiler Name="R">0</Compiler> ! <Compiler Name="S">0</Compiler> ! <Compiler Name="T">1</Compiler> ! <Compiler Name="U">0</Compiler> ! <Compiler Name="V">1</Compiler> ! <Compiler Name="W">0</Compiler> ! <Compiler Name="X">1</Compiler> ! <Compiler Name="Y">1</Compiler> ! <Compiler Name="Z">1</Compiler> ! <Compiler Name="ShowHints">True</Compiler> ! <Compiler Name="ShowWarnings">True</Compiler> ! <Compiler Name="UnitAliases">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler> ! <Compiler Name="NamespacePrefix"></Compiler> ! <Compiler Name="GenerateDocumentation">False</Compiler> ! <Compiler Name="DefaultNamespace"></Compiler> ! <Compiler Name="SymbolDeprecated">True</Compiler> ! <Compiler Name="SymbolLibrary">True</Compiler> ! <Compiler Name="SymbolPlatform">True</Compiler> ! <Compiler Name="SymbolExperimental">True</Compiler> ! <Compiler Name="UnitLibrary">True</Compiler> ! <Compiler Name="UnitPlatform">True</Compiler> ! <Compiler Name="UnitDeprecated">True</Compiler> ! <Compiler Name="UnitExperimental">True</Compiler> ! <Compiler Name="HResultCompat">True</Compiler> ! <Compiler Name="HidingMember">True</Compiler> ! <Compiler Name="HiddenVirtual">True</Compiler> ! <Compiler Name="Garbage">True</Compiler> ! <Compiler Name="BoundsError">True</Compiler> ! <Compiler Name="ZeroNilCompat">True</Compiler> ! <Compiler Name="StringConstTruncated">True</Compiler> ! <Compiler Name="ForLoopVarVarPar">True</Compiler> ! <Compiler Name="TypedConstVarPar">True</Compiler> ! <Compiler Name="AsgToTypedConst">True</Compiler> ! <Compiler Name="CaseLabelRange">True</Compiler> ! <Compiler Name="ForVariable">True</Compiler> ! <Compiler Name="ConstructingAbstract">True</Compiler> ! <Compiler Name="ComparisonFalse">True</Compiler> ! <Compiler Name="ComparisonTrue">True</Compiler> ! <Compiler Name="ComparingSignedUnsigned">True</Compiler> ! <Compiler Name="CombiningSignedUnsigned">True</Compiler> ! <Compiler Name="UnsupportedConstruct">True</Compiler> ! <Compiler Name="FileOpen">True</Compiler> ! <Compiler Name="FileOpenUnitSrc">True</Compiler> ! <Compiler Name="BadGlobalSymbol">True</Compiler> ! <Compiler Name="DuplicateConstructorDestructor">True</Compiler> ! <Compiler Name="InvalidDirective">True</Compiler> ! <Compiler Name="PackageNoLink">True</Compiler> ! <Compiler Name="PackageThreadVar">True</Compiler> ! <Compiler Name="ImplicitImport">True</Compiler> ! <Compiler Name="HPPEMITIgnored">True</Compiler> ! <Compiler Name="NoRetVal">True</Compiler> ! <Compiler Name="UseBeforeDef">True</Compiler> ! <Compiler Name="ForLoopVarUndef">True</Compiler> ! <Compiler Name="UnitNameMismatch">True</Compiler> ! <Compiler Name="NoCFGFileFound">True</Compiler> ! <Compiler Name="MessageDirective">True</Compiler> ! <Compiler Name="ImplicitVariants">True</Compiler> ! <Compiler Name="UnicodeToLocale">True</Compiler> ! <Compiler Name="LocaleToUnicode">True</Compiler> ! <Compiler Name="ImagebaseMultiple">True</Compiler> ! <Compiler Name="SuspiciousTypecast">True</Compiler> ! <Compiler Name="PrivatePropAccessor">True</Compiler> ! <Compiler Name="UnsafeType">False</Compiler> ! <Compiler Name="UnsafeCode">False</Compiler> ! <Compiler Name="UnsafeCast">False</Compiler> ! <Compiler Name="OptionTruncated">True</Compiler> ! <Compiler Name="WideCharReduced">True</Compiler> ! <Compiler Name="DuplicatesIgnored">True</Compiler> ! </Compiler> ! <Linker> ! <Linker Name="MapFile">0</Linker> ! <Linker Name="OutputObjs">0</Linker> ! <Linker Name="ConsoleApp">1</Linker> ! <Linker Name="DebugInfo">False</Linker> ! <Linker Name="RemoteSymbols">False</Linker> ! <Linker Name="GenerateDRC">False</Linker> ! <Linker Name="MinStackSize">16384</Linker> ! <Linker Name="MaxStackSize">1048576</Linker> ! <Linker Name="ImageBase">4194304</Linker> ! <Linker Name="ExeDescription">InstantObjects Design-Time Package (Delphi 2005)</Linker> ! </Linker> ! <Directories> ! <Directories Name="OutputDir"></Directories> ! <Directories Name="UnitOutputDir"></Directories> ! <Directories Name="PackageDLLOutputDir"></Directories> ! <Directories Name="PackageDCPOutputDir"></Directories> ! <Directories Name="SearchPath"></Directories> ! <Directories Name="Packages"></Directories> ! <Directories Name="Conditionals"></Directories> ! <Directories Name="DebugSourceDirs"></Directories> ! <Directories Name="UsePackages">False</Directories> ! </Directories> ! <Parameters> ! <Parameters Name="RunParams"></Parameters> ! <Parameters Name="HostApplication"></Parameters> ! <Parameters Name="Launcher"></Parameters> ! <Parameters Name="UseLauncher">False</Parameters> ! <Parameters Name="DebugCWD"></Parameters> ! <Parameters Name="RemoteHost"></Parameters> ! <Parameters Name="RemotePath"></Parameters> ! <Parameters Name="RemoteLauncher"></Parameters> ! <Parameters Name="RemoteCWD"></Parameters> ! <Parameters Name="RemoteDebug">False</Parameters> ! </Parameters> ! <Language> ! <Language Name="ActiveLang"></Language> ! <Language Name="ProjectLang">$00000000</Language> ! <Language Name="RootDir"></Language> ! </Language> ! <VersionInfo> ! <VersionInfo Name="IncludeVerInfo">True</VersionInfo> ! <VersionInfo Name="AutoIncBuild">False</VersionInfo> ! <VersionInfo Name="MajorVer">2</VersionInfo> ! <VersionInfo Name="MinorVer">0</VersionInfo> ! <VersionInfo Name="Release">0</VersionInfo> ! <VersionInfo Name="Build">0</VersionInfo> ! <VersionInfo Name="Debug">False</VersionInfo> ! <VersionInfo Name="PreRelease">False</VersionInfo> ! <VersionInfo Name="Special">False</VersionInfo> ! <VersionInfo Name="Private">False</VersionInfo> ! <VersionInfo Name="DLL">False</VersionInfo> ! <VersionInfo Name="Locale">1033</VersionInfo> ! <VersionInfo Name="CodePage">1252</VersionInfo> ! </VersionInfo> ! <VersionInfoKeys> ! <VersionInfoKeys Name="FileVersion">2.0.0.0</VersionInfoKeys> ! <VersionInfoKeys Name="ProductVersion">2.0.0.0</VersionInfoKeys> <VersionInfoKeys Name="CompanyName"></VersionInfoKeys> ! <VersionInfoKeys Name="FileDescription"></VersionInfoKeys> ! <VersionInfoKeys Name="InternalName"></VersionInfoKeys> ! <VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys> ! <VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys> ! <VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys> ! <VersionInfoKeys Name="ProductName"></VersionInfoKeys> </VersionInfoKeys> ! </Delphi.Personality> </BorlandProject> |
|
From: Ron G. <rg...@us...> - 2005-02-25 18:08:03
|
Update of /cvsroot/instantobjects/Source/Design/D9 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21841 Added Files: DclIOCore.bdsproj DclIOCore.bdsproj.local DclIOCore.cfg DclIOCore.dpk Log Message: D2005 IOCore package files --- NEW FILE: DclIOCore.dpk --- package DclIOCore; {$R *.res} {$R '..\..\Core\InstantPresentation.dcr'} {$R '..\..\Core\InstantExplorer.dcr'} {$R '..\..\Core\InstantPersistence.dcr'} {$R '..\..\Core\InstantConnectionManager.dcr'} {$R '..\..\Core\InstantPump.dcr'} {$ALIGN 8} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA ON} {$IOCHECKS ON} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION ON} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS ON} {$VARSTRINGCHECKS ON} {$WRITEABLECONST ON} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'InstantObjects Design-Time Package (Delphi 2005)'} {$LIBSUFFIX '_D2005'} {$DESIGNONLY} {$IMPLICITBUILD OFF} requires designide, vcldb, rtl, vcl, dbrtl, IOCore; contains InstantWizard in '..\InstantWizard.pas', InstantClassEditor in '..\InstantClassEditor.pas' {InstantClassEditorForm: TIOBaseForm}, InstantCommandEditor in '..\InstantCommandEditor.pas' {InstantCommandEditorForm}, InstantDesignResources in '..\InstantDesignResources.pas' {InstantDesignResourceModule: TDataModule}, InstantDesignTools in '..\InstantDesignTools.pas', InstantDesignUtils in '..\InstantDesignUtils.pas', InstantDialog in '..\InstantDialog.pas' {InstantDialogForm}, InstantDualList in '..\InstantDualList.pas' {InstantDualListForm}, InstantEdit in '..\InstantEdit.pas' {InstantEditForm}, InstantModelExpert in '..\InstantModelExpert.pas', InstantModelExplorer in '..\InstantModelExplorer.pas' {InstantModelExplorerForm}, InstantOTA in '..\InstantOTA.pas', InstantReg in '..\InstantReg.pas', InstantUnitSelect in '..\InstantUnitSelect.pas' {InstantUnitSelectForm}, InstantAttributeEditor in '..\InstantAttributeEditor.pas' {InstantAttributeEditorForm}, InstantAbout in '..\InstantAbout.pas' {InstantAboutForm}; end. --- NEW FILE: DclIOCore.bdsproj --- (This appears to be a binary file; contents omitted.) --- NEW FILE: DclIOCore.cfg --- -$A8 -$B- -$C+ -$D+ -$E- -$F- -$G+ -$H+ -$I+ -$J+ -$K- -$L+ -$M- -$N+ -$O+ -$P+ -$Q- -$R- -$S- -$T+ -$U- -$V+ -$W- -$X+ -$YD -$Z1 -cg -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; -H+ -W+ -M -$M16384,1048576 -K$00400000 -LE"C:\Documents and Settings\Ron\My Documents\Borland Studio Projects\Bpl" -LN"C:\Documents and Settings\Ron\My Documents\Borland Studio Projects\Bpl" -Z -w-UNSAFE_TYPE -w-UNSAFE_CODE -w-UNSAFE_CAST --- NEW FILE: DclIOCore.bdsproj.local --- (This appears to be a binary file; contents omitted.) |
|
From: Ron G. <rg...@us...> - 2005-02-25 17:50:23
|
Update of /cvsroot/instantobjects/Source/Design/D9 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16383/D9 Log Message: Directory /cvsroot/instantobjects/Source/Design/D9 added to the repository |
|
From: Ron G. <rg...@us...> - 2005-02-25 17:37:45
|
Update of /cvsroot/instantobjects/Source/Core/D9 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12866 Added Files: IOCore.bdsproj IOCore.bdsproj.local IOCore.cfg IOCore.dpk IOCore.res Log Message: D2005 IOCore package files --- NEW FILE: IOCore.bdsproj.local --- (This appears to be a binary file; contents omitted.) --- NEW FILE: IOCore.bdsproj --- (This appears to be a binary file; contents omitted.) --- NEW FILE: IOCore.dpk --- package IOCore; {$R *.res} {$ALIGN 8} {$ASSERTIONS ON} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA ON} {$IOCHECKS ON} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION ON} {$OVERFLOWCHECKS OFF} {$RANGECHECKS OFF} {$REFERENCEINFO ON} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS ON} {$VARSTRINGCHECKS ON} {$WRITEABLECONST ON} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$DESCRIPTION 'InstantObjects Run-Time Package (Delphi 2005)'} {$LIBSUFFIX '_D9'} {$RUNONLY} {$IMPLICITBUILD OFF} requires vcl, vcldb, rtl; contains InstantUtils in '..\InstantUtils.pas', InstantClasses in '..\InstantClasses.pas', InstantConsts in '..\InstantConsts.pas', InstantRtti in '..\InstantRtti.pas', InstantCommand in '..\InstantCommand.pas', InstantPersistence in '..\InstantPersistence.pas', InstantExplorer in '..\InstantExplorer.pas', InstantDesignHook in '..\InstantDesignHook.pas', InstantCode in '..\InstantCode.pas', InstantTextFiler in '..\InstantTextFiler.pas', InstantPresentation in '..\InstantPresentation.pas', InstantAccessors in '..\InstantAccessors.pas', InstantConnectionManagerForm in '..\InstantConnectionManagerForm.pas' {InstantConnectionManagerForm}, InstantConnectionManager in '..\InstantConnectionManager.pas', InstantImageUtils in '..\InstantImageUtils.pas', InstantPump in '..\InstantPump.pas'; end. --- NEW FILE: IOCore.cfg --- -$A8 -$B- -$C+ -$D+ -$E- -$F- -$G+ -$H+ -$I+ -$J+ -$K- -$L+ -$M- -$N+ -$O+ -$P+ -$Q- -$R- -$S- -$T+ -$U- -$V+ -$W- -$X+ -$YD -$Z1 -cg -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; -H+ -W+ -M -$M16384,1048576 -K$00400000 -LE"C:\Documents and Settings\Ron\My Documents\Borland Studio Projects\Bpl" -LN"C:\Documents and Settings\Ron\My Documents\Borland Studio Projects\Bpl" -Z -w-UNSAFE_TYPE -w-UNSAFE_CODE -w-UNSAFE_CAST --- NEW FILE: IOCore.res --- (This appears to be a binary file; contents omitted.) |
|
From: Ron G. <rg...@us...> - 2005-02-25 17:35:36
|
Update of /cvsroot/instantobjects/Source/Core/D9 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12316/D9 Log Message: Directory /cvsroot/instantobjects/Source/Core/D9 added to the repository |
|
From: Carlo B. <car...@us...> - 2005-02-25 17:17:54
|
Update of /cvsroot/instantobjects/Source/Core In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7181/Source/Core Modified Files: InstantConnectionManagerForm.dfm InstantConnectionManagerForm.pas Log Message: bug fixing: resolved AV after build/connect. Index: InstantConnectionManagerForm.pas =================================================================== RCS file: /cvsroot/instantobjects/Source/Core/InstantConnectionManagerForm.pas,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** InstantConnectionManagerForm.pas 23 Feb 2005 11:03:01 -0000 1.3 --- InstantConnectionManagerForm.pas 25 Feb 2005 17:17:45 -0000 1.4 *************** *** 101,104 **** --- 101,106 ---- procedure FileOpenActionBeforeExecute(Sender: TObject); procedure FileOpenActionExecute(Sender: TObject); + procedure ConnectActionUpdate(Sender: TObject); + procedure DisconnectActionUpdate(Sender: TObject); private FModel: TInstantModel; *************** *** 411,415 **** BorderStyle := bsSizeable; ConnectionView.OnEdited := ConnectionViewEditedVCL; ! ConnectionView.HideSelection := True; ConnectionView.SortType := stText; ConnectionView.SmallImages := ConnectionImages; --- 413,417 ---- BorderStyle := bsSizeable; ConnectionView.OnEdited := ConnectionViewEditedVCL; ! ConnectionView.HideSelection := False; ConnectionView.SortType := stText; ConnectionView.SmallImages := ConnectionImages; *************** *** 705,708 **** --- 707,722 ---- end; + procedure TInstantConnectionManagerForm.ConnectActionUpdate( + Sender: TObject); + begin + ConnectAction.Enabled := Assigned(CurrentConnectionDef) and not IsManagerConnected; + end; + + procedure TInstantConnectionManagerForm.DisconnectActionUpdate( + Sender: TObject); + begin + DisconnectAction.Enabled := IsManagerConnected; + end; + initialization RegisterConnectionManagerExecutor(DefaultConnectionManagerExecutor); Index: InstantConnectionManagerForm.dfm =================================================================== RCS file: /cvsroot/instantobjects/Source/Core/InstantConnectionManagerForm.dfm,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** InstantConnectionManagerForm.dfm 22 Feb 2005 14:25:18 -0000 1.1 --- InstantConnectionManagerForm.dfm 25 Feb 2005 17:17:45 -0000 1.2 *************** *** 162,165 **** --- 162,166 ---- Hint = 'Connect' OnExecute = ConnectActionExecute + OnUpdate = ConnectActionUpdate end object DisconnectAction: TAction *************** *** 167,170 **** --- 168,172 ---- Hint = 'Disconnect' OnExecute = DisconnectActionExecute + OnUpdate = DisconnectActionUpdate end object FileOpenAction: TAction |
|
From: Ron G. <rg...@us...> - 2005-02-25 17:02:22
|
Update of /cvsroot/instantobjects/Source/Core In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2322/Core Modified Files: InstantDefines.inc Log Message: Updates InstantDefines.inc to work with D2005. I went with D9 rather than D2005 because I decided to do the directories in D9 rather than D2005. They may call it D2005, but the bpl's it ships with all retain the xxxx90.bpl (i.e. delphiide90.bpl) designation in C:\\BDS\\3.0\\Bin\\ folder. Index: InstantDefines.inc =================================================================== RCS file: /cvsroot/instantobjects/Source/Core/InstantDefines.inc,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** InstantDefines.inc 11 Feb 2005 16:29:03 -0000 1.3 --- InstantDefines.inc 25 Feb 2005 17:01:54 -0000 1.4 *************** *** 18,19 **** --- 18,26 ---- {$ENDIF} + {$IFDEF VER170} + {$DEFINE D5+} + {$DEFINE D6+} + {$DEFINE D7+} + {$DEFINE D9} + {$DEFINE D9+} + {$ENDIF} \ No newline at end of file |
|
From: Nando D. <na...@us...> - 2005-02-25 15:34:19
|
Update of /cvsroot/instantobjects/Docs In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11181 Added Files: IdDataType_and_IdDataSize.txt Log Message: Documentation for IdDataType, IdDataSize and OnGenerateId --- NEW FILE: IdDataType_and_IdDataSize.txt --- IdDataType and IdDataSize ========================= Nando Dessena, 02/2005. Abstract -------- This feature allows you to use a different datatype than string[32] for Id fields in InstantObjects. While there's still a lot to improve to make the mapping strategy more flexible, this little feature helps those who want to use (f. ex.) an integer OID instead of a GUID, mainly for storage size and efficiency reasons. How to choose a different datatype ---------------------------------- Each Connector (and ConnectionDef) features two additional properties: property IdDataType: TInstantDataType default dtString; property IdSize: Integer default InstantDefaultFieldSize; Just set a data type (I have only tested dtString and dtInteger, and some datatypes like dtBlob and dtBoolean just don't make sense), a DataSize where applicable and build the database. Don't forget to have the same settings when you connect to the database. If you use a datatype different than string[32], you might also need to override the default key generation mechanism (otherwise IO will generate 32-character GUIDS that might not fit into your key fields), which you do by handling the connector's OnGenerateId event. Here is the even declaration: type TInstantGenerateIdEvent = procedure(Sender: TObject; var Id: String) of object; property OnGenerateId: TInstantGenerateIdEvent; And here is a sample event handler that I use to generate integer IDs by means of a Firebird sequence generator (IBX broker in this example): procedure TDmMain.IBXConnectorGenerateId(Sender: TObject; var Id: string); begin if not SqlGenIdIBX.Transaction.Active then SqlGenIdIBX.Transaction.StartTransaction; if not SqlGenIdIBX.Prepared then SqlGenIdIBX.Prepare; SqlGenIdIBX.ExecQuery; try Id := SqlGenIdIBX.Fields[0].AsString; finally SqlGenIdIBX.Close; end; end; SqlGenIdIBX is a TIBSQL instance, linked to the same instance of TIBDatabase the IBXConnector is linked to, and it holds the following query: select GEN_ID(G_ID, 1) from RDB$DATABASE Where G_ID is my sequence generator defined in the Firebird database. Remarks ------- - The TInstantObject.Id property is always of type string, regardless of the datatype you choose for the mapping. Shortcomings ------------ - You cannot currently choose an ID datatype for a single class or table: all tables in a database share the same settings. - The mechanism is rather crude. In the future I'd like to add the ability to select more flexible mapping strategies (to allow mapping existing databases with IO) and introduce predefined and extensible Id generators to use instead of the OnGenerateId event. Anyway it works well enough for me. |
Update of /cvsroot/instantobjects/Source/Brokers/FlashFiler/D5 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2594/Brokers/FlashFiler/D5 Removed Files: DclIOff50.cfg DclIOff50.dof DclIOff50.dpk DclIOff50.res ioff50.cfg ioff50.dof ioff50.dpk ioff50.res Log Message: remove incorrectly named files --- DclIOff50.dpk DELETED --- --- DclIOff50.cfg DELETED --- --- DclIOff50.res DELETED --- --- ioff50.dpk DELETED --- --- DclIOff50.dof DELETED --- --- ioff50.dof DELETED --- --- ioff50.res DELETED --- --- ioff50.cfg DELETED --- |
|
From: Nando D. <na...@us...> - 2005-02-25 15:05:27
|
Update of /cvsroot/instantobjects/Source/Brokers/Template In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2301/Brokers/Template Removed Files: InstantXXX.dcr InstantXXX.pas InstantXXXConnectionDefEdit.dfm InstantXXXConnectionDefEdit.pas InstantXXXReg.pas ioxxx50.dof ioxxx50.dpk Log Message: removed unmaintained Template broker --- ioxxx50.dpk DELETED --- --- InstantXXXReg.pas DELETED --- --- ioxxx50.dof DELETED --- --- InstantXXXConnectionDefEdit.dfm DELETED --- --- InstantXXXConnectionDefEdit.pas DELETED --- --- InstantXXX.pas DELETED --- --- InstantXXX.dcr DELETED --- |
Update of /cvsroot/instantobjects/Source/Brokers/Template/D6 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2301/Brokers/Template/D6 Removed Files: DclIOXXX.cfg DclIOXXX.dof DclIOXXX.dpk DclIOXXX.res IOXXX.cfg IOXXX.dof IOXXX.dpk IOXXX.res Log Message: removed unmaintained Template broker --- IOXXX.dpk DELETED --- --- IOXXX.res DELETED --- --- IOXXX.dof DELETED --- --- IOXXX.cfg DELETED --- --- DclIOXXX.cfg DELETED --- --- DclIOXXX.dof DELETED --- --- DclIOXXX.dpk DELETED --- --- DclIOXXX.res DELETED --- |
