Delphi程序设计之--经验技巧
采集日期：2008-5-1作者：zgqtxwd(注：本数据由系统自动采集，内容与BHCODE无关)
这些日子太忙了，今天把剩下的部分贴完，希望对大家有用。看过前一篇的都知道此文的作者和出处，我就不详细说了。{ No. 16 }//对于记录类型Record的分析。实例：type TBaseRec = record rStr: Integer; rStr2: String; rStr3: String; end; TStrRec = record rStr: Integer; rStr2: String; rStr3: String; rStr4: String; end;procedure TForm1.Button3Click(Sender: TObject);var vRec1: TStrRec; vBaseRec: TBaseRec;begin vRec1.rStr := 1; vRec1.rStr2 := '123123'; vRec1.rStr3 := '1'; vRec1.rStr4 := '1'; vBaseRec := TBaseRec(Pointer(@vRec1)^); ShowMessage(IntToStr(vBas