powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / как стрим в Clipboard загнать?
1 сообщений из 1, страница 1 из 1
как стрим в Clipboard загнать?
    #32087192
Alexander2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Привет,

Простая, казалось бы задача,

надо прочитать BLOB поле из таблички, запомнить его в буфер и выдавить в WORD.

хочу делать так:
===================
var
bs: TADOBlobStream;
...........

procedure.....

bs:=TADOBlobStream.Create(MyTableDocument, bmRead);

как этот стрим в Clipboard загнать? (при этом чтоб не потерять форматирование рич-текста)
...............................
потом запускаю WORD
try
MsWord := GetActiveOleObject('Word.Application');
except
try
MsWord := CreateOleObject('Word.Application');
MsWord.Visible := True;
except
Exception.Create('Error');
end;
end;
...............................
выдавливается содержимое из Clipboard.

MSWord.Documents.Add;
Rng := MSWord.Selection.Range;
Rng.Paste;

=========
Везде примеры даются с картинками и копированием содержимого компонент на форме в буфер, а мне надо сразу из таблицы в буфер загнать (без размещения на форме). Например открыть в ворде документ, сохраненный в поле BLOB.


Спасибо,
Sandy
...
Рейтинг: 0 / 0
1 сообщений из 1, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / как стрим в Clipboard загнать?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]