请问什么情况下会产生External exception C000001D这种错误?

解决方案 »

  1.   

    去这里看
    http://www.delphibbs.com/delphibbs/dispq.asp?lid=248017
      

  2.   

    http://www.delphibbs.com/delphibbs/dispq.asp?lid=656777
      

  3.   

    这个错误只是偶尔会出现了,
        try
            //添加销售商品
            SaleDataModule.adsSpInfo.Append;
            SaleDataModule.adsSpInfo.FieldByName('xmdbh').AsString := p_Mdbh;
            SaleDataModule.adsSpInfo.FieldByName('xspbh').AsString := p_SPInfo.merchid;
            SaleDataModule.adsSpInfo.FieldByName('xsptm').AsString := p_SPInfo.mtm;
            SaleDataModule.adsSpInfo.FieldByName('xspdj').AsFloat := p_SPInfo.mlsj;
            SaleDataModule.adsSpInfo.FieldByName('xsjsj').AsFloat := p_SPInfo.msjsj;
            SaleDataModule.adsSpInfo.FieldByName('xsumsj').AsFloat := p_SPInfo.mxj;
            SaleDataModule.adsSpInfo.FieldByName('xxsfs').AsInteger := p_SPInfo.mxsfs;
            SaleDataModule.adsSpInfo.FieldByName('xzkdh').AsString := p_SPInfo.mzkdh;
            SaleDataModule.adsSpInfo.FieldByName('xxssl').AsFloat := p_SPInfo.mxssl;
            SaleDataModule.adsSpInfo.FieldByName('xjh').AsString := p_Jh;
            SaleDataModule.adsSpInfo.FieldByName('xflow').AsInteger := p_Flow;
            SaleDataModule.adsSpInfo.FieldByName('xsygh').AsString := p_Sygh;
            SaleDataModule.adsSpInfo.FieldByName('xxssj').AsString := FormatDateTime('YYYY-MM-DD HH:MM:SS', Now);
            SaleDataModule.adsSpInfo.FieldByName('xxsrq').AsString := FormatDateTime('YYYY-MM-DD', Now);
            SaleDataModule.adsSpInfo.FieldByName('xtype').AsInteger := p_type;
            SaleDataModule.adsSpInfo.FieldByName('xjyxd').ASInteger := p_Jyxd;
            SaleDataModule.adsSpInfo.FieldByName('xflag').AsInteger := 0;
            SaleDataModule.adsSpInfo.Post;
        except
            on Err: Exception do
            begin
                ErrorLog('p_InsertMerch():SaleDataModule.adsSpInfo ' + Err.Message, '');
                Result := False;
                Exit;
            end;
        end;