Конференция "Corba" » Открытие шаблона word несколько раз [D6, WinXP]
 
  • denis24 (27.01.09 15:34) [0]
    Уважаемые знатоки.Задача не сложная.
    Есть шаблонный документ  с метками на место которых забиваю данные.Есть Stringgrid .Нужно в цикле по записям стрингрида каждый раз открывать шаблонный документ и встявлять данные из строки стрингрида.Тоесть одна строка грида-один документ ворда.
    файлы сохранять не нужно,просто что бы на экране открылось надцать экземпляров документа с индивидуальными данными в каждом.

    vr:olevariant;
    i:byte;
    begin
    W1 .Connect;
    W1. Visible:=true;
    for i:=0 to Stringgrid_stat_talon.RowCount-1 do
    begin
    W1 .Documents.Open (vr,EmptyParam,........)
    vr:='fio';
    w1.ActiveDocument.Bookmarks.Item(vr).Range.Select;
     w1.Selection.Text:=DataModule2.FIBDataSetKlients.fieldbyname('fio').AsString;
    w1.Selection.Font.Size := 7;
    w1.Selection.Font.Underline:= 1;
    w1.Selection.Font.bold:= 1;
    end;
    W1.Disconnect;
    DataModule2.FIBDataSetKlients.Close;
    end;



    если делать так ,то открывается один документ и в него вставляются все строчки из грида.
    Как можно организовать задачу?
  • KSergey © (27.01.09 16:02) [1]
    > W1 .Documents.Open (vr,EmptyParam,........)

    может как раз с многоточием пошаманить? Или вовсе другой метод вызывать, на Open (New? я понимаю, что надо на основании шаблона, но может тама есть что-то?)
    Это просто фантазии, как сделать - не знаю

    А может попробовать к новому экземпляру объекта ворда подключаться? вдруг...
  • denis24 (27.01.09 16:29) [2]
    А ларчик просто открывался

    vr:=ExtractFilePath(Application.ExeName)+'\stat_talon.dot';
    W1 .Documents.add (vr,EmptyParam, EmptyParam,EmptyParam);


    Спасибо за подсказку!
  • имя (04.04.09 00:35) [3]
    Удалено модератором
  • имя (04.04.09 00:36) [4]
    Удалено модератором
 
Конференция "Corba" » Открытие шаблона word несколько раз [D6, WinXP]
Есть новые Нет новых   [118241   +25][b:0][p:0.001]