XProfan

English

Sorry, Perhaps be I only one blindes hen, but:

1. Please How commit I in XProfan .exe-Aufrufparameter?
In which Systemvariable disembark The then?

2. If I a Steuerprogramm whom Profan-Interpreter aufrufe, commit I it the auszuführende Program as Aufrufparameter. How but commit I the aufgerufenen Program then Programmaufrufparameter? in the same row shining the not at me To klappen...

Greeting

03/14/09 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

« this Posting watts as Solution marked. »

p.specht

Compile Mark Separation

' Kommandozeilenparameter read (PRFellow - Presentation)
' Author 2007 Thomas Hölzer, 2018 To XProfan11.2a p.woodpecker
' "Prozedur serves To Testzwecken in the Entwicklungsprozeß,
' circa amount, Numerierung and Content the startup
' übergebenen Parameter To Verify.
' Please mind: with one to EXE gelinkten Program
' move itself in XProfan the Parameter-index circa -1 !"

Proc CheckParams

    Declare i%,paramstr$

    Whileloop 0,%ParCount-1

        paramstr$=paramstr$+"Par$("+Str $(i%)+") = "+Par$(i%)+"\n"

    EndWhile

    MessageBox(paramstr$,"Parametertest", 64)

ENDPROC

Main:
Cls
CheckParams
End

XProfan 11
Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'...

11/28/20 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Paul
Glatz

i think profane.exe main.xprf Paramerter1 Parameter2

03/14/09 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

is correct, Krümelpaul! Mario P. hat´s me too straight declared:

Par$(n)
--------------------------------------------------------------------------------
n : Integer - Parameter-number
Result: String - Parameter

The Kommandozeilenparameter go read. The amount is with %ParCount fixes.

Aufrufmöglichkeiten:

Interpreter:
Run Profan.exe name.prf par2 par3 ...
WinExec/WinExecWait (Profan ..., Abbildungsmodus)
Anm.: The String ought to 141 byte not beyond!

Runtime (or. .EXE-File as Runtime):
...PROFRUN name.prc par2 par3 ...
or.
...name.exe name.prc par2 par3 ...

Anm.: in this both Make contains Aufrufparameter 1 whom names the aufgerufenen Program .

EXE file:
name.exe par1 par2 par3 ...
here contains the Aufrufparameter 1 already whom Parameter par1 - at program To respect!

with the .EXE-File attempts the integrierte Runtime-Module first of all, whom first Parameter par1 as XProfan-Compilat (*.prc) To interpret. deals it itself circa a solches, becomes it carryed out, otherwise the program self. an PRC-File too as such recognized, as they another Endung has.
...

GROSSES THANK YOU!

03/14/09 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

p.specht

Compile Mark Separation

' Kommandozeilenparameter read (PRFellow - Presentation)
' Author 2007 Thomas Hölzer, 2018 To XProfan11.2a p.woodpecker
' "Prozedur serves To Testzwecken in the Entwicklungsprozeß,
' circa amount, Numerierung and Content the startup
' übergebenen Parameter To Verify.
' Please mind: with one to EXE gelinkten Program
' move itself in XProfan the Parameter-index circa -1 !"

Proc CheckParams

    Declare i%,paramstr$

    Whileloop 0,%ParCount-1

        paramstr$=paramstr$+"Par$("+Str $(i%)+") = "+Par$(i%)+"\n"

    EndWhile

    MessageBox(paramstr$,"Parametertest", 64)

ENDPROC

Main:
Cls
CheckParams
End