摘要:
本实例介绍如何在程序中创建文件夹,并且可以将新创建的文件夹删除到回收站中。 向窗体上添加两个TButton组件,一个用于创建新的文件夹,另一个用于删除新创建的文件夹,设计完成的窗体如图1所示。 图1 主界面 首先在程序的uses段中添加对ShellApi的引用,另外还要在“创建”按钮的响应过程中添加下列代码: procedure TForm1.btnCreateClick(Sender: TOb... 阅读全文
摘要:
Delphi里有个函数SelectDiretory,重载了两种形式: function SelectDirectory( const Caption: string; const Root: WideString; out Directory: string): Boolean; overload; function SelectDirectory( var Directo... 阅读全文
摘要:
//判断文件是否存在 FileExists //判断文件夹是否存在 DirectoryExists //删除文件 DeleteFile; Windows.DeleteFile //删除文件夹 RemoveDir; RemoveDirectory //获取当前文件夹 GetCurrentDir //设置当前文件夹 SetCurrentDir; ChDir; SetCurrentDirectory... 阅读全文
摘要:
有三个API函数可以运行可执行文件WinExec、ShellExecute和CreateProcess。 1.CreateProcess因为使用复杂,比较少用。 2.WinExec主要运行EXE文件。如:WinExec(’Notepad.exe Readme.txt’, SW_SHOW); 3.ShellExecute不仅可以运行EXE文件,也可以运行已经关联的文件。 首先必须引用shel... 阅读全文