달력

72014  이전 다음

  • 1
  • 2
  • 3
  • 4
  • 5
  • 6
  • 7
  • 8
  • 9
  • 10
  • 11
  • 12
  • 13
  • 14
  • 15
  • 16
  • 17
  • 18
  • 19
  • 20
  • 21
  • 22
  • 23
  • 24
  • 25
  • 26
  • 27
  • 28
  • 29
  • 30
  • 31

 StringReplace(DataBuf,' ','',[rfReplaceAll]) ;


  -> 문제가 가끔 있다.  내가 경험한 빡치는 상황은

텍스트 파일을 while 문으로 한 줄씩 읽고 해당 줄의 공백을 제거 하는건데..

공백 제거가 안된다.  ㅜㅜ


버튼 하나 만들어서 while 안쓰고 하면 잘 된다..



검색해 봤다.while 문으로 공백을 제거하는 간단한 코드가 있다.

존경스럽다.



원문링크


function gfDel32(s: string): string;
begin
 while not(pos(' ',s)=0) do delete(s,pos(' ',s),1);
 result:=s;
end;

아니면 자체 내장함수인 StringReplace 을 사용하면

str := StringReplace(str1, ' ', '', [rfReplaceAll, rfIgnoreCase]);



참고.

원문 블로그 주인분이 암 투병 중이시다.  쾌차하셔서  산좋고 물좋은 곳에서 요양중이시길 바래본다.

Posted by theF
|

 lib 목록


 - Tled, Tindicator, logmeter,scope....




Posted by theF
|

Component 메뉴 - Install Package - Add


델파이 bin 폴더 안에 dclqrt70.bpl 을 선택



끝.

Posted by theF
|

Component -> Install Packages


델파이 7 설치 폴더에 bin


dclSockets70.bpl -> add 



끝  .



Posted by theF
|