delphi – 打开文件的上下文对话框,默认操作等

在 Windows中,当一个人在Windows资源管理器中并右键单击文件或目录时,会出现一个Windows上下文菜单,其中包含可以对此文件或目录执行的所有操作.

回想当天,Brad Stowers编写了一个单元ItemProp.pas,它在一个人自己的Delphi应用程序中做了完全相同的事情.这个单元通过Delphi 5工作得很好,但对于D7及以上版本,会抛出很多错误.

http://www.koders.com/delphi/fid7ABE724EBD5F2123FF824AFD45151D2A087C5E6C.aspx?s=network

好的！我承认！我很懒,已经谷歌搜索了一个更新的单位,甚至像这样的一个,已经工作了几个小时试图使这个单位至少D7兼容但我想我错过了某些地方,因为我没有成功的任何努力这个.

所以…我的问题是,是否有人为D7及更高版本更新了此单元或者是否存在执行此代码的单元或组件？

提前致谢！

约翰

{$DEFINE DFS_DELPHI}
{$DEFINE DFS_COMPILER_4_UP}
{$DEFINE DFS_NO_COM_CLEANUP}
{$DEFINE DFS_COMPILER_3_UP}