+ -
当前位置:首页 → 问答吧 → 文件夹建立并命名

文件夹建立并命名

时间:2011-10-17

来源:互联网

var
  dir: string;
begin
  dir := 'c:\temp\TestDir';
  CreateDirectory(PChar(dir), nil); 
end;

想让文件夹名称为edit1的内容而不是testdir 怎么改 谢谢

作者: jige5d   发布时间: 2011-10-17

dir := 'c:\temp\edit1'

作者: jingtuzhong   发布时间: 2011-10-17

Delphi(Pascal) code


dir := edit1.text ;



作者: warrially   发布时间: 2011-10-17

把你的Dir字符串赋值为你的新建文件夹位置+Edit1.Text

作者: hongss   发布时间: 2011-10-17

热门下载

更多