對於“完成“按鈕,我們所要做的就是在此按鈕被點擊時,讓福文本框的可見性變為true,這樣就可以顯示剛才所保存的所有做題信息了。
代碼如下所示:
procedure TWinForm . Button3 _ Click ( sender : System . Object ; e : System . EventArgs ) ;
begin
//添加自己的代碼
button1 . Enabled : = true ;
button3 . Enabled : = false ;
button2 . Enabled : = false ;
richtextbox1 . Text : = richtextbox1 . text + '作題數 :' + Convert . ToString ( tishu ) + ' 用時 :' + Convert . ToString ( shijian ) + '秒' ;
richtextbox1 . Visible : = true ;
timer1 . Enabled : = false ;
end ;
我們還要在鐘表觸發事件中添加代碼,用來顯示做題時的時間信息.代碼如下:
procedure TWinForm . Timer1 _ Tick ( sender : System . Object ; e : System . EventArgs ) ;
begin
//添加自己的代碼
label2 . text : = '用時 :' + Convert . ToString ( shijian ) + '秒' ;
shijian : = shijian + 1 ;
end ;
最後,就是在窗體初始化時,對相關變量信息的設置。代碼如下:
procedure TWinForm . TWinForm _ Load ( sender : System . Object ; e : System . EventArgs ) ;
begin
//添加自己的代碼
shijian : = 0 ;
tishu : = 1 ;
end ;
運行界面如下:
這樣我們的軟件就完工了。當然我希望大家通過這個簡單的實例,大家在編寫和使用的過程中,能體會到Delphi為我們提供的完美的服務。
五、結束語
Delphi 2005總的來說還是挺直得一用的工具,無論從大的功能方面,還是小的細節方面,都時很不錯的。但是,當你用了微軟的工具之後,也許你對這些功能就不覺得很驚奇了。最重要的是,對於硬件的需求來說,Delphi 2005確實比較吃內存,如下圖所示:
這是我在主頻2.8G的inter p4 處理器,256m ddr333的機器上的測試,雖然,不象之前大家所傳的必須要使用512m內存那麼誇張,但是可以看到在還是比較吃內存的。最重要的一點,Delphi 2005 將Delphi帶入了.Net時代是一大進步,也是廣大Delphi用戶的一件幸事,但在其中添加C#等工程就顯得畫蛇添足。畢竟Delphi用戶,再學習C#是一件比較艱難的事情,即使學習之後,難道真的有必要使用Delphi嗎?微軟的VC#,和Borland自己的C# builder不是更專業嗎?我不解...