ADOTable1.First;
while not ADOTable1.Eof do
begin
if ADOTable1.FieldByName('title').Value = 'haven' then
begin
AdoTable1.Edit;
ADOTable1.FieldByName('content').Value := Memo1.Text;
ADOTable1.Post;
break;
end;
ADOTable1.Next;
end;
while not ADOTable1.Eof do
begin
if ADOTable1.FieldByName('title').Value = 'haven' then
begin
AdoTable1.Edit;
ADOTable1.FieldByName('content').Value := Memo1.Text;
ADOTable1.Post;
break;
end;
ADOTable1.Next;
end;
解决方案 »
- 这是咋回事?
- delphi控制EXCEL,哪里出错?
- 各位大侠,俺想拦截当前界面上显示的所有Tlabel 、TEdit 类的名称、文本内容该怎么办呢?
- 如何禁止控件闪动?????????????
- ★★ 谁会进入Delphi杂志网站?必须掏钱吗? ★★
- 关于数据排序的问题!谢谢大家!
- FastReport变量在运行时赋值,要进行怎么样编码?
- 调查:有多少人希望用中文(母语)来写Delphi程序
- 如何通过发消息的办法来取得powerBuilder中pbdw窗口的中的数据
- 如何关闭 CreateProcess 创建的线程?
- 要限定某一时间段,怎样实现?
- 高分讨论,bcb & delphi?????----------------high score!!!!!!!!
to line:active已经true了
ADOTable1.First; 什么时候该写了什么时候再Edit先Edit好 再干那干这然后再写那是不可能的因为你指针一移动Edit马上就无效@_@