[[basti]]

Prueba lo siguiente, no sé si es la mejor forma de hacerlo, pero acabo de probarlo y funciona:

OnCreate del form:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
  TransparentColor := True;
  TransparentColorValue := clBlack;
  Color := clBlack;
  BorderStyle := bsNone;
end;

OnProgress del TImage:

Código Delphi [-]
procedure TForm1.Image1Progress(Sender: TObject; Stage: TProgressStage;
  PercentDone: Byte; RedrawNow: Boolean; const R: TRect;
  const Msg: String);
begin
  if PercentDone = 100 then
  begin
    TransparentColor := False;
    Color := clBtnFace;
    BorderStyle := bsSizeable;
  end;
end;

Lo que hace es hacer el form transparente en el create, y restablecerlo cuando la imagen está totalmente cargada.