Не работает процедура AVI2BMP под delphi 2010

[nick17]

Не работает процедура AVI2BMP под VFW под delphi 2010, а под delphi 7 все работает.

//функция конвертирования из Avi имени файла в Bmp имя файла.
var AVIStream: pAVIStream;
frame: pGETFRAME;
.........
AVIFileInit;
AVIStreamOpenFromFile(AviStream, LPCSTR(strAviFileName), streamtypeVIDEO,0,OF_READ, nil);
Frame := AVIStreamGetFrameOpen(AviStream, nil);
pbmi := AVIStreamGetFrame(Frame, lPos);

и вылетает с exeption
Как быть?

[raxp]

...во-первых - работает, во-вторых - наверняка дело в приведении или описании типов. Принято прикладывать скрины ошибок, телепаты на канарах.

[nick17]

А как работает? Процедурку, если можно...)))
На другом компе все то же самое...
Привожу Exception:

........
Thread Start: Thread ID: 3668. Process Probra.exe (3520)
Thread Exit: Thread ID: 3652. Process Probra.exe (3520)
Thread Exit: Thread ID: 4060. Process Probra.exe (3520)
Thread Start: Thread ID: 3264. Process Probra.exe (3520)
Thread Start: Thread ID: 3068. Process Probra.exe (3520)
Module Unload: MCIWAVE.dll. Process Probra.exe (3520)
Thread Exit: Thread ID: 2784. Process Probra.exe (3520)
Module Load: MCIWAVE.dll. No Debug Info. Base Address: $622A0000. Process Probra.exe (3520)
Thread Start: Thread ID: 1448. Process Probra.exe (3520)
First chance exception at $7C812AFB. Exception class EAccessViolation with message 'Access violation at address 0012F6FF. Write of address 48133AFD'. Process Probra.exe (3520)