Q&A

  • EDIT BOX 의 특정 위치의 STRING 변경하기
EDIT BOX에 다음과 같은 STRING이 있습니다.

예를 들자면 EDIT1.Text := 'A01RD00000'이라고 할때

콤보BOX데이타는 (R,X...)일 때 X를 선택할 경우 네번째 자리의 STRING R을 X로 바꾸고 싶어요..네번째자리를 찾아서 원하는 LENGTH만큼 바꾸는 방법이 있을까요?



3  COMMENTS
  • Profile
    컴맹... 2001.02.20 22:46
    안녕하세여..

    컴맹입니다..

    StringReplace를 사용하세여...

    이함수를 사용하면 해결이 될것같은데여...



    사용법은 ..

    StringReplace('A01RD00000','R','X',rfReplaceAll);

    이렇게 사용하구여.. 자세한내용은 도움말을 참고 하세여..

    그럼 20000





    초보왕 wrote:

    > EDIT BOX에 다음과 같은 STRING이 있습니다.

    > 예를 들자면 EDIT1.Text := 'A01RD00000'이라고 할때

    > 콤보BOX데이타는 (R,X...)일 때 X를 선택할 경우 네번째 자리의 STRING R을 X로 바꾸고 싶어요..네번째자리를 찾아서 원하는 LENGTH만큼 바꾸는 방법이 있을까요?

    >

  • Profile
    초보왕 2001.02.21 19:13
    컴맹... wrote:

    > 안녕하세여..

    > 컴맹입니다..

    > StringReplace를 사용하세여...

    > 이함수를 사용하면 해결이 될것같은데여...

    >

    > 사용법은 ..

    > StringReplace('A01RD00000','R','X',rfReplaceAll);

    > 이렇게 사용하구여.. 자세한내용은 도움말을 참고 하세여..

    > 그럼 20000

    >

    >

    > 초보왕 wrote:

    > > EDIT BOX에 다음과 같은 STRING이 있습니다.

    > > 예를 들자면 EDIT1.Text := 'A01RD00000'이라고 할때

    > > 콤보BOX데이타는 (R,X...)일 때 X를 선택할 경우 네번째 자리의 STRING R을 X로 바꾸고 싶어요..네번째자리를 찾아서 원하는 LENGTH만큼 바꾸는 방법이 있을까요?

    > >





    안되는데여...

    글구 EDIT1.Text := '10010000'이라고 할때

    4번째1만 0으로 바꿀려고 하면 어떻게 하는지요..

    방법이 없나여..



    다시 한번 자세한 답변 부탁합니다..



    컴파일 시키니 에러 나는데여...

    rfReplaceAll 이것때문에 그러는것 같은데..



    자세하게 설명 좀..^_^..

  • Profile
    고드름 2001.02.20 22:42
    안녕하세요?

    고드름 김정입니다.



    function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string;



    위의 치환 함수가 있긴 합니다.

    특정 패턴을 찾아서 몽땅 혹은 한번만 바꿔주는 함수지요. ^^;



    특정위치만 바꾸는 경우라면,

    그 앞뒤 값에 끼워 넣어도 되지 않을까요?



    참고하세요.

    그럼.