Cita:
Empezado por jonydread
me sale un error en Código Delphi [-] Origen:= AnsiReplaceStr(GetShortName(Origen), ' ', '');
Destino:= ChangeFileExt(Origen, '.inf');
|
Es extraño, no sé como lo estés implementando... A mi me funciona perfectamente.
Para que puedas estudiar el código con tranquilidad te adjunto los fuentes. Como no tengo el archivo
reg2inf.exe realizé una aplicación de consola en Delphi con igual nombre que lo único que hace es mostrar ParamStr(1) y ParamStr(2).
Pero para no adjuntarte el ejecutable desactivé la llamada a
ShellExecute reemplazándola por un simple
ShowMessage que muestra
Origen y
Destino, al ser estos correctos (sólo diferenciarse en la extensión) , si existe un error es ajeno al código.
Un saludo.