codigo comun entre distintos formularios

[[maeyanes]]

También puedes usar la herencia visual...

Creas una forma que contenga el método LimpiarDatos:

Código Delphi [-]
TMiForma = class(TForm)
protected
  procedure LimpiarDatos; virtual;
end;

implementation

procedure TMiForma.LimpiarDatos;
begin
  // Lo que quieres hacer...
end;

Luego agregas esa unidad a tu proyecto y de ahí heredas esa forma... así puedes tener lo que deseas:

Código Delphi [-]
TClientesForm = class(TMiForma)
  edtClave: TEdit;
  edtNombre: TEdit;
  btnAceptar: TButton;
  btnCancelar: TButton;
  btnLimpiar: TButton;
  procedure btnLimpiarOnClick(Sender: TObject);
end;

implementation

procedure TClientesForm.btnLimpiarOnClick(Sender: TObject);
begin
  LimpiarDatos
end;

Saludos...