Убить по дескриптору окна:
Код:
var PID:Cardinal;
hProc:Cardinal;
begin
GetWindowThreadProcessId(Handle,PID);
hProc:=OpenProcess(PROCESS_TERMINATE,true,PID);
TerminateProcess(hProc,0);
end;
Если же нужно закрыть форму, то используй
FindWindow, а потом CloseWindow ( ну или DestroyWindow)