Okay also ich habe jetzt mal die Bilder als Bitmap laden lassen und es kann nur an dem Ladeprozess liegen, der Fehler wird im Debugging hier ganz klar an dieser Stelle angezeigt.
Delphi-Quellcode:
path:=ExtractFilePath(ParamStr(0));
PFeuer:=TPistol.Create(self);
PNormal:=TPistol.Create(self);
PFeuer.Picture.Bitmap.LoadFromFile(path+'gun1.bmp');
Mir ist aber immer noch nicht klar, worin der Fehler liegt..
Ganz einfach,
PFeuer.Picture.Bitmap
gibt es noch nicht, dass wird (intern von TPicture wenn benötigt) beim Laden des Bildes erzeugt.
Ändern auf
PFeuer.Picture.LoadFromFile(path+'gun1.bmp');
(Hoffentlich hast du Picture in der Klasse TPistol auch erzeugt)
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)