command-line arguments

[Otto]

Is there a function which returns the command-line arguments specified when the program was launched.

text.exe ABC

prg

Local cTest :=""
cTest:=command()

Regards
Otto

[Enrico Maria Giordano]

This is a sample:

Code: Select all  Expand view  RUN

FUNCTION MAIN( cPar1, cPar2, cPar3 )

    LOCAL i

    ? cPar1, cPar2, cPar3
    ?

    FOR i = 0 TO HB_ARGC()
        ? HB_ARGV( i )
    NEXT

    ?

    RETURN NIL

EMG

[Frank Demont]

Code: Select all  Expand view  RUN

#include "FiveWin.Ch"
FUNCTION MAIN(...)
*************
LOCAL Arr := Hb_Aparams()
AEVAL(Arr,{|j|msginfo(j)})
RETURN


[Otto]

Thank you.
Otto