易语言判断系统默认字体源码

系统结构:是否为小字体,取得物理字体信息_,SetMapMode,取屏幕句柄_,取窗口全部设备场景_,释放设备场景_,

======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |
======程序集1
           |  |
           |  |------ 是否为小字体
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   取得物理字体信息_
           |  |
           |  |---[dll]------   SetMapMode
           |  |
           |  |---[dll]------   取屏幕句柄_
           |  |
           |  |---[dll]------   取窗口全部设备场景_
           |  |
           |  |---[dll]------   释放设备场景_

调用的DLL命令:

.DLL命令 取得物理字体信息_, 整数型, "gdi32", "GetTextMetricsA"
    .参数 设备场景, 整数型
    .参数 属性信息, 物理字体属性信息_

.DLL命令 SetMapMode, 整数型, "gdi32", "SetMapMode", , 设置指定设备场景的映射模式  执行成功为设备场景原来的映射模式，失败为0
    .参数 hdc, 整数型, , 设备场景句柄
    .参数 nMapMode, 整数型, , 下列常数之一：;MM_ANISOTROPIC：视口和窗口范围可完全任意;MM_HIENGLISH：逻辑单元为0.001 inch，起点在左下角;MM_HIMETRIC：逻辑单元为0.01 millimeter，起点在左下角;MM_ISOTROPIC：视口和窗口范围任意，只是x和y逻辑单元尺寸要相同;MM_LOENGLISH：逻辑单元为0.01 inch，起点在左下角;MM_HIMETRIC：逻辑单元为0.1 millimeter，起点在左下角;MM_TEXT：逻辑单元为一个像素;MM_TWIPS：逻辑单元为1 twip (1/1440 inch)，起点在左下角;

.DLL命令 取屏幕句柄_, 整数型, "user32", "GetDesktopWindow"

.DLL命令 取窗口全部设备场景_, 整数型, "user32.dll", "GetWindowDC"
    .参数 窗口句柄, 整数型

.DLL命令 释放设备场景_, 整数型, "user32", "ReleaseDC", , ReleaseDC
    .参数 窗口句柄, 整数型, , hwnd，要释放的设备场景相关的窗口句柄
    .参数 设备场景, 整数型, , hdc，要释放的设备场景句柄