[[ElKurgan]]

Por lo que veo, estas intentando mostrar un formulario que aún no ha sido creado. Antes de "Form1.Show" tendrás que crearlo...

Prueba con algo como esto:

function msg:Boolean;stdcall;
begin
  form1 := TForm1.Create(nil)
  try
    try
      form1.Show;
      result:=true;
    except
      showMessage('Error al intantar mostrar el mensaje');
      result:=true;
    end;
  finally
    form1.free;
  end;
end;

Un saludo