引言： 在使用Delphi开发应用程序时常常要使用到TListView列表视控件，但是仅仅使用TListView的原有属性、方法和事件是不够的，常常需要在程序开发过程中对列表视的功能进行扩展，比如对列表视添加任意列组合排序、ListItem拖动、CustomDraw自绘制、加入背景图等功能，由此可见De...
摘要： 如今realplayer的流式媒体文件以其强大的视频压缩比正逐步悄然兴起。realplayer plus播放器也理所当然地成为大家播放realplayer格式文件的首选软件。不过realplayer plus也不是十全十美的，比如启动时间慢，占用空间大，留有历史记录等等。其实我们可以利用delphi打造一个完全符合自己要求的realplayer播放器。下面我将向大家介绍如何利用delphi来帮......
摘要： 优秀的数据库应用应当充分考虑数据库访问的速度问题。通常可以通过优化数据库、优化 查询语句、分页查询等途径收到明显的效果。即使是这样，也不可避免地会在查询时闪现一个带有 sql符号的沙漏，即鼠标变成了查询等待。最可怜的是用户，他（她）在此时只能无奈地等待。遇到急性子的，干脆在此时尝试 windows中的其它应用程序，结果致使你的数据库应用显示一大片白色的窗口。真是无奈！
本文将以简单的例子告诉......
Delphi中实现让TListView接收文件拖放在使用delphi开发应用程序时常常要使用到tlistview列表视控件,但是仅仅使用tlistview的原有属性.方法与事件是不够的,常常需要在程序开发过程中对列表视的功能进行扩展,比如对列表视添加任意列组合排序.listitem拖动.customdraw自绘制.加入背景图等功能,由此可见delphi自带的tlistview列表视控件功能有限,并不让人感到满意.为了让列表视具有更多的功能,我们只有求助于第三方控件,或者自己编写代码对tlistview进行改造.
最近我在用delphi开发一个应用软件的过程中,需要实现让tlistview列表视可接收资源管理器或文件管理器文件拖放,并将接收到的文件名与路径显示在tlistview列表视中的功能,一下子找不到可以实现此功能的第三方控件,于是便摸索着自己写代码实现了该功能.现将该功能的实现方法整理出来,方便大家以后在工作当中需要使用到类似的功能时做为参考. 【程序编程相关:
ADO Command 命令的执行
】 【推荐阅读:
TChart使用经验小结
】
一.编程思路 【扩展信息:
ADO 方式下判断数据表是否存在
】
windows应用程序下实现接收文件的方式是这样的:首先应用程序需要使用void dragacceptfiles(hwnd hwnd, bool faccept)函数声明该应用程序中的窗口或控件的句柄可以接受资源管理器或文件管理器发送的wm_dropfiles消息,窗口或控件的句柄由dragacceptfiles()参数的hwnd指定,并相应的在应用程序中增加对wm_dropfiles消息进行处理的代码;当应用程序(准确的说是调用dragacceptfiles()函数时在参数hwnd中指定的句柄所对应的窗口或控件）接收到wm_dropfiles消息时,应用程序调用dragqueryfile.dragfinish, dragquerypoint这三个函数对接收到的消息进行处理,关于这几个函数的详细使用方法与说明请参阅delphi自带win32.hlp或microsoft visual studio开发包中的msdn.在delphi中使用tapplication的onmessage事件来处理wm_dropfiles消息.
二.实现步骤
启动delphi,新建一个工程project1,从win32控件面板中拖放一个tlistview列表视控件到窗口form1中,将viewstyle属性设置为vsreport,接着在listview1中添加两个列,分别为filename与path.好了,列表视设置完成,现在开始在unit1.pas进行编码（不要忘了加入shellapi单元）,具体如下:
unit unit1;
interface
uses ...
下一页 摘要：我们为了将hint显示在statusbar1上需要如下方法
public
procedure displayhint(sender: tobject);
end;
var
form1: tform1;
implementation
{$r *.dfm}
{ here is the implementation of the onhint event handler }
{......
