我用ACCESS做的库!
str:='内科';
with Query2 do begin
with SQL do begin
Clear;
Add('Select * from type Where type_nm='+str);
end;
Open;
end;
secondclass:=str;
str:=query2.FieldValues['type_id'];
ShowMessage(str);
提示出错,能编译通过!
str:='内科';
with Query2 do begin
with SQL do begin
Clear;
Add('Select * from type Where type_nm='+str);
end;
Open;
end;
secondclass:=str;
str:=query2.FieldValues['type_id'];
ShowMessage(str);
提示出错,能编译通过!
add('select * from type where type_nm='''+str+'''');
Add('Select * from type Where type_nm='''+Str+''');
如果用参数的话:
Add('Select * from type Where type_nm=:Pa1);
Pa1:=Str;
这句为什么也通不过?