RiverSoftAVG Products Help

TGCustomParser.Next Method

Moves the parser to the next token in the Text string. The method returns TRUE if a token was found (ignoring delimiters, of course).

Namespace: GParser

Return Value

Type: Boolean

The following example uses the TGParser class to parse a string of numbers and add the numbers up (delimiters are spaces):

Delphi
var Parser: TGParser; begin Parser := TGParser.Create( '10.5 123 40.3 56 70.1 89.2' ); try result := 0; if Parser.First then repeat result := Result + StrToFloat(Parser.Token); until not Parser.Next; finally Parser.Free; end; end;