做完res了，如何做dll，如何使用？

Question

小弟初学delphi，现在把许多文本文档做成一个rc文件，又编译成res文件。想问一下，如何做成dll？另外，我试着做了一个dll文件，但是比如说我想从dll中随机抽取一篇文章，应怎么做？（查了一些资料，都没说如何调用文本文件的。）这是我的代码，就是实现不了，请大家看看。谢谢。
procedure TForm1.Button1Click(Sender: TObject);
var
   h  :  THandle;
   Stream : THandle;
begin
    h  :=  LoadLibrary('Project1.DLL');
    if  h  <=  32  then
     ShowMessage('找不到Project1.dll')
    else  begin
    Randomize();
    key:=Random(299)+1;
    Form1.M1.Lines:=LoadStr('mytxt'+inttostr(key));
    FreeLibrary(h);
    end;

Answer 1

用TResourceStream看看了http://lysoft.7u7.net

Answer 2

procedure loadstr(txtname:String);
var
Res : TResourceStream;
begin
      res:=TResourceStream.create(Hinstance,txtname,'TXT');
      res .SaveToFile('c:\txtname.txt');
      res.Free;
      winexec('c:\txtname.txt',restore);
end;