Video über Andorra 2D TAdVideoPlayer

[NTcomputer_0]

Sorry, das hatte ich vergessen zu erwähnen:
Das   video_init; dient nicht zum Erstellen des Video-Players, dadurch werden erstmal Arrays vorbereitet. Das ERstellen passiert erst nach dem Initialize des AdDraws:

Delphi-Quellcode:

  video_init;

  If AdDraw.Initialize Then begin
    drawframes.Enabled:=true;
  end else begin
    ShowMessage(AdDraw.GetLastError);
    halt;
  end;

  video_intro_1; // hier wird erst der Player erstellt

Delphi-Quellcode:

procedure video_intro_1;
begin
  video_intro_instances[1]:=video_register('..\videos\intro1.m1v',
    video_intro_1stop);
  video_start(video_intro_instances[1]);
end;

Daran liegt es also nicht!