如何將vc++ 轉成BCB 呢?

發文回覆瀏覽次數：739

推到 Plurk!

推到 Facebook!

尚未結案

arnotsay
一般會員

發表：23
回覆：79
積分：20
註冊：2003-02-03

發送簡訊給我

#1 引用回覆回覆

發表時間：2003-10-06 15:32:32

IP:61.218.xxx.xxx 未訂閱

我想將以下的程式碼轉換成BCB,其中backprop.in的內容如下 0 1 0 1 0 1 1 0 1 1 0 1 0 1 0 0 0 0 0 0 1 0 0 1 0 0 1 0 0 1 0 0 1 0 0 0 0 1 1 1 0 0 0 1 0 1 0 1 0 0 1 1 1 0 0 1 0 1 1 1 0 0 1 0 1 0 0 0 1 1 1 0 0 0 1 1 0 0 1 1 0 1 1 1 1 0 0 1 0 0 1 0 1 0 0 1 1 1 1 0 0 1 1 1 0 0 1 1 1 0 0 1 0 1 0 1 1 1 0 0 1 1 0 1 0 1 0 1 0 0 1 1 0 1 1 1 0 0 1 0 0 1 0 1 0 0 1 0 0 1 1 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 0 0 0 1 0 1 0 1 0 1 1 0 0 1 0 0 1 1 0 0 1 請問BCB中要如何將文字檔裡的每一個數值都放到下面的陣列裡呢?? FILE *fp; if ((fp=fopen("backprop.in","r"))==NULL) exit(0); for (i=0;i<10;i ) fscanf(fp,"%d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d", &x[i][0],&x[i][1],&x[i][2],&x[i][3],&x[i][4],&x[i][5],&x[i][6], &x[i][7],&x[i][8],&x[i][9],&x[i][10],&x[i][11],&x[i][12], &x[i][13],&x[i][14],&d_o[i][0],&d_o[i][1],&d_o[i][2],&d_o[i][3]); fclose(fp);

RaynorPao
版主

發表：139
回覆：3622
積分：7025
註冊：2002-08-12

發送簡訊給我

#2 引用回覆回覆

發表時間：2003-10-15 23:27:06

IP:61.221.xxx.xxx 未訂閱

引言: 我想將以下的程式碼轉換成BCB,其中backprop.in的內容如下 0 1 0 1 0 1 1 0 1 1 0 1 0 1 0 0 0 0 0 0 1 0 0 1 0 0 1 0 0 1 0 0 1 0 0 0 0 1 1 1 0 0 0 1 0 1 0 1 0 0 1 1 1 0 0 1 0 1 1 1 0 0 1 0 1 0 0 0 1 1 1 0 0 0 1 1 0 0 1 1 0 1 1 1 1 0 0 1 0 0 1 0 1 0 0 1 1 1 1 0 0 1 1 1 0 0 1 1 1 0 0 1 0 1 0 1 1 1 0 0 1 1 0 1 0 1 0 1 0 0 1 1 0 1 1 1 0 0 1 0 0 1 0 1 0 0 1 0 0 1 1 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 0 0 0 1 0 1 0 1 0 1 1 0 0 1 0 0 1 1 0 0 1 請問BCB中要如何將文字檔裡的每一個數值都放到下面的陣列裡呢?? FILE *fp; if ((fp=fopen("backprop.in","r"))==NULL) exit(0); for (i=0;i<10;i ) fscanf(fp,"%d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d", &x[i][0],&x[i][1],&x[i][2],&x[i][3],&x[i][4],&x[i][5],&x[i][6], &x[i][7],&x[i][8],&x[i][9],&x[i][10],&x[i][11],&x[i][12], &x[i][13],&x[i][14],&d_o[i][0],&d_o[i][1],&d_o[i][2],&d_o[i][3]); fclose(fp);

arnotsay 你好: 小弟我依照你所提供的檔案內容，寫了一個簡單的範例，請你再自行修改 < class="code"> int i=0, j=0; int iArray[10][19]; AnsiString sz; TStringList *sl1=NULL; TStringList *sl2=NULL; sl1=new TStringList; sl1->LoadFromFile("test1.txt"); for(i=0; iCount; i ) { sl2=new TStringList; sz=StringReplace(sl1->Strings[i], " ", ",", TReplaceFlags()<CommaText=sz; for(j=0; jCount; j ) { iArray[i][j]=StrToInt(sl2->Strings[j]); } delete sl2; } delete sl1; // ...Check... for(i=0; i<10; i ) { sz=""; for(j=0; j<19; j ) { sz =(IntToStr(iArray[i][j]) " "); } Memo1->Lines->Add(sz); } -- Enjoy Researching & Developing --

------
-- 若您已經得到滿意的答覆，請適時結案!! --
-- 欲知前世因，今生受者是；欲知來世果，今生做者是 --
-- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 --

系統時間：2024-05-19 15:23:48

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！