void __fastcall TForm1::Button4Click(TObject *Sender)
{
 ifstream fin;
 char data[1024];
 int  row_no=0;
  if(OpenDialog1->Execute())
    {
        fin.open(OpenDialog1->FileName.c_str(),ios::in);  //讀檔             if(fin.fail())
           MessageBox(NULL,"錯誤","檔案無法開啟!!",MB_OK);
         else
           {
             row_no=0;
             while(!fin.eof())
              {
               fin>>data; //讀入row data的字串
               ShowMessage(data);
               char *token=strtok(data," ");)
                 row_no  ;
                  }//while(!fin.eof())
              } //else (!fin.fail())
         fin.close(); //關閉檔案
    } 
  }