Como crear un procedimiento

[JODELSA]

Hola!
Esto es para una prueba. tengo varios componentes edit en mi pantalla y le quiero poner la propiedad edit en blanco, pero quiero hacer un procedimiento que yo pueda ejecutar en cualquier lugar del programa como lo hago?

gracia

[roman]

Código Delphi [-]
/*
  Procedimiento para limpiar los controles TEdit
  de cualquier formulario.
 
  Parámetros:
    F - Formulario que se quiere limpiar.

  Notas:
    El procedimiento puede llamarse en cualquier parte

  Alumno:
    Román

  Calificación: _______
*/
procedure Limpia(F: TForm);
var
  I: Integer;

begin
  if not Assigned(F) then exit;

  for I := 0 to Pred(F.ComponentCount) do
    if F.Components[i] is TEdit then
      TEdit(F.Components[i]).Clear;
end;

// Saludos