急求教：一个计算问题？？？

Question

在DBEdit1中和DBEdit2中输入数据，在DBEdit3中得出结果

Answer 1

 procedure EdtChange(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.EdtChange(Sender: TObject);
begin
//如dbedit1,dbedit2数据分别为'张三','你好'
DbEdit3.Text:=dbedit1.Text+dbedit2.Text;
end;procedure TForm1.FormCreate(Sender: TObject);
begin
dbedit1.OnChange:=edtchange;
dbedit2.OnChange:=edtchange;
end;

Answer 2

要什么样的结果，，，
procedure TForm1.EdtChange(Sender: TObject);
begin
//如dbedit1,dbedit2数据分别为 '张三 ', '你好 '
DbEdit3.Text:=dbedit1.Text+dbedit2.Text;//这里可以使用其它运算*，/，mod,<>,都可以
end;procedure TForm1.FormCreate(Sender: TObject);
begin
dbedit1.OnChange:=edtchange;
dbedit2.OnChange:=edtchange;
end; 

Answer 3

楼主应该 good good study, day day up.