Datei in StringList aus dll laden

[HomerGER]

Hi
leider meldet er mir immer das er meine dll nicht findet

Code:

Procedure Meldung_Lesen_GU();
var
lib_h : TStream;
meldungen_sl : TStringList;
begin
    lib_h := TResourceStream.Create(HInstance, 'Texte.dll', RT_RCDATA);
    meldungen_sl := TStringList.Create;
    meldungen_sl.Clear;

    try
        meldungen_sl.LoadFromStream(lib_h);
        ShowMessage(meldungen_sl.Strings[1]);
    finally
    meldungen_sl.Free;
    end;
end;