获取用户当前的Windows临时文件夹function GetWinTempPath: string;varTempDir: array[0..255] of char;beginGetTempPath(255, @TempDir);Result := strPas(TempDir);end; 删除目录:(目录里有东西也一样删)(shellapi) function DelDirectory(const Source: string): boolean;varfo: TSHFILEOPSTRUC

lua中的 lfs.mkdir lfs.rmdir只能针对单个目录,且lfs.rmdir不能清空文件夹 于是我想到了使用os.execute 递归创建目录如下os.execute("mkdir ooxx\\ooxx\\ooxx\\ooxx) --windowsos.execute("mkdir -p ooxx/ooxx/ooxx) --unix,linux like 清空目录如下os.execute("del ooxx\) --windowsos.execute("

Apache Ant 可以用下面的命令来删除目录 <delete dir="${lucene.dir}"/> 但是这会删除整个目录,而我现在只想清空目录内的所有文件和子目录,不想删除整个目录,该如何写呢? <delete verbose="true" includeEmptyDirs="true"> <fileset dir="dir_name" includes="**/*"

//1.打开目录和打开txt文件 procedure TMainForm.bbtnOpenLoClick(Sender: TObject); var sLogName: string; begin sLogName := Pub_EXEPath + '\日志\' + FormatDateTime('yyyy-mm-dd',date())+'.txt'; if not FileExists(sLogName) then begin MessageBox(0, '今日无错误日志!', '提示', M

//获取一个文件夹下的所有文件 //不包括文件夹里面的文件 //ListBox1.Items:= searchfile('Z:\'); //注意,path后面要有'\'; function  Searchfile(path:string):TStringList; var    SearchRec:TSearchRec;    found:integer; begin    Result:=TStringList.Create;     found:=FindFirst(path+'*.*',f

要实现目录级的拷贝,可以利用Windows API函数ShFileOperation( ),其函数声明如下: WINSHELLAPI int WINAPI SHFileOperation( LPSHFILEOPSTRUCT lpFileOp ); 实例: 新建一个工程,其程序示例如下: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dial

#pragma once #include <io.h>#include <stdio.h>#include <string>#include <direct.h> static void clean_dir(const char* szDir){    if (szDir == NULL || strlen(szDir) == 0)        return; std::string strDir = szDir; char c = strDir[str

FUNCTION WritableDir(CONST Dir : STRING) : BOOLEAN; VAR FIL : FILE; N : STRING; I : Cardinal; BEGIN REPEAT N:=IncludeTrailingPathDelimiter(Dir); FOR I:= TO -LENGTH(N) DO N:=N+CHAR(RANDOM()+) UNTIL NOT FileExists(N); Result:=TRUE; TRY AssignFile(FIL,N

Delphi编程中资源文件的应用/转自 http://chamlly.spaces.live.com/blog/cns!548f73d8734d3acb!236.entry一.引子: 现在的Windows应用程序几乎都使用图标.图片.光标.声音等,我们称它们为资源(Resource).最简单的使用资源的办法是把这些资源的源文件打入软件包,以方便程序需要的时候调用.资源是程序的一部分,程序要正常运行就离不了资源文件.但是它是不可执行代码. 为了更好地管理资源,Delphi中提供了一种.RES类型的

转自:http://blog.sina.com.cn/s/blog_53d1e9210100uke4.html 目录===============================================================================⊙ RTTI 简介⊙ 类(class) 和 VMT 的关系⊙ 类(class).类的类(class of class).类变量(class variable) 的关系⊙ TObject.ClassType 和 TObject.

获取网络文件大小 //delphi 获取网络文件大小 function GetUrlFileSize(aURL: string): integer; var FileSize: integer; var IdHTTP: TidHttp; begin IdHTTP:= Tidhttp.Create(nil); IdHTTP.Head(aURL); FileSize := IdHTTP.Response.ContentLength; IdHTTP.Disconnect; Result := File

Delphi ActiveX Form的使用实例 By knityster 1. ActiveX控件简介 ActiveX控件也就是一般所说的OCX控件,它是ActiveX技术的一部分. ActiveX控件可以被集成到很多支持ActiveX的应用当中去,或者直接用来扩展应用的功能,这些支持ActiveX的应用包括C++ Builder.Delphi.Visual dBASE. Visual Basic.Visual C++.Internet Explorer.Netscape Navigator等

转载:http://blog.csdn.net/henreash/article/details/2261134 本文档向你展示如何使用RemObjects(Delphi版)创建第一个服务.读了本文档后你可以继续读相关文档: RO06:如何创建RemObjects客户端(Delphi版). 注意:如果你安装了.NET版请看RO45 和 RO46. 你可以把本文档当作一个范例并牢记创建步骤. 本文相关项目完整代码在文档底部有下载连接. 选择服务类型 第一步主要是选择一个你要创建的服务类型. 在De

如果你使用messagedlg(对showmessage也适用)可以汉化定义按钮caption的常量,具体操作步骤如下: 1.   打开文件consts.pas(在Delphi安装目录的/source/vcl下)        2.   将以下资源字符串常量的值进行改动:               SMsgDlgWarning   =   '警告';           SMsgDlgError   =   '错误';           SMsgDlgInformation   =   '信

1.生成一个rc文件,文件格式如下: rname exefile "test.exe" //rname是资源名称 //exefile是资源类型 //text.exe是资源 资源类型列表: Wave:资源文件是声音文件: RCDATA:一般二进制文件: AVI:AVI动画: ICON:图标文件: BITMAP:位图文件: CURSOR:光标文件: exefile: exe文件 FILE: 一般文件 2.将delphi安装目录下bin中的brcc32.exe文件拷出,用brcc32.exe

资源文件一般为扩展名为res的文件,其自带的资源编译工具BRCC32.EXE(位于/Delphi/BIN目录下) 1.编写rc脚本文本 用记事本或其它文本编辑器编写一个扩展名为rc的文件,格式分别为在资源文件中的名称->类型->实际文件名称. 例如:要将文件名 demo.Dll的文件打包成一个资源文件,首先 新建一个文本文档,输入内容 mydemoDll RCDATA demo.DLL mydemoDll 和 RCDATA 你可以随便写,这个是为了在使用资源时定义的名称和类型你也可以写成:a

http://www.cnblogs.com/dabiao/archive/2009/11/28/delphi.html 1.创建rc文件.可以用任意文本编辑器来写.文件格式为:"资源名 资源类型 文件名". 对于资源类型,如果是exe文件,应该是EXEFILE,如果是二进制文件,则是RCDATA. 这里创建一个文件float.rc: AEXE EXEFILE "E:\Software\float.exe" 2.将这个rc文件转换成res文件. 复制float.rc

段东宁 计亚南 (郴州职业技术学院, 湖南 郴州  423000) 摘要: 资源文件是一种能有效地组织.管理和使用资源的文件形式,在软件开发中有着广泛的应用.本文详细介绍了在Delphi编程中资源文件的创建方法和使用技巧. 关键词:Delphi,资源文件,TResourceStream对象,MCISend String 函数 The Application of Resource Files in Delphi Programming DUAN Dong-Ning (Department of

/** * @author Funsion Wu * @abstract SPL使用案例,全国首发,技术分享,欢迎转帖 */ class Dir extends RecursiveDirectoryIterator { const CHILD_FIRST = RecursiveIteratorIterator::CHILD_FIRST ; const LEAVES_ONLY = RecursiveIteratorIterator::LEAVES_ONLY ; const SELF_FIRST =

这几天都在忙专周实验,今天用到delphi,一到编译时nod32就报毒,编译空文件也报毒,上网查了资料才明白,是编译文件被感染了,生成软件就会报毒.把自己找到的资料分享如下:   重新编译时,生成的exe突然nod32报毒. 提示: “Project1.exe Win32/Induc.A 病毒 的变种 已删除 – 已隔离 NT AUTHORITY\SYSTEM 在应用程序新建的文件上发生事件: C:\Program Files\Delphi7SE\Bin\delphi32.exe.” 查阅 Wi

EhLib 在 Delphi 7 下的安装方法 1.将 EhLib 解压到一个目录,如:E:\VCL\EhLib: 2.将 EhLib 安装目录下 Common 目录.DataService 目录下的所有文件拷贝到 EhLib 安装目录下的 Delphi 7 目录: 3.启动 Delphi 7: 4.选择 File — Open Project,跳转到 EhLib 安装目录,在出现的打开文件对话框文件类型下拉列表中选择 Delphi Package(*.dpk:*.dpkw),在文件列表中选择