我是初学者~~~请个为高手不要嫌弃我的问题太低级~~~ ( 积分: 20 )

比如说有道题:下面的代码在DBDEMOS数据库中增加一个数据表MyTable,该表有两个字段,第一个名为Field1,数据类型为integer类型;第二而字段名字为Field2,数据类型为string类型,大小为50 (分三部来做的)
(1)新建一个工程,在窗口中添加一个TADOQuery,TADOConnect,TDataSource,TdbGrid和TButtons组件
(2)在应用程序的目录下增加一个名字为createtable.sql的文件,其内容如下:
CREATE TABLE MySQLTable
(
Field1 int NOT NULL
Field2 varchar(50)
)
(3)设置TADOConnection组件连接SQL中的Pubs数据库.编写程序的代码,用于创建数据表,然后插入记录并显示:
unit main;
interface
use
window,Messages...............................................


我就是想问第二部的在应用程序的目录下增加一个名字为createtable.sql的文件
应用程序目录在哪里?createtable.sql是不是就是把那段SQL代码打到文本文件里面,在把文件名改为createtable.sql就行啦?怎么增加的啊?

毕业设计临时学delphi的？

[]临时学的,没办法~~~~有谁能告诉我的麻~~~~~

是不是就是把那段SQL代码打到文本文件里面,在把文件名改为createtable.sql
shi是这样的
应用程序目录在哪里? 就是你的程序所在的目录,
怎么增加的啊? 就是用记事本写,
加油~~

extractfiledir 取工程路径 (必需保存工程)

procedure TForm1.Button1Click(Sender: TObject);
var
SQL:TStringList;
path,SQLText:string;

begin
path := extractfiledir(application.ExeName);
SQL := TStringList.Create;
SQL.Text := 'dfsdfdsf';
SQL.SaveToFile('createtable.sql'); 保存到文件
sql.LoadFromFile('createtable.sql'); 从保存的文件取值
showmessage(sql.GetText); 文件内的文本
end;