易语言鼠标提示文本例程

易语言 2020-08-22 17:53:02

易语言鼠标提示文本例程

提示:按下Ctrl+Alt+Shift+A即可关闭本程序
_启动窗口.透明标签_文本.标题 = 编辑框_文本内容.内容
字体.字体名称 = 编辑框_字体名称.内容
字体.角度 = 到整数 (编辑框_角度.内容)
字体.字体大小 = 到整数 (编辑框_字体大小.内容)
_启动窗口.透明标签_文本.字体 = 字体

_启动窗口.可视 = 真
写到文件 (取运行目录 () + “\dfbdfjhnfhdrthfghf”, 快照 (_启动窗口.取窗口句柄 (), , ))
_启动窗口.置外形图片 (取运行目录 () + “\dfbdfjhnfhdrthfghf”, #白色)
删除文件 (取运行目录 () + “\dfbdfjhnfhdrthfghf”)
_启动窗口.透明标签_文本.文本颜色 = 颜色选择器_文本颜色.颜色
_启动窗口.时钟_循环.时钟周期 = 1