TOPIC:

  with TvVectorialDocument.Create do begin
    with AddTextPageSequence do begin
      with Header.AddParagraph do begin
        AddPngImage.FileName := 'test1.png';
        AddText('Header text');
      end;
      with Footer.AddParagraph do begin
        AddPngImage.FileName := 'test2.png';
        AddText('Footer text');
      end;
      AddParagraph.AddText('Body text.');
    end;
    WriteToFile('demo.docx', vfDOCX);
    Free;
  end;