Terminar un proceso

[softruz]

Muy buenas, estoy intentando matar un executable pero no me mata el proceso, he utilizado:

1.-

hWnd:=FindWindow(,"CdiLauncherPeripheral")
if hWnd<>0
TerminateProcess(hWnd,GetExitCodeProcess(hWnd))
end if

2.-

hWnd:=FindWindow(,"CdiLauncherPeripheral")
if hWnd<>0
TerminateProcess(hWnd)
end if

DLL32 function TerminateProcess(hProcess As LONG,uExitCode As LONG) As LONG PASCAL FROM "TerminateProcess" Lib "kernel32"
DLL32 function GetExitCodeProcess(hProcess AS LONG, lpExitCode AS LONG) AS LONG PASCAL Lib "kernel32"

PERO NINGUNA solución funciona, ¿Alguien me podría decir como puedo matar un proceso o ejecutable con ventana?

Un Saludo.

[Antonio Linares]

Prueba con:

SendMessage( hWnd, WM_CLOSE )