delphi井字遊戲,清除記憶問題!!
 

這已是我完成的小程式
但有一部份就是清除鍵好像不夠乾淨
還是會記得上一次贏的人

有人可以幫忙解決一下嗎?
還有鎖按鍵與平手的情形要如何加入呢?
:confused: :confused:
(ps.這不是學校作業)

遊戲在那兒.....
怎麼沒看到

http://www.pcdvd.com.tw/attachment....achmentid=52375

sorry,線路lag害我無法編輯
.....那個k.top又掛了

話說~~~~
那個文章連結失效....

真怪
剛好像被砍掉了...
重新po了

Reset的時候，是不是也要把Array的資料歸0啊，沒有清掉的樣子...

1.變數 i,a,b 在運算前最好指定初值,要不然有可能產生意料之外的結果.
2.整個Form都會用到的變數,宣告在Private內,Form結束時會自動幫你清記憶體內容.

3.變數 j 的內容既然只有兩種變化,使用boolean比用integer好,宣告在Private內,每按一個鍵,使用"j := not j;"改變內容,當然..也要宣告初值.
4.在procedure的最後,把該元件的"Enabled"屬性改為false,就能達到鎖按鍵的功能.
5.字體加大一些可能會比較好.

我幫你處理好了 ...

6.判斷的部份寫成一個獨立的Procedure,而且起碼要到第五手之後才需要判斷.
7."平手的情形"就是下到第九手還沒分出勝負.
8.既然沒有"回復"的功能,其實是用不到Array的,直接比對內容就可以了.

以上 小弟獻醜了