Optionen mit Parametern III

 [Vorheriges Kapitel]  [Vorherige Seite]  [Inhaltsverzeichnis]  [Nächste Seite]  [Nächstes Kapitel]

CutFields.om
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.
 

 [Vorheriges Kapitel]  [Vorherige Seite]  [Inhaltsverzeichnis]  [Nächste Seite]  [Nächstes Kapitel]
Copyright © 2004, 2005 Andreas Borchert, in HTML konvertiert am 18.02.2005