mainform.cpp

来自「C++ BUILDER精彩编程实例集锦(源码)3 第五部分 系统编程 第六部」· C++ 代码 · 共 56 行

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

#include <vcl.h>
#pragma hdrstop

#include "Mainform.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
#include "Registry.hpp"
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{//居中显示桌面墙纸
   TRegistry *Reg=new TRegistry();
   Reg->RootKey=HKEY_CURRENT_USER;
   Reg->OpenKey("\\Control Panel\\desktop",false);
   Reg->WriteString("TileWallPaper","0");
   Reg->WriteString("WallpaperStyle","0");
   Reg->CloseKey();
   delete Reg;
   SystemParametersInfo(SPI_SETDESKWALLPAPER,0,NULL,SPIF_SENDCHANGE);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn2Click(TObject *Sender)
{//平铺显示桌面墙纸
   TRegistry *Reg=new TRegistry();
   Reg->RootKey=HKEY_CURRENT_USER;
   Reg->OpenKey("\\Control Panel\\desktop",false);
   Reg->WriteString("TileWallPaper","1");
   Reg->WriteString("WallpaperStyle","0");
   Reg->CloseKey();
   delete Reg;
   SystemParametersInfo(SPI_SETDESKWALLPAPER,0,NULL,SPIF_SENDCHANGE);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::BitBtn3Click(TObject *Sender)
{//拉伸显示桌面墙纸
   TRegistry *Reg=new TRegistry();
   Reg->RootKey=HKEY_CURRENT_USER;
   Reg->OpenKey("\\Control Panel\\desktop",false);
   Reg->WriteString("TileWallPaper","0");
   Reg->WriteString("WallpaperStyle","2");
   Reg->CloseKey();
   delete Reg;
   SystemParametersInfo(SPI_SETDESKWALLPAPER,0,NULL,SPIF_SENDCHANGE);
}
//---------------------------------------------------------------------------