Delphide Form ve Nesneler

delphi

procedure TForm46.Button1Click(Sender: TObject);
begin
showmessage(inttostr(strtoint(edit1.Text)-strtoint(edit2.Text)));
end;