Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Изменить палитру на Image [D7, XP]


ezorcist ©   (2006-01-05 08:47:00) 

1) Как задать Image-у палитру на  16 цветов?
2) Как сохранить из Image-а в JPG?


Zeqfreed   (2006-01-05 10:53:00) [1]

Zeqfreed ©   (05.01.06 10:51) [1]

> pf16bit;

Пардон, pf4bit, разумеется. :)


Zeqfreed   (2006-01-05 10:51:00) [2]

ezorcist   (05.01.06 8:47)

> 1) Как задать Image-у палитру на  16 цветов?

Image1.Picture.Bitmap.PixelFormat := pf16bit;

> 2) Как сохранить из Image-а в JPG?

…
var
 jpg : TJPEGImage;
begin
 jpg := TJPEGImage.Create();
 try
  jpg.Assign(Image1.Picture.Bitmap);
  jpg.SaveToFile('C:\1.jpg');
 finally
  jpg.Free;
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо