RF Software - 破M言论制造器
93°2009/07/14软件综合 IP:广东
这个。。。exe就不放了

最早.png

zz2.png

在这个程序中,我使用了GDI+,imports system.drawing类

通过循环扫描出时间应该打在哪里(用户名后N个像素)

使用了GDI+中drawstring函数


首先引用GDI+
Imports System.Drawing.Drawing2D

创建graphics对象
Dim g as Graphics=XXXXXXXXXXXXXXeateGraphics

创建用于绘制文字的Brush对象

Dim mBrush As New SolidBrush(Color.Blue)

建一个宋体,9码的字体对象:

Dim mFont As New Font("宋体", 9)

最后drawstring
g.DrawString("我日飞你", mFont, mBrush, 0, 10)

下面是扫描

dim i,j as long
dim a as bitmap
a=XXXXXXXXXXXXXXage

for i = 1 to 200
for j = 1 to 50
dim tmp as long
tmp=XXXXtpixel(i,j).toargb+16777215
if tmp < 16777213 then
return i
endif
next
next

由于GDI+操作以后bitmap没有被更新,第二次制造的时候会造成叠加

所以我创建了新建按钮
其实就是
picturebox1.load(文件名)

这样就可以制造一幅新的图片

但是
如果用户名与时间没有对准,就会很囧

所以,我们使用Alignment和LineAlignmen 属性,其中Alignmen 属性指定每行文本在矩形中水平位置,LineAlignment属性指定文本块在矩形中垂直位置

创建字符格式化对象

Dim mStringFormat As New StringFormat

XXXXXXXXXXXXXXXXignment = StringAlignment.Center

XXXXXXXXXXXXXXXXneAlignment = StringAlignment.Center

绘制文本可以这样
g.DrawString(mText, mFont, mBrush, RectangleF.op_Implicit(Rect), mStringFormat)

于是文本就被对齐了
来自:计算机科学 / 软件综合
9
已屏蔽 原因:{{ notice.reason }}已屏蔽
{{notice.noticeContent}}
~~空空如也
AsyncMaster
14年11个月前 IP:未同步
125173
坚决日飞!
引用
评论
加载评论中,请稍候...
200字以内,仅用于支线交流,主线讨论请采用回复功能。
折叠评论
azlmxnv
14年11个月前 IP:未同步
125176
赞扬一下
引用
评论
加载评论中,请稍候...
200字以内,仅用于支线交流,主线讨论请采用回复功能。
折叠评论
acmilan
14年11个月前 IP:未同步
125183
赞扬。。。
引用
评论
加载评论中,请稍候...
200字以内,仅用于支线交流,主线讨论请采用回复功能。
折叠评论
w6651539
14年11个月前 IP:未同步
125195
这个。。有何用处。。。
引用
评论
加载评论中,请稍候...
200字以内,仅用于支线交流,主线讨论请采用回复功能。
折叠评论
novakon
14年11个月前 IP:未同步
125197
不得不管一下了。论坛的新会员看到这个会在大脑内留下对论坛的负面印象。
引用
评论
加载评论中,请稍候...
200字以内,仅用于支线交流,主线讨论请采用回复功能。
折叠评论
93°作者
14年11个月前 IP:未同步
125206
LS对灌水的理解非常奇特
+400
科创币
novakon
2009-07-14
aibara iduas
引用
评论
加载评论中,请稍候...
200字以内,仅用于支线交流,主线讨论请采用回复功能。
折叠评论
novakon
14年11个月前 IP:未同步
125210
这样就对了
虽然修改了帖子才变成这样……学术价值就是这样来的
引用
评论
加载评论中,请稍候...
200字以内,仅用于支线交流,主线讨论请采用回复功能。
折叠评论
phpskycn
14年11个月前 IP:未同步
125274
请问一下,在93改过自新前这个贴水到什么程度了
还有这个程序什么的干活?
引用
评论
加载评论中,请稍候...
200字以内,仅用于支线交流,主线讨论请采用回复功能。
折叠评论
93°作者
14年11个月前 IP:未同步
125277
只有两张图片


专供截图党
引用
评论
加载评论中,请稍候...
200字以内,仅用于支线交流,主线讨论请采用回复功能。
折叠评论

想参与大家的讨论?现在就 登录 或者 注册

所属专业
上级专业
同级专业
93°
学者 笔友
文章
651
回复
6032
学术分
30
2007/04/10注册,6年3个月前活动
暂无简介
主体类型:个人
所属领域:无
认证方式:邮箱
IP归属地:未同步
文件下载
加载中...
{{errorInfo}}
{{downloadWarning}}
你在 {{downloadTime}} 下载过当前文件。
文件名称:{{resource.defaultFile.name}}
下载次数:{{resource.hits}}
上传用户:{{uploader.username}}
所需积分:{{costScores}},{{holdScores}}下载当前附件免费{{description}}
积分不足,去充值
文件已丢失

当前账号的附件下载数量限制如下:
时段 个数
{{f.startingTime}}点 - {{f.endTime}}点 {{f.fileCount}}
视频暂不能访问,请登录试试
仅供内部学术交流或培训使用,请先保存到本地。本内容不代表科创观点,未经原作者同意,请勿转载。
音频暂不能访问,请登录试试
支持的图片格式:jpg, jpeg, png
插入公式
评论控制
加载中...
文号:{{pid}}
投诉或举报
加载中...
{{tip}}
请选择违规类型:
{{reason.type}}

空空如也

加载中...
详情
详情
推送到专栏从专栏移除
设为匿名取消匿名
查看作者
回复
只看作者
加入收藏取消收藏
收藏
取消收藏
折叠回复
置顶取消置顶
评学术分
鼓励
设为精选取消精选
管理提醒
编辑
通过审核
评论控制
退修或删除
历史版本
违规记录
投诉或举报
加入黑名单移除黑名单
查看IP
{{format('YYYY/MM/DD HH:mm:ss', toc)}}