Delphi
清水迎朝阳
多年windows下c++客户端开发,或多或少踩了很多坑,积累了一些经验
展开
-
设置一个按钮,实现关机功能
通过调用Windows 函数 WinExec(shutdown -s -t 0, sw_Show) 实现 具体参考资料:http://www.tobgood.com/Neil/784.html原创 2009-09-18 17:12:00 · 949 阅读 · 0 评论 -
关机之前,系统发出的消息
当用户关闭操作系统时,操作系统会发布一个WM_QueryEndSession消息。 程序可以通过设置消息的返回值为0,来禁止用户关闭操作系统,反之为1,就会允许用户关闭操作系统,默认值为1 由于程序中要使用到消息, 所以,USES项中要把Messages 加入。 unit Unit1; interface us原创 2009-09-18 16:00:00 · 1154 阅读 · 0 评论 -
Delphi 隐藏窗口表单
我一开始以为,将表单设置为隐藏,可以在表单创建事件中即FormCreate(Sender:TObject)去设置 因此, 我在这个procedure TForm.FormCreate(Sender:TObject)中, 想用一下两种方式实现 即: 调用 from.Hide 或设置 form.Visible原创 2009-09-18 16:56:00 · 1655 阅读 · 1 评论 -
利用注册表 将程序设置为开机启动项目
可以在FormCreate中进行设置 uses ..... Registry; procedure TForm.FormCreate(Sender: TObject);varreg:TRegistry; // 注意此处,因为要用到Registry , 所以需要在USES 单元中添加Registry 类 否则会有红底线提示错误原创 2009-09-18 17:15:00 · 1323 阅读 · 0 评论 -
设置表单的透明度
方法一: 表单属性有两项: AlphaBlend: ........ 控制是否透明 AlphaBlendValue:。。。。 设置透明度 比如: Form1.color:=clWhite..........设置透明颜色 Form1.AlphaBlendValue:=Tr原创 2009-09-21 09:43:00 · 4470 阅读 · 0 评论 -
如何防止135端口入侵
<br />新学期到了,许多学生都要配机,新电脑的安全防卫做好了吗?能不能拒绝成为黑客的肉鸡?令人遗憾的是,很多新手都不知道或者忽视了对敏感端口的屏蔽。例如135端口,一旦黑客利用135端口进入你的电脑,就能成功地控制你的机子。我们应该如何防范通过135端口入侵呢?下面我们就为大家来揭开谜底。 <br /><br /> 小知识:每台互联网中的计算机系统,都会同时打开多个网络端口,端口就像出入房间的门一样。因为房间的门用于方便人们的进出,而端口则为不同的网路服务提供数据交换。正如房间的门可以放进小tou一样转载 2010-10-04 11:55:00 · 2391 阅读 · 1 评论 -
自己设置的开机启动 关机提示程序
unit Unit3; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,Registry; type TForm3 = class(TForm) Label1: TLabel;原创 2009-09-18 17:33:00 · 982 阅读 · 0 评论