Command Line
Verfasst: 10.03.2005 15:11
Finde leider nichts im Forum dazu... die konnte man doch auch einfach abfragen oder?
[/c]. Kleinen schönheits Fehler hat diese Funktion aber. Mit ihr kann man nicht wie in z.b. QBasic mit Command$ den gesamten Parameter erfragen sondern diese Prozedur spaltet die Parameter auf. Die Parameter werden bei Leerzeichen getrennt. Ich hab mir dazu eine kleine Prozedur geschrieben mit der man das Parameter abfragen bsichen professioneler gestalten kann:
Code: Alles auswählen
Procedure ParseCommand()
DefType.s Befehl, Parameter
DefType.s Param
Repeat
Param = ProgramParameter()
Befehl = StringField(Param, 1, "=")
Parameter = StringField(Param, 2, "=")
Select LCase(Befehl)
Case "/Text" : Debug Val(Trim(Parameter))
Case "/Zahl" : Debug Trim(Parameter)
EndSelect
Delay(2)
Until Param = ""
EndProcedure