Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[14888] 델파이6에서 특수문자를 제거할수 있을까요
철갑 [drsin2] 2232 읽음    2013-12-05 15:49
이번에 사용하는 업무가 하필이면 특수문자와 개행문자를 모두 제거한 스트링만 받아야 하는 부분이 있어서 질문 드립니다.

사용하는건 델파이 6인데요

직접 찾아보니 TRegEx라는 컴포넌트를 사용하면 된다고 하기에 보니 이건 또 델파이 7 이후에나 지원한다고 보여서

혹시 델파이 6에서도 특수문자를 전부 제거하는 방식이 있는지 궁금해서 여쭤봅니다.

원하는 정규식은 [A-Za-z0-9가-힣\s.,] 수준인데 지금은 그걸 억지로 구현하기 위해서

  rt_text :=StringReplace(rt_text,'!','',[rfReplaceAll]);
  rt_text :=StringReplace(rt_text,'@','',[rfReplaceAll]);
  rt_text :=StringReplace(rt_text,'#','',[rfReplaceAll]);
  rt_text :=StringReplace(rt_text,'$','',[rfReplaceAll]);
  rt_text :=StringReplace(rt_text,'%','',[rfReplaceAll]);
  rt_text :=StringReplace(rt_text,'^','',[rfReplaceAll]);
  rt_text :=StringReplace(rt_text,'&','',[rfReplaceAll]);
  rt_text :=StringReplace(rt_text,'*','',[rfReplaceAll]);
  rt_text :=StringReplace(rt_text,'\','',[rfReplaceAll]);
  rt_text :=StringReplace(rt_text,'|','',[rfReplaceAll]);
  rt_text :=StringReplace(rt_text,'`','',[rfReplaceAll]);
  rt_text :=StringReplace(rt_text,'~','',[rfReplaceAll]);

같은 무식무식한 방법으로 처리하고 있습니다. 혹시 좀더 간단히 처리할 수 있는 방법이 없을까요.

+ -

관련 글 리스트
14888 델파이6에서 특수문자를 제거할수 있을까요 철갑 2232 2013/12/05
14891     Re:델파이6에서 특수문자를 제거할수 있을까요 박지훈.임프 4219 2013/12/07
14892         답변 감사합니다. 철갑 2456 2013/12/07
14890     Re:델파이6에서 특수문자를 제거할수 있을까요 류종택 6894 2013/12/06
14889     Re:델파이6에서 특수문자를 제거할수 있을까요 civilian 3254 2013/12/05
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.