Справочник по компонентам Delphi. Часть 1 - Класс TGraphic
ОГЛАВЛЕНИЕ
Класс TGraphic
TGraphic = class(TPersistent)
Этот абстрактный класс является родительским для трех видов изображений, общепринятых в графике Windows — значка (класс TIcon), метафайла (класс TMetafile) и растровой картинки (класс TBitmap).
Работая над приложением в Delphi, вы никогда не будете создавать объекты класса TGraphic, но переменной этого типа вы можете присваивать указатель на любой из классов-потомков. Метод
procedure Assign(Source: TPersistent);
переопределяет одноименный метод предка, позволяя полиморфное присваивание графических объектов (см. ниже).
Загрузку и выгрузку графики в поток осуществляют методы
procedure LoadFromStream(Stream: TStream);
procedure SaveToStream(Stream: TStream);
а загрузку и выгрузку в файл:
procedure LoadFromFile(const Filename: string);
procedure SaveToFile(const Filename: string);
Эти методы создают соответствующий файловый поток и затем вызывают методы LoadFromStream/SaveToStream.
Два метода осуществляют взаимодействие с буфером обмена:
procedure LoadFromClipboardFormat(AFomat: Word; AData: THandle; APalette: HPALETTE);
procedure SaveToCiipboardPormat(var AFormat: Word; var AData: THandle; var APalette: HPALETTE);
Здесь AFormat — используемый графический формат; AData и APalette _ данные и палитра (если она требуется). Потомок должен иметь свой формат и уметь обрабатывать данные, представленные в нем. Свойство
(Ro) property Empty: Boolean;
устанавливается в True, если графический объект пуст (в него не загружались данные).
Высота и ширина графического объекта:
property Height: Integer; property Width: Integer;
Для каждого дочернего типа значения этих свойств вычисляются своим способом. Наконец, свойство
property Modified: Boolean;
показывает, модифицировался ли данный графический объект. Это свойство устанавливается в True внутри обработчика события OnChange.