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
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...