Советы по Delphi
Помещение изображения в буфер обмена
|
var
BMP: TBitmap;hBmp:HBITMAP;
begin
BMP := TBitmap.Create;
BMP.LoadFromFile('имя файла');
hBmp:=BMP.Handle; Clipboard.Assign(BMP); {здесь освобождаем объекты} end; |
(Очевидно) Clipboard.Assign требует наличия HBITMAP, и чтобы он создавался не LoadFromFile, но HBITMAP создается при ссылке на BMP.Handle. (Примеры в документации - Clipboard.Assign(aTImage.Picture); у нас уже создан дескриптор окна.)
Надеюсь, это поможет.
- Dave Ullrich
