Gaist-Endruy
( off
)
* (
14:04 11-04-2009
)
if SavePictureDialog1.Execute then
Image1.Picture.SaveToFile(SavePictureDialog1.FileName);
[цит] Gaist-Endruy
( off
)
* (
14:04 11-04-2009
)
то пользователь получит возможность сохранить изображение любого формата в файле с новым именем. Только при этом, чтобы не возникало в дальнейшем путаницы, расширение сохраняемого файла все-таки должно соответствовать формату сохраняемого изображения.
[цит] Gaist-Endruy
( off
)
* (
14:05 11-04-2009
)
Абсолютно идентично для изображений любого формата будет работать программа, если оператор сохранения вы замените на
[цит] Gaist-Endruy
( off
)
* (
14:05 11-04-2009
)
Image1.Picture.Graphic.SaveToFile(
SavePictrureDialog1.FileName);
[цит] Gaist-Endruy
( off
)
* (
14:05 11-04-2009
)
использующий свойство Picture.Graphic. А если вам известен формат хранимого в компоненте Image изображения, то вы можете применить метод SaveToFile к свойствам Picture.Bitmap, Picture.Icon и Picture.Metafile.
[цит] Gaist-Endruy
( off
)
* (
14:05 11-04-2009
)
Для всех рассмотренных объектов Picture, Picture.Bitmap, Picture.Icon и Picture.Metafile определены методы присваивания значений объектов:
[цит] Gaist-Endruy
( off
)
* (
14:06 11-04-2009
)
procedure Assign(Source: TPersistent);
[цит] Gaist-Endruy
( off
)
* (
14:06 11-04-2009
)
Однако, для BitMap, Icon и Metafile присваивать можно только значения однородных объектов: соответственно битовых матриц, пиктограмм, метафайлов. При попытке присвоить значения разнородных объектов генерируется исключение ЕConvertError. Объект Picture — универсальный, ему можно присваивать значения объектов любых из остальных трех классов. А значение Picture можно присваивать только тому объекту, тип которого совпадает с типом объекта, хранящегося в нем.
[цит] Gaist-Endruy
( off
)
* (
14:06 11-04-2009
)
Метод Assign можно использовать и для обмена изображениями с буфером "Clipboard". Например, оператор
[цит] Gaist-Endruy
( off
)
* (
14:06 11-04-2009
)
Clipboard.Assign(Image1.Picture);
[цит]
)