Wątek zablokowany 2015-09-28 01:49 przez furious programming.

zmiana rozmiaru BMP i JPG

0

Jak zmienic rozmiar bitmapy albo jpeg? Chodzi mi o to zeby np. zarowno szerokosc jak i wysokosc zmnieszyc dwurkotnie i zeby obraz sie nie obcinal tylko zmniejszal.

0

Chodzi ci o TImege?? Stretch = true;

Możesz też wyciąć co drugi pixel w pionie i poziomie (ale wtedy zmniejszy ci się 4-ro krotnie chyba), lub dla lepszego efektu wycinać co drugi, ale najpierw zmienić kolor poprzedniego na średnią składowych jego koloru i koloru pixela, który będziesz wycinał.

0
var
    Bitmapa1 : TBitmap;
    Bitmapa2 : TBitmap;
begin
    Bitmapa1 := TBitmap.Create;
    Bitmapa2 := TBitmap.Create;
    Bitmapa1.LoadFromFile(plik);
    Bitmapa2.Width := (Bitmapa1.Width div 2);
    Bitmapa2.Height := (Bitmapa1.Height div 2);
    Bitmapa2.Canvas.StretchDraw(Rect(0,0,Bitmapa2.Width, Bitmapa2.Height), Bitmapa1);
end;

Gdzie Bitmapa1 to bitmapa przerabiana, Bitmapa2 to bitmapa przerobiona.

//DOPISANE
A jeśli chodzi o jpg to możesz je najpier przerobić na bmp, potem zmienić rozmiar, a potem bmp na jpg.

1 użytkowników online, w tym zalogowanych: 0, gości: 1