数据库编程：建立一个数据表的SQL语句。

procedure get_stru_SQL(var sql_str:string);
begin
  sql_str:='create table qxgmb ( m_id integer identity(1,1) primary key,';
  sql_str:=sql_str+' 编号 varchar(12), ';
  sql_str:=sql_str+' 购买日期 date,           器械名称 varchar(20), ';
  sql_str:=sql_str+' 器械类型 varchar(10), 购买数量 short , ';
  sql_str:=sql_str+' 购买成本 double,       生产厂家 varchar(30) );';
end;

转载于:https://www.cnblogs.com/dpsw/archive/2011/08/14/2138105.html