Try using an Exec statement in Pascal to run the DOS systeminfo command output with a pipe, then parse the resulting output using Pascal. Example...
c:\>systeminfo | find "Time Zone"
Time Zone: (UTC-05:00) Eastern Time (US & Canada)
c:\>
It takes a sec on Windows 7 to get the result but it should run faster on XP.