Como hacer esto ?

[ecfisa]

el problema es que no veo el formulario (form1.onshow) hasta que se han ejecutado todas las operaciones

Hola.

Si los procesos transcurren antes o durante el evento FormShow, no veo solución en forma directa.
Pero creo que lo que te va a funcionar, es crear y capturar un mensaje AfterShow.

Ejemplo:

Código Delphi [-]
...
const
  TAREAS_AFTER_SHOW = WM_USER + 300;
type
  TForm1 = class(TForm)
    procedure FormShow(Sender: TObject);
  private
    procedure TareasAfterShow(var Msg: TMessage); message TAREAS_AFTER_SHOW;
  public
  end;
...
interface
...
procedure TForm1.FormShow(Sender: TObject);
begin
  // Lo que quieras mostrar... 
  Caption:= 'Evento OnShow';
  PostMessage(Handle, TAREAS_AFTER_SHOW, 0, 0);
end;

procedure TForm1.TareasAfterShow(var Msg: TMessage);
begin
  // Aca los procesos que quieras
  Sleep(2000); // simula  demora de procesos
  ShowMessage('Tareas finalizadas');
end;
...

Saludos.