Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.08.15;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.087 c
14-1091165953
alex_pv
2004-07-30 09:39
2004.08.15
Программеры из Казахстана откликнетесь


1-1091044481
CrossOut
2004-07-28 23:54
2004.08.15
Преобразование String в tObject. Возможно ли это?


11-1078768582
Валерий
2004-03-08 20:56
2004.08.15
как менять хинт в Delphi в зависимости от цвета


3-1088527992
Piter
2004-06-29 20:53
2004.08.15
Как искать по русски в Blob без учета регистра?


14-1090771379
zokzok
2004-07-25 20:02
2004.08.15
хотят опубликовать мою программу на CD