Delphi 1
Помещение изображения в буфер обмена
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