Datei in StringList aus dll laden

[HomerGER]

Sorry der cod da oben blödsinn

ich hab den jetzt so geändert

Code:

//******************************************************************************
//Global
//Aus Text.dll Meldungen
Procedure Meldung_Lesen_GU();
var
lib_h : THandle;
res_s : TResourceStream;
meldungen_sl : TStringList;
begin
    lib_h := LoadLibrary('Texte.dll');

    res_s := TResourceStream.Create(lib_h, 'deu_meldung', RT_RCDATA);

    meldungen_sl := TStringList.Create;
    meldungen_sl.Clear;
    if (lib_h <> 0) then
    begin
        try
            meldungen_sl.LoadFromStream(res_s);
            ShowMessage(meldungen_sl.Strings[1]);
        finally
        meldungen_sl.Free;
        end;
        FreeLibrary(lib_h);
    end;
end;

geht auch
ist aber die systax richtig

und was mach ich wenn er die dll nich findet?