procedure TForm1.Button1Click(Sender: TObject);
begin
ADOTable1.Edit;
ADOTable1.FieldByName('UserName').AsString := Edit1.Text;
ADOTable1.FieldByName('PassWord').AsString := Edit2.Text;
ADOTable1.Post;
end;这段代码 运行后出错 说是不能在关闭DataSet的情况下运行该操作 是不是用ADOTable需要用ADODataSet ?
还有 ADOTable1.Post是什么意思?
begin
ADOTable1.Edit;
ADOTable1.FieldByName('UserName').AsString := Edit1.Text;
ADOTable1.FieldByName('PassWord').AsString := Edit2.Text;
ADOTable1.Post;
end;这段代码 运行后出错 说是不能在关闭DataSet的情况下运行该操作 是不是用ADOTable需要用ADODataSet ?
还有 ADOTable1.Post是什么意思?
解决方案 »
- MYDAC 中的备份 MyBackup组件 怎么用啊?
- actionlist的onexecute事件不能控件每个action
- 文本文件的保存
- 中式报表
- 一个关于在D6下使用INDY9.0的问题,急呀!在线等。
- 数据集修改问题,高手请赐教,在线等
- myreg.writedate('mydate',date) 错在哪里?
- 一个关于读取Memo字段内容的问题,为什么VFP能做到而Delphi做不到?
- 布尔型如何转换成字符型?
- 拖拽的控件在哪里调用构造函数呢
- 程序越编越大,修改时只是面对一大堆代码翻来翻去很不方便,到底写软件走怎样的路子才对,修改才容易?是从需求分析-概要设计-详细设计-...这样走下去呢,还是随便一点好呢。哪有一个开发模式可供参考参考,从分析到设计再到实现、测试等。怎样才能理清开发思路,修
- 如何让窗口保持激活状态
begin
ADOTable1.Edit;
ADOTable1.FieldByName('UserName').AsString := Edit1.Text;
ADOTable1.FieldByName('PassWord').AsString := Edit2.Text;
ADOTable1.Post;
ADITable1.Open;
end;
这样? 还是不行
begin
ADITable1.Open;
ADOTable1.Edit;
ADOTable1.FieldByName('UserName').AsString := Edit1.Text;
ADOTable1.FieldByName('PassWord').AsString := Edit2.Text;
ADOTable1.Post;
end;
大哥,你应该好好看看书!
你知道ADOTable表示数据库中的一个表吧,它到底表示哪个表你有没有告诉它?难道你不告诉它它还能猜出来?
Open的意思不用说也知道,你把Open放到Post后面算什么意思呢?
不过,如果你第一次编程,出这种情况还是比较正常的。
adoq1.SQL.Add('update jldw set 计量单位=:jldw,说明=:sm where 单位编码=:dwbm');
adoq1.parameters.ParamByName('dwbm').value :=form4.edit1.text;
adoq1.parameters.ParamByName('jldw').value :=form4.edit2.text;
adoq1.Parameters.ParamByName('sm').Value :=form4.edit3.Text;
adoq1.ExecSQL ;