Hi,

folgendes Problem mit einer TImage Komponente:

• Lade ich das Bild während der Entwicklung über die IDE ist die Qualität gut.
• Lade ich das Bild mit folgendem Code zur Laufzeit, ist die Qualität des gleichen PNGs deutlich schlechter:

zusammenfalten · markieren

Delphi-Quellcode:

procedure TPictureLoader.LoadPicture(aPictureID: string;
  aImageObject: TImage);
var
  handle: THandle;
  k: TPngObject;
begin

  handle:= LoadLibrary(PChar(FFileName));
  if handle <> 0 then
    begin

      k := TPngObject.Create;
      try
        k.LoadFromResourceName(handle, aPictureID);
        aImageObject.Picture.Assign(k);
      finally
        k.Free;
      end;

    end
  else
   begin

     RaiseLastOSError;

   end;
  
  FreeLibrary(handle);

end;

Das Bild befindet sich für Variante 2 in einer Ressource DLL.

Im Bild gut zu erkennen: Links eine saubere Darstellung, 5 lila Linien ubereinander, Rechts alles verschwommen.

Woran könnte es liegen?

Viele Grüße,
Martin

Ist das PNG 24/32-Bit oder 8-Bit?
Bei 8 Bit könnten noch ein paar Bugs in der (gekauften) Sourcen schlummern.

Gimp sagt, das Farbprofil wäre sRGB built-in. Hab jetzt einen Workaround gefunden: Das Bild in allen notwendigen Größen anlegen und dann Stretching überflüssig machen. Funktioniert relativ gut, aber man merkt noch immer das die Qualität eine andere ist.

Sieht nach einem Skalierungsproblem aus.
Hast du mal die Werte von TImage.Stretch, TImage.Proportional, TImage.Picture.Width und TImage.Picture.Height zwischen den beiden Ladearten verglichen?