Hot Search : Source embeded web remote control p2p game More...
Location : Home Search - exitprocess
Search - exitprocess - List
查找结和结束进程!!VC-search process node and end! ! VC
Date : 2008-10-13 Size : 89.44kb User : 李宁

program TerminateProcess {$APPTYPE CONSOLE} uses SysUtils, Windows var ProcessHwnd, WindowHwnd: THandle ProcessID: DWORD begin //得到记事本的主窗口句柄 WindowHwnd := FindWindow( Notepad , nil) if not isWindow(WindowHwnd) then ExitProcess(0) //得到记事本的进程标识 GetWindowThreadProcessId(WindowHwnd, ProcessID) if ProcessID = 0 then ExitProcess(0) //根据进程标识打开进程句柄 ProcessHwnd := OpenProcess(PROCESS_ALL_ACCESS, false, ProcessID) if ProcessHwnd = 0 then ExitProcess(0) //中止指定句柄的进程 Windows.TerminateProcess(ProcessHwnd, 0) end.-program (TerminateProcess $ APPTYPE CONSOLE) uses SysUtils, Windows var ProcessHwnd, WindowHwnd : THandle ProcessID : DWORD begin / / notebook to be the main window handle WindowHwnd : = FindWindow (Notepad, nil) if not isWindow (WindowHwnd) then ExitProcess (0) / / notebook to be in the process logo GetWindowThreadProcessId (WindowHwnd, ProcessID) if ProcessID = 0 then ExitProcess (0) / / identification process under the process opened handle ProcessHwnd : = OpenProcess (PROCESS_ALL_ACCESS, false, ProcessID) if ProcessHwnd = 0 then ExitProcess (0) / / designated handle suspend the process Windows.TerminateProcess (ProcessHwnd, 0) end.
Date : 2008-10-13 Size : 21.19kb User : 黄春标

program VirtualMemory {$APPTYPE CONSOLE} uses SysUtils, Windows const PageSize = 4096 //定义页面大小 var VmAddress, CommitAddress: Pointer //存放虚拟内存基址 Text: Pchar begin //保留二页虚拟内存 VmAddress := VirtualAlloc(nil, PageSize * 2, MEM_RESERVE, PAGE_READWRITE) if not Assigned(VmAddress) then begin WriteLn( 保留虚拟内存失败! ) ExitProcess(0) end else WriteLn(Format( 保留虚拟内存成功, 基址为:[%8.8x]! , [Longint(VmAddress)])) //提交第二页虚拟内存 CommitAddress := Pointer(Longint(VmAddress) + PageSize) CommitAddress := VirtualAlloc(CommitAddress, PageSize, MEM_COMMIT, PAGE_READWRITE) if not Assigne-program VirtualMemory ($ APPTYPE CONSOLE) uses SysUtils, Windows const PageSize = 4096 / / definition pages size var VmAddress, CommitAddress : Pointer / / virtual memory-based storage site Text : Pchar begin / / reservations two virtual memory VmAddress : = VirtualAlloc (nil. PageSize * 2, MEM_RESERVE, PAGE_READWRITE) if not Assigned (VmAddress) then begin WriteLn (reservations virtual memory failure!) ExitProcess (0) end else WriteLn (Format (virtual memory retention success, sites : [% 8.8x ]! [Longint (VmAddress)])) / / to the second page virtual memory CommitAddress : = Pointer (Longint (VmAddress) PageSize) CommitAddress : = VirtualAlloc (CommitAddress, PageSize, MEM_COMMIT, PAGE_READWRITE) if not Assigne
Date : 2008-10-13 Size : 23.04kb User : 黄春标

查找结和结束进程!!VC-search process node and end! ! VC
Date : 2026-01-10 Size : 89kb User : 李宁

program VirtualMemory {$APPTYPE CONSOLE} uses SysUtils, Windows const PageSize = 4096 //定义页面大小 var VmAddress, CommitAddress: Pointer //存放虚拟内存基址 Text: Pchar begin //保留二页虚拟内存 VmAddress := VirtualAlloc(nil, PageSize * 2, MEM_RESERVE, PAGE_READWRITE) if not Assigned(VmAddress) then begin WriteLn( 保留虚拟内存失败! ) ExitProcess(0) end else WriteLn(Format( 保留虚拟内存成功, 基址为:[%8.8x]! , [Longint(VmAddress)])) //提交第二页虚拟内存 CommitAddress := Pointer(Longint(VmAddress) + PageSize) CommitAddress := VirtualAlloc(CommitAddress, PageSize, MEM_COMMIT, PAGE_READWRITE) if not Assigne-program VirtualMemory ($ APPTYPE CONSOLE) uses SysUtils, Windows const PageSize = 4096// definition pages size var VmAddress, CommitAddress : Pointer// virtual memory-based storage site Text : Pchar begin// reservations two virtual memory VmAddress : = VirtualAlloc (nil. PageSize* 2, MEM_RESERVE, PAGE_READWRITE) if not Assigned (VmAddress) then begin WriteLn (reservations virtual memory failure!) ExitProcess (0) end else WriteLn (Format (virtual memory retention success, sites : [% 8.8x ]! [Longint (VmAddress)]))// to the second page virtual memory CommitAddress : = Pointer (Longint (VmAddress) PageSize) CommitAddress : = VirtualAlloc (CommitAddress, PageSize, MEM_COMMIT, PAGE_READWRITE) if not Assigne
Date : 2026-01-10 Size : 23kb User : 黄春标
CodeBus is one of the largest source code repositories on the Internet!
Contact us :
1999-2046 CodeBus All Rights Reserved.