MSGHDRrecord = record MsgNum : Integer; PrevReply, NextReply, TimesRead : Word; StartBlock : Word; NumBlocks, DestNet, DestNode, OrigNet, OrigNode : Word; DestZone, OrigZone : Byte; Cost : Word; MsgAttr, NetAttr, Board : Byte; PostTime : Time; PostDate : Date; WhoTo, WhoFrom : MSGTOIDXrecord; Subject : String[72]; end;