加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 大数据 > 正文

Delphi错误数据集不在插入或编辑模式下

发布时间:2020-12-15 04:14:21 所属栏目:大数据 来源:网络整理
导读:目的: 单击TRxDBCombo上的按钮以调用搜索框 在从搜索框中选择记录时,结果将设置为TComboEditBox的字段值,并发布在TRxMemoryData数据集中 错误: 第二次调用此函数时,出现不在插入或编辑模式下的数据集 TDBEditBox1.SetFocus;Form_Search:= TForm_Search.Cre
目的:

>单击TRxDBCombo上的按钮以调用搜索框
>在从搜索框中选择记录时,结果将设置为TComboEditBox的字段值,并发布在TRxMemoryData数据集中

错误:

第二次调用此函数时,出现不在插入或编辑模式下的数据集

TDBEditBox1.SetFocus;
Form_Search:= TForm_Search.Create(Application);
with Form_Search do
  Begin
    showmodal;
    //Get Result from Database
    if trim(TempResult) <> '' then
      Begin
        TDBEditBox1.Field.Value := MResult;
      End;
  End;

设置包括:

>将数据源连接到TDataSource的TJvDBGrid
> TDataSource已连接到TRxMemoryData
>在上面的步骤2中将TRxDBComboEdit及其数据源设置为TDataSource

请协助

解决方法

由于以下行,错误即将发生:
TDBEditBox1.Field.Value:= MResult;在此行,您的数据集不处于“插入”或“编辑”模式.您可以添加以下检查以避免此错误:
if not (TDBEditBox1.DataSource.DataSet.State in [dsEdit,dsInsert]) then
begin
  TDBEditBox1.DataSource.DataSet.Edit;
  // Or TDBEditBox1. DataSource.DataSet.Insert; depending on the operation you are doing (Edit or Insert) 
end;
TDBEditBox1.Field.Value := MResult;

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读