delphi中的变体问题.难道只用于内存节约?(BS CSDN.不能发分.再加)

type
TPerson = record
FirstName, LastName: string[40];
BirthDate: TDate;
case Citizen: Boolean of
True: (Birthplace: string[40]);
False: (Country: string[20];
EntryPort: string[20];
EntryDate, ExitDate: TDate);
end;procedure TForm1.Button1Click(Sender: TObject);
var p:TPerson;
begin
p.Citizen:=true;
p.Country:='aa';
showmessage(p.Country);
end;不明白这一句.是根据Citizen来决定有无Country字段吗?咋上边的还能用?