Главная страница
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.05 c
14-1090519291
DSKalugin
2004-07-22 22:01
2004.08.15
скоро Internet Explorer закроют :-)))


3-1090215004
Dub
2004-07-19 09:30
2004.08.15
Типы полей в DBase


3-1090471464
malefik
2004-07-22 08:44
2004.08.15
Вопрос по параметрам.......TQuery


3-1090080269
voe
2004-07-17 20:04
2004.08.15
Поиск записи с результатом - True или False


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