線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1931
推到 Plurk!
推到 Facebook!

利用讀入的檔案更動結果

尚未結案
akole8363498
一般會員


發表:1
回覆:4
積分:1
註冊:2006-12-04

發送簡訊給我
#1 引用回覆 回覆 發表時間:2006-12-07 21:20:21 IP:219.68.xxx.xxx 訂閱
這個想法我想好久不知道怎樣下手
我想要的情形就是說我程式已經都寫好了但是我有個Edit 會因為讀入的檔而改變Edit的值
應該說現在有三樣東西 一個是已經設計好的程式如下
A=50;
Edit1->Text = A;
讀取某個 1.txt 檔案
而這個檔案中如下
A = A 50; <=====這部分每次可以都不同
經過讀取1.txt 之後 Edit1中顯示的值 會改成100 每叫一次則多50 這樣有可能嗎
------
TEST
pcboy
版主


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

發送簡訊給我
#2 引用回覆 回覆 發表時間:2006-12-08 09:44:19 IP:219.87.xxx.xxx 未訂閱
var
A, B, C: Integer;

procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.LoadFromFile('1.txt');
C := Memo1.Lines.Count-1;
B := StrToInt(Memo1.Lines[C]);
C := A B ;
Memo1.Lines.Add(' A = A ' IntToStr(B) ' : ' IntToStr(C) ' = ' IntToStr(A) ' ' IntToStr(C) );
A := C;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Edit1.Text:=IntToStr(A);
Memo1.Text:='每次從1.txt讀取要加上的數字, 和 A 相加, 再存回A';
Memo1.Lines.Add('A = ' IntToStr(A) );
end;

------
能力不足,求助於人;有能力時,幫幫別人;如果您滿意答覆,請適時結案!

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


發表:1
回覆:4
積分:1
註冊:2006-12-04

發送簡訊給我
#3 引用回覆 回覆 發表時間:2006-12-08 10:20:34 IP:219.68.xxx.xxx 訂閱
感謝 pcboy2 大大的回覆
這個方法只侷限在已知的記事本內容
我想的問題比較複雜點
如果 他儲存的 式子很麻煩
麻煩到可能動用到 if for 等等判斷的話 是否能不動用到重先編譯主檔
而改變以限定了變數
也就是說 我已經限定了 A B C 三個變數 讓他去設計
他要寫 A = B C 或者 if(A>某值) B = 某值 C = 某值
我主檔原先就只列出 A B C 得值 因讀了 TXT檔 會使得 ABC 改變

------
TEST
Coffee
版主


發表:31
回覆:878
積分:561
註冊:2006-11-15

發送簡訊給我
#4 引用回覆 回覆 發表時間:2006-12-08 11:00:21 IP:220.130.xxx.xxx 未訂閱
要自己寫Parser..但這似乎不是明智之舉..:P
光是四則運算加上括號還有負號你可能就得花點時間寫了..XD
可以參考Programming Language的Postfix方式才能確保運算式一定是由左向右運算(一般我們使用的表示式是中序,也就是運算子在運算元的兩側)
如果要加上if 之類的,就要建Parser Tree,要視你想要支援語法到什麼樣的程度
假設一個a * b / c * ( d e )的後序式就會是 a b * c / d e *
於是依照後序就會是讀進a, b 到*號時就運算出一個值,讀c到 /時就會將前面的運算值拿來除以c並得到一個結果值
再讀d , e到 號,會讀d, e這兩個值(以最靠近的運算值),來計算得到值之後又讀到*號,運算已存的兩個值得到結果

//話說計算機是我大學時的作業(遠目)
------
不論是否我發的文,在能力範圍皆很樂意為大家回答問題。
為了補我的能力不足之處,以及讓答案可以被重複的使用,希望大家能儘量以公開的方式問問題。
在引述到我的文時自然會儘量替各位想辦法,謝謝大家!
系統時間:2024-04-28 18:09:40
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!