下載本文檔
版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、1 程序功能:在Applet上使用鼠標(biāo)在屏幕上隨意畫直線和畫點(diǎn)。用戶點(diǎn)擊“畫線”按鈕可畫直線,點(diǎn)擊“畫點(diǎn)”按鈕可畫連續(xù)點(diǎn),點(diǎn)擊“清除”按鈕可清除畫面上的所有內(nèi)容。 2 編寫LX8_9.java程序文件,源代碼如下。Button line, point, clear; MyCanvas2 c; public void init() c=new MyCanvas2(); c.setSize(350,200); c.setBackground(Color.green); line=new Button("畫線"); point=new Button("畫點(diǎn)")
2、; clear=new Button("清除"); add(line); add(point); add(clear); add(c); line.addActionListener(this); point.addActionListener(this); clear.addActionListener(this); public void actionPerformed(ActionEvent e) if (e.getSource()=line) / 設(shè)為畫直線模式 c.mode=0; else if (e.getSource()=point) / 設(shè)為畫連續(xù)點(diǎn)模式 c
3、.mode=1; else if (e.getSource()=clear) / 清除畫面 c.points=new Vector(); c.x1= -1; c.repaint(); class MyCanvas2 extends Canvas implements MouseListener,MouseMotionListener int x1, y1, x2, y2, mode; Vector points=new Vector(); MyCanvas2() addMouseListener(this); addMouseMotionListener(this); public void
4、paint(Graphics g) for (int i=0;i<points.size();i+) / 所有操作結(jié)果被重新畫出 Rectangle r=(Rectangle)points.elementAt(i); g.drawLine(r.x, r.y, r.width, r.height); if (x1!= -1 && mode =0) /畫當(dāng)前直線 g.drawLine(x1, y1, x2, y2); public void mousePressed(MouseEvent e) / 記錄起點(diǎn)坐標(biāo) x1=e.getX(); y1=e.getY(); public
5、 void mouseDragged(MouseEvent e) if (mode=0) / 記錄當(dāng)前坐標(biāo) x2=e.getX(); y2=e.getY(); else / 畫連續(xù)點(diǎn)時(shí)保存每一個(gè)筆畫的起點(diǎn)和當(dāng)前坐標(biāo) points.addElement(new Rectangle(x1, y1, e.getX(), e.getY(); x1=e.getX(); y1=e.getY(); repaint(); public void mouseReleased(MouseEvent e) if (mode=0) / 保存當(dāng)前直線的起點(diǎn)和終點(diǎn)坐標(biāo) points.addElement(new Rectangle(x1, y1, e.getX(), e.getY(); public void mouseClicked(MouseEvent e) public void mouseEntered(MouseEvent e) public void mouseExited(MouseEvent e) public void mouseMoved(MouseEvent e) 3 編譯源程
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- XX行業(yè)市場(chǎng)調(diào)研及消費(fèi)者需求分析報(bào)告
- 2024年在線少兒英語培訓(xùn)行業(yè)發(fā)展運(yùn)行現(xiàn)狀及投資潛力預(yù)測(cè)報(bào)告
- 2025解除合同協(xié)議書范本
- 2025汽車產(chǎn)品購銷合同書
- 橡膠井蓋行業(yè)行業(yè)發(fā)展趨勢(shì)及投資戰(zhàn)略研究分析報(bào)告
- 2025主體工程勞務(wù)承包合同
- 2025公司車位租賃合同
- 2025消防維保合同范文
- 2025版合同:國(guó)際土木工程招投標(biāo)
- 2025簽訂購房合同的注意事項(xiàng) 購房合同標(biāo)準(zhǔn)
- 山東省高等醫(yī)學(xué)院校臨床教學(xué)基地水平評(píng)估指標(biāo)體系與標(biāo)準(zhǔn)(修訂)
- 空白貨品簽收單
- 青海省全省市縣鄉(xiāng)鎮(zhèn)衛(wèi)生院街道社區(qū)衛(wèi)生服務(wù)中心基本公共衛(wèi)生服務(wù)醫(yī)療機(jī)構(gòu)信息名單目錄450家
- 網(wǎng)絡(luò)暴力的法律規(guī)制開題報(bào)告
- 水泥混凝土路面施工方案85171
- 泰康人壽養(yǎng)老社區(qū)介紹課件
- T∕CSTM 00584-2022 建筑用晶體硅光伏屋面瓦
- 環(huán)境保護(hù)知識(shí)培訓(xùn)
- 《民航服務(wù)禮儀》項(xiàng)目五 地面服務(wù)禮儀
- 最新干部(職工)基本信息審核表格式
- 國(guó)家開放大學(xué)實(shí)驗(yàn)學(xué)院生活中的法律第二單元測(cè)驗(yàn)答案
評(píng)論
0/150
提交評(píng)論