델파이 문자열 중에 원하는 글자 이후만 삭제하고싶어요

Question

String 문자열중에 그 문자열 포함하는 글자를 제가 지정하고

그 지정한 글자 이후 문자열은 삭제하고 싶은데

어떤 함수를 써야할까요??

Answer 1

안녕하세요?

델파이에서 문자열 삭제 문의를 주셨는데 일단 두개의 함수를 알려드리겠습니다

Delete(문자열, 인덱스, 길이), Pos(찾는문자열, 문자열)을 사용해서 밑 예제와 같이 만들었습니다

procedure TForm2.Button1Click(Sender: TObject); var s: string; begin s := 'ABCDEF'; Delete(s, Pos('C', s), Length(s)); ShowMessage(s); end;