Hola
Por ejemplo tengo en el formcreate esto:
Código Delphi
[-]
procedure TForm1.FormCreate(Sender: TObject);
begin
showmessage('hola');
end;
Ahora quiero que se repita cuando lo llame, pero no puedo estar abriendo y cerrando el form, entonces creo un procedimiento asi:
Código Delphi
[-]
procedure TForm1.MiProceso;
begin
showmessage('hola');
end;
Este procedure lo coloco donde los demas en el TYPE.
Código Delphi
[-]
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
procedure MiProceso;
private
Bien este proceso lo llama desde donde quiera, por ejemplo desde el mismo formcreate, asi:
Código Delphi
[-]
procedure TForm1.FormCreate(Sender: TObject);
begin
MiProceso;
end;
Espero lo entiendas.
Saludos