KeyWord

Sabtu, 30 Mei 2009

Kamus.java

Program KAMUS.JAVA

import java.awt.*;
import java.awt.event.*;
import javax.swing.*;
import java.io.*;
public class Kamus extends JFrame implements ActionListener {
JTextField txtIng = new JTextField(100);
JTextField txtInd = new JTextField(100);
JLabel lblIng = new JLabel("Inggris");
JLabel lblInd = new JLabel("Indonesia");
JButton btnTerjemah = new JButton("Terjemah");
public static void main(String[] args){
Kamus theApp = new Kamus();
}
public Kamus(){
JPanel panel = new JPanel();
panel.setLayout(new GridLayout(2,2));
panel.add(lblIng);
panel.add(txtIng);
panel.add(lblInd);
panel.add(txtInd);
txtInd.setEditable(false);
add(panel,BorderLayout.NORTH);
add(btnTerjemah,BorderLayout.SOUTH);
btnTerjemah.addActionListener(this);
setBounds(0,0,300,100);
setVisible(true);
}
public void actionPerformed(ActionEvent e){
try{
FileReader fr = new FileReader("Kamus.txt");
BufferedReader br = new BufferedReader(fr);
boolean ketemu = false;
String temp = null;
temp = br.readLine();
while(temp!=null){
int index = temp.indexOf("$");
String ing = temp.substring(0,index);
String ind = temp.substring(index+1);
if(ing.toLowerCase().equals(txtIng.getText().toLowerCase())){
ketemu = true;
txtInd.setText(ind);
}
temp = br.readLine();
}
if(ketemu==false){
JOptionPane.showMessageDialog(this,"Tidak ketemu");
}
}catch(Exception ex){
System.out.println(ex.getMessage());
}
}
}
>> Data Base dibawah ini (wajib di ketik pakek notepad enk)
cat$kucing
dog$anjing
elephant$gajah
tiger$harimau
giraffe$jerapah
apple$apel
purple$ungu
flower$bunga
black$hitam
red$merah
love$cinta
honey$madu
perfect$sempurna
PENTING:baca ini sebelum mencoba
>>masukkan data sesuai data base anda??????
>>isi data base bisa anda tambah sesuai kreasi anda
>>anda sukses run berarti anda beruntung...good luck

Tidak ada komentar:

Posting Komentar

newspaper>>>