Página 1 de 1

Programa con Parámetros (Delphi)

Publicado: 27 Mar 2010, 20:33
por D@rB-15
Hola!, hoy simplemente vengo a explicar como ejecutar un programa hecho en Delphi con parámetros.
Que es un parámetro? un ejemplo simple es cuando usamos el UPX desde la consola de Windows:

Código: Seleccionar todo

UPX.exe -9 archivo.exe
Como pueden ver estamos ejecutando el programa UPX.exe con los parámetro -9 y archivo.exe.

Para hacer eso con un programa de Delphi, se usa la función ParamStr()

Código: Seleccionar todo

Function ParamStr(ParmIndex: Integer): String;
Por lo tanto:
ParamStr(0) devuelve la ruta desde donde se esta ejecutando nuestro programa.
ParamStr(1) devuelve el primer parámetro.
ParamStr(2) devuelve un segundo parámetro y asi podemos continuar...

Un ejemplo:

Código: Seleccionar todo

Program Parametro;

Begin
  If (ParamStr(1)) = '-msg' Then
    Begin
      WriteLn(ParamStr(2));
    End;
End.
Lo podemos ejecutar desde la consola de Windows de esta forma:

Código: Seleccionar todo

Parametro.exe -msg Hola
El programa entonces escribira Hola en la consola :D
asi de facil, espero que hayan ententido.

Saludos

Re: Programa con Parámetros (Delphi)

Publicado: 31 Mar 2010, 22:01
por xepii
mmmmm nose si sera igual que en java los argumentos :S mm pero si no es asi podrias ponerme un ejemplito en java porfavor ¿?.. un saludo y gracias

Re: Programa con Parámetros (Delphi)

Publicado: 31 Mar 2010, 22:07
por D@rB-15
Lo haría si supiera Java
Saludos

Re: Programa con Parámetros (Delphi)

Publicado: 31 Mar 2010, 22:41
por Snopk
Para al que quiere hacer esto en VB6, Se puede hacer con la función Command(), un ejemplo:

Código: Seleccionar todo

Option Explicit

Private Sub Form_Load()

Dim Parametros()            As String
Dim x                       As Integer

Parametros = Split(Command(), " ")

For x = LBound(Parametros) To UBound(Parametros)
    MsgBox Parametros(x)
Next x

End Sub

Saludos.

Re: Programa con Parámetros (Delphi)

Publicado: 03 Abr 2010, 12:32
por xepii
ok gracias de todas maneras d@rb ;)