学步园

Here's one, courtesy of one of our readers, Rubem Rocha.

{================================ The following function will retrieve the BIOS date, without built-in assembler or API calls, just Delphi native resources. ================================} function BiosDate: String; begin result := string(pchar(ptr($FFFF5))); end;