calculate.txt

这是一个用JPADPRO编的用作计算的计算机

import javax.swing.*;
import java.awt.*;
import java.awt.event.*;
import mypg.*;
public class calculate extends JApplet {
  	Font f = new Font("宋体",Font.BOLD,14);//创建一个对象f
  	JLabel d1=new JLabel("输入"),d2=new JLabel("输出");
   	JTextField t1 = new JTextField(15),t2= new JTextField(15);
	JButton b1 = new JButton("计算"),b2 = new JButton("清除");
  class BL implements ActionListener {
    public void actionPerformed(ActionEvent e){
	int s=0,k=0;
      String name =((JButton)e.getSource()).getText();
      if (name.equals("计算")){
	k=Integer.parseInt(t1.getText());
	while (k >0){s+=k%10;k/=10;}
	t2.setText(String.valueOf((int)s));}
      else{t1.setText("");t2.setText("");}
    }
  }
  public void init() {
	BL al = new BL();
    	b1.addActionListener(al);
    	b2.addActionListener(al);
    	Container cp = getContentPane();
    	cp.setLayout(new FlowLayout());
	d1.setFont(f);d2.setFont(f); //设置字体
   	t1.setFont(f);t2.setFont(f);	
	b1.setFont(f);b2.setFont(f);
	cp.add(d1);cp.add(t1);
	cp.add(d2);cp.add(t2);
    	cp.add(b1); cp.add(b2);
  }
  public static void main(String[] args) {
    Console.run(new calculate(), 170, 120);
  }
}