一行写完了怎么换下一行接着写呢? ( 积分: 40 )

  • 主题发起人 主题发起人 忘记说爱你
  • 开始时间 开始时间

忘记说爱你

Unregistered / Unconfirmed
GUEST, unregistred user!
我现在有一句话是这样的:
ADOQuery1.SQL.Add('create table ispman_record (ispno char(20) NOT NULL PRIMARY KEY,ispname char(80) NOT NULL,Comanager char(20))');
我已经试验过了连着写没有任何问题,但是我要换行写(这是对我实际表的举例说明,实际表中列太多了,必须换行才能写完),该怎么写呢?
ADOQuery1.SQL.Add('create table ispman_record (ispno char(20) NOT NULL PRIMARY KEY,ispname char(80) NOT NULL,'
+'Comanager char(20))')';
我这样写,系统提示没有字符串没有终结。

请大家帮帮我~!
 
我现在有一句话是这样的:
ADOQuery1.SQL.Add('create table ispman_record (ispno char(20) NOT NULL PRIMARY KEY,ispname char(80) NOT NULL,Comanager char(20))');
我已经试验过了连着写没有任何问题,但是我要换行写(这是对我实际表的举例说明,实际表中列太多了,必须换行才能写完),该怎么写呢?
ADOQuery1.SQL.Add('create table ispman_record (ispno char(20) NOT NULL PRIMARY KEY,ispname char(80) NOT NULL,'
+'Comanager char(20))')';
我这样写,系统提示没有字符串没有终结。

请大家帮帮我~!
 
你把你的SQL语句用变量的方法存放.
var SQL: string;
begin
SQL := 'create table ispman_record (ispno char(20) NOT NULL PRIMARY KEY,'+
' ispname char(80) NOT NULL,'+
' Comanager char(20))';
ADOQuery1.SQL.Text := SQL;
.....
end;

这样阅读代码时,也很方便.
 
ADOQuery1.SQL.Add('create table ispman_record (');
ADOQuery1.SQL.Add(' ispno char(20) NOT NULL PRIMARY KEY, ');
ADOQuery1.SQL.Add(' ispname char(80) NOT NULL, ');
ADOQuery1.SQL.Add(...);
ADOQuery1.SQL.Add(' Comanager char(20))');
 
這樣吧,:)
with ADOQuery1 do begin
Close;
SQL.Text := 'create table ispman_record (ispno char(20) '
+ 'NOT NULLPRIMARY KEY,ispname char(80) NOT NULL,'
+ 'Comanager char(20))';
Open;
end;
 
就这样吧 谢谢你们了
 
多人接受答案了。
 
后退
顶部