社区
Delphi
帖子详情
(急需(分数多多呢!))如何让Delphi在Image(有Bitmap)上写字(背景应为透明,例如TextOut的白色背景是不行的)??????
yxf
2000-03-20 09:22:00
...全文
492
9
打赏
收藏
(急需(分数多多呢!))如何让Delphi在Image(有Bitmap)上写字(背景应为透明,例如TextOut的白色背景是不行的)??????
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
9 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
hirong
2000-03-21
打赏
举报
回复
记得在VC++中只要将DC设置成透明的就可以了
pDC->SetBkMode(TRANSPARENT);
DELPHI我没试过.
ahao
2000-03-21
打赏
举报
回复
不对,我搞错了,如果有Bitmap的话还是把Transparent去掉吧,不然会闪烁的,前面几位已经说对了.
ahao
2000-03-21
打赏
举报
回复
哈哈,我的一定行:
用BCB是:
Image1->Transparent=true;
Image1->Canvas->Brush->Style = bsClear;
Image1->Canvas->Font->Size=9;
Image1->Canvas->Font->Name="宋体";
Image1->Canvas->TextOut(10, 10, "透明汉字");
改成Delphi可能是:
Image1.Transparent=true;
Image1.Canvas.Brush.Style = bsClear;
Image1.Canvas.Font.Size=9;
Image1.Canvas.Font.Name='宋体';
Image1.Canvas.TextOut(10, 10, '透明汉字');
OK?
sunsetyang
2000-03-21
打赏
举报
回复
已经写在image1中的东西会丢失?不会吧!!
dengdeng
2000-03-21
打赏
举报
回复
ahao 的回答是对的。
不过最好把代码写在Image1所在Form的OnPaint事件中,避免刷新后丢失。
5201314
2000-03-20
打赏
举报
回复
在quickreport上试试!我也在研究这个问题!欢迎交流!
Mars
2000-03-20
打赏
举报
回复
with image1 do
begin
canvas.brush.style:=bsclear;
canvas.textout(widht div 2,height div 2,'hello');
end;
//ok!!!
huzi
2000-03-20
打赏
举报
回复
用Label也可以呀。Label有透明属性
Lin
2000-03-20
打赏
举报
回复
没有问题啊, 只需设置CanvasBrush.Style为bsClear就OK, 如:
...
Image1.Canvas.Brush.Style := bsClear;
Image1.Canvas.TextOut(10, 10, '透明汉字');
...
创建
Bitmap
时设置
背景
为
透明
做一张
透明
图片(R.drawable.transtion) 将
透明
图片decode为
Bitmap
在此
Bitmap
上做你想做的事 注意
透明
图片的宽高应大于你最终想要图片的宽高
Bitmap
bitmap
=
Bitmap
.create
Bitmap
(
Bitmap
Factory.decodeResource(con
text
.getResources(), R.drawable.transt
delphi
从
image
list中获取
透明
背景
图片的方法
Bitmap
:= T
Bitmap
.Create();
Bitmap
.TransparentMode := tmFixed; //必须在get
Bitmap
前设置
Bitmap
.Transparent := True;if (
Image
List.Get
Bitmap
(SubMenu.Tag,
Bitmap
)) thenbegin
Bitmap
.Trans
bitmap
实现
背景
透明
public class
Bitmap
Region { //创建支持位图区域的控件(目前有button,form,
image
button) public static void CreateControlRegion(Control control,
Bitmap
bitmap
) { //判断控件是否存在
Android
Bitmap
透明
背景
直接上源码: private
Bitmap
bitmap
; private Canvas canvas;
bitmap
=
Bitmap
.create
Bitmap
(dmWidth, dmHeight,
Bitmap
.Config.ARGB_8888);
bitmap
.setHasAlpha(true); canvas = new Canvas(leadsBit
Android
Bitmap
加载
透明
背景
图片
如上图所示,箭头是一个独立的
Bitmap
,在仪表盘这个
Bitmap
上转动。 箭头图片是用PS抠出来的,
背景
设成
白色
。 在Canvas上加载箭头
Bitmap
时,刚开始箭头文件保存的是bmp文件,怎么都是以下这个效果: 箭头的
透明
部分变成了
白色
。 后来知道,原来BMP格式文件就不支持
透明
图片。 所以我把图片用PS另存为PNG格式,这样就把
白色
部分变成
透明
了。 And
Delphi
5,386
社区成员
262,729
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章