Вниз
Скачать: CL | DM;

Проблема с копированием в буфер обмена рисунка   Найти похожие ветки 

 
Олег Пономарев   (2004-07-29 09:14) [0]

Доброго дня!

Возникла такая проблемка. Вот кусок кода:
var
 Graf: TPicture;
 ClipBoard: TClipboard;
 MyFormat : Word;
 AData,APalette : THandle;

begin
ClipBoard:=TClipBoard.Create;
ClipBoard.Open;
Graf.SaveToClipboardFormat(MyFormat,AData,APalette);
ClipBoard.SetAsHandle(MyFormat,AData);
Clipboard.Close;
ClipBoard.Free;
end

Перед этим я копирую в Graf рисунок jpeg формата (другого формата не придвидется), а затем выше приведенным кодом в буфер. Если открыть какой нибудь графический редактор или что-то из пакета майкрософт офиса, то рисунок вставляется без проблемы. А вот если создать письмо из оутлука или мозиллы, то они показывают, что буфер пуст. Хотя если вставленный рисунок в редакторах повторно скопировать в буфер, то в почтовики он вставляется.

Кто подскажет, почему он сразу не вставляется в почтовики? Что надо для этого сделать?

С уважением, Олег Пономарев.


 
Palladin ©   (2004-07-29 09:17) [1]

Не нужно создавать clipboard. Он уже создан.


 
Олег Пономарев   (2004-07-29 09:27) [2]

Убрал Create, так сразу "Общее нарушение защиты в памяти...". Хотя вряд ли это решит проблему с рисунком :).


 
Palladin ©   (2004-07-29 13:53) [3]

Вообще говоря Clipboard это функция в модуле clipbrd которая возвращает объект TClipboard. Тебе не нужно ничего подобного создавать. Или уж если создаешь то пользуйся SetClipboard... а по поводу картинок то достаточно взглянуть в конец модуля clipbrd и понять чего не хватает для полного щастя...


 
Олег Пономарев   (2004-07-29 15:28) [4]

Разобрался, все заработало как ты сказал, спасибо.

Теперь осталось выяснить, почему в оутлук не вставляется рисунок, а в ворд вставляется?



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

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



Память: 0.46 MB
Время: 0.021 c
14-1090915970
syte_ser78
2004-07-27 12:12
2004.08.15
Существует ли ограничение на колво записей комбобокса?


3-1090221107
Nurali
2004-07-19 11:11
2004.08.15
paradox


8-1085914054
ALex_T
2004-05-30 14:47
2004.08.15
Как избавиться от мерцания TImage при смене расположения?


1-1091266084
Gear
2004-07-31 13:28
2004.08.15
Работа с потоками в компонентах.


1-1090861230
AlexeyM
2004-07-26 21:00
2004.08.15
XP manifest




   Наверх