谁能帮我剖析一下这个程序,越详细越好。 procedure TForm1.OnMyClick(Sender: TObject);
var i,j:Integer;begin
   i :=  StrToInt(Edit1.Text) ;
   j :=  StrToInt(Edit2.Text) ;
   showMessage('输出:'+IntToStr(i*j)); 
end;end.