导航:首页 > 文件教程 > delphi新建文件夹

delphi新建文件夹

发布时间:2021-12-03 01:29:34

1. delphi 如何在指定目录下创建文件

the method is so more. such as following,
var
list : TStringlist;
begin
list := TStringlist.Create;
list.DelimitedText := '1900-11-16';
list.SaveToFile('F:\test.txt'); //create text file in disk F:
list.Free;
end;

2. 如何用DELPHI创建一个文件夹和一个文本文件

创建文件:
CreateFile(FileName, fmCreate,)
创建文件夹:
ForceDirectiory
帮助里面有这两个函数的详细说明。

3. delphi 怎么新建文件

同意楼上的,有点笔误
myinifile.redainteger('小节名','关键字','缺省值');//读取整数型数据。
应为
myinifile.readinteger('小节名','关键字','缺省值');//读取整数型数据

创建一个文件的函数:
function FileCreate(const FileName: string): Integer;

Description
FileCreate creates a new file with the specified name. If the return value is positive, the function was successful and the value is the file handle of the new file. A return value of -1 indicates that an error occurred.

4. delphi的文件操作,比如创建一个文件是怎样操作的(只创建一个空文件)

var
filename:string;
FHandle:integer;
begin
filename:='e:\database.txt';
if(not fileexists(filename))then
begin
FHandle:=filecreate(filename);
end;

5. Delphi 7创建文件夹的问题

DateToStr()返回的字符串格式跟系统的日期分隔符有关,只有当系统的日期分隔符是“-”和“.”时,用返回回的字符串通过答ForceDirectories()创建文件夹才会成功。系统的日期分隔符是“/”时是不行的。 在XP下也一样。系统的日期分隔符在用资源管理器浏览文件的“详细信息”视图下就看得出来。

6. 怎麼用delphi建立一个文件夹

给你个函数吧
/*******************************************************************************
* 建立文件夹路径函数 *
*******************************************************************************/
int SearchStr(CString Source,char SearChar,int Howth) //搜索匹配的字符位置
{
int HowBit;
HowBit = Howth;
int len = strlen(Source);
for (int i = HowBit;i <len;i++)
{
if (Source[i] == SearChar)
{
return i;
break;
}
}
return -1 ;
}
/*******************************************************************************
* 建立文件夹 *
*******************************************************************************/
void CreatePath(CString Path)
{
int SearSult = SearchStr(Path, ': ',1);
CString a;
CString Pathstr;
int len = strlen(Path);

while(SearSult != -1)
{
SearSult = SearchStr(Path, '\\ ',SearSult+3);
if(SearSult!=-1)
{
Pathstr = Path.Left(SearSult);
if(_access(Pathstr,0)!=0)
CreateDirectory(Pathstr,0);
}
else
break;
}
if(Path[len-1]!= '\\ ')
{
if(_access(Path,0)!=0)
CreateDirectory(Path,0);
}
}

7. delphi中CreateDirectory和CreateDir有什么区别创建文件夹的同时能定义文件夹的属性吗

CreateDir也是通过调用CreateDirectory实现的,只是简化了参数,并且增加了linux支持。
CreateDirectory只能用于回windows编程。CreateDir在linux下Kylix也能调用,答使代码的兼容性、可移植性更强。

在SysUtils单元中:
function CreateDir(const Dir: string): Boolean;
begin
{$IFDEF MSWINDOWS}
Result := CreateDirectory(PChar(Dir), nil);
{$ENDIF}
{$IFDEF LINUX}
Result := __mkdir(PChar(Dir), mode_t(-1)) = 0;
{$ENDIF}
end;

8. 我想在DELPHI 中在本机PROGRAM FILES 文件夹下建立一个目录123

var
adr:array[0..MAX_PATH] of Char;
begin
GetSystemDirectory(adr,MAX_PATH);

end;

adr里面就是你想要的路径,然后在去创建目录去。

9. delphi怎么创建以当前日期命名的文件夹

CreateDirectory( PChar( 'C:\' + FormatDateTime( 'yyyymmdd', Now ) );

10. delphi 如何创建文件夹

forcedirectories和CreateDirectory都能创建文件 ForceDirectories可以创建多层目录. 如果你创建一个目录为c:\mymusic\music 如果你的C盘不存在一个叫mymusic的文件夹 的话程序会自动创建,函数执行的结果是, 创建了两个文件夹,mymusic和music,music为 mymusic的子文件夹. CreateDirectory只能创建一个文件夹,如果 mymusic不存在,则反回创建music文件夹失败! procere TMain.WriteVPTXT(str:string);varMytextFile : TextFile; tempstr : string; SysTime: TsystemTime;begintryGetLocalTime(SysTime); //AssignFile(MyTextFile,'D:\delphi\delphitest\time.ini'); if not DirectoryExists('D:\Test') then CreateDirectory('D:\Test',nil); //创建单个目录 // forcedirectories ('D:\Test'); //创建多层目录 tempstr:='D:\Test\'+inttostr(Systime.wYear)+inttostr(systime.wMonth)+inttostr(systime.wDay)+'.txt'; AssignFile(MyTextFile,tempstr); if not fileExists(tempstr) then ReWrite(MyTextFile) else Append(MyTextFile);

阅读全文

与delphi新建文件夹相关的资料

热点内容
智能ai机器人需要什么编程 浏览:825
可控编程主要技术指标有哪些 浏览:271
数据分析回归需要什么条件 浏览:285
微信小程序按钮颜色 浏览:69
长江大学网课用什么app 浏览:431
华中系统图纸编程哪个刀好 浏览:38
地方债务数据在哪里查看 浏览:932
扫描文件怎么设置格式 浏览:957
苹果邮箱主机名填什么 浏览:630
多张图片同一个文件夹 浏览:798
win7怎么打开shs文件 浏览:481
怎么把文件夹做成iso 浏览:164
缤客网站上的房价怎么在哪里修改 浏览:406
单片机c51计数器实验代码 浏览:990
宏编程鼠标代表什么意思 浏览:753
别人捡到苹果6有用吗 浏览:829
word文件用wps打开 浏览:477
macbook修改文件格式软件 浏览:757
美版s7edge那个版本好 浏览:529
视频隐藏在文件夹里 浏览:144

友情链接