顶部的控件,像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 procedu…
如何加载系统小图标?
我需要显示 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 imgm…
TImage 丢失加载的图片
运行 Turbo Delphi Pro。 我正在使用 TImage 来显示 png 图像。 当我重新启动Delphi并加载dpr文件时,TImage仍然存在,但图片丢失了, 需要在编译之前…
如何测试 TImage 是否分配有图形?
我的程序中的表单上有一个 TImage 组件。 在某些情况下,程序必须测试: 如果“有一个图像分配给 TImage 组件的图片属性”,那么... 我该怎么做?…