timage相关内容

在 Delphi 中很好地缩放图像?

我使用的是 Delphi 2009,我想缩放图像以适应可用空间.图像始终显示为小于原始图像.问题是 TImage Stretch 属性做得不好,而且损害了图片的可读性. (来源:xrw.bc.ca) 我希望看到它像这样缩放: (来源:xrw.bc.ca) 任何建议如何最好地做到这一点?试过JVCL,但好像没有这个能力.一个免费的图书馆会很好,但也许有一个低成本的图书馆“只" ..
发布时间:2021-12-13 23:18:34 其他开发

为什么TImage旋转我的图像?

编写移动应用程序-它正在从安全的网站中提取图像,如下所示(第一个图像)未正确提取(注意Web版本与移动版本),第二个图像在网站上正确显示,但是Delphi TImage正在旋转它由于某种原因,我不知道为什么.将Rotate设置为0,并在TImage组件上设置"Fit". 有想法吗? 解决方案 Jpeg和Tiff具有 Exif (可交换的图像文件格式)元数据,用于指定图像方向(以及其他 ..
发布时间:2021-04-30 18:41:25 其他开发

如何在Delphi 2009中获取图像的当前视图大小

我希望获得使用TImage显示的图像的当前大小,该对象的Proportional属性设置为True,并与具有主窗体的Client对齐。因此,在调整表单大小时,我想获取该图像的当前大小,而不是画布大小,也不获取该图像的实际大小。获取当前尺寸我可以显示当前图像尺寸相对于实际图像尺寸的百分比。 预先感谢 解决方案 您可以将Image1.Picture.Width或.Height与Image1. ..
发布时间:2020-10-20 06:16:28 其他开发

像TPanel这样的控件可以放在顶部吗?

我的程序正在执行一项耗时的任务,我想在应用程序窗口的中间显示一个TImage,但它不会停留在顶部-我的VST始终位于顶部。但是,当我使用TPanel时,它停留在顶部吗?我该如何使TImage做到这一点? 实际上,适用于所有控件的解决方案非常出色:) 谢谢! 解决方案 您需要一个带窗口的控件(即带有窗口句柄或“适当”控件)来显示您的消息,因为在窗口控件上方无法看到非窗口控件。最简 ..
发布时间:2020-10-20 05:12:32 其他开发

使用delphi缩放图像

我正在与delphi合作。我有TImage,我为其分配了位图。 imgmain.Picture.Bitmap:= bmpMain; imgmain.Picture.Bitmap.PixelFormat:= pf24bit; imgmain是TImage的对象,bmpMain是TBitmap的对象 我要缩放图像。我的表单上有一个跟踪栏,当我单击跟踪栏时,图像 ..
发布时间:2020-10-20 02:49:47 其他开发

如何加载小系统图标?

我需要显示16x16像素的图标以显示错误/警告/信息。不幸的是 LoadIcon(0,IDI _ *)和 LoadImage(0,OIC_ *,IMAGE_ICON,16,16,LR_SHARED)总是给我图标的32x32版本。 我读到有关 ShGetStockIconInfo 的信息,但这只能从Vista中获得。从那时起,我仍然需要支持XP。 有什么想法吗? 我正在使用带有以下 ..
发布时间:2020-10-20 02:23:33 其他开发

使用CopyRect从大图像复制到较小的画布时颜色错误

我正在编写根据170 x 200px图片缩小源图像(JPG文件)的功能。将原始JPG图像加载到TImage(Image1,固定大小为400 x 400px,拉伸以适应宽高比),然后用户将制作一个选择矩形以设置要复制的区域,然后将图像复制使用CopyRect()到目标TImage(Image2)。 void __fastcall TSizePhotoForm :: Button3Click( ..
发布时间:2020-09-28 03:28:19 其他开发

如何从ImageList加载透明图像?

我想从TImageList到TImage加载图片(32位深度,透明).标准方法是ImageList.GetBitmap(Index, Image.Picture.Bitmap);.但是GetBitmap方法不适用于透明度,因此我总是得到一个不透明的位图. 解决方案 解决方法非常简单-ImageList提供了另一种方法GetIcon,该方法可以透明地工作.加载透明图像的代码为: Ima ..
发布时间:2020-05-28 20:43:02 其他开发

可以直接检索TPicture的文件名吗?

我有一个Delphi应用程序,使用TImage显示图像。 图像的位置存储在数据库中,并在加载时检索并直接使用代码类似如下: Image1.Picture.LoadFromFile(Query1.FieldByName('image')。AsString); 我想要能够显示和编辑在上面加载的文件名,我是对的没有办法直接从TImage组件访问,我需要分开存储文件。 ..
发布时间:2017-04-24 02:11:31 Delphi

单击控件时如何获取鼠标的坐标?

在TImage的OnClick事件中,我想提取鼠标的x,y坐标。我喜欢他们相对于图像,但是关于窗体或窗口也是一样的。 解决方案 鼠标。 CursorPos包含TPoint,它又包含X和Y位置。该值位于全局坐标系中,因此您可以使用ScreenToClient例程将窗体坐标转换为窗口坐标。 根据Delphi帮助文件,Windows.GetCursorPos可能会失败,如果Mouse.Cu ..
发布时间:2017-04-23 21:45:34 Delphi

JPEG数据流到TImage

我有一些图像文件存储在一个文件(某种存档)中。该文件如下所示: 嗯,它分为两个段 - 标题和数据段。标题(绿色)包含各种信息,如专辑名称,位置,日期/时间,描述,相册中的照片数量等。数据段(蓝色和橙色)结构简单,包含 x JPEG照片。我可以将“imagesata”片段提取为新的TMemoryStream对象,现在我想使用TImage显示它。 我可以使用 SaveAsFile TMem ..
发布时间:2017-04-23 21:36:36 Delphi

加载图像到的TImage,通过阵列

我很新德尔福,做一个项目对我的水平。当我运行我的code图像只是不显示,我看着无处不在,我的老师也帮不了我。谁能告诉我,我缺少的是什么? 常量 动物:数组[0..6]字符串=('熊','狗','猫','鸡','马','牛','猴子'); ImagePaths:数组[0..6]字符串 =('img0.JPG','img1.JPG','img2.JPG','img3 ..
发布时间:2016-06-01 22:21:12 其他开发

在Delphi XE 3种形式的gif动画

可能重复:结果 如何使用Gif动​​画德尔福形式 我最近更新我的版本的 Delphi 7中为德尔福XE3 用Delphi 7,我用一个组件把一个GIF上的TImage,德尔福XE3已经与GIF的兼容性,无需安装任何额外的第三方组件。 我的问题是:当我附上的GIF TImate,就变成静态的,只显示第一帧。 是对此有任何命令?像Image1.Play什么? 解决方案 要获得动画 ..
发布时间:2016-05-15 21:33:37 跨浏览器开发