Png in Image laden

[Luki206]

Hi, die Überschrift ist gerade nicht die Beste aber ich hoffe man kann helfen. Ich habe folgendes Problem: ich erstelle ein Image zur Laufzeit und will dort eine PNG-Graphik einfügen. Wenn ich dann aber das Image erstelle und dann das PNG-Bild aus der DLL lade bekomme ich den Fehler dass das PNG-Format nicht unterstützt wird da irgendetwas im Header fehle. Das Problem hatte ich auch schon mit normalen Images die ich auf mein Formular gezogen habe, ohne ein PNG-Bild einzufügen, bekam ich auch zur Laufzeit den Fehler. Wie kann ich dem Image sagen dass es PNG's an nimmt?
Danke
Luki :)

[mkinzler]

Die Unit mit dem png-Importfilter ist eingebunden (pngimage.pas o.ä)?

[Luki206]

Jap, ist eingefügt kommt aber trotzdem der Fehler
Edit: Also ich habe es nachträglich eingefügt nicht das es Falsch verstanden wird

[himitsu]

DLL?

Klassen dürfen nicht über DLL/EXE-Grenzen hinweg benutzt werden :warn:

Die DLL nutzt ihre eigene RTL/VCL und dort hast du diese PNG-Unit nicht geladen, darum kennt der code in der DLL diese natürlich auch nicht.

Außerdem sind die Typen (RTTI) der EXE und DLL nicht "kompatibel" miteinander,
außer man kompiliert gegen das gleiche Laufzeitpackage.

PNG-Resource in DLL und dieses in der EXE laden ginge aber auch.

[DeddyH]

Soweit ich es verstanden habe, handelt es sich um eine reine Ressourcen-DLL.

[himitsu]

So ganz sicher hatte ich das nicht erkennen können, drum hab ich quasi versucht nochmal nachzufragen, wie das nun eigentlich gemacht wird.

[Luki206]

Ja genau! Es ist einfach nur eine Ressourcen-DLL.
Edit: Nur komisch, dass ja auch bei den Images das funtzt wo ich sie aufs Formular gezogen habe und dann zur Laufzeit ändere..

[himitsu]

Und wie lädst du nun die Bilder?

[Luki206]

So:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var h: Cardinal; res: TResourceStream; Graphic: TGraphic;
begin
h := LoadLibrary('test.dll');
res := TResourcestream.CreateFromID(h, 1, RT_RCDATA);
Graphic := TPngImage.Create;
try
Graphic.LoadFromStream(res);
Image1.Picture.Assign(Graphic);
finally
Graphic.Free;
res.Free;
end;

Ich weiß jetzt nicht ob da Fehler drin sind, habe das nämlich ausm Kopf geschrieben ;) aber so mache ich es immer

[Luki206]

Gibts dazu keine Lösung was falsch ist?

[DateTimeError]

Delphi-Quellcode:

if not FileExists('test.dll') then GetNewBrain('ausm Kopf geschrieben');

"Selbersuchen" does not compute?

[himitsu]

Dein FileExists sucht nur im aktuellen Arbeitsverzeichnis nach der DLL, was LoadLibrary garantiert nicht macht.

Man könnte zwar sowas machen,

Delphi-Quellcode:

h := LoadLibrary('test.dll');
if h = 0 then RaiseLastOSError;
res := TResourcestream.CreateFromID(h, 1, RT_RCDATA);

welches die Fehlermeldung besser verständlich mach, aber CreateFromID wird schon lautstark meckern, wenn die DLL/Resource fehlt.

[Luki206]

Entschuldigung für meine Schreibweise von Gestern, das hilft mir aber auch nicht weiter da er mir die CPU Ansicht bringt und keinen Fehler im Code, und mit dem Fragment von Himitsu kommt trotzdem der Fehler:

Code:

Im Projekt Project1.exe ist eine Exception der Klasse EPNGHeaderNotPresent mit der Meldung 'Die Datei, die gelesen wird, ist kein gültiges "Portable Network Graphics" Bild, da es keinen gültigen Header enthält.' aufgetreten.

[DeddyH]

Und Du bist wirklich sicher, dass die DLL korrekt erzeugt wurde? Versuch doch mal, sie mit einem Ressourcen-Editor zu laden, ob man da die Bilder zu sehen bekommt.

[himitsu]

Jupp, mein Codefragment hilft nur, wenn die DLL nicht gefunden/geladen wurde, damit dann eine entsprechende Fehlermeldung (Exception) angezeigt wird.

So klingt die Fehlermeldung aber urplötzlich nach was ganz Anderem, als vorher beschrieben war.
Die Resource wurde geladen, die PNG-Klasse ist auch vorhanden,
aber die Resource ist "fehlerhaft" und die Load-Methode kann diese Resource nicht laden, da sie keinen oder einen ungültigen FileHeader in dem PNG-Stream findet.

[Luki206]

@DaddyH: Ich habe das Bild mal versucht in ein schon bestehendes Image zu laden und siehe da, es wird so dargestellt wie es sein soll! Nur wieso klappt das bei dem erzeugten Image nicht?

[DeddyH]

Keine Ahnung, dazu kennen wir bislang zu wenig Code.

[Luki206]

ICH BIN DOCH SOWAS VON DÄMLICH!!!! :wall: :wall: :wall: es war nur ein Fehler in meinem Code... ich hatte das Bild dem Image falsch zugewiesen...:oops::oops::oops::oops:

[Uwe Raabe]

Zitat:

Zitat von Luki206 (Beitrag 1253490)

es war nur ein Fehler in meinem Code

Das ist der Grund, warum wir immer den Code sehen wollen!

[Sir Rufo]

Zitat:

Zitat von Uwe Raabe (Beitrag 1253505)

Zitat:

Zitat von Luki206 (Beitrag 1253490)

es war nur ein Fehler in meinem Code

Das ist der Grund, warum wir immer den Code sehen wollen!

Und zwar den echten, bzw. den wo der Fehler reproduzierbar ist und kein ähnlicher, irgendwie so, aus dem Kopf getippt oder wie auch immer geartet ;)