有个问题。利用 FExcelApp, FWorkBook, FWSheet: Variant;
FExcelApp := CreateOleObject('Excel.Application');
FWorkBook := CreateOleObject('Excel.Sheet');
处理调用 的 Excel
现在有个这样的了要求,就是用户点击右上角的关闭时,要给用户提示,并且使用关闭功能失效
只能通过程序来关闭,怎么做。
FExcelApp := CreateOleObject('Excel.Application');
FWorkBook := CreateOleObject('Excel.Sheet');
处理调用 的 Excel
现在有个这样的了要求,就是用户点击右上角的关闭时,要给用户提示,并且使用关闭功能失效
只能通过程序来关闭,怎么做。
解决方案 »
- 关于'字符串与数据库中某字段中所有的值进行比较'的问题?
- 问版主一个问题,quickreport做成ocx后,能预览,关闭预览时出错,提示找不到父窗口,不信的话,大侠你们试试
- 一个很让我深思的问题,请帮忙?
- 这是一个递归复制文件夹的函数,请帮忙看一下怎么才能知道函数完全执行完了,如果中途停止,应该在哪里写Result:=False,
- 参数问题
- 请问如何增加新的控件的操作方法!
- 怎样让treeview中不同级的节点按不同的规则排序?
- 数据库引擎错误(BDE)
- WebBrowser获得焦点的问题!
- Delphi怎么从进程中获取QQ号码?
- 谁有 介绍DrawCell 事件的 delphi电子书?
- 像QQ那样,任务栏可以显示多个图标,如何实现
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#做不了,所以没法帮你测试了