델파이 문자열 구분자 기능 사용 예

이 기사의 예에서는 Delphi 문자열 분리 기능의 사용법을 설명합니다. 참고할 수 있도록 모든 사람과 공유하세요. 구체적인 구현 방법은 다음과 같습니다.

이 예에서는 문자열 Separator의 표현에 따라 문자열 s를 여러 문자열로 분리하고 이를 rs 문자열 목록에 저장할 수 있습니다. 구체적인 코드는 다음과 같습니다.

다음과 같이 코드를 복사합니다. Procedure SeparateTerms2(s:string;Separator:string;var rs:TStringList);

var

AStr: 문자열;

idx: 정수;

ASubStr: 문자열;

시작하다

AStr := 트림(들);

while Pos(Separator, AStr) > 0 do

시작하다

idx := Pos(구분자, AStr);

ASubStr := Copy(AStr, 1, idx - 1);

rs.Add(ASubStr);

AStr := Copy(AStr, idx + 1, 길이(AStr));

끝;

if AStr+'a' <> 'a' then rs.Add(AStr); //나머지 문자열이 있으면 문자열 목록에 저장합니다.

끝;

이 글이 모든 사람의 델파이 프로그래밍에 도움이 되기를 바랍니다.