Hola
Por ejemplo si haces un procedimiento:
Código Delphi
[-]
procedure TFMainForm.Construyemensaje;
begin
MessageDlg('Este es un emnsaje.',[mbOK],0);
end;
Para llamar a ese procedimiento solo tienes que poner el nombre:
Código Delphi
[-]
procedure TFMainForm.FormCreate(Sender: TObject);
begin
Construyemensaje;
End;
Saludos