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
FUNCTION MAIN( cPar1, cPar2, cPar3 )
LOCAL i
? cPar1, cPar2, cPar3
?
FOR i = 0 TO HB_ARGC()
? HB_ARGV( i )
NEXT
?
RETURN NIL
#include "FiveWin.Ch"
FUNCTION MAIN(...)
*************
LOCAL Arr := Hb_Aparams()
AEVAL(Arr,{|j|msginfo(j)})
RETURN
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Google [Bot] and 45 guests