我想在Memo上丟一筆筆資料 但就是無法換 那位前輩能教導一下 謝謝

請使用 \n 作為換行符號如: Memo1->Lines->Text = "test1\ntest2"; 或是使用 Add function 如: Memo1->Lines->Add("test1"); Memo1->Lines->Add("test2"); 兩種作法皆可!

上面的前輩好 我要把2元陣列映在memo上 但你這種方法不能 因為我想把 1,2,3,4,5 6,7,8,9,1 2,5,8,9,6 像這陣列一行一行列出來 可以教一下謝謝 發表人 - dsp 於 2003/12/07 11:31:19

引言: 上面的前輩好 我要把2元陣列映在memo上 但你這種方法不能 因為我想把 1,2,3,4,5 6,7,8,9,1 2,5,8,9,6 像這陣列一行一行列出來 可以教一下謝謝 發表人 - dsp 於 2003/12/07 11:31:19

換行碼不是#13嗎？

可是我不會用呢 所以我才問的 for(i=0;i<15;i ) { for(j=0;j<10;j ) { M1->Text =IntToStr(temp[i][j]) ; } } 能幫我改成能換行 #13我用過但用法錯誤 所以能教導一下

hi, 改為:    

for(i=0;i<15;i  )
{
  for(j=0;j<10;j  )
  {
    M1->Line->Add(IntToStr(temp[i][j])) ;
  }
}    

這樣就行了!

還是不行 它執行有這行 E2316"Line"is not member of "TMemo" 顯示這行錯誤訊息 可否告訴怎解決呢? 謝謝

SORRY, 是 Lines , 一時筆誤.

引言: 可是我不會用呢 所以我才問的 for(i=0;i<15;i ) { for(j=0;j<10;j ) { M1->Text =IntToStr(temp[i][j]) ; } } 能幫我改成能換行 #13我用過但用法錯誤 所以能教導一下

for(i=0;i<15;i ) { for(j=0;j<10;j ) { M1->Text = M1->Text #13#10 IntToStr(temp[i][j]) ; } }

上面兩個前輩好 可能在下知質不好你們的方法都不能成功 我有問同學的到另的答案 我是要做八士打三角形 程式讓你們看一下雖說不高明 void __fastcall TForm1::Button1Click(TObject *Sender) { int temp[15][10]; int i,j; String q; for(i=0;i<15;i ) { for(j=0;j<10;j ) temp[i][j]=0; } temp[0][5]=1; for(i=1;i<15;i ) { for(j=1;j<10;j ) temp[i][j]=temp[i-1][j-1] temp[i-1][j 1]; } for(i=0;i<15;i ) { for(j=0;j<10;j ) { if(temp[i][j]==0) q=q " "; else q=q " " (IntToStr(temp[i][j]) ); } M1->Lines->Add(q) ; 這裡是換行 q=""; } }

上面兩個前輩好 可能在下知質不好你們的方法都不能成功 我有問同學的到另的答案 我是要做八士打三角形 程式讓你們看一下雖說不高明 void __fastcall TForm1::Button1Click(TObject *Sender) { int temp[15][10]; int i,j; String q; for(i=0;i<15;i ) { for(j=0;j<10;j ) temp[i][j]=0; } temp[0][5]=1; for(i=1;i<15;i ) { for(j=1;j<10;j ) temp[i][j]=temp[i-1][j-1] temp[i-1][j 1]; } for(i=0;i<15;i ) { for(j=0;j<10;j ) { if(temp[i][j]==0) q=q " "; else q=q " " (IntToStr(temp[i][j]) ); } M1->Lines->Add(q) ; 這裡是換行 q=""; } } 我同學是從第一個前輩的答案得到靈感我以推他 第二個前輩抱歉了謝謝你 謝謝兩位