#40 Multi parts fields, show error!

[Glodfish Zhang]

In Demos\intro

I was added new class:
TPhone = class(TInstantObject)
{IOMETADATA stored;
Name: String(10);
Number: String(10) mask '(999) 999-9999;0;_'; }
_Name: TInstantString;
_Number: TInstantString;
private
function GetName: string;
function GetNumber: string;
procedure SetName(const Value: string);
procedure SetNumber(const Value: string);
published
property Name: string read GetName write SetName;
property Number: string read GetNumber write SetNumber;
end;

I was edited TContact class:
TContact = class(TInstantObject)
{IOMETADATA stored;
Address: Part(TAddress);
Name: String(30);
Phones: Parts(TPhone);
MobilePhones: Parts(TMobilePhone) external
'Contact_MobilePhones' default; }
_Address: TInstantPart;
_MobilePhones: TInstantParts;
_Name: TInstantString;
_Phones: TInstantParts;
...

I was added MobilePhones: Parts(TMobilePhone) external
'Contact_MobilePhones' default;

I was Evolved Database.

I run application.
It was show error:

First chance exception at $77E8BC3F. Exception class
EInstantError with message 'Error retrieving object
TCompany('D9C93EF0AD62954197D6050C6E1D5C0A'): "Field
'MobilePhones' not found"'. Process Intro.exe (2008)

Source Code look I uploaded rar files.

[Nobody/Anonymous]

Logged In: NO

hello !Glodfish Zhang
I am useing instantobject.Can you connect me?
chy611@MSN.COM

[Nobody/Anonymous]

Logged In: NO

hello !Glodfish Zhang
I am useing instantobject.Can you connect me?
chy611@MSN.COM

[Nobody/Anonymous]

Logged In: NO

hello !Glodfish Zhang
I am useing instantobject.Can you connect me?
chy611@MSN.COM