Question

delphi中插入Oracle数据的问题

我是一个菜鸟，最近在写毕业设计
我用Delphi7中的DBE方式连接Oracle，现在想用Query组件向Oracle插入数据，数据库中有4条字段，假设为a,b,c,d，其中a,b为varchar()型，c为number型，d为日期型，想插入的数据为：插入a的是一个字符串变量a1,插入b的是edit1.text，插入c的是integer型变量c1,插入d的是当前系统日期时间

我这么写老出错
SQL.Add('insert into TRANSACTION(TSID,TSCARKIND,TSPID,TSWEIGHT,TSMONEY,TSDATE,TSPSID) values(''&Tsmney&'',''&combobox1.Text&'',''&edit3.Text&'',''&strtoint(edit2.text)&'',''&strtoint(panel3.Caption)&'',''&now&'',''&UserID&'')');

Answer 1

为什么会加&？
delphi中是用+连接的
SQL.Add('insert into TRANSACTION'+'(TSID,TSCARKIND,TSPID,TSWEIGHT,TSMONEY,TSDATE,TSPSID) '+'values(''Tsmney'','''+combobox1.Text+''','''+edit3.Text+''','+edit2.text+','+panel3.Caption+','''+ datetostr(now) + ''','''+UserID+''')');
试试。
now的地方可能需要修改，用formatdatetime函数吧。formatedatetime('yyyymmddhhnnss',now)?

Answer 2

为什么会加&?
delphi中是用+连接的
SQL.Add('insert
into
TRANSACTION'+'(TSID,TSCARKIND,TSPID,TSWEIGHT,TSMONEY,TSDATE,TSPSID)
'+'values(''Tsmney'','''+combobox1.Text+''','''+edit3.Text+''','+edit2.text+','+panel3.Caption+','''+
datetostr(now)
+
''','''+UserID+''')');
试试。
now的地方可能需要修改，用formatdatetime函数吧。formatedatetime('yyyymmddhhnnss',now)?