Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
Autor |
Nachricht |
djazzz
Anmeldungsdatum: 02.08.2007 Beiträge: 4
|
Verfasst am: 02.08.2007, 17:27 Titel: hilfe zum getarguments funktion |
|
|
hallo,
Kann jemand mir erklären wie die getarguments funktion aus qbsusbfun.bas
funktioniert?
Also ich möchte dass das program 4 parameter abruft, und diese in ein array oder separate variabele speichert.
ich weiss, es ist ne blöde frage, aber hab nach ne stunde google noch nix gefunden!
Code: | SUB GetArguments (Arguments$(), MaxArguments%, ArgsFound%) STATIC
'*******************************************************************************
'* this procedure parses command line and extracts arguments *
'*******************************************************************************
True% = -1
False% = 0
ArgsFound% = 0
In% = False%
CommandLine$ = COMMAND$
CommandLineLength% = LEN(CommandLine$)
FOR Character% = 1 TO CommandLineLength%
Char$ = MID$(CommandLine$, Character%, 1)
IF Char$ <> " " AND Char$ <> CHR$(9) THEN
IF NOT In% THEN
IF ArgsFound% = MaxArguments% THEN
EXIT FOR
END IF
ArgsFound% = ArgsFound% + 1
In% = True%
END IF
Arguments$(ArgsFound%) = Arguments$(ArgsFound%) + Char$
ELSE
In% = False%
END IF
NEXT Character%
END SUB |
Editiert durch Moderator: Code-Tags hinzugefügt. (Sebastian) |
|
Nach oben |
|
 |
csde_rats

Anmeldungsdatum: 07.01.2007 Beiträge: 2292 Wohnort: Zwischen Sessel und Tastatur
|
Verfasst am: 02.08.2007, 17:40 Titel: |
|
|
Ganz einfach.
Code: | SUB GetArguments (Arguments$(), MaxArguments%, ArgsFound%) STATIC
|
Arguments$() ist ein Array, in der die Argumente zurückstehen.
MaxArguments% gibt an, wieviele Argumente er maximal zurückgeben soll.
ArgsFound sagt aus, wieviele Argumente es waren.
/edit:
Willkommen im Forum!
Eine Sache am Rande: Den Spruch in meiner Sig bitte nicht ernstnehmen, der ist unabhängig von dem was jemand hier schreibt.  _________________ If hilfreicher_Beitrag then klick(location.here)
Klick |
|
Nach oben |
|
 |
djazzz
Anmeldungsdatum: 02.08.2007 Beiträge: 4
|
Verfasst am: 02.08.2007, 17:58 Titel: |
|
|
super,
und wie soll ich der funktion im programm anrufen?
Ich meine wass soll ich den eingeben zwischen die klammern)
GetArguments(???) |
|
Nach oben |
|
 |
Stormy

Anmeldungsdatum: 10.09.2004 Beiträge: 567 Wohnort: Sachsen - wo die schönen Frauen wachsen ;)
|
|
Nach oben |
|
 |
djazzz
Anmeldungsdatum: 02.08.2007 Beiträge: 4
|
Verfasst am: 02.08.2007, 18:21 Titel: |
|
|
schön, danke sehr! |
|
Nach oben |
|
 |
djazzz
Anmeldungsdatum: 02.08.2007 Beiträge: 4
|
Verfasst am: 02.08.2007, 18:32 Titel: |
|
|
komisch ich kriege ne fehlermeldung: expected: = und der cursor steht hinter: GetArguments (MyArg$, 4, gefunden)
?? ich benutze der quickbasic compiler |
|
Nach oben |
|
 |
Stormy

Anmeldungsdatum: 10.09.2004 Beiträge: 567 Wohnort: Sachsen - wo die schönen Frauen wachsen ;)
|
|
Nach oben |
|
 |
csde_rats

Anmeldungsdatum: 07.01.2007 Beiträge: 2292 Wohnort: Zwischen Sessel und Tastatur
|
|
Nach oben |
|
 |
|