一.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;