全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:755
推到 Plurk!
推到 Facebook!

Memo內運算問題

尚未結案
JKC
一般會員


發表:6
回覆:2
積分:1
註冊:2005-05-15

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-05-16 07:00:40 IP:218.169.xxx.xxx 未訂閱
我在Memo1->Lines->已輸入下列資料 0 1 1 1 2 1 3 1 並做下圖運算式迴圈運算,運算質為Memo1->Lines->內資料裡的1 1 1 1,0123為編號不做運算     然後將運算結果位移一位 如下列 1 1 . . 在顯示到Memo2->Lines->中 請問這段程式碼要如何寫 發表人 - JKC 於 2005/05/16 20:34:25 發表人 - JKC 於 2005/05/16 21:13:19
pcboy
版主


發表:177
回覆:1838
積分:1463
註冊:2004-01-13

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-05-17 14:26:20 IP:210.69.xxx.xxx 未訂閱
y[n] = (1/(M1 M2 1)) * ( x[n-M1] x[n-M1 1] x[n-M1 2] ... x[n M2] ) 您好像少給一些資訊 Memo1 那 四行 (編號不算) 的值是誰的值 ? n, M1, M2 也才 3 個 ? x(參數) = ? 沒有這個如何去算 X 函數值 例如 x(z) = z 3 那 x(10) = 10 3 = 13 ********************* 如果您滿意答案,請結案 *********************
------
能力不足,求助於人;有能力時,幫幫別人;如果您滿意答覆,請適時結案!

子曰:問有三種,不懂則問,雖懂有疑則問,雖懂而想知更多則問!
JKC
一般會員


發表:6
回覆:2
積分:1
註冊:2005-05-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-05-17 20:37:48 IP:220.132.xxx.xxx 未訂閱
引言: y[n] = (1/(M1 M2 1)) * ( x[n-M1] x[n-M1 1] x[n-M1 2] ... x[n M2] ) 您好像少給一些資訊 Memo1 那 四行 (編號不算) 的值是誰的值 ? n, M1, M2 也才 3 個 ? x(參數) = ? 沒有這個如何去算 X 函數值 例如 x(z) = z 3 那 x(10) = 10 3 = 13 ********************* 如果您滿意答案,請結案 *********************
運算式迴圈已想好但還有問題如下 我在Memo1->Lines->已輸入下列資料PS(_為空格) _0_1 _1_1 _2_1 _3_1 要怎麼將0讀到t[n]中及將1讀到v[m]中 請問這段程式碼要如何寫 要怎麼將t[n]中的值及將讀到v[m]中的值 顯示到Memo2->Lines->中 且值得中間加空格,如下這樣 1_1 請問這段程式碼要如何寫
RedSnow
版主


發表:79
回覆:1322
積分:845
註冊:2003-12-15

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-05-17 23:04:19 IP:200.226.xxx.xxx 未訂閱
JKC 您好:    如果我沒有誤解您的問題,那麼您是想要拆解 Memo1 的文字資料,並設給數字陣列,然後將處理過後的數字再轉成文字資料設給 Memo2,如果是的話,請參考下列作法:
AnsiString tmp;
int *t = new int[Memo1->Lines->Count];
int *v = new int[Memo1->Lines->Count];
int pos;
for(int i=0; iLines->Count; i  ){
    tmp = Memo1->Lines->Strings[i];
    tmp = tmp.Trim();
    pos = tmp.Pos(" ");
    t[i] = StrToInt(tmp.SubString(1, pos-1));
    v[i] = StrToInt(tmp.SubString(pos 1, tmp.Length()-pos));
}    // 此處做您的運算處理    Memo2->Clear();
for(int i=0; iLines->Count; i  ){
    Memo2->Lines->Add(IntToStr(t[i] 1) " " IntToStr(v[i] 1));
}    delete t;
delete v;
以上程式未做容錯處理,請您自己加上去,以免有空資料時或是非數字資料出現時,會有錯誤發生。
系統時間:2024-05-14 23:28:05
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!