Delphi Prism Working Example

In the following demo, we will add the two overloaded methods above to a form class and use them in a button click event.

1. Create an application with a single form and button.
2. Alter the form class in the interface section as follows:
   

   MainForm = partial class(System.Windows.Forms.Form) private   method button1_Click(sender: System.Object; e: System.EventArgs); protected   method Dispose(disposing: Boolean); override; public   constructor;     method Add(a, b: integer): Integer;   method Add(const msg: String; a, b: integer): String; end;

   
    
3. Add the two methods to the implementation section:
   

   method MainForm.Add(a, b: integer): Integer; begin   Result := a + b; end;   method MainForm.Add(const msg: String; a, b: integer): String; begin   Result := msg + (a + b); end;

   
    
4. Now exercise our overloaded method. Alter the click event of our button as follows:
   

   method MainForm.button1_Click(sender: System.Object; e: System.EventArgs); begin   MessageBox.Show("2 + 2 = " + Add(2,2));   MessageBox.Show(Add("3+4=",3,4)); end;

   
    
5. Test-it. Run the application and click the button.