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:
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
