ejecutar ap.ext. dir. y nombre in & outfile

[jonydread]

algo enredado el titulo pero trate de ser algo especifico y no lo pude editar despues,
lo que pasa ejecuto programa externo que convierte archivo segun estos parametros en un bat

set WORKFILE=%~1
set OUTFILE=%~dpn1.inf
CD /D %~dp1

:doit
Echo.
Echo ** Converting "%~nx1" ...
reg2inf.exe "%WORKFILE%" "%OUTFILE%"
Echo.
PAUSE
goto end

queria saber si se puede hacer lo mismo en codigo delphi
algo asi como un shellexecute que tome el archivo de entrada %WORKFILE% y salga con %OUTFILE%
tengo solo una parte mas o menos clara
%WORKFILE% podria ponerlo como Opendialog1.FileName o ParamStr(1)
pero
%OUTFILE% ??? debe tener otra extension (en bat set OUTFILE=%~dpn1.inf) y quedar en el mismo directorio de workfile en (bat CD /D %~dp1)
demas no se bien como realizar esta parte, mas bien estoy bien nulo
reg2inf.exe "%WORKFILE%" "%OUTFILE%"

saludos!
Gracias!