Delphi로 StringTokenizer 함수를 구현하는 방법:
Java에는 문자열 처리에 매우 편리한 StringTokenizer가 있다는 것을 알고 있지만 Delphi에서는 이 기능을 제공하지 않습니다. 이 기능을 구현하기 위해 Java 언어의 Delphi 버전과 C# 버전을 참조합니다. 편의를 제공해 주시길 바랍니다. 나에게 더 많은 조언을 해주실 수 있기를 바랍니다. [email protected] 단위 SkyStringTokenizer; {문자열 분석 및 처리 클래스 작성자: Zeng Qingsong 시간: 2004/2/21(2003년 섣달 그믐날) } 인터페이스는 SysUtils, Classes를 사용합니다. = 인터페이스 함수 hasNext(): boolean; function next (): string; end; type TSkyStringTokenizer = class(TComponent, IIterator) 프라이빗 토큰: TStringList; 인덱스: 정수; 데이터: 문자열; 문자열; 프로시저 init(dataLine: 문자열; delim: 문자열); function CharacterInTokens(ch: 문자열; const sl: TStringList): boolean; SplitString(source, ch: string): Tstringlist; protected { 보호된 선언 } public { 공개 선언 } 생성자 create(dataLine: string); 오버로드; 생성자 Create(dataLine: string; delim: string); function hasNext(): boolean;