lphi
TImage - компонент з такою ж назвою доступний на палітрі компонентів Inditional. За допомогою компонента TImage можна завантажити та відобразити на екрані будь мальований файл (*. Bmp, *. Wmf (16-і розрядний метафайл Windows), *. Emf (32-х розрядний розширений формат метафайлу), *. Ico, *. Jpeg , а так само файли інших графічних форматів підтримуваних надбудовами класу TGraphic). p align="justify"> Графічні дані зберігаються у властивості picture об'єкта TImage.Picture.
Визначення розмірів графічного файлу:
1. розмір (кількість пікселів) Г— координата ( x) Г— координата (y);
2. розмір (довжина по (x)) Г— розмір (довжина по (y)) Г— кількість пікселів Г— колір.
Растрова графіка
Дозволяє зберігати зображення у вигляді матриці пікселів. p align="justify"> Основний недолік - погана масштабованість (Paint, Photoshop ...).
Векторна графіка.
Дозволяє зберігати зображення у вигляді набору графічних об'єктів, кожен з яких описується математичною формулою (Coral Draw). p align="justify"> Delphi працює тільки з растровою графікою.
Існує два типи растрів:
). Залежні від пристрою (DDB);
). Чи не залежні від пристрою (DIB). p align="justify"> Delphi працює тільки з незалежними від пристроїв растрами, тому що вони працюють з усіма пристроями.
Завантаження зображення на форму.
Збереження зображення.
Для цього використовується клас TPicture. Він являє собою контейнерний клас для інкапсуляції абстрактного класу TGraphic. p align="justify"> Контейнерний означає, що клас TPicture може зберігати посилання на об'єкти: TBitmap, TMetafile, TIcon.
Приклад Зображення на формі якої-небудь картинки:
Procedure TForm1.Button1.Click (sender: object);
В
Imege1.Picture.LoadFromFile ( c: *. bmp );;
Для збереження використовується метод SaveToFile
Image1.Picture.SaveToFile ( c: *. bmp );
Для роботи з файлами формату JPEG необхідно в рядку використовуваних модулів записати модуль JPEG.
Клас TBitmap
Клас TBitmap призначений для зберігання растрового зображення. Він інкапсулює об'єкт растрів і палітри системи Win32.GPI. p align="justify"> Створення об'єкту:
Var
b: TBitmap;
......: = TBitmap.Create;
...: = nil // або b.Destray;;
Методи об'єкта TBitmap:
1. . LoadFromFile - завантажити в об'єкт;
2. . SaveToFile - зберегти;
. . Assign - дозволяє копіювати один растр в іншій.
Var, b2: TBitmap;: = TBitmap.Create;: = TBitmap.Create,. LoadFromFile (...); 2.Assign (b1),
End;
При використання методу *. Assign копіювання відбувається наступним чином: в об'єкт (b2) записується посилання на об'єкт (b1), що дозволяє заощадити пам'ять; в разі внесення змін в об'єкт (b2) відбувається автоматичне копіювання об'єкта (b1).
4. . CopyRect - дозволяє скопіювати прямокутну частину растрового зображення з одного об'єкта Bitmap в інший або на форму.
Типи даних в OPascal:
TPaint - точка;
TRect - прямокутник;
Приклад:
Var
a: TPaint;
b: TRect;
.... x: = 100;. y: = 150;
.... left: = 10;. top: = 10;. right: = 100;. botton: = 100;
Приклад Намалювати прямокутник:
Var: TRect,. top: = 0; // левая.left: = 0; // верхня . night:...
