instantobjects-cvscommit

[Nando D. <na...@us...>]

Update of /cvsroot/instantobjects/Source/Tests
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28817/Tests

Modified Files:
	TestInstantTableMetadata.pas 
Log Message:
changes to support the database evolution refactorings

Index: TestInstantTableMetadata.pas
===================================================================
RCS file: /cvsroot/instantobjects/Source/Tests/TestInstantTableMetadata.pas,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** TestInstantTableMetadata.pas	10 Jun 2005 01:25:33 -0000	1.3
--- TestInstantTableMetadata.pas	18 Jun 2005 09:56:39 -0000	1.4
***************
*** 44,48 ****
    InstantModel.LoadFromResFile(ChangeFileExt(ParamStr(0), '.mdr'));
  
!   FOwner := TInstantRelationalScheme.Create(InstantModel);
    FInstantTableMetadata := FOwner.FindTableMetadata('Address');
  end;
--- 44,49 ----
    InstantModel.LoadFromResFile(ChangeFileExt(ParamStr(0), '.mdr'));
  
!   FOwner := TInstantScheme.Create;
!   FOwner.Catalog := TInstantModelCatalog.Create(FOwner, InstantModel);
    FInstantTableMetadata := FOwner.FindTableMetadata('Address');
  end;