执行以下语句后
procedure TForm1.SaveClick(Sender: TObject);
begin
with LsxQry do
begin
close;
sql.Clear;
sql.Add('insert into lsx(lsh,fhrq,rkrq)');
sql.Add('values(:lsh,:fhrq,:rkrq');
end;
LsxQry.ParamByName('lsh').AsString:=trim(LshEdit.Text);
LsxQry.ParamByName('fhrq').Asdatetime:=FhrqCB.Date;
LsxQry.ParamByName('rkrq').Asdate:=RkrqCB.Date;
LsxQry.Prepare;
LsxQry.ExecSQL;end;出现错误:project project1.exe raised exception class EDBEngineError with
message 'unexcepted end of command Token:? Line Number:2',Process stopped use
step or run to continue有时出现错误提示框:
Error
Access violation at address 0086D0B8 in module 'vclide60.bpl'
read of address 00000000
procedure TForm1.SaveClick(Sender: TObject);
begin
with LsxQry do
begin
close;
sql.Clear;
sql.Add('insert into lsx(lsh,fhrq,rkrq)');
sql.Add('values(:lsh,:fhrq,:rkrq');
end;
LsxQry.ParamByName('lsh').AsString:=trim(LshEdit.Text);
LsxQry.ParamByName('fhrq').Asdatetime:=FhrqCB.Date;
LsxQry.ParamByName('rkrq').Asdate:=RkrqCB.Date;
LsxQry.Prepare;
LsxQry.ExecSQL;end;出现错误:project project1.exe raised exception class EDBEngineError with
message 'unexcepted end of command Token:? Line Number:2',Process stopped use
step or run to continue有时出现错误提示框:
Error
Access violation at address 0086D0B8 in module 'vclide60.bpl'
read of address 00000000
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货