Fórum Erro na Função! help-me please! :( #193240

Caros colegas!!
Desenvolvi um sistema em Delphi 5 que usa uma DLL com recuros. Nela tem Bitmaps e Arquivo Texto.
No windows 98 funciona perfeitamente mas no Windows XP ocorre um erro justamente na captura dos dados (Bitmap e Arq. Texto) da DLL.
Estou usando a seguinte função para carregar os Bitmaps:

function LoadBitMapfromDLL(DllFileName, BitMapID:string):TBitmap;
var HandleDLL: THandle;
P:TBitmap;
begin
HandleDLL := LoadLibrary(PChar(DllFileName)); //Carrega a DLL
if HandleDLL = 0 then
raise Exception.Create(´Não foi possível carregar a DLL´)
else
try
P:=TBitMap.Create;
P.LoadFromResourceName(HandleDLL,BitMapID); //é nessa linha
finally
FreeLibrary(HandleDLL);
end;
Result:=P; //retorna o bitmap
end;

Um dos bitmaps que tenho na DLL tem o nome de ´Sis´. O erro que dá é que ele não encontra o ´Sis´ na DLL na linha:

P.LoadFromResourceName(HandleDLL,BitMapID);


Ainda não consegui pegar nada da DLL. Por favor me ajudem :(
Grato