Commandline, kompletter Parameter

[lite]

Hallo

Wie bekomme ich den kompletten Parameter zur Weiterverarbeitung ?
Ich benötige den originalen String, mit Anführungszeichen """
MyProgram.exe MyText.txt /FAST "Special Mode"

Beispiel:
"Special Mode" = komplett mit (")

Grüsse

Lite

[Kiffi]

Windows only:

Code: Alles auswählen

Debug PeekS(GetCommandLine_())

Grüße ... Kiffi

[bobobo]

mit PB ginge das auch so

Code: Alles auswählen

Macro dingel(tmp)
  If FindString(tmp," ")
    tmp=Chr(34)+tmp+Chr(34)
  EndIf
EndMacro

For c=0 To CountProgramParameters()-2
  tmp.s=ProgramParameter(c)
  dingel(tmp)
  ganzeZeile.s+tmp+" "
Next

tmp.s=ProgramParameter(c)
dingel(tmp)
ganzeZeile.s+tmp
Debug ">"+ganzeZeile+"<"

oder so

Code: Alles auswählen

Procedure.s chck34(tmp.s)
  If FindString(tmp," ")
    tmp=Chr(34)+tmp+Chr(34)
  EndIf
  ProcedureReturn tmp
EndProcedure

For c=0 To CountProgramParameters()-2
  tmp.s=ProgramParameter(c)
  tmp=chck34(tmp)
  ganzeZeile.s+tmp+" "
Next

tmp.s=ProgramParameter(c)
tmp=chck34(tmp)

ganzeZeile.s+tmp
Debug ">"+ganzeZeile+"<"

[lite]

Hallo,

zuerst mal Danke für die Antworten.

Die Lösung von "Kiffi" gefällt mir sehr gut, jetzt muss ich nur noch das Richtige herausfiltern.

@bobobo

Deine Beispielcodes funktioniert nicht 100%, es werden teilweise " - Zeichen verschluckt.

Grüße

lite

[bobobo]

klar , wenn die " ohne Leerzeichen im String gesetzt werden.
siehe code

aber in dem Fall könnten die " auch für die eigentliche Weiterverarbeitung egal sein.

ansonsten bleibt ja noch der Kiffische Ansatz