Memo 的問題 |
|
答題得分者是：GrandRURU
|
|
KingKong512
一般會員   發表：23 回覆：20 積分：8 註冊：2011-10-18 發送簡訊給我 |
高手們好
我想在 "Memo" 上顯示出一個陣列的的樣子 理想的顯示狀態如下 =========================== 0 1 2 2 3 4 4 5 6 6 7 8 8 9 0 =========================== 但 出現結果不是我所想像的 以下是我寫的程式 int i,j,X[5][3]={{0,1,2},{2,3,4},{4,5,6},{6,7,8},{8,9,0}}; for(i=0;i<5;i ) { for(j=0;j<3;j ) { Memo1->Lines->Strings[Memo1->Lines->Count-1] = Memo1->Lines->Strings[Memo1->Lines->Count-1] IntToStr(X[i][j]) " "; } Memo1->Lines->Add(""); } 其結果如下 =========================== 0 1 2 2 3 4 4 5 6 6 7 8 8 9 0 =========================== 請問我那寫錯 謝謝 |
|
GrandRURU
站務副站長  發表：240 回覆：1680 積分：1874 註冊：2005-06-21 發送簡訊給我 |
可能在「\r\n」的判斷上有問題，我想你原來的程式不是這樣寫，但是那也不是重點
比較保險的作法是另外增加一個字串變數，如下： [code cpp] void __fastcall TForm1::Button1Click(TObject *Sender) { Memo1->Clear(); int i,j,X[5][3]={{0,1,2},{2,3,4},{4,5,6},{6,7,8},{8,9,0}}; String sTemp = ""; for(i=0;i<5;i ) { sTemp = ""; for(j=0;j<3;j ) { sTemp = sTemp IntToStr(X[i][j]) " "; } Memo1->Lines->Add(sTemp); } } [/code] ===================引 用 KingKong512 文 章=================== 高手們好 我想在 "Memo" 上顯示出一個陣列的的樣子 理想的顯示狀態如下 =========================== 0 1 2 2 3 4 4 5 6 6 7 8 8 9 0 =========================== 但 出現結果不是我所想像的 以下是我寫的程式 int i,j,X[5][3]={{0,1,2},{2,3,4},{4,5,6},{6,7,8},{8,9,0}}; for(i=0;i<5;i ) { for(j=0;j<3;j ) { Memo1->Lines->Strings[Memo1->Lines->Count-1] = Memo1->Lines->Strings[Memo1->Lines->Count-1] IntToStr(X[i][j]) " "; } Memo1->Lines->Add(""); } 其結果如下 =========================== 0 1 2 2 3 4 4 5 6 6 7 8 8 9 0 =========================== 請問我那寫錯 謝謝 |
發表時間：2016-01-13 15:04:26
IP:163.17.xxx.xxx 訂閱
系統時間：2024-11-13 14:57:09
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |