本章首先為讀者介紹delphi的基本情況和發(fā)展歷史-資料下載頁
2025-06-15 21:55本頁面
【正文】 gin if (=39。Hello,World!39。) then :=39。世界，你好！39。 //如果顯示內容為“Hello,World!”， //則顯示“世界，你好！” else :=39。Hello,World!39。 //如果顯示內容為“世界，你好！”， //則顯示“Hello,World!”end。end.● 運行程序通過選擇菜單命令Run|Run運行程序。如果程序沒有編譯和鏈接，在程序運行前系統(tǒng)會自動進行編譯和鏈接。說明：，在該處理過程中，通過“if then else”語句將組件Label1的Caption屬性改變，也就是將窗體中顯示的內容每秒改變一次。用戶可以自己嘗試進行以下工作：(1) 改變窗體中顯示內容交替的頻率。通過設置定時器的Interval屬性來實現(xiàn)。比如設置Interval為500ms，如圖16所示。(2) 改變窗體標題欄的內容，通過設置窗體的Caption屬性來實現(xiàn)。如可以將“Form1”改為“小鬧鈴”，如圖17所示。 圖16 設置Interval屬性 圖17 改變窗體標題屬性(3) 改變窗體的大小、顯示內容、字體和顏色等。如可以將顯示內容改為“It’s time for lunch！”和“現(xiàn)在是吃午飯的時候了！”。這樣，就可以在Windows系統(tǒng)中的“任務計劃”程序中添加一個新的任務，實現(xiàn)在午飯前某個時候自動運行該應用程序。(4) 有興趣的用戶還可以讓程序在運行過程中發(fā)出聲音，這樣提示的效果會更明顯。：procedure m er1Timer(Sender: TObject ) 。begin...Beep。 // 發(fā)聲end。end. 這樣在程序運行中，每當標簽上的文字改變時都會發(fā)出“嘟”的一聲，增強了該程序作為小鬧鈴的提示作用。7 / 7
環(huán)評公示相關推薦
鄂ICP備17016276號-1