Einzelnen Beitrag anzeigen

Benutzerbild von Zacherl
Zacherl

Registriert seit: 3. Sep 2004
4.629 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#23

AW: JPG ohne Resource einfügen

  Alt 4. Okt 2016, 14:36
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.
Projekte:
- GitHub (Profil, zyantific)
- zYan Disassembler Engine ( Zydis Online, Zydis GitHub)
  Mit Zitat antworten Zitat