Lucrul cu o imagine jpeg în delphi

Delphi. Grafică și jocuri. JPEG

Lucrul cu imagini JPEG din Delphi

Sunt întrebat de multe ori cum puteți să inserați o imagine în format Jpeg în executabil sau cum să vizualizați imagini jpeg în program. În acest articol voi încerca să spun și să arăt prin exemple cum puteți lucra cu imagini jpeg.

Pentru aceste scopuri, Delphi are două clase, TJpegImage și TJpegData. Vom folosi primul, este descris în modulul JPEG (ar trebui să fie conectat în utilizări).

Managerul de evenimente OnClick pentru primul buton poate arăta astfel:

Apropo, nu uitați să configurați filtrul pentru OpenDialog1, astfel încât să puteți deschide numai imaginile în format * .bmp.

Acum vom scrie direct partea principală a programului, adică crearea unei imagini jpeg. Toate acțiunile vor fi executate făcând clic pe al doilea buton. Va trebui să creați un obiect de tip TJpegImage, să efectuați acțiunile necesare cu acesta și apoi să utilizați metoda Compress pentru a împacheta imaginea și pentru a salva imaginea într-un fișier. De asemenea, trebuie să setați proprietățile TrackBar: proprietatea Max ar trebui să fie setată la 100 și proprietatea Position trebuie de asemenea să fie 100. Deci, handlerul pentru apăsarea celui de-al doilea buton poate fi:

După cum puteți vedea, totul este foarte simplu! Doar în cazul în care, voi da codul complet de aplicare:

Pentru a inversa conversia de la Jpg la Bmp, trebuie să utilizați metoda DibNeeded.

Și este posibil să tragem într-un mod dificil, de exemplu, un pătrat, pe TImage dacă este încărcat un grafic JPEG?

Puteți, dar nu este nevoie să utilizați componente standard, de exemplu, DevExpress

Articole similare

• Lucrați cu imagini jpeg în delphi, grafică în delphi, articole, programare - programare

• Întrebarea # 4 076 ... delphi atipic! Trebuie să afișez o imagine JPEG printr-o comp ...

Trimiteți-le prietenilor: