在DELPHI嵌入SQL语句动态创建数据库

dong12 2002-09-07 11:57:13
请问各位高手我的代码该怎么修改
在窗体中创建一个按钮事件,其代码如下:
WITH ADOQUERY1 DO
BEIGN
CLOSE;
SQL。CLEAR;
SQL。ADD(‘CREATE DATABASE AA);
EXECSQL;
END;
此种做法只是固定创建一个数据库名为AA,我要想动态创建数据库,在窗体再放一个EDIT控件,此控件用于输入将要创建数据库的名字,如何修改,请各位帮助好吗?
...全文
34 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
simonzone 2002-09-07
  • 打赏
  • 举报
回复
up
mengxianbao1521 2002-09-07
  • 打赏
  • 举报
回复
同意楼上的!
sunny518 2002-09-07
  • 打赏
  • 举报
回复
if edit1.text='' then exit;
WITH ADOQUERY1 DO
BEIGN
CLOSE;
SQL。CLEAR;
SQL。ADD(‘CREATE DATABASE '+edit1.text);
EXECSQL;
END;

2,497

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧