实现关机时的效果的一段代码

SLH113355

SLH113355

2016-02-19 14:04

下面,图老师小编带您去了解一下实现关机时的效果的一段代码,生活就是不断的发现新事物,get新技能~

  unsigned char bybits[16]={0x55,0x0,0xaa,0x0,0x55,0x0,0xaa,0x0,
                            0x55,0x0,0xaa,0x0,0x55,0x0,0xaa,0x0};
  HANDLE hBitmap,hBrush;
  
  //---------------------------------------------------------------------------
  void __fastcall TForm1::Button1Click(TObject *Sender)
  {
      /使屏幕暗下来
      HANDLE hdc5;
      hBitmap=CreateBitmap(8,8,1,1,&bybits[0]);
      hBrush=CreatePatternBrush(hBitmap);
      hdc5=GetDC(0);
      SelectObject(hdc5,hBrush);
      PatBlt(hdc5,0,0,Screen-Width,Screen-Height,0xa000c9);
      DeleteObject(hBrush);
      DeleteObject(hBitmap);
      ReleaseDC(0,hdc5);
  }
  //---------------------------------------------------------------------------
  void __fastcall TForm1::Button2Click(TObject *Sender)
  {
      //复原屏幕
      InvalidateRect(0,0,1);
  }
  //---------------------------------------------------------------------------
展开更多 50%)
分享

猜你喜欢

实现关机时的效果的一段代码

编程语言 网络编程
实现关机时的效果的一段代码

实现XP关机时自动清理页面文件

windows 操作系统
实现XP关机时自动清理页面文件

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

一段好玩的JavaScript代码

Web开发
一段好玩的JavaScript代码

一段返回随机记录的代码

ASP
一段返回随机记录的代码

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

一段php加密解密的代码

PHP
一段php加密解密的代码

javascript一段创建层的代码

Web开发
javascript一段创建层的代码

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

7.6 用文本+ASP打造新闻发布系统

7.6 用文本+ASP打造新闻发布系统

求N阶行列式的值

求N阶行列式的值
下拉加载更多内容 ↓