Q&A

  • 구분자로 잘라서 배열에 넣는 법 좀 알려주세요
그룹문자전송을 할때...
번호에 0111111111;0166666666;0177777777;0188888888;0199999999
이런식으로 썼을때요..
';'를 기준으로 뽑아 내려면 어떻게 해야하나요?
뽑아서 배열변수에 넣을라고 하는데..
예를 들어..011111111은 test[0], 0166666666은 test[1] 이런식으로요..
배열에 넣지 않더라도 각각의 번호를 알아냈으면 좋겠는뎅..
참고로 번호의 길이는 10(가운데 번호3자리)자리 일수도 11(가운데번호4자리)자리 일수도 있습니다
2  COMMENTS
  • Profile
    최용일 2002.11.16 01:11
    안녕하세요. 최용일입니다.

    직접 파싱하셔두 되구요... 아래와 같이 ExtractStrings란 함수를 쓰셔두 됩니다...

    var
        Index: Integer;
        Source: string;
        StrList: TStringList;
    begin
        Source := '0111111111;0166666666;0177777777;0188888888;0199999999';
        StrList := TStringList.Create;
        ExtractStrings([';'], [' '], PChar(Source), StrList);
        for Index := 0 to StrList.Count - 1 do
            ShowMessage(StrList[Index]);
        StrList.Free;
    end;

    ^^ 항상 즐코하세요...

  • Profile
    도니 2002.11.16 01:27