Problem mit incompatiblen: Typen. TPicture und String

[sun4623]

Problem mit incompatiblen: Typen. TPicture und String

Ich habe ein Problem mit einer meiner Prozeduren. Wie benutzt man denn bitteschön ein TPicture in combination mit einem String? Ich benütze eine resource-dll und arbeite das erste damit. Nun möchte ich ein relativ großes Bild in mein Programm laden. Ich habe eine creditscrol komponente in der ich nun das image als background image laden möchte und diese danach aktivieren möchte, stehe aber vor einem kleinen Problem. ich habe jetzt einfach mal improvisiert und versucht

::Hier mal meine Prozedur::

Code:

Procedure TForm2.FormShow(Sender: TObject); 
const
  resGIF = 'grandchan.gif';
var
  h : THandle;
  gif : TGifImage;
  r : TRect;
begin
load;
Panel1.DoubleBuffered := True;
Panel1.ParentBackground := False;
ScrolMod1.Scrolling :=true;
 h := LoadLibrary('Resource1.DLL');
  try
    if h <> 0 then
    begin
      gif := TGIFImage.Create;
      try
        gif.LoadFromResourceName(h,resGIF);
      //gif.Paint(Canvas,Form2.ClientRect,[goDirectDraw]);
gif.Paint(canvas,Form2.ScrolMod1.BackgroundImage:='grandchan.gif')ClientRect,[goDirectDraw]);
      finally
        gif.Free;
      end;
    end
    else
    begin
      //ShowMessage('Load Resource DLL FAILED!');
    end;
  finally
    FreeLibrary(h);
  end;
end;