Thema: Delphi Bild schärfen ???

Einzelnen Beitrag anzeigen

Benutzerbild von roga
roga

Registriert seit: 15. Jun 2008
Ort: Sachsen-Anhalt
109 Beiträge
 
Delphi XE8 Professional
 
#7

Re: Bild schärfen ???

  Alt 24. Jun 2008, 09:15
Erstmal ein großes Hallo an Alle! Bin noch recht "neu" hier, aber ein jahrelanger und begeisterter Besucher dieses Forums. Vielleicht kann ich einiges beisteuern. Programmiere rein hobbymäßig seit Delphis-Kinderschuhen und bin eigentlich nie davon los gekommen...

Versuchs mal hiermit:

Bitmap erstellen und das Bild darauf zeichnen.

Delphi-Quellcode:
 
  SetStretchBltMode(Image.Canvas.Handle, HALFTONE);
  StretchBlt(Image.Canvas.Handle, 0, 0, NewWidth, NewHeight,
             Bitmap.Canvas.Handle, 0, 0, Bitmap.Width, Bitmap.Height, SRCCOPY);
Ist zwar nicht die beste Lösung, liefert aber gute Resultate.

Gruß roga

Zitat:
Warum immer gleich mit Kanonen auf Spatzen schießen!
Ronald
  Mit Zitat antworten Zitat