만해 님이 쓰신 글 :
: 미혜 님이 쓰신 글 :
: : void __fastcall TForm1::Button4Click(TObject *Sender)
: : {
: :         TStringList *m=Split("3213-6546-5454-654654--6546-888","-");
: :         ListBox1->Items->Assign(m);
: :         delete m;
: :
: :
: :
: : }
: : //---------------------------------------------------------------------------
: :
: : TStringList *Split(AnsiString str,AnsiString split_c)
: : {
: :   TStringList*l=new TStringList();
: :   int len=str.Length();
: :   AnsiString temp="";
: :   for(int i=0;i<len;i++){
: :      AnsiString t=str.SubString(i+1,1);
: :      if(t==split_c){
: :         l->Add(temp);
: :         temp="";
: :      }else{
: :         temp+=t;
: :      }
: :   }
: :   l->Add(temp);
: :   return l;
: : }
: :
: : 에서요..
: : 에러가 나는데요.. spilt를 지정하지 않았다고 하거든요..
: : 혹시 함수를 다른 헤더 화일 같은곳에 먼저 지정을 해 줘야 하나요?
: : 정말 아무것도 모르는 왕초보에여..흑흑..
: : 이번 일만 끝나믄 정말 C부텀 열씨미 공부하겠슴다...
:
: 안녕하세요 만해입니다.
:
: Split는 보시면 아시다 시피 함수 입니다.
:
: 함수를 사용할려면 미리 정의를 하셔야 하고요
:
: 헤더 파일에서 정의 하시면 됩니다.
:
: 참고로 소스 올릴께요
:
: 헤더 파일 이고요
: //---------------------------------------------------------------------------
:
: #ifndef Unit1H
: #define Unit1H
: //---------------------------------------------------------------------------
: #include <Classes.hpp>
: #include <Controls.hpp>
: #include <StdCtrls.hpp>
: #include <Forms.hpp>
: //---------------------------------------------------------------------------
: class TForm1 : public TForm
: {
: __published:    // IDE-managed Components
:   TButton *Button1;
:   TListBox *ListBox1;
:   void __fastcall Button1Click(TObject *Sender);
: private:    // User declarations
: public:        // User declarations
:   __fastcall TForm1(TComponent* Owner);
:   TStringList *Split(AnsiString str,AnsiString split_c);
: };
: //---------------------------------------------------------------------------
: extern PACKAGE TForm1 *Form1;
: //---------------------------------------------------------------------------
: #endif
:
: 소스 파일 입니다.
:
:
: void __fastcall TForm1::Button1Click(TObject *Sender)
: {
:    TStringList *m=Split("3213-6546-5454-654654--6546-888","-");
:    ListBox1->Items->Assign(m);
:    delete m;
:
: }
: //---------------------------------------------------------------------------
: TStringList* TForm1::Split(AnsiString str,AnsiString split_c)
: {
:   TStringList*l=new TStringList();
:   int len=str.Length();
:   AnsiString temp="";
:   for(int i=0;i<len;i++){
:       AnsiString t=str.SubString(i+1,1);
:       if(t==split_c){
:            l->Add(temp);
:            temp="";
:       }else{
:            temp+=t;
:       }
:   }
:   l->Add(temp);
:   return l;
: }
:
: