请教！如何delphi 在Sql2000创建数据库.帮帮忙！

Question

呵呵，可以这样：
你先新建一个工程，加入database、query，设置database的aliasname为master（你先把master数据库注册为ODBC(系统DSN)），把query的database设置为你的database，然后，在窗体里加入一个button，在onclick里面写如下代码：
procedure TForm1.Button1Click(Sender: TObject);
var
  temp:string;
begin
  temp:='CREATE DATABASE Sales '
        +'ON '
        +' ( NAME = Sales_dat,'
        +' FILENAME = ''f:\saledat.mdf'','
        +' SIZE = 10, '
        +' MAXSIZE = 50, '
        +' FILEGROWTH = 5 ) '
        +' LOG ON '
        +' ( NAME = ''Sales_log'', '
        +' FILENAME = ''f:\salelog.ldf'', '
        +' SIZE = 5MB, '
        +' MAXSIZE = 25MB, '
        +' FILEGROWTH = 5MB ) ';
  query1.Close;
  Database1.Connected :=true;
  query1.SQL.Add(temp);
  query1.ExecSQL;
end;
这样，就用程序新建了一个叫Sales 的数据库

Answer 1

query1.close;
query1.sql.clear;
query1.sql.add('create database mydatabase');
query1.execsql;

Answer 2

query1.close;
query1.sql.clear;
query1.sql.add('create database mydatabase name char(8) not null,age int ');
query1.execsql;

Answer 3

跟其他的sql 语句执行是一样的呀！只不过sql语句是创建数据库的，你可以从sql2000中的书中找到sql 语句！Good luck!

Answer 4

To chons(陈氏【Kocham Chen】)
不要误导人家, database 哪里有什么char,integer,把数据库和表区分开来好不好?请拿出一点敬业精神来......