Delphi XE2试用版中如何缩放TImage控件中加载的图像？
我开发了一个小实用程序来在 Delphi XE2 中的 TImage 控件中加载不同类型的图像文件。现在我想仅使用内置控件（即不使用任何第三方组件）来实现和测试…
Delphi dll图像拉伸错误
我正在尝试使用下面提到的 dll 函数调整位图图像的大小（缩放）， { to resize the image } function ResizeImg(maxWidth,maxHeight: integer;thumbna…
顶部的控件，像TPanel可以做吗？
我的程序正在执行一项耗时的任务，我想在应用程序窗口的中间显示一个 TImage，但它不会停留在顶部 - 我的 VST 始终位于顶部。但是，当我使用 TPanel …
为什么这个用于淡化 PNG 图像的 D2006 代码不起作用？
这个问题源于之前的一个问题。大部分代码来自建议的答案，这些答案可能适用于更高版本的 Delphi。在 D2006 中，我没有获得完整的不透明度范围，并且图…
delphi 7 TImage 和 TImageList
让我成为整数私有 代码 procedure TForm1.Image1Click(Sender: TObject); begin inc(i); ImageList1.GetIcon(i mod 4,Image1.Picture.Icon); end; pro…
如何加载系统小图标？
我需要显示 16x16 像素的错误/警告/信息图标。不幸的是，LoadIcon(0, IDI_*) 和 LoadImage(0, OIC_*, IMAGE_ICON, 16, 16, LR_SHARED) 总是给我 32x32…
Delphi 6：字母混合在子图像和主画布之间起作用，但在子图像之间不起作用
我有一个 Delphi 6 应用程序，其中有一个 TBitmap 数组，每个 TBitmap 都包含一个图像（子图像），该图像是通过使用 clWhite 调用 FillRect() 创建的…
Delphi 6：如何通过 TextOut() 方法显示大尺寸高质量文本？
我有一个 TImage 组件，我使用 TCanvas.TextOut() 打印文本字符串。我将 TImage 的高度和宽度设置为较大的尺寸，如 50 像素 X (TextWidth) 像素，并将…
Delphi 6：如何使用具有 Alpha 通道的 TextOut 创建位图？
我将描述我的总体目标，以防我提出的问题不是获得我正在寻找的答案的最佳形式。我有一个围绕 X 轴旋转的单词球体或“单词球”。当单词旋转到后面时（Z…
如何在 TcustomContol 中使用 Picture.LoadFromFile()
我创建了一个从 TcustomControl 派生的 TSkinPanel， 它有一个 FGraphic：TPicture。 FGraphic 绘制在 TSkinPanel 的画布上，如果从 TObject Inspecto…
Delphi 7 笔记本电脑上的 Timage 透明胶片
我正在尝试做什么 我正在尝试将多个图形绘制到 Timage，我绘制的这些图形由带有 Foodfills 和线条的有序图层组成。 我使用多个缓冲区来确保排序和双缓…
使用 ImageMap 提取图像 (PNG) 并在 TImage 上显示
我试图实现以下目标： 假设一个大 png（透明背景 16000 x 70px），其中包含 50 个不同的其他 png 文件... 我需要加载该png并从中提取单个png（最好是…
TImage 和 TScrollBox 的问题
我正在与德尔福合作。 我有一个滚动框，在其中放置 TImage 控件。现在我想缩放渲染到 TImage 控件中的图像。所以，我使用TCanvas的stretchDraw方法。…
使用delphi缩放图像
我正在与德尔福合作。我有 TImage，我为其分配了一个位图。 imgmain.Picture.Bitmap := bmpMain; imgmain.Picture.Bitmap.PixelFormat := pf24bit; im…
