Delphi ActiveX(ocx)控件注意事项 C#

一.Delphi的ActiveX控件编写注意事项.

   1.异常语句

  

  try
    FViews.Add(ATable);
    FDataStore.Add(TGRPGSPDataSource.Create(ATable.CreateView));

  except
     Raise Exception.Create('报表已经存在!');

  end;

 

在except代码里不能使用 "Raise Exception.Create."这样的语句

不能在处理异常时,触发异常.

否则会在C#中使用会报出:

 

************** 异常文本 **************
System.Runtime.InteropServices.COMException (0x8000FFFF): 灾难性故障 (异常来自 HRESULT:0x8000FFFF (E_UNEXPECTED))

............

 

可以添加正常的代码.例如:

 

  try
    FViews.Add(ATable);
    FDataStore.Add(TGRPGSPDataSource.Create(ATable.CreateView));

  except
    on E: Exception do
      showmessage(E.Message);
  end;

 

也可以什么代码都没有,或者是一句正常的代码.

 

  try
    FViews.Add(ATable);
    FDataStore.Add(TGRPGSPDataSource.Create(ATable.CreateView));

  except
      showmessage('程序异常!');
  end;