有关记录类型With do 语句的问题(50分)

我看了一个CD播放器的例子，其中有些片段是这样的：
……
implementation
{ $R*.DFM }
type
TTMSFRec=record //定义一个记录类型，共4字节，与TTimeFormat匹配
Tracks:byte;
Minutes:byte;
Second:byte;
Frames:byte;
end;
var
mpPosition:Longint
//记录MediaPlayer的位置
……
procedure TForm.Timer1Timer(Sender:Tobject);
begin
……
With TTMSFRec(mpPosition) do
……
最后一行这个with do语句里面，一个记录类型带一个括号里面一个长整型，这是什么写法啊
什么意思？

不是强制类型转换吗》？

强制类型
longint=byte+byte+byte+byte
就是: mpPostion:=TTMSFRec.Tracks*256*256*256+TTMSFRec.Minutes*256*256+TTMSFRec.Second*256+TTMSFRec.Frames

原来如此！你们不要打我啊~````哈哈哈

多人接受答案了。