社区
Delphi
帖子详情
如何在TImage控件中动态加载一个位图文件?在线等
wukang
2003-08-22 09:50:17
我想在TImage控件中动态显示一幅图片,当某个条件为真时显示true.bmp,条件为假时显示false.bmp。可是TImage好像只能加载一幅图像,在程序中如何改变呢?
...全文
42
14
打赏
收藏
如何在TImage控件中动态加载一个位图文件?在线等
我想在TImage控件中动态显示一幅图片,当某个条件为真时显示true.bmp,条件为假时显示false.bmp。可是TImage好像只能加载一幅图像,在程序中如何改变呢?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
14 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
俗人1979
2003-08-22
打赏
举报
回复
if TRUE THEN
brgin
ImageList1.GetBitmap(0,Image1.Picture.Bitmap);
Image1.Refresh;
end
else
begin
ImageList1.GetBitmap(1,Image1.Picture.Bitmap);
Image1.Refresh;
end;
这样就行了!
mbzdh
2003-08-22
打赏
举报
回复
因该放在imagelist 里,
if TRUE THEN
ImageList1.GetBitmap(0,Image1.Picture.Bitmap)
else
ImageList1.GetBitmap(1,Image1.Picture.Bitmap);
wukang
2003-08-22
打赏
举报
回复
搞定了
是image1.Refresh
bluenightsky
2003-08-22
打赏
举报
回复
ImageList1.GetBitmap(1,Image1.Picture.Bitmap);
image1.Update;
这样试试
wukang
2003-08-22
打赏
举报
回复
两个哪多麻烦
ImageList1.GetBitmap(1,Image1.Picture.Bitmap);
这个语句可以用,但是它不能自动更新,要切换到另一个窗口再回来才能正常显示
FROM能不能自动更新?有的话如何操作?
rustle
2003-08-22
打赏
举报
回复
实在不行你就两个TImage
切换visible
rustle
2003-08-22
打赏
举报
回复
实在不行你就两个TImage
切换visible
我不懂电脑
2003-08-22
打赏
举报
回复
可以放到资源里
IORILI
2003-08-22
打赏
举报
回复
Image1.Picture.LoadFromFile('图片');
d983074
2003-08-22
打赏
举报
回复
if TRUE THEN
ImageList1.GetBitmap(0,Image1.Picture.Bitmap)
else
ImageList1.GetBitmap(1,Image1.Picture.Bitmap);
ysycrazy
2003-08-22
打赏
举报
回复
Image1.Picture.LoadFromFile('d:\xx.bmp');
d983074
2003-08-22
打赏
举报
回复
放在Imagelist里
WWWWA
2003-08-22
打赏
举报
回复
if 条件为TRUE THEN
BEGIN
image1.Picture.Assign(nil);
image1.Picture.LoadFromFile('你的文件');
END
wukang
2003-08-22
打赏
举报
回复
可用ManageStartImage.Picture.LoadFromFile('true.bmp');
但这样有个问题,就是这个文件必须发布,我能不能把这个文件放在程序中?
Image
En3.02_Full_Source_Include_Libs
保存/
加载
有效的文件格式参数和保存/
加载
可预览的对话框(如:你能设置
一个
Jpeg图像的品质并可立即预览该图像的品质是否丢失),适用于Win2000/Xp/Me操作系统。 选择语言属性对话框(English, Italian, German, ...
delphi 开发经验技巧宝典源码
0209 如何把ListBox
中
的内容拖曳到另
一个
ListBox
中
139 0210 把DBGrid
中
的数据赋给数组 139 0211 如何获取DataGrid单元格
中
的内容 140 0212 如何锁定文本框
中
的文本 141 0213 如何设置光标到文本框的末尾 ...
delphi 开发经验技巧宝典源码06
0209 如何把ListBox
中
的内容拖曳到另
一个
ListBox
中
139 0210 把DBGrid
中
的数据赋给数组 139 0211 如何获取DataGrid单元格
中
的内容 140 0212 如何锁定文本框
中
的文本 141 0213 如何设置光标到文本框的末尾 ...
Delphi 开发者,显示图片请忘掉VCL
中
的 T
Image
吧
本文详细介绍了Delphi 11 对于高分辨率显示的支持,详细介绍了使用的
控件
、方法、步骤。这样你开发的程序将不会在高分辨率下图标显示变小。无论什么分辨率,始终保持一致的UI.
Delphi
5,392
社区成员
262,740
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章