Prompt DOS

Bom dia, se alguém puder ajudar com este caso, agradeço.

Tenho que abrir várias chamadas por bat, pois são aplicações DOS e existe alguns critérios que não tenho como correr disso, o meu problema é evitar que abram a mesma janela inumeras vezes. Se encontrar, abrir a mesma existente.

Quando executo o comando abaixo :

ShellExecute(0,'open',StrPCopy(St,'c:\menugp\bats\depped2.bat'),'Teste',nil,SW_SHOW);

Abre um prompt e com o nome superior sempre "C:\WINDOWS\SYSTEM32\CMD.EXE" e não consigo pegar mais esta janela. Alguém sabe como posso resolver isso.

Detalhe, pensei identificar pelo Handle, mas não sei como fazer.

ShellExecute(0=Handle,'open',StrPCopy(St,'c:\menugp\bats\depped2.bat'),'Teste',nil,SW_SHOW);

Obrigado e Agradeço se alguem souber como ajudar

Andre