Turbo Pascal for DOS - 如何獲得當前時區偏移量

Question

我需要對使用Turbo Pascal 7編寫的舊應用程序進行修改，這需要我找出當前時區偏移量。該程序在32位XP環境中的DOS框中運行。

有人知道這樣做嗎？

**編輯**

我也許應該補充的是，這個問題的原因是因爲我想知道UTC時間，即我想打電話從DOS一個GetSystemTime等價的方式。

Answer 1

嘗試在Pascal中使用Exec語句以使用管道運行DOS systeminfo命令輸出，然後使用Pascal分析結果輸出。示例...

c:\>systeminfo | find "Time Zone" 
Time Zone:     (UTC-05:00) Eastern Time (US & Canada) 

c:\> 

Windows 7需要一秒才能得到結果，但它在XP上應該運行得更快。