全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1132
推到 Plurk!
推到 Facebook!

請教我如何取代好嗎?~*_*

尚未結案
missee
一般會員


發表:1
回覆:1
積分:0
註冊:2003-07-23

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-07-23 16:08:49 IP:210.244.xxx.xxx 未訂閱
import java.lang.*; import java.awt.*; import java.awt.event.*; public class onlymove extends Frame { private onlymove Form1; private Label dragObj; private int oriX,oriY; private int X; private int Y; public onlymove() { Form1 = this; this.setLayout( null ); this.setTitle("小白板與板擦"); this.setBounds(300,100,280,200); dragObj = new Label("dragObj"); dragObj.setBounds(20,30,50,30); dragObj.setBackground( Color.red ); dragObj.addMouseListener(new myMouseAdapter() ); dragObj.addMouseMotionListener( new myMouseMotionListener() ); this.add(dragObj); this.addMouseListener(new myMouseAdapter() ); this.addMouseMotionListener( new myMouseMotionListener() ); this.addWindowListener( new WindowAdapter() { public void windowClosing(WindowEvent e) { System.exit( 0 ); //結束系統 } } ); this.setVisible( true ); } class myMouseMotionListener implements MouseMotionListener { public void mouseMoved(MouseEvent e) { //滑鼠移動事件 if(e.getComponent()==Form1) { //若滑鼠在 Form1 內移動 Form1.setTitle("Moved "); } } public void mouseDragged(MouseEvent e) { if(e.getComponent()==dragObj) { //拖曳 dragObj X = e.getX(); Y = e.getY(); dragObj.setLocation( dragObj.getLocation().x (X-oriX), dragObj.getLocation().y (Y-oriY) ); } } } class myMouseAdapter extends MouseAdapter { public void mousePressed(MouseEvent e) { if( e.getComponent()==dragObj ) { oriX = e.getX(); oriY = e.getY(); /* 若滑鼠是在 dragObj 內按下, * oriX、oriY 就記錄按下滑鼠時,在 dragObj 內的座標位置。 */ } } } public static void main(String arg[]) { new onlymove(); } } 各位大大~~~ 這是一個可在Frame內,任意移動lable(dragObj)的程式~ 我現在想把這個lable物件改成我自己用Graphics g所畫的圓~~ 請問這程式該如何修改呢??? (從UltraEdit上copy到這裡,版面可能會變的有點亂,請各位多多包含) 發表人 - missee 於 2003/07/24 13:08:01
ddy
站務副站長


發表:262
回覆:2105
積分:1169
註冊:2002-07-13

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-07-24 00:31:18 IP:210.68.xxx.xxx 未訂閱
引言: (從UltraEdit上copy到這裡,版面可能會變的有點亂,請各位多多包含)
程式碼亂可接受,但你的主題無意義,不能接受 三日內改標題,否刪刪檔
missee
一般會員


發表:1
回覆:1
積分:0
註冊:2003-07-23

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-07-24 13:09:56 IP:211.74.xxx.xxx 未訂閱
副站長~~sorry 我標題以改了~~
系統時間:2024-05-18 14:48:06
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!