Resourcen einbinden

[zeras]

Ich habe das so gelöst:

Delphi-Quellcode:

  ResName := 'Logo';
  if FindResource(HInstance, PChar(AnsiUpperCase(ResName)), RT_RCDATA) = 0 then begin
    ShowMessage('Resource not found' + ' ' + ResName);
    Exit;
  end;

   //Logo aus der Ressource laden
    jpegImage := TJPEGImage.Create;
    try
      stream := TResourceStream.Create(HInstance, ResName, RT_RCDATA);
      try
        jpegImage.LoadFromStream(stream);
      finally
        stream.Free;
      end;

Ja es geht offenbar auch mit Bildern und RCDATA.

Einbinden, wie oben in meinem Beitrag geschrieben.