TC官方合作论坛

 找回密码
 立即注册
查看: 2061|回复: 5

bmp。6绘图 画笔 写屏

[复制链接]
发表于 2024-10-18 12:51:19 来自手机 | 显示全部楼层 |阅读模式

马上加入TC

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
bmp。6绘图 画笔 写屏
var hThread, path
功能 执行()
var hdc, hPen, hOld, m_font, m_hwnd, h_图片框
m_hwnd = windowgetmyhwnd()
h_图片框 = 窗口查找子窗口(m_hwnd, "图片框", "Static")
//
  hdc = dllcall("user32.dll", "int", "GetWindowDC", "int", h_图片框)  //获取当前窗口DC用来显示截图的
hPen = dllcall("gdi32.dll", "int", "CreatePen", "int", 0, "int", 3, "int", #0000FF)  //用指定的样式、宽度和颜色,创建一个画笔,并返回一个画笔句柄
hOld = dllcall("gdi32.dll", "int", "SelectObject", "int", hdc, "int", hPen)
traceprint(hOld & "," & hPen)
画直线(hdc, 10, 200, 100, 200)
画矩形(hdc, 10, 10, 100, 100)
//
dllcall("gdi32.dll", "int", "SelectObject", "int", hdc, "int", hOld)
dllcall("user32.dll", "int", "DeleteObject", "int", hPen)
结束
//关键代码回复可见.
[hide]
功能 画直线(hdc, startx, starty, nowx, nowy)
dllcall("gdi32.dll", "int", "MoveToEx", "int", hdc, "int", startx, "int", starty, "int", 0)//画线起点
dllcall("gdi32.dll", "int", "LineTo", "int", hdc, "int", nowx, "int", nowy)//画线终点
结束
//
功能 画矩形(hdc, startx, starty, nowx, nowy)
dllcall("gdi32.dll", "int", "MoveToEx", "int", hdc, "int", startx, "int", starty, "int", 0)
dllcall("gdi32.dll", "int", "LineTo", "int", hdc, "int", startx, "int", nowy)
dllcall("gdi32.dll", "int", "MoveToEx", "int", hdc, "int", startx, "int", starty, "int", 0)
dllcall("gdi32.dll", "int", "LineTo", "int", hdc, "int", nowx, "int", starty)
dllcall("gdi32.dll", "int", "MoveToEx", "int", hdc, "int", startx, "int", nowy, "int", 0)
dllcall("gdi32.dll", "int", "LineTo", "int", hdc, "int", nowx, "int", nowy)
dllcall("gdi32.dll", "int", "MoveToEx", "int", hdc, "int", nowx, "int", starty, "int", 0)
dllcall("gdi32.dll", "int", "LineTo", "int", hdc, "int", nowx, "int", nowy)
结束
[hide]

评分

参与人数 1威望 +10 收起 理由
HUANGERWEI + 10 很给力!

查看全部评分

回复

使用道具 举报

 楼主| 发表于 2024-10-20 19:47:07 来自手机 | 显示全部楼层
二楼,更新信息专用。
tc简单开发_爱好群:
433286131 (491/500)

tc简单开发_兴趣群
143358382 (492/500)

tc简单开发_高级群
891069033(168/200)  
教程有连接安卓手机,连接安卓模拟器。
有编程四大F:
1、流程控制,2、变量和数组,
3、函数多线程,4、系统 api函数。
每章十多节。本群大神众多,新手众多,群文件内资源海量。希望新手分享出.更多的学习笔记,减少重复造轮子的时间。
共同学习,共同进步。
回复 支持 反对

使用道具 举报

发表于 2024-10-31 21:47:21 | 显示全部楼层
退款今天又5 你
回复 支持 反对

使用道具 举报

发表于 2024-11-15 01:54:21 | 显示全部楼层
我来看看
回复

使用道具 举报

发表于 2024-11-15 02:22:31 | 显示全部楼层
共同学习,共同进步。
回复 支持 反对

使用道具 举报

发表于 2024-11-15 02:23:38 | 显示全部楼层
结束
//关键代码回复可见.
[hide]    大佬,,,看不全啊、
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2025-12-15 05:22 , Processed in 0.117799 second(s), 25 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

快速回复 返回顶部 返回列表