取得系統的資訊... |
|
答題得分者是：RaynorPao
|
|
newbie
初階會員   發表：81 回覆：45 積分：25 註冊：2002-11-28 發送簡訊給我 |
|
|
RaynorPao
版主  發表：139 回覆：3622 積分：7025 註冊：2002-08-12 發送簡訊給我 |
引言: 大家好, 小弟知道用下列的 API 取得解析度資訊
------
-- 若您已經得到滿意的答覆，請適時結案!! -- -- 欲知前世因，今生受者是；欲知來世果，今生做者是 -- -- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 -- |
|
ccchen
版主 發表：61 回覆：940 積分：1394 註冊：2002-04-15 發送簡訊給我 |
|
|
RaynorPao
版主 發表：139 回覆：3622 積分：7025 註冊：2002-08-12 發送簡訊給我 |
|
|
newbie
初階會員 發表：81 回覆：45 積分：25 註冊：2002-11-28 發送簡訊給我 |
|
|
axsoft
版主  發表：681 回覆：1056 積分：969 註冊：2002-03-13 發送簡訊給我 |
引言:
大家好, 小弟知道用下列的 API 取得解析度資訊
給你參考一下:
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
SYSTEMTIME stime ;
SYSTEM_INFO sinfo ;
GetLocalTime(&stime) ;
GetSystemInfo(&sinfo) ; MEMORYSTATUS ms ;
ms.dwLength = sizeof(ms);
GlobalMemoryStatus(&ms) ; OSVERSIONINFO os ;
os.dwOSVersionInfoSize = sizeof(os) ;
GetVersionEx(&os) ; AnsiString szYear = stime.wYear ;
AnsiString szMonth = stime.wMonth ;
AnsiString szDay = stime.wDay ;
AnsiString szHour = (int)stime.wHour ;
AnsiString szMinute = stime.wMinute ;
AnsiString szSecond = stime.wSecond ; // set Processor
if (sinfo.dwProcessorType==PROCESSOR_INTEL_PENTIUM)
{
LCPU->Caption = "Pentium" ;
cout << "CPU:\tPentium" << endl ;
}
// set memory status
LPSTR lpMemLoad = new char[5];
sprintf(lpMemLoad,"%d %%",ms.dwMemoryLoad);
lPhysMem->Caption = FormatFloat((AnsiString)"#,###' KB'",
ms.dwTotalPhys / 1024) " ( " (AnsiString)lpMemLoad " in Use)";
// console mode
cout << "Physical Memory: " << lPhysMem->Caption.c_str() << endl ; AnsiString szAvailPage = FormatFloat((AnsiString)"#,###' KB'", ms.dwAvailPageFile / 1024);
lVirtualMem->Caption = FormatFloat((AnsiString)"#,###' KB'",
ms.dwTotalPageFile / 1024) " ( " szAvailPage " Free)";
// console mode
cout << "Virtusl Memory: " << lVirtualMem->Caption.c_str() << endl ;
// set system time
lSystemTime->Caption = szYear "/" szMonth "/" szDay
" " szHour ":" szMinute ":" szSecond ;
cout << "System Time: " << lSystemTime->Caption.c_str() << endl ; // set OS version
AnsiString szMajorVersion = (int)os.dwMajorVersion ;
AnsiString szMinorVersion = (int)os.dwMinorVersion ;
AnsiString szBuildNumber = LOWORD(os.dwBuildNumber) ;
lOsVersion->Caption = "Windows95 ("
szMajorVersion "." szMinorVersion " Build " szBuildNumber ")";
cout << "OS Version: " << lOsVersion->Caption.c_str() << endl ;
}
網路志工聯盟----Visita網站http://www.vista.org.tw
---[ 發問前請先找找舊文章 ]---
|
發表時間：2002-12-05 13:43:45
IP:61.220.xxx.xxx 未訂閱
系統時間：2024-04-26 18:25:53
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |