getname.cpp

Getname 用于获取本机计算机操作系统名称的软件

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

#include <vcl.h>
#pragma hdrstop

#include "GetName.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
Tmainform *mainform;
//---------------------------------------------------------------------------
__fastcall Tmainform::Tmainform(TComponent* Owner)
        : TForm(Owner)
{
  Memo->Text = "";
}
//---------------------------------------------------------------------------
void __fastcall Tmainform::NameButtonClick(TObject *Sender)
{
  unsigned long n = 7;
  unsigned long * m = &n;
  char array[5] = {1,2,3,4,5};
  GetComputerName (array, m);
  Memo->Text = array;
}
//---------------------------------------------------------------------------
void __fastcall Tmainform::Button1Click(TObject *Sender)
{
  unsigned long max = 30;
  unsigned long * username = &max;
  char user[20] = {1,2,3,4,5,6,7,8,9,10};
  GetUserName (user, username);
  Memo->Text = user;
}
//---------------------------------------------------------------------------
void __fastcall Tmainform::Button2Click(TObject *Sender)
{
  struct OSVERSIONINFO
  {
      DWORD dwOSVersionInfoSize;
      DWORD dwMajorVersion;
   //   DWORD dwMinorVersion;
   //   DWORD dwBuildNumber;
   //   DWORD dwPlatformId;
   //   TCHAR szCSDVersion[ 128 ];
  };

  OSVERSIONINFO B;
//  bool bOsVersionInfoEx;
 // ZeroMemory(&B, sizeof(OSVERSIONINFOEX));
  B.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
  B.dwMajorVersion = 5;
 // B.dwMinorVersion = 1;
 // B.dwBuildNumber = 2600;
 // B.dwPlatformId =  VER_PLATFORM_WIN32_NT;
 // B.szCSDVersion[ 128 ];

//  OSVERSIONINFOEX * ptB = &B;
//  if( !(bOsVersionInfoEx = GetVersionEx ((OSVERSIONINFO *) &B)) )
//  {
//    B.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
    if (GetVersionEx ((OSVERSIONINFOA *)&B))
    {
      Memo->Text = B.dwMajorVersion;
    }
//  }
}
//---------------------------------------------------------------------------