Hier exemplarisch ein Beispiel wie du ein Bild laden könntest. (Gif, Ico, Jpeg usw...)
Da ich deinen Code nicht sehe kann ich nicht direkt helfen.
Delphi-Quellcode:
USES axCtrls; // <- das muss zu deiner USES klausel im Source
// weiter unten im source dann sowas (ich hab ein Knopf/Button examplarisch genommen um darauf zu reagieren)
procedure TForm1.Button1Click(Sender: TObject);
var
OleGraphic: TOleGraphic;
fs: TFileStream;
begin
try
OleGraphic := TOleGraphic.Create;
fs := TFileStream.Create('C:\...\test.gif', fmOpenRead or fmSharedenyNone);
OleGraphic.LoadFromStream(fs);
SampleImage.Picture.Assign(OleGraphic);
finally
fs.Free;
OleGraphic.Free
end;
end;
Achtung: Code ist so nicht ausführbar, der gehört angepasst an deinen Source den ich ja nicht sehe.
Grüße