易语言枚举系统字体源码

系统结构:闪电_枚举字体,枚举字体函数,GetDC,EnumFonts,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |------ 闪电_枚举字体
           |  |
           |  |------ 枚举字体函数
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GetDC
           |  |
           |  |---[dll]------   EnumFonts

调用的DLL命令:

.DLL命令 GetDC, 整数型, "user32", "GetDC", , 获取指定窗口的设备场景　指定窗口的设备场景句柄，出错则为0
    .参数 hwnd, 整数型, , 将获取其设备场景的窗口的句柄。若为0，则要获取整个屏幕的DC;  

.DLL命令 EnumFonts, 整数型, "gdi32", "EnumFontsA", , 列举指定设备可用的字体　
    .参数 设备场景句柄, 整数型
    .参数 枚举的字体资源, 文本型
    .参数 函数地址, 子程序指针
    .参数 自定义值, 整数型