delphi中为何会出现如此错误
各位大佬:
小弟在做一个库存的小程序遇到问题,请帮忙,程序思路是:商品分二种1:类商品2:组合商品(将单类商品合成一份销售).二者在区分在前者的'类别'(字段名dalei)商品性质,后者的'类别'为'组合',组合商品有自己的商品名并设立专门数据库(zh),它有组合商品名(zsp_name),组合商品中的单个商品名(dsp_name)以及单个商品的类别(dsp_dalei).当销售一个商品先验证是否为'组合',如是在zh库中选出单个商品的信息,根据其与单个商品的比例(dsp_dw)(一个组合商品可能会几种相同的单个商品组成),将销售量*dsp_dw,到库存库(price)中减去相应的商品(单类商品)在原库存量;如销售商品不是'组合',就直接在库存中操作.
但是运行程序后总是出现报误信息'无法将null值插入列'id'表'chaoshi.dbo.price'该列不允许空值,insert失败?'这是何?
程序中并无插入,(所有的query.requestlive:=true).
procedure TForm7.Button1Click(Sender: TObject);
var
b11i1,b11i2:integer;
b11_sl,b11_zhdw,b11_sl1,bjsl:currency;
b11_dalei,b11_spmc,b11_zhspmc,b11_zhdalei:string;
begin
query3.Close;
query3.SQL.Clear;
query3.sql.add('select * from xiaoshou');
query3.Open;
//Query6.FetchAll;
query3.First;
for b11i1:=0 to query3.RecordCount-1 do
begin
b11_sl:=query3.fieldbyname('sl').asfloat;
b11_dalei:=query3.fieldbyname('dalei').AsString;
b11_spmc:=trim(query3.fieldbyname('spmc').AsString);
相关问答：
已知Python 中：
s = unicode("测试", "gb2312")
s = u'\u6d4b\u8bd5'
print s
测试
在Delphi里面如何将\u6d4b\u8bd5这样的还原成Gb2312的汉字呢？
找到个方法
......
我安装的是企业版。。。
我问下， CTRL+左键 能查看 windows.pas 吗？
就是 接口里的windows。
当然可以,CTRL+左键点击Interface部分的Windows就可以了
啥啥企业版？去安装目录看看lib文件夹下有没� ......
就是一个服务端和一个客户端，里边有一些共用单元 ，我在 工程的SEARCH PATH里设置的路径，
里边有个结构体，我在服务端打开，加了成员，但是我在客户端其他单元访问不到我新加的，我在客户端打开那个单元，确实加� ......
procedure RunFunction;
type
TFunc = function(A: Integer): Integer;stdcall; //这里根据DLL里面函数的声明修改
var
......
delphi 2007 + access 2007 +odbc +TADODataset,TADOConnection,TADOCommand
//删除数据
procedure TCDSSelectTools.DeleteMachine(byMachineID: string);
tmpCmd := TADOCommand.Create(ni ......
