delphi文件夹监控
⑴ delphi 里怎么监控网络文件夹的文件变化
如果是文件共享的方式,建议你在服务器上操作 !
⑵ delphi判断文件夹是否存在
var
AFilePath : string;
begin
AFilePath := ExtractFilePath(ParamStr(0)); //取当前程序运行目录
AFilePath := AFilePath + 'c'; //加上C文件夹
if DirectoryExists(AFilePath) then
ShowMessage('目录存在')
else ShowMessage('目录不存在');
end;
⑶ delphi 能实现实时监控文件吗
用 delphi 可以实现实时监控文件。
比较简单的实现办法,是使用第三方控件,比如 TRxFolderMonitor、CnPack 组件包中的TCnFileSystemWatcher 等。
⑷ delphi做了一个监测磁盘文件操作的程序,监测到‘更新目录’状态时,实际是此目录里某文件有变化
你需要先进行监视。SHNotify_Register(self.Handle)//注册Shell监视
procere TForm1.WMShellReg(var Message: TMessage);
var
strPath1, strPath2: string;
charPath: array[0..259] of char;
pidlItem: PSHNOTIFYSTRUCT;
begin
pidlItem := PSHNOTIFYSTRUCT(Message.wParam);
//获得系统消息相关得路径
SHGetPathFromIDList(pidlItem.dwItem1, charPath);
strPath1 := charPath;
SHGetPathFromIDList(pidlItem.dwItem2, charPath);
strPath2 := charPath;
Memo1.Lines.Add(SHEvEntName(strPath1, strPath2, Message.lParam) + chr(13) + chr(10));
end
⑸ delphi如何禁止系统创建名字为‘12345’文件夹或是怎么监视QQ为‘11223344’登陆则自动关闭,
45554445快结婚
⑹ Delphi判断文件夹是否存在,不存在就创建一个
delphi 判断文件夹目录可以使用 DirectoryExists 函数,而创建目录可以使用 CreateDir 和ForceDirectories 函数。
CreateDir 和ForceDirectories 函数都可以创建文件夹,两者的区别在于:
ForceDirectories 创建多级目录,父目录不必存在;而 CreateDir 只能创建最后的一级目录,父目录必须存在。举例说明:
如果需要建立 d:path1subPath1,那么CreateDir 函数只能先建立d:path1(或必须该路径存在),再建立d:path1subPath1。而用ForceDirectories 函数可以一次性建立。
示例代码如下:
procereTForm1.Button1Click(Sender:TObject);
begin
ifnotDirectoryExists(Edit1.Text)then//判断目录是否存在
try
begin
ForceDirectories(Edit1.Text);//创建目录
end;
finally
raiseException.Create('无法建立路径:'+Edit1.Text);
end;
end;
⑺ delphi怎么获得某文件夹下最新建立的文件
也可以程序启动时,读取文件夹下全部文件,将文件名放入Stringlist中,然后定时扫描文件夹,看是找到的文件名是否在List中,如果不在,那么说明是新文件,将新文件名再加入到Stringlist,然后等待下次扫描