摘要： 远程开机再配合远程控制 procedure TForm1.Button2Click(Sender: TObject);var vBuf:array[0..101] of char; i,j:integer;begin //包的格式很简单，在以太网包的任何位置上， //以6个FF为先导，后面跟相应MA 阅读全文

摘要： 用MODEM拨号上网，仍是大多数个人网民选择上网的方式．如果能在我们的应用程序中启动拨号连接（如IE浏览器程序中的自动拨号功能），无疑将会方便我们的软件用户（不用再切换应用程序，运行拨号网络），提高我们的软件的友好性从而提高软件的竞争力． 在WIN9X下，如果安装了拨号网络，则在WINDOWS系统的 阅读全文

摘要： 模拟键盘我们用Keybd_event这个api函数，模拟鼠标按键用mouse_event函数. Keybd_event函数能触发一个按键事件，也就是会产生一个WM_KEYDOWN或WM_KEYUP消息,一般用这两个消息来模拟一 次按键(按键的过程是:按下,然后弹起)，但是没有直接用这个函数方便。Ke 阅读全文

摘要： 远程控制篇：抓取远程屏幕图像 {抓屏幕图像，保存为内存流--BMP流,压缩BMP流,JPG流，以及使用流}{在网络中传送BMP流和JPG流的速度没测试过}{BMP流的压缩是无损压缩}{全局变量memoryStream:TMemoryStream;memoryStream:=TMemoryStream 阅读全文

摘要： 这里有种办法供你选择：1、打开注册表(regedit)，在HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer 下新增一个键值： 键值名称：NoSaveSettings 键值数据类型：DWORD 键 阅读全文

摘要： Delphi 调用netsh命令修改IP地址 先介绍一下Netsh命令的使用方法: 在这里跟大家介绍几个简单的指令 1.Show IP 1.1Cmd Mode 直接在cmd下面输入 netsh interface ip show address 亦可简写为 netsh int ip sh ad 看看 阅读全文

摘要： 监视进程并结束进程在很多地方都用到这里借前人的经验写了个小例子: 以QQ的进程qq.exe为例 关键代码如下: function CheckTask(ExeFileName: string): Boolean; const PROCESS_TERMINATE=$0001; var ContinueL 阅读全文

摘要： unit NetFunc; interface uses SysUtils, Windows, dialogs, winsock, Classes, ComObj, WinInet, Variants; //错误信息常量 const C_Err_GetLocalIp = '获取本地ip失败'; C_ 阅读全文

摘要： RenameFile,DeleteFile,MoveFile Delphi的移动文件方法 uses ShellApi;procedure ShellFileOperation(fromFile: string; toFile: string; Flags: Integer);var shellinf 阅读全文

摘要： 1 ShellApi CreateDirectory(PChar(ExtractFilePath(ParamStr(0))+’Test’),nil);2. 删除 在程序运行过程中，单击“删除”按钮就可以将新创建的test子目录删除，响应代码如下： procedure TForm1.btnDelete 阅读全文