[besoft]

Сообщение от AD_min

Помогиет пож. мне нужно сделать экспорт текста в word, и желательно нарисовать квадратик для фотографии 3Х4. Заранее спасибо!!!

Есть хорошая книга "Василий Корняков. Программирование документов и приложений MS Office в Delphi". Можешь поискать её в интернете.
А так,
1. Открыть Ворд:

Код:

    var  W : variant;
    begin
    try
        W := GetActiveOleObject('Word.Application');
     except
        W := CreateOleObject('Word.Application');
     end;
     W.Visible := True;

2. Создать документ

Код:

        W.Documents.Add;

или открыть существующий

Код:

        W.Documents.Add('C:\My documents\Myfile.doc');

3. Запись текста в документ

Код:

        W.ActiveDocument.Range.InsertAfter('My text');

или

Код:

        W.ActiveDocurnent.Range.InsertBefore('My text'); 

4. Закрыть документ

Код:

        W.Activecocument.Close;

и Ворд

Код:

        W.Quit;
        W:=UnAssigned; 

В книжке всё подробно, понятно и с примерами.
Удачи.

lmikle: Кто не будет пользоваться тегами, тот получит бан!