¿Sabes cómo ejecutar aplicaciones Delphi con parámetros?

Aunque era mucho más común en los días del DOS, los sistemas operativos modernos también le permiten ejecutar parámetros de línea de comandos contra una aplicación para que pueda especificar qué debe hacer la aplicación.

 

Lo mismo es cierto para su aplicación Delphi, ya sea para una aplicación de consola o una con una GUI. Puede pasar un parámetro desde el Símbolo del sistema en Windows o desde el entorno de desarrollo en Delphi, en la opción de menú Ejecutar > Parámetros.

 

Para este tutorial, usaremos el cuadro de diálogo de parámetros para pasar los argumentos de la línea de comandos a una aplicación, de modo que sea como si la estuviéramos ejecutando desde el Explorador de Windows.

ParamCount y ParamStr()

La función ParamCount devuelve el número de parámetros pasados al programa en la línea de comandos, y ParamStr devuelve un parámetro especificado desde la línea de comandos.

 

El manejador de eventos OnActivate del formulario principal es normalmente donde están disponibles los parámetros. Cuando la aplicación se está ejecutando, es allí donde se pueden recuperar.

 

Tenga en cuenta que, en un programa, la variable CmdLine contiene una cadena con argumentos de línea de comandos especificados cuando se inició la aplicación. Puede utilizar CmdLine para acceder a toda la cadena de parámetros pasada a una aplicación.

Ejemplo de aplicación

Inicie un nuevo proyecto y coloque un componente Button en el formulario. En el manejador de eventos OnClick del botón, escriba el siguiente código:

 

 procedure TForm1.Button1Click(Sender: TObject) ;

begin

ShowMessage(ParamStr(0)) ;

end;

 

Al ejecutar el programa y hacer clic en el botón, aparece un cuadro de mensaje con la ruta y el nombre de archivo del programa en ejecución. Puede ver que ParamStr "funciona" incluso si no ha pasado ningún parámetro a la aplicación; esto se debe a que el valor de array 0 almacena el nombre de archivo de la aplicación ejecutable, incluida la información de ruta.

 

Seleccione Parámetros en el menú Ejecutar y, a continuación, añada la Programación Delphi a la lista desplegable.

Nota: Recuerde que cuando pase parámetros a su aplicación, sepárelos con espacios o tabulaciones. Utilice comillas dobles para ajustar varias palabras como un parámetro, como cuando utilice nombres de archivo largos que contengan espacios.

 

El siguiente paso es recorrer los parámetros usando ParamCount() para obtener el valor de los parámetros usando ParamStr(i).

 

Cambie el manejador de eventos OnClick del botón a este:

 

 procedure TForm1.Button1Click(Sender: TObject) ;

var

j:integer;

begin

for j := 1 to ParamCount do

ShowMessage(ParamStr(j)) ;

end;

 

Al ejecutar el programa y hacer clic en el botón, aparece un mensaje que dice "Delphi" (primer parámetro) y "Programación" (segundo parámetro).

(0 votes)