小编KE5*_*E50的帖子

目的:

1. 单击TRxDBCombo上的按钮以调用搜索框
2. 在从搜索框中选择记录时,结果将设置为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;

设置包括:

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

请协助

我一直在尝试使用下面的代码将存储在varbinary mssql列中的图像数据加载到TImage组件,但是它给出了一个错误

 with Query_Refresh do
   Begin
     close;
     open;
     if RecordCount > 0 then
       Begin
         //Edit to allow the streaming of the fields
         Edit;

         //MyStream is of Type TStream
         MyStream := CreateBlobStream(FieldByName('MyBlobField'),bmWrite);

         //Loading to the image --- Error occurs on the line below
         MyImage.Picture.Graphic.LoadFromStream(MyStream);
       End;
   End;

错误是访问冲突....

请有人协助如何做到这一点

有一个看起来像的程序

Procedure TestProc(TVar1, TVar2 : variant);
Begin
  TVar1 := CreateOleObject('Excel.Application');
  TVar1.Workbooks.open('C:\Test\Test.xls');
  TVar1.Workbooks[1].Worksheets[1].Name := 'Sheet_1';
  TVar2 := TVar1.Workbooks[1].Worksheets['Sheet_1'];
End;

注意:TVar1和TVar2是全局变量

在按钮的onclick事件中调用该过程然后使用创建的对象不起作用

难道delphi不允许创建具有变量参数的过程吗？