Никто не пробовал использовать 32-битные DDL в 64-битных виндах? Делал несколько попыток, формсы просто падают. А у юзеров зоопарк. Нужна универсальность.

Тупой Пух,

Извини буквы перепутал. Вот текст. Вроде все по правилам.

Package Body FFI_TEST Is
Function ff_files_qnt(p_handler ORA_FFI.funcHandleType, p_dir Varchar2) Return Number;
Pragma interface(C, ff_files_qnt, 11265);

Function files_qnt(p_dir Varchar2) Return Number Is
Begin
Return (ff_files_qnt(v_fqnt_handler, 'D:\akt\'));
End;
Begin
v_dll_handler := ORA_FFI.Load_Library('D:\akt\', 'GetFilesList.dll');
If (ORA_FFI.Is_Null_Ptr(v_dll_handler)) Then
message('Library NOT Load !!!'); pause;
End If;
v_fqnt_handler := ORA_FFI.Register_Function(v_dll_handler, 'GetFilesCount', ORA_FFI.C_STD);
If (ORA_FFI.Is_Null_Ptr(v_fqnt_handler)) Then
message('Function NOT Registry !!!'); pause;
End If;
ORA_FFI.Register_Parameter(v_fqnt_handler, ORA_FFI.C_CHAR);
ORA_FFI.Register_Return(v_fqnt_handler, ORA_FFI.C_INT);
End;