• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    迪恩网络公众号

delphi image控件如何根据图片的大小自动缩放并显示 - 癫狂编程 ...

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

delphi image控件如何根据图片的大小自动缩放并显示

在 delphi 语言中,让 image 控件根据图片bai的大小自动缩放并显示du的步骤如下:

1、从zhi Tool Palette 面板上找到 TImage 控件,并拖放到窗dao口:

 

 

2、选中 Image 控件,调整到合适大小,并设置其属性:

Anchors 属性:

设置让 image 控件的大小随窗体改变而变化,并保持与左、右、上、下的边距不变。

 

 

 Stretch 设置为 True:

 

 

此项属性是关键设置,当此项设置为 True 时,Image 的图像就可以自动随大小的改变而拉伸或压缩显示:

帮助手册中关于 Image 控件的 Stretch 属性描述如下:

 

 

3、完成上述设置之后,就可以编写相关代码了。


以下是编写的一个示例代码,使用了 TImage、TOpenPictureDialog、TButton 控件,供参考:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if OpenPictureDialog1.Execute then
  begin
    Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
  end;
end;

代码运行截图:


点击 打开图片 按钮载入图片:

 

 拉宽窗体,图片随之变宽:

 


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
Delphi 动态数组、静态数组、TBytes 的区别发布时间:2022-07-18
下一篇:
delphi对TThread扩充TSimpleThread发布时间:2022-07-18
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap