Einzelnen Beitrag anzeigen

alienous

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

Re: Bilder drucken mit GR32lib

  Alt 25. Aug 2006, 16:08
habe jetz noch etwas mit

gra.ResamplerClassName := 'TLinearResampler'; experimentiert, und dabei die ausgabe in ein TImage32 auf der form geleitet, dabei werden die farben ziehmlich stark verfälscht, mit und ohne den resampler! wieso? liegt es eventuell am drawto?
wenn ich das bild direkt mit der kompo öffne, wird das bild korrekt angezeigt.

Delphi-Quellcode:
procedure BildDrucken(PCanvas : TCanvas; px1, py1, px2, py2 : Integer; pmotiv : tmotiv);
var gra : Tbitmap32;
begin
        gra := Tbitmap32.Create;
        gra.LoadFromFile('C:\motive\'+pmotiv.Bildname);
        gra.ResamplerClassName := 'TLinearResampler';
        //gra.Rotate270();
        gra.DrawTo(pcanvas.Handle, Rect(px1,py1,px2,py2), gra.BoundsRect);
        gra.Free;
end;
  Mit Zitat antworten Zitat