to feiba7288:
with ADOStoredProc1 do
begin
ProcedureName :='sh_chai';
if Trim(end_date_edit.Text)='' then
Parameters.ParamByName('end_date').Value:=nil;
ADOStoredProc1.ExecProc;
end;
这样做,提示出错,
[dcc32 Error] chailing.pas(313): E2010 Incompatible types: 'Variant' and 'Pointer'
平台是xe3