Wie nutze ich den TResourceStream richtig?

[Harry Stahl]

Das hatte ich ja auch schon probiert (oben im Source-Code vermerk). Auch wenn ich RT_BITMAP verwende, funktioniert es nicht.

Also sowohl FindResource nicht, als auch TResourceStream.create nicht.

In der VCL-Graphics it LoadFromResourceName wie folgt implementiert:

Code:

procedure TBitmap.LoadFromResourceName(Instance: THandle; const ResName: string);
var
  Stream: TCustomMemoryStream;
begin
  FreeContext;
  Stream := TResourceStream.Create(Instance, ResName, RT_BITMAP);
  try
    ReadDIB(Stream, Stream.Size);
  finally
    Stream.Free;
  end;
end;

"Stream := TResourceStream.Create(Instance, ResName, RT_BITMAP);"

entspricht ja meinem Ansatz (interessanterweise ist RT_Bitmap eine Stringvariable und enthält beim Aufruf nur einen leeren String)