창조유저그룹-커즈닷컴

질문게시판
- 반드시 검색을 하신 후 원하는 답변을 찾을 수 없을 때, 질문을 올려주세요.

LIST ALL

Posted by 변혁수

2006-07-05 01:54:44, Hit : 3910

[re] 리스트 박스 안에 특정문자 지우기

Homepage : http://cugz.com

File #1 : list.rar (1.8 KB) Download : 33

Post URL : http://cugz.sjworks.net/bbs/zboard.php?id=qna&no=1530

반복문을 사용하는 방법도 있겠으나 이렇게 메모에 할당하여 기본명령어로 해결하는것이 속도측면에서나 효율성에서 가장 나을 것 같아 이렇게 하였습니다 :)

소스 첨부하였구요..

아래는 코드입니다.

실수:위치;
메모0.내용.할당해(리스트박스0.내용);

되풀이(참)
{
   위치:= 메모0.문자찾아(에디트0.문자, 위치, 문자길이(메모0.내용.전체문자), 거짓, 거짓);
   만일(위치=(-1))
      그쳐;
   메모0.선택문자위치:= 위치;
   메모0.선택문자길이:= 문자길이(에디트0.문자);
   메모0.선택속성.색상 := ㅅ빨강;
   메모0.선택문자지워;
   위치:= 위치 + 문자길이(에디트0.문자);
}

리스트박스0.내용.할당해(메모0.내용);
메모0.내용.지워;

변혁수 2006-07-05 AM 1:56:41


저기 중간에 메모0.선택속성.색상 := ㅅ빨강; 이 부분은 필요가 없습니다. 삭제하셔도 되요; 도움말에 있던 문자찾아명령을 그대로 가져다 썼더니 저게 남았네요 -.-

이희창[빙고] 2006-07-05 PM 12:54:13


그래, 가끔은 코멘트를 달자. -_-V

이정도 2006-07-05 PM 2:07:22


허허...메모까지 써야 되는군요 -ㅅ- 지워야 되는 양은 많은건 아닌데.. :D

최재일 2006-07-07 PM 1:02:26


그렇다면 반복문으로 에디트0의 문자를 앞에서부터 한자씩 읽어서 문자비교후 지우는건 어떨까요??

최재일 2006-07-07 PM 1:18:31


아~ 에디트가 아니고 리스트박스였군요.. 그럼 혁수님 말처럼 하는게 낳겠군요 ^^;

최재일 2006-07-07 PM 1:19:28


에디트라면 아래와같이;;; ------------------------------------------------------------ 실수 : 시작수, 카운트, 글자수; 문자 : 문, 재조합문; 시작수 := 1; 카운트 := 0; 글자수 := 문자길이(에디트0.문자); 반복 { 문 := 문자복사(에디트0.문자, 시작수, 1); 만일(문 = "~") { 만일(시작수 1) 재조합문 := 문자복사(에디트0.문자, 1, 시작수-1) + 문자복사(에디트0.문자, 시작수+1, 글자수); 아니면 재조합문 := 문자복사(에디트0.문자, 시작수+1, 글자수); 에디트0.문자 := 재조합문; 글자수 := 문자길이(에디트0.문자); 시작수 := 시작수 - 1; } 시작수 := 시작수 + 1; 카운트 := 카운트 + 1; } 까지 (시작수 > 글자수); ------------------------------------------------------------

변혁수 2006-07-07 PM 7:38:09


네 :) 제가 말한 '반복문을 사용한 방법' 이 재일님과 같은 방법입니다; 리스트박스에서 한줄씩 읽어와 저렇게 처리;; 속도나 효율성 측면에서 메모의 힘을 빌리는 방법이 훨씬 낫겠죠 ^^