| 网站首页 | 资讯 | Hack | 漏洞 | 网管 | 编程 | 培训 | 品黑页 | 软件 | 论坛 | 动画 | 视频 | 经典 | 教学站 | 黑客点睛 | 
服务导航 我要发布 主力频道 空间域名 精华收集 服务器出租 黑客培训 光盘刻录 特色服务 解决方案 我要投诉
您现在的位置: 华夏黑客同盟 >> 编程 >> Delphi >> 正文 用户登录 新用户注册
WINDOWS编程技巧之DELPHI篇         ★★★ 【字体:
WINDOWS编程技巧之DELPHI篇
作者:不详 文章来源:华盟收集 点击数: 更新时间:2007-5-16

一、隐藏任务栏
在WINDOWS中,系统的任务栏本质上也是一个窗口,其窗口类名为“Shell_TrayWnd"。要实现对它的操作,可通过API函数FindWindow和ShowWindow来达到目的。

var
wndHandle:THandle;
wndClass:Array[0..50] of char;
begin
StrPCopy(@wndClass[0],'Shell_TrayWnd');
wndHandle:=FindWindow(@wndClass[0],nil);
ShowWindow(wndHandle,SW_HIDE);   //sw_restore
end;


二、隐藏桌面上的快捷方式
跟任务栏一样,桌面其实也是一个窗口,它的类名为“ProgMan”,同样用FindWindow找到窗口句柄,再邮ShowWindow来决定是否显示。

三、获取任务栏尺寸及位置
用FindWindow找到句柄,再用GetWindowRect获取当前任务栏尺寸大小。
GetWindowRect(HWND hWnd,    //所求窗口的句柄
              LPRECT lpRect   //存储窗口坐标的结构体的地址
             ):Boolean;

四、获取CPU信息
CPU的相关信息是存储在一个结构体中的,这个结构体由DELPHI用TSYSTEMINFO进行了封装,定义如下:
typedef struct_SYSTEM_INFO{
  union{
 DWORD dwOemId;                    //已改用如下结构体分支来代替这个变量的使用了
        struct{
            WORD wProcessorArchitecture; //表示处理器的架构
            word wReserved;        //保留字
        };
   };
 DWORD swPageSiae;            //分页大小
 LPVOID lpMinimumApplicationAddress;   //应用程序和动态链接库可以访问的最小地址
 LPVOID lpMaximumApplicationAddress;   //应用程序和动态链接库可以访问的最大地址
 DWORD  swActiveProcessorMask;      //活动处理器的掩码
 DWORD  dwNumberOfProcessors;       //处理器的数目
 DWORD  dwProcessorType;         //处理器的类别
 DWORD  dwAllocationGranularity;     //虚拟内存地址分配的间隔
 WORD   wProcessorLevel;         //处理器的级别
 WORD   wProcessorRevision;       //处理器修改信息
 }SYSTEM_INFO;
其中dwProcessorType由wProcessorArchitecture、wProcessorLevel和wProcessorRevision三个成员来确定,其值为:
  PROCESSOR_INTEL_386:INTEL80386系列;
  PROCESSOR_ITNEL_486:INTEL80486系列;
  PROCESSOR_INTEL_PENTIUM:INTEL PENTIUM系列;
  PROCESSOR_MIPS_R4000:MIPS的4000系列(仅适用于WINDOWS NT);
  PROCESSOR_ALPHA_21064:ALPHA的21064系列(仅适用于WINDOWS NT);

另外,获得CPU信息调用API函数GetSystemInfo即可。

五、获取内存信息。
与获取CPU一样,系统依然采用了一个结构体来存储内存信息。这个存储内在状态信息的体定义下如:
typedef struct_MEMORYSTATUS{
 DWORD dwLength;            //SIZEOF(MEMORYSTATUS)即本结构体的大小
 DWORD dwMemoryLoad;        //当前使用内存与总内在的百分比
 DWORD dwTotalPhys;     //总物理内存大小
 DWORD dwAvailPhys;     //可用物理内存大小
 DWORD dwTotalPageFile;   //总页面文件的大小
 DWORD dwAvailPageFile;   //可用页面文件的大小
 DWORD dwTotalVirtual;    //总虚拟内存的大小
 DWORD dwAvailVirtual;    //可用虚拟内存的大小
}MEMORYSTATUS,*LPMEMORYSTATUS;

最后调用API函数GlobalMemoryStatus来获取内存信息。

[1] [2] 下一页

责任编辑:朱倩  联系方式  Email:朱倩
电话:51228163
  • 上一篇编程:

  • 下一篇编程:
  • (只显示最新5条。评论内容只代表网友观点,与本站立场无关!)
    姓 名:
    * 游客填写  ·注册用户
    主 页:
    评 分:
    1分 2分 3分 4分 5分
    评论内容:
    验证码: *
  • 请遵守《互联网电子公告服务管理规定》及中华人民共和国其他各项有关法律法规。
  • 严禁发表危害国家安全、损害国家利益、破坏民族团结、破坏国家宗教政策、破坏社会稳定、侮辱、诽谤、教唆、淫秽等内容的评论 。
  • 用户需对自己在使用本站服务过程中的行为承担法律责任(直接或间接导致的)。
  • 本站管理员有权保留或删除评论内容。
  • 评论内容只代表网友个人观点,与本网站立场无关。
  • 最新hack更新
    最新推荐资讯
    相关编程
    木马DIY之代码藏后门
    Delphi下读取网卡的MAC
    Delphi属性函数事件参考
    delphi写匿名管道简单木马
    delphi播放mp3背景音乐代码
    Delphi的屏幕抓图技术
    Delphi进行OpenGL编程
    Delphi开发网络数据库
    Delphi开发网络数据库
    Delphi编程3DS动画播放
    最新会员软件
    最新推荐视频
    最新推荐动画

    Copyright @ 2005 77169.Net Inc. All rights reserved. 华夏黑客同盟 版权所有
    北京市电信通提供网络带宽

    mailto:webmaster@77169.net
    咨询QQ号:836982 / 59280880
    联系站长 QQ38588913
    热线电话: 86-10-67634029/676229433
    京ICP证041431号