with mainModule1.operatorClient do
begin
close;
str:='update operator set bumeng='+'"'+trim(edit3.Text)+'",';
str:=str+'xingming='+'"'+trim(edit4.Text)+'",';
str:=str+'dnbianhao='+'"'+trim(edit7.Text)+'",';
str:=str+'password='+'"'+trim(edit5.Text)+'"';
str:=str+' where gonghao='+'"'+trim(edit1.Text)+'"';
CommandText:=str;
Execute;
为什么会出现这样的提示?
begin
close;
str:='update operator set bumeng='+'"'+trim(edit3.Text)+'",';
str:=str+'xingming='+'"'+trim(edit4.Text)+'",';
str:=str+'dnbianhao='+'"'+trim(edit7.Text)+'",';
str:=str+'password='+'"'+trim(edit5.Text)+'"';
str:=str+' where gonghao='+'"'+trim(edit1.Text)+'"';
CommandText:=str;
Execute;
为什么会出现这样的提示?
解决方案 »
- 双线程中主线程创建的对象,执行在子线程, self成了空
- 在dbgrid的滚动时自动保存更改前提示是否保存更改
- 怎么取时间信息中的星期几?
- 哪位大侠告诉我TListView的所有属性及介绍
- 在TDBGrid控件中的Columns中,在PickList属性中添加值,如何在TDBGrid添加值时,光标移到该Columns时,让其自动展开,变成下拉列表选择?
- 庆祝,收藏夹的内容又找回
- 关于从固定目录中获取文件的问题?
- 怎么办?关于自动关闭应用程序。
- 如何能象3721的程序那样,一上网就能自动下载执行???
- 小精灵的问题
- 怎么样做一个mdi窗体,但是客户区能自己定义大小和位置
- delphi中类似于replace的函数是什么
with mainModule1.operatorClient do
begin
close;
str:='update operator set bumeng='+''''+trim(edit3.Text)+''',';
str:=str+'xingming='+''''+trim(edit4.Text)+''',';
str:=str+'dnbianhao='+''''+trim(edit7.Text)+''',';
str:=str+'password='+''''+trim(edit5.Text)+'''';
str:=str+' where gonghao='+''''+trim(edit1.Text)+'''';
CommandText:=str;
Execute;
with mainModule1.operatorClient do
begin
close;
str:='update operator set bumeng='+''''+trim(edit3.Text)+''''+',';
str:=str+'xingming='+''''+trim(edit4.Text)+''''+',';
str:=str+'dnbianhao='+''''+trim(edit7.Text)+''''+',';
str:=str+'password='+''''+trim(edit5.Text)+'''';
str:=str+' where gonghao='+''''+trim(edit1.Text)+'''';
CommandText:=str;
Execute;
你把字段类型都列出来让
edit;
Fields.Fields[0].Value:=trim(edit3.Text);
Fields.Fields[1].Value:=trim(edit4.Text);
Fields.Fields[5].Value:=trim(edit7.Text);
Fields.Fields[3].Value:=trim(edit5.text);
try
ApplyUpdates(-1);
except
end;