
Delphi ořezaní + zvětšení jpg obrazku
Poradíte?
Když mám obrázek png nebo jpg.
Bych potřeboval udělat výřez a zvětšit.
Hodně přikladu jsem našel ale všude byla použita komponenta image.
Bych to rad bez ní.
Jen načíst upravit a uložit.
a) umíš převést jpg/png formát na bitmapu?
b) čemu říkáš "zvětšit" ???
https://helloacm.com/how-to-convert-jpeg-to-bmp-and-bmp-to-jpeg-in-object-pascal-delphi/
zvětšit - jako bych ořezanemu obrazku nastavil zoom
Zoom ??? jen to jinak nazýváš.
Ten ořez bude mít určitý počet pixelů - méně, než výchozí obraz. Počet pixelů lze zvýšit některou metodou interpolace (bikubicky nebo rafinovanějšími postupy), ale je to jen "nafukování". Někdy to může mít pro určitý specifický účel (tisk velkého plakátu) smysl, ale obvykle to nic neřeší.
Inšpiruj sa tu:
http://delphidabbler.com/tips/99
Rozhodně to nedělej jen pomocí věcí v Delphi, i když to jde. Ta manipulace - zvětšování a zmenšování není nijak sofistikovaná a výsledky tě neuspokojí. Najdi si nějakou knihovnu na práci s obrázky, třeba GraphicEx apod.
bez TImage to samozřejmě jde, můžeš používat rovnou objekty TJPG, TBitMap, TGraphics a celé to udělat na pozadí programově.