枚举类型的问题(50分)

C

cowbird

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-07

• #1

type
TCompany_type=record
Company_type:string;
type_name:string;
end;
TPost_code=record
post_code:string;
service_type:string;
post_name:string;
end;

TTableName=(TCompany_type,TPost_code)
//此处是报错的

问题一:是不是枚举类型是简单类型,其中的枚举值不能是记录类型啊?
问题二:数据类型上一级类名称是什么呀? TObject?
因为我想在后面的地方声明 procedure aaa(TableName:TTableName);

 

孤

孤灯夜影

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-07

• #2

TTableName不能同时是(TCompany_type,TPost_code);两种不同的类型

 

T

todayisthursday

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-07

• #3

回答一:你说的没错.直来不可以.看看有没有变通的办法
回答二:数据类型上一级没有类名.申明的时候没有class(TObject),所以上级领导班子不是
TObject

顶

 

S

savetime

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-13

• #4

枚举类型必须是有序类型，其实就是有名称的整数。

 

S

sunjialong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-13

• #5

好像可以是同一种是记录类型

 

C

cowbird

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-16

• #6

如todayisthursday所说,找了个变通的方法-->重载
这样也不要找他们的上级类了.
procedure aaa(TableName:TCompany_type);
procedure aaa(TableName:TPost_code);