Einzelnen Beitrag anzeigen

alienous

Registriert seit: 27. Jan 2006
94 Beiträge
 
#8

Re: Bilder drucken mit GR32lib

  Alt 25. Aug 2006, 16:58
soo, habs jetz so ungefähr, liegt der fehler aber wirklich am fehlenden resampler? schaut euch mal das bild im anhang aus, wie das kindergesicht angezeigt wird nach dem code hier:

Delphi-Quellcode:
procedure BildDrucken(PCanvas : TCanvas; px1, py1, px2, py2 : Integer; pmotiv : tmotiv);
var gra,gra2 : Tbitmap32;
    KRS: TKernelResampler;
begin
        gra := Tbitmap32.Create;
        gra2 := Tbitmap32.Create;
        gra.LoadFromFile('C:\motive\'+pmotiv.Bildname);

        //KRS := TKernelResampler.Create(gra);
        //KRS.Kernel := TLanczosKernel.Create;
      
        gra.DrawTo(pcanvas.Handle, Rect(px1,py1,px2,py2), gra.BoundsRect);
        gra.Free;
        gra2.Free;
end;
kann es auch sein, das tbitmap32 das bild beim drawto oder beim rotieren eventuell etwas aufhellt?

danke
Miniaturansicht angehängter Grafiken
kind_183.jpg  
  Mit Zitat antworten Zitat