C++ C++ C# C# ASP.NET Security ASP.NET Security ASM ASM Скачать Скачать Поиск Поиск Хостинг Хостинг  
  Программа для работы с LPT портом...
Язык: .NET — ©Alexey...
  "ASP.NET Atlas" – AJAX в исполнении Micro...
Язык: .NET — ©legigor@mail.ru...
  "Невытесняющая" Многопоточность...
Язык: C/C++ — ©...
  01.05.2010 — Update World C++: Сборник GPL QT исходников
  15.12.2007 — Весь сайт целиком можно загрузить по ссылкам из раздела Скачать
Хостинг:
Windows 2003, ASP.NET 2.0
бесплатный и от 80 руб./мес


   Отправить письмо
Кулабухов Артем, Беларусь




 Устройства / Borland C++ FAQ / Borland C++

Устройства

  1. Открытие привода CD-ROM
  2. Закрытие привода CD-ROM
  3. Программное выключение монитора
  4. Программное включение монитора
  5. Как выключить/перезагрузить компьютер
  6. Сколько оперативной памяти
  7. Как определить, подключена ли мышь
  8. Название процессора
  9. [+] Определение набора расширенных инструкций поддерживающий процессором
  10. [+] Определение тактовой частоты частоты CPU
  1. Открытие привода CD-ROM

    // Чтобы программно открыть привод CD-ROM, подключите
    // после vcl.h заголовочный файл mmsystem.h
    // и вызовите функцию mciSendString:
    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
    mciSendString("Set cdaudio door open wait", NULL, 0, Handle);
    }

  2. Закрытие привода CD-ROM

    // Чтобы программно закрыть привод CD-ROM, подключите
    // после vcl.h заголовочный файл mmsystem.h
    // и вызовите функцию mciSendString:
    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
    mciSendString("Set cdaudio door closed wait", NULL, 0, Handle);
    }

  3. Программное выключение монитора

    // Следующий код выключит монитор
    SendMessage(HWND_BROADCAST, WM_SYSCOMMAND, SC_MONITORPOWER, 2);

  4. Программное включение монитора

    // Следующий код включит монитор
    SendMessage(HWND_BROADCAST, WM_SYSCOMMAND, SC_MONITORPOWER, -1);

  5. Как выключить/перезагрузить компьютер

    // Для включения/перезагрузки компьютера вызовите
    // функцию ExitWindowsEx


    // выключить компьютер
    ExitWindowsEx(EWX_SHUTDOWN, 0);
    // перезагрузить компьютер
    ExitWindowsEx(EWX_REBOOT, 0);
    // завершить сеанс пользователя
    ExitWindowsEx(EWX_LOGOFF, 0);

  6. Сколько оперативной памяти

    // Для того чтобы узнать сколько оперативной
    // памяти на компьютере введите следующий код:

    MEMORYSTATUS mem;
    memset((void*)&mem,0,sizeof(mem));
    mem.dwLength=sizeof(mem);
    GlobalMemoryStatus(&mem);
    MessageDlg("Total memory:"+IntToStr(mem.dwTotalPhys),
    mtInformation, TMsgDlgButtons() << mbOK, 0);

  7. Как определить, подключена ли мышь

    // Введите следующий код:
    if(GetSystemMetrics(SM_MOUSEPRESENT))
    MessageDlg("Мышь подключена!", mtInformation, TMsgDlgButtons() << mbOK, 0);
    else
    MessageDlg("Мышь не найдена!", mtError, TMsgDlgButtons() << mbOK, 0);

  8. Название процессора

    // Введите следующий код:
    AnsiString ProcessorName="Unknown";
    TRegistry *reg = new TRegistry;
    try {
    reg->RootKey = HKEY_LOCAL_MACHINE;
    reg->OpenKey("Hardware\\Description"
    "\\System\\CentralProcessor\\0", false);
    ProcessorName=reg->ReadString("ProcessorNameString");
    }
    __finally
    {
    delete reg;
    }
    MessageDlg(ProcessorName, mtInformation, TMsgDlgButtons() << mbOK, 0);

  9. Определение набора расширенных инструкций поддерживающий процессором

    // Введите следующий код:
    Memo1->Lines->Add("Поддерживаемые инструкции:");
    DWORD brt;
    bool AMD,MMX;
    __asm
     {
      mov  eax,1
      cpuid
      mov brt,edx
     }
    if(brt&(1<<23))
     {
      MMX=true;
      Memo1->Lines->Add("MMX");
     }
    if(brt&(1<<25))
     {
      if(brt&(1<<24))
       {
        __try
         {
          __asm xorps xmm0, xmm0
          Memo1->Lines->Add("SSE");
         }
        __except(EXCEPTION_EXECUTE_HANDLER){}
        if(brt&(1<<26))
         {
          __try
           {
            __asm xorpd xmm0,xmm0
            Memo1->Lines->Add("SSE2");
           }
          __except(EXCEPTION_EXECUTE_HANDLER){}
         }
       }
     }
    __asm
     {
      mov eax,0x80000000
      cpuid
      cmp eax,0x80000000
      jc notamd
      mov eax,0x80000001
      cpuid
      mov brt,edx
      mov AMD,1
      notamd:
     }
    if(AMD)
     if((MMX)&&(brt&(1<<31)))
    	Memo1->Lines->Add("3DNOW!");

    Автор: ant47

  10. Определение тактовой частоты CPU

    // При помощи этой функции можно определить тактовую частоту CPU:
    double CPUSpeed(void) 
    { 
      DWORD dwTimerHi, dwTimerLo; 
      double dRes; 
      asm
       { 
          DW 0x310F 
          mov dwTimerLo, EAX 
          mov dwTimerHi, EDX 
        } 
    
      Sleep (500); 
      asm
       { 
          DW 0x310F 
          sub EAX, dwTimerLo 
          sub EAX, dwTimerHi 
          mov dwTimerLo, EAX 
          mov dwTimerHi, EDX 
       } 
      dRes = dwTimerLo/(1000.0*500); 
      return dRes; 
    }
Наверх