Форум: "Media";
Текущий архив: 2003.02.13;
Скачать: [xml.tar.bz2];
Вниз
Paste from ClipBoard Найти похожие ветки
← →
Dennis S (2002-10-29 23:14) [0]Как вставить Image и Bitmap из ClipBoard-a в TImage???
if ClipBoard.AsHandle(что-то вроде, уже не момню... Delphi нет под рукой...) = CF_Bitmap then
pic1.Picture.Bitmap.LoadFromClipboardFormat(CF_BitMap,
ClipBoard.GetAsHandle(CF_Bitmap), 0);
Данный код работает, но не совсем корректно:
при копировании графики с web-страници - картинка не вставляется
и выдает сообщение о не корректном формате...
приэтом, если ее вставить сначала в Word, а затем уже в Word-е
ее скопировать заново - тогда срабатывает...
Может кто смогбы накидать "универсальный" цикл на распознание формата и вставку, а то я первый раз с ClipBoard-ом того...
:)
← →
LongIsland (2002-10-30 10:28) [1]
if Clipboard.HasFormat(CF_BITMAP) then
Image1.Picture.Bitmap.LoadFromClipboardFormat(CF_BitMap, ClipBoard.GetAsHandle(CF_Bitmap), 0);
По-крайней мере у меня так работает:-) ДА! Только на модуль ClipBrd ссылку дай
← →
Dennis S (2002-10-30 12:20) [2]2 LongIsland и всем-всем
Вот и я говорю, что после Word-a работает, а так нет и Jpeg вставлять не хочет, даже если:
if Clipboard.HasFormat(CF_PICTURE) then
Image1.Picture.Bitmap.LoadFromClipboardFormat(CF_BitMap, ClipBoard.GetAsHandle(CF_Picture), 0);
или
if Clipboard.HasFormat(CF_PICTURE) then
Image1.Picture.LoadFromClipboardFormat(CF_Picture, ClipBoard.GetAsHandle(CF_Picture), 0);
:)
← →
pasha676 (2002-10-30 12:57) [3]Попробуй
if Clipboard.HasFormat(CF_PICTURE) then
Image1.Picture.Bitmap.Assign(Clipboard);
Помоему так проще. И еще в самом-то буфере точно картинка есть?
← →
Dennis S (2002-10-31 02:55) [4]Это уж вооще не тянет... :(
← →
pasha676 (2002-10-31 08:40) [5]Ынтересно. У меня работает. Наверное из-за того что JPG, то надо наверное что то вроде попробывать
Image1.Picture.Assign(Clipboard)
или
Image1.Picture.Graphic(Clipboard)
Истина где-то рядом. Расскажи о результатах.
← →
LongIsland (2002-10-31 15:52) [6]Самое любопытное, что у меня прекрасно работает мой вариант и вариант pasha676 просто безукоризненно, что бы не находилось в буфере (я имею ввиду формат рисунка). Берет и bmp, и jpg, и gif. Поэтому я в растерянности... :-(
← →
Dennis S (2002-11-01 14:19) [7]Спасибо всем! :)
Image1.Picture.Assign(Clipboard);
Image1.Picture.Graphic.Assign(Clipboard);
работает... :))
Страницы: 1 вся ветка
Форум: "Media";
Текущий архив: 2003.02.13;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.01 c