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


Листинг 13 23 Копирование графики



Листинг 13.23.Копирование графики из буфера обмена procedure TForm1.PasteButtonClick(Sender: TObject); var

Bitmap: TBitmap; begin
if Clipboard.Provides(SDelphiBitmap) then { в буфере обмена
изображение? ) begin
Image1.Picture.Bitmap.Assign(Clipboard);
end; end;

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

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


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


Книжный магазин