关于网友提出的“ delphi中如何将listbox中数据存入数据库”问题疑问，本网通过在网上对“ delphi中如何将listbox中数据存入数据库”有关的相关答案进行了整理，供用户进行参考，详细问题解答如下：
问题： delphi中如何将listbox中数据存入数据库
描述:listboxdelphi数据库
delphi中如何通过点击确认出库将listbox中数据存入数据库，如图所示，依次是模号=mh，数量=sl，单位=dw，仓库=ck。
解决方案1:var i,k:Integer;
mh,sl,dw,ck,SQL,ID,ID1:string;
begin
k:=100;
DateTimetoString(ID1,'yymmddhhnnsszzz',now);
for i:=0 to ListBox1.Items.Count-1 do
begin
k:=k+1;
ID:=ID1+inttoStr(k);
S1:=ListBox1.Items[i];
S2:=ListBox2.Items[i];
S3:=ListBox3.Items[i];
S4:=ListBox4.Items[i];
SQL:='INSERT INTO zhongjian(mh,sl,dw,ck,ID) VALUES('+
#39+S1+#39+','+
#39+S2+#39+','+
#39+S3+#39+','+
#39+S4+#39+','+
#39+ID+#39+')';
adoquery1.sql.text:=SQL;
adoquery1.execsql;
end;
end;
上述代码仅代参考:
表字段中就有主键ID，ADOQuery连接数据库的方式，不一样，代码有异。
解决方案2: 更正一下：
with adoquery1 do
begin
close;
sql.text:='insert into table1 values(mh,sl,dw,ck)';
execsql;
end;
以上介绍了“ delphi中如何将listbox中数据存入数据库”的问题解答，希望对有需要的网友有所帮助。
本文网址链接：http://www.codes51.com/itwd/3105247.html
