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

Что в буффере обмена?   Найти похожие ветки 

← →
Kolya ©   (2002-10-30 03:44) [0]

Как узнать что находится в буффере- текст или рисунок и скопировать содержимое в TBitmap или String. Помогите пожалуйста.

---

← →
MBo ©   (2002-10-30 06:20) [1]

Clipboard.HasFormat

---

← →
Zergling   (2002-10-30 06:50) [2]

Чтото вроде того:

// Текст
if ClipBoard.HasFormat(CF_TEXT) then Memo1.PasteFromClipBoard;
// Картинка
if ClipBoard.HasFormat(CF_PICTURE) then
Image1.Canvas.Brush.Bitmap.LoadFromClipboardFormat(CF_BITMAP,ClipBoard.GetAsHandle(cf_Bitmap),0);

---

← →
Zergling   (2002-10-30 07:09) [3]

Блин с картинкой наврал. Будет так:

var TmpBmp:TBitMap;

// Картинка

TmpBmp:=TBitmap.Create;

if ClipBoard.HasFormat(CF_BITMAP) then TmpBmp.LoadFromClipboardFormat(cf_BitMap,ClipBoard.GetAsHandle(cf_Bitmap),0);
Image1.Canvas.Draw(0,0,TmpBmp);
TmpBmp.Free;

---

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

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



Память: 0.45 MB
Время: 0.01 c