Вызов процедуры из длл

[Volkogriz]

Доброе Время суток.
Помагите пожалуйсто!
Есть длл с ресурсом, я раньше добовлял этот код:

procedure ExtractRes(ResType, ResName, ResNewName : String) stdcall;
var
Res : TResourceStream;
begin
Res := TResourceStream.Create(Hinstance, Resname, Pchar(ResType));
Res.SavetoFile(ResNewName);
Res.Free;
end;

И писал для извлечения каждого ресурса этот код:

procedure ???;
 begin
     ExtractRes('???', '???', WinDir+ '???);
   end;
end; exports ???;

Но это надо писать для каждого ресурса.
Есть ли возможность вызвать процедуру ExtractRes из исполняимого файла например

procedure ExtractRes(ResType, ResName, ResNewName : String) stdcall;
var
Res : TResourceStream;
begin
Res := TResourceStream.Create(Hinstance, Resname, Pchar(ResType));
Res.SavetoFile(ResNewName);
Res.Free;
end;
exports ExtractRes;
В exe:

procedure ExtractRes(ResType, ResName, ResNewName : String) stdcall; external 'data\wallRess.dll';

procedure TForm1.Button3Click(Sender: TObject);
begin
ExtractRes('???', '???', 'путь');
end;

Это неработает!!!
Помагите пожалуйсто!
Зарание благодарен!
С уважением,
Volkogriz !

[Stilet]

Я не проверял но предполагаю следующее:

procedure ExtractRes(ResType, ResName, ResNewName : String) stdcall;
var
Res : TResourceStream;h:THandle;
begin
h:=LoadLibrary(<Путь к файлу>);
if h<>0 then
 Res := TResourceStream.Create(h, Resname, Pchar(ResType));
 Res.SavetoFile(ResNewName);
 Res.Free;
 FreeLibrary(h);
end;
end;

[evg_m]

Это неработает!!!
Помагите пожалуйсто!

Есть длл с ресурсом,

теперь и параметрами строками.
Есть ли sharemem?
Что это такое и зачем? Смотри примечание(комментарий) который Delphi специально добавляет при создании нового проекта DLL.