delphi 打开Excel问题
有个问题。利用 FExcelApp, FWorkBook, FWSheet: Variant;
FExcelApp := CreateOleObject('Excel.Application');
FWorkBook := CreateOleObject('Excel.Sheet');
处理调用 的 Excel
现在有个这样的了要求，就是用户点击右上角的关闭时，要给用户提示，并且使用关闭功能失效
只能通过程序来关闭，怎么做。
[解决办法]
我身边没有delphi环境，刚用c#做了个测试可以将标题栏的关闭按钮禁用，你可以参考下
public Form1()
{
InitializeComponent();
IntPtr hMenu = GetSystemMenu(this.Handle, 0);
RemoveMenu(hMenu, SC_CLOSE, MF_BYCOMMAND);
}
[DllImport("USER32.DLL")]
private static extern IntPtr GetSystemMenu(IntPtr hWnd, UInt32 bRevert);
[DllImport("USER32.DLL")]
private static extern UInt32 RemoveMenu(IntPtr hMenu, UInt32 nPosition, UInt32 wFlags);
private const UInt32 SC_CLOSE = 0x0000F060;
private const UInt32 MF_BYCOMMAND = 0x00000000;
至于全局钩子，C#做不了，所以没法帮你测试了
[解决办法]
用钩子截获关闭消息，然后重载一下就可以！
