蓝色比较漂亮的清爽皮肤软件界面附EMpty内存皮肤改版

易语言 2020-07-11 15:58:22

蓝色比较漂亮的清爽皮肤软件界面附EMpty内存皮肤改版

适合那些可以做的软件可以做登陆系统或者自己加吧。
Ansi长度 = WideCharToMultiByte (0, 0, 参数_Unicode文本, -1, “”, 0, 0, 0)
返回值 = 取空白文本 (Ansi长度)
WideCharToMultiByte (0, 0, 参数_Unicode文本, -1, 返回值, Ansi长度, 0, 0)

GetObject (hBitmap, 24, Bitmap)
hMemDC = CreateCompatibleDC (0)
BitmapInfo.BITMAPINFOHEADER.biSize = 44
GetDIBits_BimapInfo (hMemDC, hBitmap, 0, 0, 0, BitmapInfo, 0)
Resource = 字节集_取空白 (BitmapInfo.BITMAPINFOHEADER.biSizeImage)
BitmapInfo.BITMAPINFOHEADER.biCompression = 0
GetDIBits (hMemDC, hBitmap, 0, Bitmap.bmHeight, Resource, BitmapInfo, 0)
bi = 字节集_取空白 (BitmapInfo.BITMAPINFOHEADER.biSize)
CopyMemory_BITMAPINFO (bi, BitmapInfo, BitmapInfo.BITMAPINFOHEADER.biSize)
BitmapFileHeader.bfType = 19778
BitmapFileHeader.bfOffBits = 14 + BitmapInfo.BITMAPINFOHEADER.biSize
BitmapFileHeader.bfSize = BitmapFileHeader.bfOffBits + BitmapInfo.BITMAPINFOHEADER.biSizeImage
连续赋值 (0, BitmapFileHeader.bfReserved1, BitmapFileHeader.bfReserved2)
bfh = 字节集_取空白 (14)
CopyMemory_BITMAPFILEHEADER (bfh, BitmapFileHeader, 14)
DeleteDC (hMemDC)