请教关于Delphi中类似C中的联合的定义和使用方法,在线!

Question

我在Delphi中定义一个类似C语言中的联合如下
type Ta=record
       name:string[10];
       num:integer;
end;type Tb=record
       Xuhao:integer;
       classNum:integer;
end;type TRec=record
        a:integer;
        case integer of 
        0:(a:Ta);
        1:(b:Tb);
end;
var
Rec:TRec;
这种定义方法应该没有错误,但是我不知道在程序中使用这个变量时应该怎样用,即怎样做到我要在Rec中屏蔽掉Rec.b时,应该怎样设定值.各位高手请帮忙看一看?

Answer 1

不能屏蔽掉，只是rec.b与rec.a共用内存空间