Иллюстрированный самоучитель по Kylix


Листинг 13 21 Копирование графики в буфер обмена



Листинг 13.21.Копирование графики в буфер обмена

procedure TForm1.Copy1Click{Sender: TObject); begin
Clipboard.Assign(Image.Picture) end.

Вырезание графики в буфер обмена

Вырезание графики в буфер обмена похоже на копирование. Отличие заключается в том, что после копирования картинка, содержащаяся в источнике, уничтожается.

Для реализации данной операции нужно выполнить два последовательных шага:

1. Скопировать данные в буфер обмена.

2. Уничтожить оригинальные данные.

В листинге 13.22 показано, как можно осуществить операцию вырезания картинки в буфер обмена. Сначала изображение копируется в буфер обмена, затем место, откуда взято изображение, закрашивается белым цветом с помощью установки режима копирования cmWhiteness.



Начало Назад Вперед