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
[12222] Re:문자열에 관한........ 도와주세요
유이리 [] 1839 읽음    2008-10-07 19:40
유이리 님이 쓰신 글 :
: GET /ad3/1011/1011925/240240_kongju.swf?click=http%3A%2F%2Fad.naver.com%2Fadclick%3Funit%3D005A%26ac%3D2090612%26src%3D1147091%26br%3D1136595 HTTP/1.1
: Accept: */*
: Accept-Language: ko-KR
: Referer: http://ad.naver.com/adshow?unit=005A&qb=tajGxMDMIGNvcHk%3D
: x-flash-version: 9,0,124,0
: UA-CPU: x86
: Accept-Encoding: gzip, deflate
: If-Modified-Since: Thu, 02 Oct 2008 09:01:11 GMT
: If-None-Match: "b9c020-1f3da-754de3c0"
: User-Agent: Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; .NET CLR 2.0.50727; .NET CLR 1.1.4322)
: Host: adcreative.naver.com
: Connection: Keep-Alive
: Cookie: page_uid=fMDPUwoi5Ussscmt2Fwsss--221645; _naver_usersession_=SOlbIBpH6UgAAFVSHNE; npic=2NjvdAKNdp3CWTzJ43mQ9gdB9B+s3BUQQ7Ei5TP91oqYXW4VSHihMMriA6ugh4ZLCA==; nsr_acl=1; NB=HAYTQMBRGM3DCNZV; NNB=QYY4GOGCW3IEQ; nvad_lc=LL,3020000000
:
: 이런식으로 패킷을 잡는 프로그램인데요.. 이 문자열에서 url( http://ad.naver.com/ 이런식)만 잡아서 체크박스에 체크됐을때 메모에 넣고싶은데요. 저는 델파이 7을 사용하고있습니다.
: 밑에는 제가 코딩한 것입니다.
:
:  si:='http://';
:    k:='/';
:    if checkbox1.Checked then
:    begin
:    if posEx(si,s,1)>0 then
:    begin
:       a:=posex(si,s,1);
:       if posex(k,s,a)>0 then
:       begin
:       b:=PosEx(k,s,a);
:       end;
:    end;
:
:    s1:=copy(s,a,b);
:
:            memo2.Lines.add(s1);
: end;
:
: 좀 도와주세요 ㅠㅠ
:
: 전 감기조심하시구요 기침만 2달째하는..그럼 수고^^

다들 정말 감사합니다. ^^ 덕분에 살아요ㅠㅠ 공부열심히하겠습니다.

+ -

관련 글 리스트
12218 문자열에 관한........ 도와주세요 유이리 1845 2008/10/07
12222     Re:문자열에 관한........ 도와주세요 유이리 1839 2008/10/07
12220     Re:문자열에 관한........ 도와주세요 marinfo 1674 2008/10/07
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.