with Memo1.Lines do begin Add(''''MainBoardBiosName:''''+^I+string(Pchar(Ptr($FE061)))); Add(''''MainBoardBiosCopyRight:''''+^I+string(Pchar(Ptr($FE091)))); Add(''''MainBoardBiosDate:''''+^I+string(Pchar(Ptr($FFFF5)))); Add(''''MainBoardBiosSerialNo:''''+^I+string(Pchar(Ptr($FEC71)))); end;