Como puedo crear funciones?

[[FGarcia]]

Algo asi:

Código Delphi [-]
function Confirmar(Msg: string): Boolean;
begin
  Result := MessageDlg(Msg, mtConfirmation, mbYesNoCancel, 0) = mrYes;
end;

Un ejemplo de uso:

Código Delphi [-]
if Confirm('¡No se han guardado los cambios!' + #10#13 + '¿Confirma Salir?') then
          CancelUpdates;

[[Al González]]

Como complemento a la respuesta de FGarcia (¡saludos Fidel!), te convendrá incorporar tu lista de funciones dentro de una o más unidades —archivos .pas sin diseño visual—, de tal manera que queden disponibles para ser utilizadas desde cualquier programa con tan solo añadir el nombre de la unidad correspondiente en la cláusula Uses.

Código Delphi [-]
Uses
  MisFunciones;
...
Begin
  ...
  CajadeMensaje (parámetros);

Cabe mencionar que a estas colecciones de funciones se les conoce como bibliotecas (en inglés, libraries), aunque existe una considerable aceptación de la palabra "librerías"* también.

No dejes de aportar tus comentarios.

Saludos.

Al González.

P.D. No olvides añadir al "Library Path" de Delphi (un parámetro de configuración) el directorio donde se encuentre ubicada tu biblioteca de programación.

*Al igual que algunos autores de libros de programación, no comparto dicho empleo de la palabra librería por considerarlo un error cultural.