|
CASE option OF | "d": Args.FetchString(delim); fieldsep := delim[0]; | "f": Args.Fetch(arg); Read.IntS(arg, fieldnum); IF (arg.count > 0) & (fieldnum >= 1) & (fieldnum <= MAX(SET) + 1) THEN INCL(selected, fieldnum-1); ELSE Args.Usage; END; ELSE Args.Usage; END; |
Args.Fetch eröffnet den Parameter als Stream, von
dem anschließend (z.B. mit Read.IntS) gelesen werden kann.
| |
Ein mit Args.Fetch geöffneter Stream muß nicht
explizit geschlossen werden, da das nächste Args.Fetch
den vorher genutzten Stream automatisch schließt.
| |
Args.FetchString kopiert den Parameter in ein
CHAR-Array.
|
Copyright © 2004, 2005 Andreas Borchert, in HTML konvertiert am 18.02.2005 |