Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.04.16;
Скачать: CL | DM;

Вниз

Отчётность в Worf   Найти похожие ветки 

 
asd ©   (2006-04-03 21:21) [0]

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


 
Palladin ©   (2006-04-03 21:34) [1]

хоть в орешник...


 
Жуков Олег   (2006-04-04 00:45) [2]

Memo.SaveToFile("Отчёт.DOC");
ShellExecute(... , "Отчёт.DOC", ...);
:)


 
asd ©   (2006-04-04 14:13) [3]

А как отобразить это в Word? Первые мои строки кода открывают Word, а дальше , как открыть новую страницу и присвоить туда текст.


 
Palladin ©   (2006-04-04 14:34) [4]

ты не попутал, что ты там открываешь в первых строках "своего" кода... вдруг это 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-05 13:30) [5]

Ой, я открыл в этих строчках Excel. Спасибо большое, просто я работал с Excel, а в Word  не знал, как работать.



Страницы: 1 вся ветка

Текущий архив: 2006.04.16;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.109 c
2-1143814789
Der Nechk@ssoff
2006-03-31 18:19
2006.04.16
Clean Image


2-1142495897
BlackDel
2006-03-16 10:58
2006.04.16
Работа с файлами


2-1144094695
d3777
2006-04-04 00:04
2006.04.16
TChart и Series


2-1143722229
EXILE
2006-03-30 16:37
2006.04.16
Указатели


2-1144170980
dimak-2k
2006-04-04 21:16
2006.04.16
Перевод String to Hex?