Enviar Varios archivos susesivamente a ap. externa?

[jonydread]

Hola amigos,
Tengo un problemilla que no he podido resolver, uso una aplicación externa la cual recibe de a un archivo y he estado tratando de enviarle múltiples archivos pero necesito enviarlos de a uno sucesivamente
uso una función que me paso Ecfisa para darle una entrada y salida del fichero convertido

Código Delphi [-]
Origen := listbox1.Items.Strings[i];
Destino := ChangeFileExt(Origen,'.inf');
 LlamarReg2inf(Handle,'REG2INF.EXE',Origen,Destino );

la única forma que encuentro es manual ir eliminando archivo ya convertido de la lista y darle de nuevo al botón
si alguien sabe de alguna forma agradecería mucho.
muchas gracias
Saludos!