În Delfi salva imaginea gif

Lucrul cu imagini bitmap in Delphi folosind clasa TBitmap. Întregul proces de a obține imagini gif este după cum urmează:

1) Ia-o imagine în formă de obiect de clasă TBitmap.
2) Crearea unui obiect al clasei TGifImage, vom trece și să păstreze TBitmap.

Cum să obțineți obiectul TBitmap

Dacă imaginea este în imagine componentul

Apoi, totul este simplu, TBitmap dumneavoastră Image1.Picture.Bitmap. În loc Image1, desigur, este numele Image'a dumneavoastră.

Dacă o imagine este pictat pe formularul Canvas'e sau orice altceva

Dacă doriți să salvați diagrama de la Chart'a

Avem Chart'a prelata, dar nu este compatibil cu standardul. Pentru a depăși această dificultate, două metode cunoscute pentru mine:

1) A se păstra poze cu Chart'a în bmp-format, și apoi expediați-l la Bitmap, și șterge fișiere.

2) Vom arunca imagini prin intermediul unui tampon

Cum de a salva TBitmap în format GIF-

Pentru a face acest lucru, procedați în felul următor:

1) Descărcați modulul pentru a lucra cu GIF format

2) Adăugați fișierul GIFImage.pas la proiectul și conectați unitatea la secțiunea GIFImage utilizări.

3) Următorul act, după cum urmează:

Dacă imaginea dvs. este utilizat mai puțin de 256 de culori, atunci apelul

permite pentru a reduce dimensiunea panoului la numărul real de culori. Acest lucru vă permite să salvați câteva sute de bytes. Ați putea fi obișnuit cu poze cu megabyte în cazul în care aceste economii par microscopice? Intarca. Acum, desenul va fi astfel încât acesta va fi un economii semnificative.