// Punto 9: Los procedimientos o funciones sin parámetros se pueden omitir al llamar (); también puede llevar la función MyFun: string ; begin Resultado: = ' ok ' ; end ; { Call } procedure TForm1.Button1Click (Sender: TObject ); var s: string ; begin s: = MyFun; ShowMessage (s); { ok } s: = MyFun (); ShowMessage (s); { ok } end ;