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

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

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

Отчётность в Worf

asd © (2006-04-03 21:21:00)
Поскажите, пожалуйста, как отобразить текст с Memo в Word?
Я знаю, как открыть Word, а дальше не знаю.
var
XLApp:Variant;
begin
XLApp:=CreateOleObject('Excel.Application');
XLApp.Visible:=True;

asd (2006-04-05 13:30:00) [1]
Ой, я открыл в этих строчках Excel. Спасибо большое, просто я работал с Excel, а в Word не знал, как работать.

Palladin (2006-04-04 14:34:00) [2]
ты не попутал, что ты там открываешь в первых строках "своего" кода... вдруг это Photoshop? или пасьянс "Косынка"

var
w:Olevariant;
i:Integer;
begin
w:=createoleobject('Word.Application');
w.Documents.Add;
w.Visible:=true;
for i:=0 to memo1.lines.count-1 do
begin
w.Selection.TypeText(Text:=memo1.lines[i]);
w.Selection.TypeParagraph;
end;
end;

asd (2006-04-04 14:13:00) [3]
А как отобразить это в Word? Первые мои строки кода открывают Word, а дальше , как открыть новую страницу и присвоить туда текст.

Жуков Олег (2006-04-04 00:45:00) [4]
Memo.SaveToFile('Отчёт.DOC');
ShellExecute(... , 'Отчёт.DOC', ...);
:)

Palladin (2006-04-03 21:34:00) [5]
хоть в орешник...

Наверх

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