C/C++ - [решено] Определение частоты процессора, видеопамяти и др.

C/C++ - [решено] Определение частоты процессора, видеопамяти и др.

Старожил

Сообщения: 163
Благодарности: 23

Профиль | Сайт | Отправить PM | Цитировать

Как сделать чтоб в окне программы отображалась тактовая частота процессора, информация о видеопамяти, оперативной памяти, ОС и др.?

Код здесь!

Код программы:

Код:

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
	: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Label1Click(TObject *Sender)
{

}
//---------------------------------------------------------------------------

Определения частоты процессора:

Код:

double CPUSpeed(void) 
 { 
   DWORD dwTimerHi, dwTimerLo; 
   asm
    { 
       DW 0x310F 
       mov dwTimerLo, EAX 
       mov dwTimerHi, EDX 
     } 
   Sleep (500); 
   asm
    { 
       DW 0x310F 
       sub EAX, dwTimerLo 
       sub EDX, dwTimerHi 
       mov dwTimerLo, EAX 
       mov dwTimerHi, EDX 
    } 
   return dwTimerLo/(1000.0*500); 
 }

Определения частоты обновления экрана:

Код:

HDC hDCScreen = GetDC(NULL);

int RefreshFrequency = GetDeviceCaps(hDCScreen, VREFRESH);

ReleaseDC(NULL, hDCScreen);

Определение размеры экрана:

Код:

TRect rect;
if( SystemParametersInfo(SPI_GETWORKAREA,0,&rect,0) ) {
// получили размер рабочей области
ShowMessage("WorkArea size is "+AnsiString(rect.Width())+"x"+AnsiString(rect.Height()));
} else {
// не удалось получить размер рабочей области
ShowMessage("GetWorkArea failed");
}

Изменения разрешения экрана:

Код:

DEVMODE dm;
dm.dmSize = sizeof(DEVMODE);
int index = 0;
while (EnumDisplaySettings(NULL, index, &dm))
{
 if (dm.dmPelsWidth == 800 && dm.dmPelsHeight == 600)
 {
   dm.dmFields = DM_PELSWIDTH | DM_PELSHEIGHT;
   LONG result = ChangeDisplaySettings(&dm, CDS_TEST);
   if (result == DISP_CHANGE_SUCCESSFUL)
   {
     ChangeDisplaySettings(&dm, 0);
     break;
   }
   else if (result == DISP_CHANGE_RESTART)
   {
     ShowMessage("Требуется перезагрузка");
     break;
   }
   else
   {
     ShowMessage("Установка не поддерживается монитором");
     break;
   }
 }
 index++;
}

Знаю не все коды...пишите еще, необходимые!!

Помогите, пожалуйста, осуществить это!
И можно это же проделать на Делфи?Если да то на сколько будет отличаться код?

Отправлено: 21:36, 24-01-2010

Virtyaluk

Старожил

Сообщения: 163
Благодарности: 23

Профиль | Сайт | Отправить PM | Цитировать

Цитата Drongo:

Скинь название проги и ссылку на неё. »

WMI Code Creator v1.0
The WMI Code Creator tool allows you to generate VBScript, C#, and VB .NET code that uses WMI to complete a management task such as querying for management data, executing a method from a WMI class, or receiving event notifications using WMI.
Страница загрузки.

Это сообщение посчитали полезным следующие участники:

Drongo

Отправлено: 22:53, 25-03-2010 | #11