Contoh Membuat Aplikasi Java di Handphone

Hai sobat-sobat sekalian, kali ini saya akan membahas tentang membuat aplikasi java di HP. Pertama-tama teman-teman harus mempunyai aplikasi J2SE ( jdk-6u3-windows-i586-p ), J2ME WTK ( sun_java_wireless_toolkit-2_5-windows ), JCreator.
Urutan penginstalannya adalah sebagai berikut:

install J2SE ( jdk-6u3-windows-i586-p )
install J2ME WTK ( sun_java_wireless_toolkit-2_5-windows )
klik kanan my computer, properties, advanced, enviroment variables,klik variable Path lalu klik edit. Di jendela Edit System Variable ketikkan ;C:\Program Files\Java\jdk1.6.0_10\bin;%PATH%
install JCreator

Sebagai contohnya:

Buka aplikasi Wireless Toolkit 2.5
Klik New Project
Isi Project Name (disini sebagai contohnya saya isi dengan ProjectTextBox2) dan MIDlet Class Name (disini sebagi contoh saya mengisikan MgmtTeks1), lalu klik Create Project
Di Target Platform, pilih JTWI , lalu klik OK
Buka aplikasi JCreator nya
Di menu bar pilih File, new, file atau tekan ( ctrl + N )
Dikotak sebelah kiri pilih Java Classes, dikotak sebelah kanan pilih Empty Java File, lalu klik Next
Isikan Name nya ( disini sebagai contohnya saya mengisikan MgmtTeks1 ).
Pada Location, klik ikon kotak, lalu pilih My Computer, C: , WTK 25, apps, ProjectTextBox2, src, lalu klik OK, Finish
Isikan Script dibawah ni di JCreator, jika script dibawah ini tidak bisa dijalankan, download saja file txt aslinya disini,
DOWNLOAD

/*=============================================
Program Management Teks Memakai Object TextBox
=============================================*/
import javax.microedition.midlet.*;
import javax.microedition.lcdui.*;

public class MgmtTeks extends MIDlet
implements CommandListener
{
private Display disp1;
private TextBox tb1;
private Form InfoForm1;
private Alert alert1;
private Command CmdExit;
private Command CmdAturTeks;
private Command CmdInsertTeks;
private Command CmdBlankTeks;
private Command CmdFormInfo;
private Command CmdReturn;

public MgmtTeks()
{
disp1 = Display.getDisplay(this);
tb1 = new TextBox("Management Teks", null,256, TextField.ANY);
CmdExit = new Command("Exit", Command.EXIT, 1);
CmdAturTeks = new Command("Atur Teks", Command.SCREEN, 2);
CmdInsertTeks = new Command("Insert Teks", Command.SCREEN, 2);
CmdBlankTeks = new Command("Blank Teks", Command.SCREEN, 2);
CmdFormInfo = new Command("Form Info", Command.SCREEN, 2);
CmdReturn = new Command("Return", Command.SCREEN, 2);
tb1.addCommand(CmdExit);
tb1.addCommand(CmdAturTeks);
tb1.addCommand(CmdInsertTeks);
tb1.addCommand(CmdBlankTeks);
tb1.addCommand(CmdFormInfo);
tb1.addCommand(CmdReturn);
tb1.setCommandListener(this);
}

public void startApp()
{
disp1.setCurrent(tb1);
}

public void pauseApp()
{
}

public void destroyApp(boolean unconditional)
{
}

public void commandAction(Command Cmd, Displayable s)
{
if (Cmd == CmdExit)
{
destroyApp(true);
notifyDestroyed();
}
else if (Cmd == CmdAturTeks)
{
tb1.setString("Atur teks di TextBox");
}
else if (Cmd == CmdInsertTeks)
{
tb1.insert("Teks Disisipkan", 0);
}
else if (Cmd == CmdBlankTeks)
{
if (tb1.size() > 0)
{
tb1.delete(0, tb1.size());
}
}
else if (Cmd == CmdFormInfo)
{
InfoForm1 = new Form("Informasi Teks Di Form");
InfoForm1.append("Teks Yang Ada: " + tb1.getString() + "\n");
InfoForm1.append("Jumlah karakter: " + tb1.size() + "\n");
InfoForm1.append("Posisi Kursor: " + tb1.getCaretPosition());
InfoForm1.addCommand(CmdReturn);
InfoForm1.setCommandListener(this);
disp1.setCurrent(InfoForm1);
}
else if (Cmd == CmdReturn)
{
disp1.setCurrent(tb1);
}
}
}
Save
Pada Wireless Toolkit 2.5 klik Build, lalu Run