请大侠帮帮忙一个clientdataset.commamdtext的sql语法错误,马上结贴.

Question

中间的select语句在sql2000下可以得到正确的结果为什么在程序open是提示:
在inner关键字处有语法错误.
procedure TForm1.DBGridCellClick(Column: TColumn);begin
clientdataset1.commandtext :='';
 cdsmould.CommandText :='SELECT R_Mould_Rec.Mould_Name'+
'FROM R_Mould_Rec INNER JOIN '+
'R_Mould_Group_Rec ON'+
'R_Mould_Rec.Mould_Code = R_Mould_Group_Rec.Mould_Code '+
'WHERE R_Mould_Group_Rec.Group_Code = '''+ edit1.text +'''';
clientdataset1.open;
end;end.

Answer 1

可能原因出在空格上。
procedure TForm1.DBGridCellClick(Column: TColumn);begin
clientdataset1.commandtext :='';
 cdsmould.CommandText :='SELECT R_Mould_Rec.Mould_Name'+
' FROM R_Mould_Rec INNER JOIN '+
空格
' R_Mould_Group_Rec ON'+
空格
' R_Mould_Rec.Mould_Code = R_Mould_Group_Rec.Mould_Code '+
空格
' WHERE R_Mould_Group_Rec.Group_Code = '''+ edit1.text +'''';
空格
clientdataset1.open;
end;试试

Answer 2

改为如下试一下：
clientdataset1.commandtext :='';
 cdsmould.CommandText :='SELECT R_Mould_Rec.Mould_Name '+
'FROM R_Mould_Rec INNER JOIN '+
'R_Mould_Group_Rec ON '+
'R_Mould_Rec.Mould_Code = R_Mould_Group_Rec.Mould_Code '+
'WHERE R_Mould_Group_Rec.Group_Code = '''+ edit1.text +'''';

Answer 3

'R_Mould_Group_Rec ON'+    这里on没有加空格
'R_Mould_Rec.Mould_Code = R_Mould_Group_Rec.Mould_Code '+