GetSystemTime

Declare Sub GetSystemTime Lib "kernel32" Alias "GetSystemTime" (lpSystemTime As SYSTEMTIME)

在一個SYSTEMTIME中載入當前系統時間,這個時間採用的是“協同世界時間”(即UTC,也叫做GMT)格式。lpSystemTime SYSTEMTIME,隨同當前時間載入的結構。

基本介紹

  • 中文名:GetSystemTime
  • 外文名:GetSystemTime" (lpSystemTime As SYSTEMTIME
  • year:word; -- 年
  • month :word; -- 
Ada聲明,使用注意,

Ada聲明

type WORD is mod 2**16;
-- SYSTEMTIME 結構
type SYSTEMTIME is record
year : word; -- 年
month : word; -- 月
dayofweek : word; -- 星期,0=星期日,1=星期一
day : word; -- 天
hour : word; -- 時
minute : word; -- 分
second : word; -- 秒
Milliseconds : word; -- 毫秒
end record;
type LPSYSTEMTIME is access SYSTEMTIME;
procedure GetSystemTime(SYSTIME:LPSYSTEMTIME);
function GetSystemTime(SYSTIME:LPSYSTEMTIME) return integer;
pragma import(stdcall,GetSystemTime,"GetSystemTime");

使用注意

1、參數SYSTIME必須首先分配記憶體空間,否則引起PROGRAM_ERROR 。
2、該函式獲取格林威治標準時間。

相關詞條

熱門詞條

聯絡我們