procedure TForm1.Button1Click(Sender: TObject);
begin
CreateDir('C:\Temp1');
end;
begin
CreateDir('C:\Temp1');
end;
解决方案 »
- 关于DBGRID的数据修改问题!
- 在 Delphi 中可以自定义类吗,如何定义呢,刚入门,求助!
- 如何制作像delphi的对象检查器一样的效果呢?
- 有那位大侠懂消息处理的,进来帮忙改一下程序!我想加一个屏蔽/启用输入法消息处理。
- 在线等待高手指出下面代码的错误。
- 各们GG MM请进(来者有分)
- 请问如何给RS232端口输入ESC键
- 好久未放分了,当请客:各位朋友知不知道“三维全景图片”技术???人少UP也有高分
- 新人求助 listview遍历窗口进程问题
- 现存VC的SDK内包含有CWND数据类型的函数,请各位高手赐教在Delphi中如何定义和调用
- 请问在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;