Como ejecutar un procedimiento en mis forms mostrados, cuando ocurra un evento??

[[Lepe]]

En principio, puedes usar un EventAlert por cada Form que quiera recibir mensajes. Así cada ventana registra sus propios mensajes y al cerrar la ventana, elimina la notificación.

Otra forma es usando herencia, por ejemplo. Defines una ventana maestra que tenga el procedimiento actualiza, después todas las ventanas sobreescriben ese método y hace su tarea.

Código Delphi [-]
TBase = Class(TForm)

public
  procedure Actualiza (const msg:String);virtual;
end;

TForm1 = Class(TBase)

public
  procedure Actualiza (const msg:String);override;
end;



TForm2 = Class(TBase)

public
  procedure Actualiza (const msg:String);override;
end;
 
....
Ahora si puedes hacer esto:
for i := 0 to Screen.FormCount-1 do
begin
  if Pos('Papeleta',Screen.Forms[i].Caption)>0 then
  begin
    TBase(Screen.Forms[i]).Actualiza('yo yo yo');
  end;
end

Saludo