function select_dll(const str:array of string; tol:integer):integer;
var
  i: integer;
  var_dll: string;
begin
  for i:=0 to length(str) do
  case i of
    0:  var_dll:='dll_process_gsm.dll';
        break;
    1:  var_dll:='dll_process_mot.dll';
        break;
    2:  var_dll:='dll_process_nok.dll';
        break;
    3:  var_dll:='dll_process_sms.dll';
  end;
    if LoadLibrary(var_dll) = '' then
      showmessage('装载动态库'+var_dll+'失败!')
 
end;
我公司要我做一个与动态库与平台间的函数,dll有很多,动态链接时,那不同的动态库有不同的函数,怎样建一个库与库里函数映射呀?