求adotable或adoquery的添加语句 就使用你的第二个方法,然后在open以后,appand在;之间加:adoquery1.edit; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 if not ADOQuery1.Active then ADOQuery1.Open;ADOQuery1.Append;ADOQuery1.FieldByName('name').AsString := Edit4.Text;AdoQuery1.FieldByName('filename').AsString := Edit3.Text;AdoQuery1.FieldByName('iconfile').AsString := Edit3.Text;ADOQuery1.Post;後面不需要再Open;記得將AdoQuery1.Connection設置好,並將AdoQuery.SQL.Text設置好,就行了 form1.adoquery1.sql.add('insert into Games'); form1.adoquery1.sql.add ('values(:v1,:v2,:v3)');form1.parameters.parambyname('v1').asstring:=edit1.text;form1.parameters.parambyname('v2').asstring:=edit2.text;form1.parameters.parambyname('v3').asstring:=edit3.text; execsql; ADOTable1.Open; ADOTable1.Edit; ADOTable1.AppendRecord([Edit1.Text, Edit2.Text, Edit3.Text,Edit4.Text]); ADOTable1.Refresh; 编写个小工具来验证文件数字签名是否有效的思路 Delphi怎么让程序像屏幕键盘那样单击按钮时不切换前台? 字符串和字符数组如何转化 如何让Edit只能输入数字? 一个用户登陆认证问题,代码如下! 关于数据库的排序? 菜鸟求教:放在coolbar里的toolbar的width为什么不能指定数值呢? ClientDataset有没有ADOQuery的NextRecordSet(i)相似命令 请教frames的用法!!谢谢 我的问题有点难 图片的读取 关于窗体融合的问题!
if not ADOQuery1.Active then
ADOQuery1.Open;ADOQuery1.Append;
ADOQuery1.FieldByName('name').AsString := Edit4.Text;
AdoQuery1.FieldByName('filename').AsString := Edit3.Text;
AdoQuery1.FieldByName('iconfile').AsString := Edit3.Text;
ADOQuery1.Post;後面不需要再Open;
記得將AdoQuery1.Connection設置好,並將
AdoQuery.SQL.Text設置好,就行了
form1.adoquery1.sql.add ('values(:v1,:v2,:v3)');
form1.parameters.parambyname('v1').asstring:=edit1.text;
form1.parameters.parambyname('v2').asstring:=edit2.text;
form1.parameters.parambyname('v3').asstring:=edit3.text;
execsql;
ADOTable1.Edit;
ADOTable1.AppendRecord([Edit1.Text, Edit2.Text, Edit3.Text,Edit4.Text]);
ADOTable1.Refresh;