Interface
...
type
TMainForm = class(TForm)
...
public// métodos públicos
...
//Declaración del método en la parte pública de la clase,
//quedando accesible para otros módulos
procedure Procesopesado1Click(Sender: TObject);
...
end;
...
//Declaración en la parte de Interfaz, quedando visible para otros módulos
procedure Procesopesado1;
implementation
...
procedure Procesopesado1;
begin
//el cuerpo del procedimiento
...
end;
...
//Para los métodos: Al inicio va el nombre de la clase
procedure TMainForm.Procesopesado1Click(Sender: TObject);
begin
//el cuerpo del método
Procesopesado1;
end;