Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.08.15;
Скачать: [xml.tar.bz2];

Вниз

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

 
Олег Пономарев   (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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.032 c
1-1091186987
Вика
2004-07-30 15:29
2004.08.15
пересечения диапазонов


1-1091082876
seregin2
2004-07-29 10:34
2004.08.15
HtmlHelp API


4-1088701349
Proger
2004-07-01 21:02
2004.08.15
Создание окна


3-1090219511
brejnev
2004-07-19 10:45
2004.08.15
Считать данные из TQuery


4-1080805108
shiller
2004-04-01 11:38
2004.08.15
Скрытие процесса в NT





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский