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

Вниз

Запуск word   Найти похожие ветки 

 
jenbond ©   (2002-01-24 10:08) [0]

Подскажите как попроще реализовать запуск Word и сразуже предачу в него текста с активной формы!


 
MetallAdm ©   (2002-01-24 11:18) [1]

А как енто проше ?!!

implementation

uses OleAuto;
var
V : Variant ;
..
V := 0; // at some point just to initialise

if V = 0 then
begin
V := CreateOLEObject("Word.Application");
V.WordBasic.AppShow;
end;

V.WordBasic.Fileopen("Your Word Doc name");
V.WordBasic.EditBookmark("Title",0,0,0,1);
V.WordBasic.Insert(Title);
....

Можно Так а можно и так ...


var
Word: Variant;
begin
Word := CreateOleObject("Word.Basic");
with Word do
begin {Pure WordBASIC commands follow...}
FileNew("Normal");
Insert("This is the first line"#13);
Insert("This is the second line"#13);
FileSaveAs("c:\temp\test.txt", 3);
end;
end;






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

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

Наверх




Память: 0.46 MB
Время: 0.009 c
3-18749
iXANiA
2002-01-10 10:28
2002.02.07
Проблема с TIBDatabase


7-19000
Lizard
2001-10-30 20:34
2002.02.07
Как перехватить сообщения об ошибках типа Autefication failed и т.д. при отправке письма ?


3-18772
Макс
2002-01-11 15:28
2002.02.07
Реализация UpdateSQL на ADO


6-18934
SemFLY
2001-11-13 20:21
2002.02.07
Какая команда в Windows разрывает соединение с интеренетом ?


14-18960
SP
2001-12-18 16:15
2002.02.07
Размере откомпилированного файла...