表單設(shè)計(jì)與應(yīng)用ppt課件-資料下載頁
2025-05-03 06:20本頁面
【正文】 過去后 ， Visual FoxPro 將產(chǎn)生一個(gè) Timer 事件 。 例 ex116 設(shè)計(jì)一個(gè)電子鐘 ， 要求不直接使用 TIME()函數(shù) 。 一個(gè)電子鐘至少需要兩個(gè)對(duì)象 ， 一個(gè)時(shí)鐘信號(hào)發(fā)生器和一個(gè)顯示器 ， 可以使用一個(gè)文本框作為顯示器 ， 而用計(jì)時(shí)器作為時(shí)鐘信號(hào)發(fā)生器 。 1 建立一個(gè)新表單 ， 并在表單中加入一個(gè)文本框?qū)ο蠛鸵粋€(gè)計(jì)時(shí)器對(duì)象 。 2 在表單的 Load PUBLIC rh,rm,rs amp。amp。 分別存放時(shí)間的時(shí) 、 分 、 3 將文本框的 FontSize 屬性設(shè)置為 18， 并在其 Init事件代碼中 =time() amp。amp。 Visual FoxPro 30 4 將計(jì)時(shí)器的 Interval 屬性設(shè)置為 1000（ 1秒鐘觸發(fā)一次 timer事件 ） ， 并為其設(shè)計(jì) Timer事件代碼 。 rt= amp。amp。 rh=VAL(SUBSTR(rt,1,2)) rm=VAL(SUBSTR(rt,4,2)) rs=VAL(SUBSTR(rt,7,2)) DO CASE CASE rs60 amp。amp。 秒數(shù)小于 60， 時(shí)分?jǐn)?shù)值不變 ， 直接對(duì)秒加 1 rs=rs+1 CASE rm60 amp。amp。 rm=rm+1 rs=0 CASE rh24 amp。amp。 rh=rh+1 rm=0 rs=0 Visual FoxPro 31 OTHERWISE rh=0 rm=0 rs=0 ENDCASE rh1=str(rh,2) amp。amp。 將數(shù)值轉(zhuǎn)化為字符，并注意在一位數(shù)前補(bǔ) 0 IF SUBSTR(rh1,1,1)=′ ′ THEN rh1=′0′+SUBSTR(rh1,2,1) ENDIF rm1=str(rm,2) IF SUBSTR(rm1,1,1)=′ ′ THEN rm1=′0′+SUBSTR(rm1,2,1) ENDIF rs1=str(rs,2) Visual FoxPro 32 IF SUBSTR(rs1,1,1)=′ ′ THEN rs1=′0′+SUBSTR(rs1,2,1) ENDIF =rh1+′:′+rm1+′:′+rs1 RETURN Visual FoxPro 33 頁框控件 頁框是 “ 頁面 ” 的一種容器 ， 而 “ 頁面 ” 也是一種容器 ，可以放置任何控件 、 容器和自定義對(duì)象 ， 一個(gè)頁面在運(yùn)行時(shí)對(duì)應(yīng)一個(gè)屏幕窗口 。 表單的一個(gè)窗口幅面有限 ， 如果在一個(gè)應(yīng)用中要涉及到的對(duì)象很多 ， 在一個(gè)窗口不好布局時(shí) ， 可以把整個(gè)表單中的對(duì)象按聯(lián)系的緊密程度進(jìn)一步劃分為小的模塊 ， 把一個(gè)模塊中的對(duì)象在一個(gè)頁面中進(jìn)行布局 ， 這樣 ， 整個(gè)窗口就顯得簡要 、 清晰 ，也不至于因?yàn)橐粋€(gè)窗口放置的對(duì)象太多而弄得眼花繚亂 ， 找不到所需要的信息 。 頁框就正是為了這樣的目的而設(shè)計(jì)的一種容器類 ， 是 Visual FoxPro 的一個(gè)基類 。 頁框建立在表單上 ， 頁面建立在頁框上 ， 經(jīng)過頁框的處理后 ， 一個(gè)表單中的全部對(duì)象就分布到了多個(gè)窗口 。 Visual FoxPro 34 例 117 建立一個(gè)包含兩個(gè)頁面的頁框，第一個(gè)頁面顯示學(xué)生表的信息，第二個(gè)頁面顯示選課表的信息，并在兩個(gè)頁面間建立相應(yīng)的聯(lián)系，即在學(xué)生表中選種某位學(xué)生，在第二個(gè)頁面中自動(dòng)顯示期選課及成績 Visual FoxPro 35 系統(tǒng)登錄表單 每個(gè)應(yīng)用系統(tǒng)都有自己的用戶群 ， 在進(jìn)入一個(gè)應(yīng)用系統(tǒng)前 ，常有一個(gè)登錄過程 ， 目的就是驗(yàn)明使用者的身份 ， 防止未授權(quán)用戶進(jìn)入系統(tǒng) ， 從而保證系統(tǒng)安全 。 在登錄界面的文本框輸入登錄者姓名 ， 下面的文本框輸入編號(hào) ， 為保密 ， 這里輸入的字符均顯示為星號(hào) （ *） 。 演示實(shí)驗(yàn)指導(dǎo)實(shí)驗(yàn)十一 、 十二 、 十三 、 十四 表單的應(yīng)用
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1