Скачать: CL | DM;

Clipboard: ограничения по размеру   Найти похожие ветки 

← →
Mishel   (2004-09-13 13:56) [0]

Может кто-нибудь подскажет, почему в Clipboard не удаётся поместить картинку размером больше, чем экран. И можно ли как-то преодолеть это ограничение?

---

← →
TUser ©   (2004-09-13 13:59) [1]

Почему не получается? Он может содержать очень большие картинки. Как ты туда помещаеешь?

---

← →
Mishel   (2004-09-13 14:06) [2]


   Metafile := nil;
   try
     Metafile := TMetafile.Create;
     with Metafile do
     begin
       Inch := Screen.PixelsPerInch;
       Width := 2000;
       Height := 1500;
     end;
     MetafileCanvas := nil;
     try
       MetafileCanvas := TMetafileCanvas.Create(Metafile, 0);
       Paint(MetafileCanvas);
     finally
       MetafileCanvas.Free;
     end;
     Clipboard.Assign(Metafile);
   finally
     Metafile.Free;
   end;


---

← →
MBo ©   (2004-09-13 14:39) [3]

посмотри справку по
TMetafileCanvas.Create

---

← →
Mishel   (2004-09-13 14:52) [4]

Если ReferenceDevice := 0, то выбирается экран. А какое ещё устройство я могу выбрать?

---

← →
MBo ©   (2004-09-13 15:01) [5]

ты можешь явно задать mmwidth и mmheight, либо создать битмап нужного размера, и взять его Canvas как референс (этот метод сам не пробовал)

---

← →
Mishel   (2004-09-13 17:33) [6]

Спасибо, помогло!
Добавил

MMWidth := Round(iWidth * HundredthMMPerInch / iPixelsPerInch);
MMHeight := Round(iHeight * HundredthMMPerInch / iPixelsPerInch);

и размер больше экрана.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c