uIPluginForm.pas 930 B

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152
  1. unit uIPluginForm;
  2. interface
  3. type
  4. /// <summary>
  5. /// 基本窗体插件
  6. /// </summary>
  7. IPluginForm = interface(IInterface)
  8. ['{27DDB6A4-7D2F-4026-AA95-EBB995E573AC}']
  9. /// <summary>
  10. /// MDI方式显示窗体
  11. /// </summary>
  12. procedure showAsMDI; stdcall;
  13. /// <summary>
  14. /// showModal方式显示窗体
  15. /// </summary>
  16. function showAsModal: Integer; stdcall;
  17. /// <summary>
  18. /// 显示窗体
  19. /// </summary>
  20. procedure showAsNormal(); stdcall;
  21. /// <summary>
  22. /// 关闭窗体
  23. /// </summary>
  24. procedure closeForm; stdcall;
  25. /// <summary>
  26. /// 释放窗体
  27. /// </summary>
  28. procedure freeObject; stdcall;
  29. /// <summary>
  30. /// 获取窗体对象
  31. /// </summary>
  32. function getObject:TObject; stdcall;
  33. /// <summary>
  34. /// 获取对象唯一ID, 由窗体创建时随机产生
  35. /// </summary>
  36. function getInstanceID: string; stdcall;
  37. end;
  38. implementation
  39. end.