JPG ohne Resource einfügen

[Zacherl]

Laut diesem Code:

Delphi-Quellcode:

   for i:=1 to 3 do
   begin
     RStream := TResourceStream.Create(HInstance, 'A'+IntToStr(i), RT_RCDATA);
     try
        jpgLogo := TJpegImage.Create;
        Try
           jpgLogo.LoadFromStream(RStream);
           tuer[i].LoadFromStream(RStream);

.. hast du doch schonmal 3 Resourcen A1 bis A3, welche alle ein JPEG enthalten.

Das Problem ist, dass du JEDES MAL 2 JPEGS ausliest. Das erste LoadFromStream wird funktionieren; das Zweite allerdings nicht, weil die Leseposition des Streams sich dann schon entsprechend an das Ende gesetzt hat.

[haentschman]

Recht hat er...

Zitat:

das Zweite allerdings nicht, weil die Leseposition des Streams sich dann schon entsprechend an das Ende gesetzt hat.

Wäre eine Imagelist für deine Icons (so sah es danach aus) nicht besser? ... dann wäre das Array und das LoadFromStream überflüssig.