CodeBus
www.codebus.net
Search
Sign in
Sign up
Hot Search :
Source
embeded
web
remote control
p2p
game
More...
Location :
Home
Search - exitprocess
Main Category
SourceCode
Documents
Books
WEB Code
Develop Tools
Other resource
Search - exitprocess - List
[
Process-Thread
]
exitprocess
DL : 0
查找结和结束进程!!VC-search process node and end! ! VC
Date
: 2008-10-13
Size
: 89.44kb
User
:
李宁
[
Process-Thread
]
TerminateProcess
DL : 0
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
:
黄春标
[
Process-Thread
]
VirtualMemory
DL : 0
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
:
黄春标
[
Process-Thread
]
exitprocess
DL : 0
查找结和结束进程!!VC-search process node and end! ! VC
Date
: 2026-01-10
Size
: 89kb
User
:
李宁
[
Process-Thread
]
VirtualMemory
DL : 0
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.