Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.12.14;
Скачать: CL | DM;

Вниз

Оптимизация   Найти похожие ветки 

 
JustI   (2008-10-31 15:36) [0]

Реализовал возможность вставки ихзображения из Clipboard. Вот код:


procedure TFC.PasteBitmapFromBuffer;
var
 Bitmap: TBitmap;
begin
 Bitmap := TBitmap.Create;
 try
   if not Clipboard.HasFormat(CF_BITMAP) then
     Exit;
   Clipboard.Open;
   try
     Bitmap.Assign(Clipboard);
   finally
     Clipboard.Close;
   end;
   TFCImage(Self).SetLocalBitmap(Bitmap, const_default_LocalBitmapName);
 finally
   Bitmap.Free;
 end;
end;



Сомневаюсь в необходимости блоков кода для открытия и закрытия Clipboard, или же правильнее будет обойтись без них.:

Clipboard.Open;
   try
     Bitmap.Assign(Clipboard);
   finally
     Clipboard.Close;
   end;


 
Сергей М. ©   (2008-10-31 15:43) [1]


> Bitmap.Assign(Clipboard);


А как это ты умудрился ассигновать битмап из не-битмап-класса ?


> Сомневаюсь в необходимости блоков кода для открытия и закрытия
> Clipboard


А зря.


 
clickmaker ©   (2008-10-31 16:05) [2]

> А как это ты умудрился ассигновать битмап из не-битмап-класса
> ?

да это-то как раз нормально, там есть такая возможность.



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

Текущий архив: 2008.12.14;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.014 c
15-1223864011
Slider007
2008-10-13 06:13
2008.12.14
С днем рождения ! 11 октября 2008 суббота


4-1202319854
9899100
2008-02-06 20:44
2008.12.14
управление другим окном


15-1223801399
belmol
2008-10-12 12:49
2008.12.14
сканер отпечатка пальцев


2-1225904136
TRSteep
2008-11-05 19:55
2008.12.14
Алгоритм Blowfish


2-1225562458
dmitry_12_08_73
2008-11-01 21:00
2008.12.14
Как прописать настройки директив компилятора в константу