Cómo implementar la función StringTokenizer con Delphi:
Sabemos que existe StringTokenizer en Java, que es muy conveniente para el procesamiento de cadenas, pero esta función no se proporciona en Delphi. Me refiero a la versión Delphi y la versión C # del lenguaje Java para implementar esta función. Espero brindarle una comodidad. Espero que puedas darme más consejos. unidad [email protected] SkyStringTokenizer; {Autor de la clase de procesamiento y análisis de cadenas: Zeng Qingsong Hora: 21/2/2004 (Nochevieja, 2003)} la interfaz utiliza SysUtils, Clases tipo IIterator = función de interfaz hasNext(): boolean; función siguiente (): cadena; tipo TSkyStringTokenizer = clase (TComponent, IIterator) tokens privados: TStringList; índice: entero; datos: cadena; delimitador: cadena; procedimiento init (dataLine: cadena; delim: cadena); función CharacterInTokens (ch: cadena; const sl: TStringList): función StringToCharArray (delim: cadena): TStringList; SplitString(fuente, ch: string): Tstringlist; protected { Declaraciones protegidas } public { Declaraciones públicas } constructor create(dataLine: cadena); constructor Create(dataLine: cadena; delim: cadena); destructor destroy(); anular función hasNext(): función booleana;