Larry,
Sorry, In my haste, I didn't declare and check the function correctly when
Alias is used.
Use This:
if (chkfunc('GetCommandLineA')) = 0 then
stdcall function 'GetCommandLineA' alias 'GetCommandLine' () : TEXT
endif
SET VAR vresult = (dlcall('Kernel32', 'GetCommandLineA'))
RETURN
----- Original Message -----
From: "MikeB" <[EMAIL PROTECTED]>
To: "RBASE-L Mailing List" <[email protected]>
Sent: Tuesday, June 24, 2008 1:07 PM
Subject: [RBASE-L] - Re: Compiler -- get command line arguments
> Try This:
>
>
> if (chkfunc('GetCommandLine')) = 0 then
> stdcall function 'GetCommandLineA' alias 'GetCommandLine' () : TEXT
> endif
>
> SET VAR vresult = (dlcall('Kernel32', 'GetCommandLine'))
> RETURN
>
>
> ----- Original Message -----
> From: "Lawrence Lustig" <[EMAIL PROTECTED]>
> To: "RBASE-L Mailing List" <[email protected]>
> Sent: Tuesday, June 24, 2008 10:05 AM
> Subject: [RBASE-L] - Compiler -- get command line arguments
>
>
>>A common situation in compiled programs is reading the command line arguments
>>to control operation of the program.
>>
>> I'm trying to write an application to automatically perform the same action
>> on a number of different directories and I want to be able to pass the name
>> of the directory into the compiled application via the command line. Is
>> there a way to learn the command line arguments from inside the compiled
>> application?
>>
>> I think I can do this by setting an environment variable before running the
>> program and using ENVVAL() in the application, but I want to avoid the extra
>> batch file required.
>> --
>> Larry
>
>
>
