myamanda

摘要： 调用ProcessMessages方法可以中断应用程序的执行,将控制权交给系统,使之可以响应其他事件。这样,调用ProcessMessages方法时若发生了其他事件,Windows可以有时间来处理这些事件。调用该方法可以轮转Windows的消息环,当消息环为空时,应用程序将控制权交还给应用程序。系统忽略正在处理的消息,但是,它只影响调用了ProcessMessages方法的应用程序,而不影响其他应... 阅读全文

摘要： 在实际应用中，我们经常需要多个程序相互配合来完成某些特定功能。例如两个应用程序间的同步、互斥；应用程序在起第二份实例时的参数自动传递…。要实现这些功能，就必须能实现程序间的数据传递。 有些特殊的高级技术可在不同的程序间传递数据，如剪贴板、动态数据交换以及OLE自动化，但有条件限制并且相对较复杂。这里，我介绍三种有效的底层技术，希望对编程爱好者有所帮助。 利用WM_COPYDATA消... 阅读全文

摘要： 在学校机房的管理中,让老师和机房管理人员头痛的一个问题是,学生不按照老师的要求完成本节课的内容,而在玩游戏或运行一些非法程序(若大一个机房靠一两个教师是难与控制学生的)。 本人经过对策略编辑器的分析，与及对注册表的反复推敲，找出了WIN9X中控制对未授权用运行程序的限制，希望能对你有所帮助。 原理：在注册表中有一个关键字（'Hkey_current_usersoftwaremicrosoftwi... 阅读全文

摘要： ----在许多系统中，出于安全或其它原因，常常要求随时对键盘进行监控，一个专业的监控程序必须具备两点，一是实时；二是作为指示图标运行。实际应用中把利用Hook（即钩子）技术编写的应用程序添加到Windows的任务栏的指示区中就能够很好的达到这个目的。我在参考了API帮助文档基础上，根据在Delphi开发环境中的具体实现分别对这两部分进行详细论述。 一、Hook(钩子)的实现： 　　 　　Hook... 阅读全文

摘要： ---- 实际上Windows的屏幕保护程序也是一个可执行文件，只不过扩展名是 .SCR而不是.EXE。但是它也应满足一定的要求，以便提供给控制面板合适的接口。使得用户可以在显示器的“属性”中选择和配置它。通常它应满足以下要求： ---- 1、包含有关于自己的设置； ---- 2、提供关于自己的描述； ---- 3、能够区分是激活状态还是配置状态； ---- 4... 阅读全文

摘要： 在程序运行过程中启动控制面板的各个设置功能：var x:cardinal;begin{启动控制面板}x:=winexec('rundll32.exe shell32.dll,Control_RunDLL',9);{辅助选项 属性-键盘}x:=winexec('rundll32.exe shell32.dll,Control_RunDLL access.cpl,,1',9);{辅助选项 属性... 阅读全文

摘要： 更改Windows的墙纸。 　　在Delphi中你可以很方便地更改墙纸，请参考以下的程序。　　procedureChangeIt；　　var　　Reg：TregIniFile；　　begin　　Reg：ΚTRegIniFile．Create（′ControlPanel′）；　　Reg．WriteString（′desktop′，′... 阅读全文

摘要： const SECURITY_NT_AUTHORITY: TSIDIdentifierAuthority = (Value: (0, 0, 0, 0, 0, 5)); SECURITY_BUILTIN_DOMAIN_RID = $00000020; DOMAIN_ALIAS_RID_ADMINS = $00000220; function IsAdmin: Boolean; var hAcc... 阅读全文

摘要： 文件的应用程序关联储存在Windows的注册表中。要获取此信息我们先要找回文件扩展名所在处的“Class”。这些信息可在此获得：HKEY_CLASSES_ROOT\.ext\(default) 这里的".ext"就是你想找的文件的扩展名(如".txt", ".bmp"等)。接着我们可获取打开该类文件的命令行，可在此下获得有关数据：HKEY_CLASSES_ROOT\cl... 阅读全文

摘要： 一种方法就是将应用程序直接加到开始菜单的启动菜单中。此外。你还可以在注册表中添加适当的键并赋值，就像以下所示：procedure TForm1.Button1Click(Sender: TObject); begin SetRegistryData(HKEY_LOCAL_MACHINE, 'Software\Microsoft\Windows\CurrentVersion\Run', App... 阅读全文