llamar a procedure desde otra procedure

[rgstuamigo]

Amigo CarlosHernandez >
Si vas a hacer una unidad con procedimientos y/o funciones que no van a pertenecer a ninguna clase pues puedes hacerlo así:

Código Delphi [-]
unit Unit2;

interface

uses Dialogs;

procedure Hola();

implementation

procedure Hola();
begin
 ShowMessage('Hola');
end;

end.

Ahora si por el contrario vas a crear nuevas clases entoces lo haces así:

Código Delphi [-]
unit Unit3;

interface
uses Dialogs;

type
  MiClase = Class {<--Aquí si deseas lo puedes haces asi >  MiClase = Class(TObject)
                   pero es lo mismo ya que para toda clase  que no se especifique su ancestro
                   el compilador asume que su padre es la clase TObject,
                   a no ser que quieras heredar de una clase en cuestión }
  private
    { Aqui se pone todas las declaraciones privadas }
  public
    { Aqui se pone todas las declaraciones públicas }
    procedure Hola();//este método es publico
  end;
implementation

{ MiClase }

procedure MiClase.Hola;
begin
ShowMessage('Hola');
end;

end.

Espero que todo haya quedado claro..
Saludos...