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

C++빌더 Q&A
C++Builder Programming Q&A
[8749] Re:Re:델파이를 씨빌더로 변환할때...
권선미 [] 913 읽음    2001-07-04 16:59
제가 잘못 알았네요..
TTokenPacket := Array[0..20]  of string;
이네요..


il's 님이 쓰신 글 :
: 권선미 님 안녕하세요....
:
: 음.... TTokenPacket형이라는 것이 델파이 쪽에 없는것 같은데요
:
: 혹시 기본 컴포넌트가 아닌 설치해서 사용하시는 컴포넌트에서 나온 형이 아닌지요...
:
:
:
: 그럼 즐거운 프로그램하세요.....
:
: 권선미 님이 쓰신 글 :
: : 델파이의 TTokenPacket형이 씨빌더에서는 무엇으로 되어야 하는지요...
: : 아래 델파이 소스 좀 씨빌더 소스로 고쳐주세요..
: :
: :
: :
: : procedure GetPacket(buff:String; var packet:TTokenPacket; terminate:char);
: : var   i:integer;
: :       str1, str2, str3:String;
: :       indicator:integer;
: : begin
: :       i := -1;
: :       indicator := -1;
: :
: :       while Indicator <> 0 do begin
: :             inc(i);
: :
: :             str1       := TrimRight(TrimLeft(buff));
: :               Indicator  := Pos(terminate, str1);
: :
: :             if Indicator = 0 then begin
: :                 str2 := Copy(str1, 0, Length(str1));
: :         end else
: :                 str2 := Copy(str1, 0, Indicator-1);
: :
: :               str3 := Copy(str1, Indicator+1, Length(str1));
: :
: :             packet[i] := str2;
: :               buff := str3;
: :       end;
: : end;
: :
: : 꼭 부탁드립니다.
: :
: :

+ -

관련 글 리스트
8746 델파이를 씨빌더로 변환할때... 권선미 958 2001/07/04
8747     Re:델파이를 씨빌더로 변환할때... il's 989 2001/07/04
8749         Re:Re:델파이를 씨빌더로 변환할때... 권선미 913 2001/07/04
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.