Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Фото и Word [D7, WinXP]

valery779 © (2006-09-27 19:28:00)
Загружаю фото в БД в форматах bmp jpg jpeg, просматриваю их через Image, хотелось бы вместе с анкетными данными выводить их Word

EvS (2006-09-28 17:48:00) [1]
> -- File.doc существует, но процедура создает новый ???

Open для чего по твоему существует?

> Нужно ли задавать AFormat,AData,APalette значения ???

Очень даже.

> -- буфер пустой, --> пятая команда не работает и на .bmp
> и на .jpg

Попробуй Clipboard.Assign(Image1.Picture);

Valery779 (2006-09-28 15:36:00) [2]
procedure TForm1.Button1Click(Sender: TObject);
var W:variant;
APalette :HPalette;
AFormat:Word;
AData:THandle;
begin
W:=CreateOleObject('Word.Application');
W.Visible:=true;
W.documents.Add(ExtractFileDir(Application.ExeName)+'\templ\file.doc',0);
W.ActiveDocument.Select;
Image1.Picture.SaveToClipboardFormat(AFormat,AData,APalette);
W.Selection.Paste;
end;

-- File.doc существует, но процедура создает новый ???
-- буфер пустой, --> пятая команда не работает и на .bmp и на .jpg
Нужно ли задавать AFormat,AData,APalette значения ???
Остряков прошу не беспокоится

valery779 (2006-09-28 15:34:00) [3]
procedure TForm1.Button1Click(Sender: TObject);
var W:variant;
APalette :HPalette;
AFormat:Word;
AData:THandle;
begin
W:=CreateOleObject('Word.Application');
W.Visible:=true;
W.documents.Add(ExtractFileDir(Application.ExeName)+'\templ\file.doc',0);
W.ActiveDocument.Select;
Image1.Picture.SaveToClipboardFormat(AFormat,AData,APalette);
W.Selection.Paste;
end;

-- File.doc существует, но процедура создает новый ???
-- буфер пустой, --> пятая команда не работает и на .bmp и на .jpg
Нужно ли задавать AFormat,AData,APalette значения ???
Остряков прошу не беспокоится

Anatoly Podgoretsky (2006-09-27 22:04:00) [4]
А чем формат jpg отличается от jpeg?

YurikGL (2006-09-27 19:49:00) [5]
Либо через буфер обмена, либо сохраняешь рисунок в файл и вставляешь его во Word...
Второй вариант лучше

atruhin (2006-09-27 19:41:00) [6]
Одобряю

EvS (2006-09-27 19:38:00) [7]
Разрешение надо? Считай, что получил.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »