AVI für TAnimate aus fremder DLL/EXE ???

[scp]

Warum funktioniert dieser Code:

Delphi-Quellcode:

    FModuleHandle := LoadLibraryEx(PChar(FFileName), 0, LOAD_LIBRARY_AS_DATAFILE);

    AnimateV.CommonAVI := aviNone;

    If (StrToIntDef(Name, 0) <> 0) then
      SendMessage(AnimateV.Handle, ACM_OPEN, FModuleHandle, StrToIntDef(Name, 0))
    else
      SendMessage(AnimateV.Handle, ACM_OPEN, FModuleHandle, Integer(@Name[1]));

    SendMessage(AnimateV.Handle, ACM_PLAY, -1, MAKELONG(0, Word(-1)));

während dieser eine Exception auslöst ('AVI konnte nicht geöffnet werden')

Delphi-Quellcode:

    FModuleHandle := LoadLibraryEx(PChar(FFileName), 0, LOAD_LIBRARY_AS_DATAFILE);

    AnimateV.CommonAVI := aviNone;

    AnimateV.ResHandle := FModuleHandle;  // Hier die Exception

    If (StrToIntDef(Name, 0) <> 0) then
      AnimateV.ResID := StrToIntDef(Name, 0)
    else
      AnimateV.ResName := Name;

    AnimateV.Seek(1);
    AnimateV.Play(1, AnimateV.FrameCount, 0);

obwohl der untere eigentlich der korrekte Code sein müsste?