midlet5.java

这是郭克华老师的J2ME视频的源代码

package prj4_1;

import javax.microedition.lcdui.Command;
import javax.microedition.lcdui.CommandListener;
import javax.microedition.lcdui.Display;
import javax.microedition.lcdui.Displayable;
import javax.microedition.lcdui.TextBox;
import javax.microedition.lcdui.TextField;
import javax.microedition.midlet.MIDlet;
import javax.microedition.midlet.MIDletStateChangeException;

public class MIDlet5 extends MIDlet implements CommandListener{
	private TextBox tbx = new TextBox("请您输入短信","",255,TextField.ANY);
	private Display dis;
	
	private Command cmdDelete = new Command("删除文本",Command.SCREEN,1);
	
	protected void startApp() throws MIDletStateChangeException {
		dis = Display.getDisplay(this);
		dis.setCurrent(tbx);
		
		tbx.addCommand(cmdDelete);
		
		tbx.setCommandListener(this);
	}	
	
	public void commandAction(Command c, Displayable d) {		
		if(c==cmdDelete){
			//删除光标前的一个字符
			int position = tbx.getCaretPosition();
			tbx.delete(position-1, 1);
		}

	}
	
	protected void destroyApp(boolean arg0) throws MIDletStateChangeException {

	}

	protected void pauseApp() {

	}



}