procedure TForm1.Button1Click(Sender: TObject);
begin
CreateDir('C:\Temp1');
end;
begin
CreateDir('C:\Temp1');
end;
解决方案 »
- [基础]C#的搞pascal,遇到点string拼接的疑问
- 二维码的生成与识别
- 热烈庆祝小黑那个啥的~~~~放分~
- 求:数据库SQL SERVER保存读取图片例程。(jpg和bmp格式)
- 在线等候
- 如何透明 Image上的位图上的某一个颜色? 人在线
- 发帖申请,民意调查:大家觉得是否有必要删除那个傻比的“Access比Delphi强”的帖子。
- 关于Delphi的一个小问题:就是如何用ADOQuery编写一个模糊查询
- 如何获得主机在INTERNET上的IP地址?
- 大家来帮忙!
- 请问在clientdataset中如何分辨字段类型是字符串的 ''和Null,我怎样也无法监测
- 急死我了,qryOperation.FieldByName('State').AsInteger :=0 这句话为何不行?
begin
if MessageDlg('输入目录'+edt_lj.Text+'不存在!请确认是否建立?',
mtWarning,[mbYes,mbNo],0)<>mrYes then Exit;
ForceDirectories(edt_lj.Text);
end;