| 技术论坛 |
|
|
| ≡技术区≡ ① |
| DELPHI技术 |
| lazarus/fpc/Free Pascal |
| 移动应用开发 |
| Web应用开发 |
| 数据库专区 |
| 报表专区 |
| 网络通讯 |
| 开源项目 |
| 论坛精华贴 |
| ≡发布区≡ ② |
| 发布代码 |
| 发布控件 |
| 文档资料 |
| 经典工具 |
| ≡事务区≡ ③ |
| 网站意见 |
| 盒子之家 |
| 招聘应聘 |
| 信息交换 |
| 论坛信息 |
|||
|
| 导航： | 论坛 -> DELPHI技术 斑竹:liumazi,sephil | |||||
| 作者： |
|
2004/1/15 21:56:44 | ||||
| 标题： |
|
加入我的收藏 | ||||
| 楼主： | 高手帮忙： 窗口的标题栏不见后，但还是能通过ALT+F4来关闭，怎么样才禁止掉？ ---------------------------------------------- 因为笨，所以问！ |
|||||
| 作者： |
|
2004/1/15 22:16:23 | ||||
| 1楼： | 啊 这个偶也不知道了 帮你找找吧 ----------------------------------------------  
|
|||||
| 作者： |
|
2004/1/16 7:57:48 | ||||
| 2楼： | VERY EASY! procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin action:=canone; end; 不过为了让程序能够关闭，最好再加个按钮 procedure TForm1.Button1Click(Sender: TObject); begin application.Terminate; end; ---------------------------------------------- 秋风清 秋月明，几上闲琴黯生尘。 夜来忽忆少年事，陌上柳绿草青青。 相逢一笑言未语，携手相看自倾心。 二十二载云烟里，云含风韵烟含情。 风尘渺落风霜浸，但闻长空雁长鸣。 姿容如花颜如玉，只在平生梦里寻。 秋风清 秋月明，秋灯秋雨愁煞人。 天涯路远人何在，午夜梦回空扰惊。 |
|||||
| 作者： |
|
2004/1/16 9:44:01 | ||||
| 3楼： | Very Easy!! procedure TForm1.Button1Click(Sender: TObject); var tmp:integer; begin tmp:=0; SystemParametersInfo(SPI_SCREENSAVERRUNNINH,1,@tmp,0); end; ---------------------------------------------- -勉而好学，不耻下问 |
|||||
| 作者： |
|
2004/1/16 20:10:56 | ||||
| 4楼： | 谢谢几位高手！ ---------------------------------------------- 因为笨，所以问！ |
|||||
| 作者： |
|
2004/1/16 21:21:02 | ||||
| 5楼： | 本人为毕业设计的事苦恼。用delphi编写网络五子棋。有点头绪的朋友请帮帮我！！ ---------------------------------------------- 您好！ |
|||||
| 作者： |
|
2004/1/17 10:22:55 | ||||
| 6楼： | procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin action:=canone; end; 这个方法好用，我也试过。 ---------------------------------------------- - |
|||||
| 作者： |
|
2004/2/13 16:21:57 | ||||
| 7楼： | 老大！我的需要要关掉本身这个窗口怎么办？而这个不是主窗体 ---------------------------------------------- ~~~~~我爱delphi就像爱我的她~~~~~ |
|||||
| 作者： |
|
2004/3/24 10:29:30 | ||||
| 8楼： | 呵呵，惨了。用了这种方法后 我的登录窗口是关不掉了 呵呵 主窗口也出来了 倒了 请问一下，那个登录窗口关闭时，主窗口总是会闪一下啊 不知道是为什么啊？ 谁能跟我说说呀，多谢了！ ---------------------------------------------- - |
|||||
| 作者： |
|
2004/3/24 13:25:04 | ||||
| 9楼： | try this: procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;Shift: TShiftState); begin if (ssAlt in shift)and(key=115) then key:=0; end; ---------------------------------------------- - |
|||||
| 作者： |
|
2004/3/24 13:30:02 | ||||
| 10楼： | 你的主窗口是不是用了图片作背景哦 ---------------------------------------------- 中流一壶，千金争挈。宁为铅刀，毋为楮叶。错节盘根，利器斯别。识时务者，呼为俊杰！ |
|||||
| 作者： |
|
2004/3/24 16:11:46 | ||||
| 11楼： | 这和图片设背景有什么关系？ ---------------------------------------------- - |
|||||
| 信息 |
| 登陆以后才能回复 |
