如何在Delphi中的TListView子项上绘制bmp /图标？
在Delphi中，要在TListView子项上绘制bmp/图标，您可以使用以下步骤：
- 首先，在您的Delphi项目中添加一个TImageList组件。
- 在TImageList组件中，将图像添加到图像列表中。
- 在TListView组件中，将TImageList组件分配给该组件的SmallImages属性。
- 在TListView组件的OnData事件中，使用以下代码绘制图标：
procedure TForm1.ListView1Data(Sender: TObject; Item: TListItem);
begin
Item.ImageIndex := 0; // 这里是图标在图像列表中的索引
end;- 如果您想要在子项上绘制图标，可以使用以下代码：
procedure TForm1.ListView1Data(Sender: TObject; Item: TListItem);
begin
Item.SubItems.Add(''); // 添加一个空字符串作为子项
Item.SubItems.Objects[0] := TObject(0); // 将子项的对象设置为图标在图像列表中的索引
end;- 最后，确保TListView组件的ViewStyle属性设置为vsReport，以便在子项中显示图标。
通过这些步骤，您可以在Delphi中的TListView子项上绘制bmp/图标。
相关·内容
我想使用delphi绘制一个图标/bmp到TListView的子项中。但我不知道如何做到这一点。对于列表中的第一项，它工作得很好，但子项有问题。
浏览 1提问于2009-04-02得票数 1
回答已采纳
如果你使用带有TListView的ownerdraw，那么默认情况下所有子项都是粗体样式，即使列表视图font.style被设置为[]，所有遵循自定义绘制的subitems也是如此。我发现的一个解决方法是强制在CustomDrawSubItem事件中设置样式：ListView2.Canvas.Font.Style:= [];
(使用[]进行的简单调用不会起作用，除非
浏览 2提问于2012-11-21得票数 4
回答已采纳
在Delphi11Alexandria的Windows 10中的32位VCL应用程序中，我需要在调整列大小的同时重新绘制整个TListView列。ListView项和子项是用ListView.OwnerDraw显示的。因此，我将ListView子类化，以便在列调整大小时得到通知： private
浏览 7提问于2022-01-26得票数 0
回答已采纳
我有一个TListView的后代，它提供了一些额外的特性，例如排序和从TDataset加载自身的能力。我现在希望进一步扩展此组件，以便在将项添加到列表视图时可以指定绘图的某些方面。如果我还指定了样式LVS_OWNERDRAWFIXED (在overriden CreateParams()中)，则调用函数并按我的意愿工作，只绘制项，而不是子项。有人知道我如何告诉列表视图来绘制子项吗？我已经找到了一个增
浏览 0提问于2009-11-02得票数 2
回答已采纳
1回答
我有一个Delphi应用程序运行良好，直到显示分辨率的改变自动导致程序的GUI窗口被重新绘制。我们可以通过WM_DISPLAYCHANGE消息捕获这个显示事件。在重绘事件上，一些隐藏在该时刻的TListView组件似乎不会被重新绘制，直到它们再次可见。
看起来，重绘只在表单的可见组件上调用，而OS只在不可见项再次可见时重新绘制它们。但是，当代码引用TListView中的</
浏览 6提问于2022-07-28得票数 1
回答已采纳
我有一个在TListView控件上使用LV_VIEW_TILE的代码： Windows, Messages, SysUtils, Variants, Classes, Graphics,2007编译和构建代码，并在Windows XP中运行应用程序，它显示：用Delphi XE2编译相同的代码，并在Windows XP中运行，它显示：在Delphi XE2中编译时，子项不显示。两
浏览 0提问于2012-02-10得票数 2
回答已采纳
2回答
我使用Delphi6并希望添加排序ListView的功能，就像在Windows中所做的那样。在第一个测试中，我从几个源代码中复制了一些源代码，并做了一些小的调整：uses Descending: Boolean根据，我的函数ShowArrowOfListViewColumn()应该解决了这个问题。
是否可能Delphi 6不支持此特性，或者我的</e
浏览 6提问于2015-09-28得票数 6
回答已采纳
1回答
是否有可能修复subitem图像在TListView中的绘制，这样它们就不会像图像中所示的那样在左手边被切断？
浏览 3提问于2018-08-31得票数 2
回答已采纳
我使用的是Delphi6(实际上是BCB6，但没有人使用它，所以Delphi的建议很好)。一些控件允许您创建它们可以包含的项的自定义类，如TListView。我有自己创建的自定义TRadioButton派生控件，这些控件具有自定义外观，并且我希望所有单选按钮都与之匹配。我没有看到任何在extctrls.pas中查看源代码的可能性，也没有在网上找到任何东西，但我想我
浏览 0提问于2012-03-08得票数 2
回答已采纳
我在TTreeView对象中显示项。当一项有子项时，该控件在图标旁边绘制一个> (如果展开，则绘制一个向下的箭头)。使用c++ Builder2009VCL，但是这个Q对于Delphi也是有效<e
浏览 1提问于2018-11-08得票数 2
回答已采纳
因此，为了生成位图，我正在将32位透明图标从我的磁盘(带有alpha)加载到ImageList中好的位图与α通道，它将加载OK与ImageList_LoadImage
带有alpha通道的坏位图(请注意带有黑色的反别名)：
浏览 4提问于2014-10-21得票数 7
回答已采纳
我想实现传统的打开和保存对话框(底层处理的是文件)，但我想控制显示什么来代替文件名，并包含一些图形-即我需要一个"ownerdraw“风格的对话框。除此之外，我希望对话框在外观和感觉上尽可能像传统的打开/保存对话框。
我想我自己也要实现这一点，我只是想知道从哪里开始最好。
浏览 5提问于2012-08-21得票数 1
1回答
我有一个列表视图，我想实现在这个图像中看到的效果：除了输入密码外，列表视图隐藏了一些项目，如下图所示。我知道项和子项图像通常是对齐的。如何将项目和子项目图像设置为覆盖列表视图的整个文本，如所示？我掌握了如何在这张图片中绘制模式的技巧，但是如何在listitem上绘制这个图案呢？
浏览 7提问于2012-11-28得票数 0
回答已采纳
在Delphi 7中，包含了一个图像编辑器程序，它可以读取和写入.dcr文件，这些文件只是具有不同扩展名的二进制资源文件(.res文件)，按照惯例，该文件包含具有命名位图资源的已编译资源，该资源具有与组件名称相对应的名称这些位图是“图标”用来在delphi组件调色板上放置图标的地方，也是在您的表单或数据模块上放置一个非可视组件的地方。快进到Delphi，我正在尝试
浏览 16提问于2011-08-09得票数 22
回答已采纳
请记住，我已经阅读了所有我能找到的关于向我的自定义组件添加组件图标的说明。当我们讨论24x24像素的图标大小时，我可以做到这一点。当组件被拖放到窗体上时，我会看到图标。但是，在浏览工具面板时，我看不到应该显示的16x16小图标。我已经，我应该命名我的另外两个BMP文件，它们包含在DCR文件中，如下所示：
用于16x16bmp文件的MyCompon
浏览 0提问于2012-04-08得票数 6
回答已采纳
我正在开发一个组件包，并希望在Delphi的splash上显示一个图标和一些有关它的许可信息，例如好的组件包do (TMS、CnPack等)。事实上，我可以通过OTA来完成这个任务，但奇怪的是，只有在第一次编译和安装之后，这些东西才会出现在屏幕上。关闭Delphi并重新打开之后，什么都不会显示。var
<e
浏览 0提问于2012-02-05得票数 3
回答已采纳
bmp := TBitmap.Create; bmp.Canvas.Pen.Color := clLime;有没有一种简单的方法可以删除旧的
浏览 0提问于2013-04-05得票数 2
1回答
只绘制特定形式的位图肯定不难，但是我不能理解为什么代码不能工作(我在一些delphi示例中看到过)：{ bmp->Width = 300;
浏览 0提问于2013-03-07得票数 2
我正在使用德尔菲XE3，并希望实现风格，以显示通过TListView控件的图像列表。
图像显示为缩略图样式，每个图像下面都有一个标题。当我单击图像时，图像连同标题将显示为选定的. end;
我找不到一种方法来
浏览 3提问于2018-10-28得票数 1
在delphi中有一个包含多个字段的列表视图。线程检查项目并将其添加到listview。如果存在相同的标题，则会在该标题的子项中添加一个整数。当条目数小于2000时，性能正常。当项目数量可能达到50,000或100,000时，有什么方法可以在listview中快速读写吗？编辑：
我们已经阅读了您的所有答案，并感谢所有人的帮助。
浏览 1提问于2010-11-20得票数 8
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
