Вставка текста из textBox windows form в нужное место шаблона word

@Pavel83 · Регистрация: 19.01.2016

Студворк — интернет-сервис помощи студентам

Здравствуйте уважаемые программисты, прошу у вас помощи, ибо перерыл кучу информации и в интернете и у вас, но не смог понять куда и что вставлять, прошу помощи!
Есть форма большая, здесь я ее упростил

ссылка на фото формы [удалена неработающая ссылка]

в ее поля textBox заносятся данные, нужно эти данные по нажатии кнопки занести в вордовский документ в нужные места
прошу показать хотя бы на примере одного поля
вот код файлов другие я думаю не требуются, но если нужно выложу.

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
// Forma.cpp: главный файл проекта.
 
#include "stdafx.h"
#include "Form1.h"
 
using namespace Forma;
 
[STAThreadAttribute]
int main(array<System::String ^> ^args)
{
    // Включение визуальных эффектов Windows XP до создания каких-либо элементов управления
    Application::EnableVisualStyles();
    Application::SetCompatibleTextRenderingDefault(false); 
 
    // Создание главного окна и его запуск
    Application::Run(gcnew Form1());
    return 0;
}

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
#pragma once
 
namespace Forma {
 
    using namespace System;
    using namespace System::ComponentModel;
    using namespace System::Collections;
    using namespace System::Windows::Forms;
    using namespace System::Data;
    using namespace System::Drawing;
 
    /// <summary>
    /// Сводка для Form1
    /// </summary>
    public ref class Form1 : public System::Windows::Forms::Form
    {
    public:
        Form1(void)
        {
            InitializeComponent();
            //
            //TODO: добавьте код конструктора
            //
        }
 
    protected:
        /// <summary>
        /// Освободить все используемые ресурсы.
        /// </summary>
        ~Form1()
        {
            if (components)
            {
                delete components;
            }
        }
    private: System::Windows::Forms::Label^  label1;
    protected: 
    private: System::Windows::Forms::Label^  label2;
    private: System::Windows::Forms::TextBox^  textBox1;
    private: System::Windows::Forms::TextBox^  textBox2;
    private: System::Windows::Forms::Button^  button1;
 
    private:
        /// <summary>
        /// Требуется переменная конструктора.
        /// </summary>
        System::ComponentModel::Container ^components;
 
#pragma region Windows Form Designer generated code
        /// <summary>
        /// Обязательный метод для поддержки конструктора - не изменяйте
        /// содержимое данного метода при помощи редактора кода.
        /// </summary>
        void InitializeComponent(void)
        {
            this->label1 = (gcnew System::Windows::Forms::Label());
            this->label2 = (gcnew System::Windows::Forms::Label());
            this->textBox1 = (gcnew System::Windows::Forms::TextBox());
            this->textBox2 = (gcnew System::Windows::Forms::TextBox());
            this->button1 = (gcnew System::Windows::Forms::Button());
            this->SuspendLayout();
            
            // label1
            
            this->label1->AutoSize = true;
            this->label1->Location = System::Drawing::Point(17, 20);
            this->label1->Name = L"label1";
            this->label1->Size = System::Drawing::Size(47, 13);
            this->label1->TabIndex = 0;
            this->label1->Text = L"Рс/счет";
            this->label1->Click += gcnew System::EventHandler(this, &Form1::label1_Click);
            
            // label2
            
            this->label2->AutoSize = true;
            this->label2->Location = System::Drawing::Point(17, 52);
            this->label2->Name = L"label2";
            this->label2->Size = System::Drawing::Size(151, 13);
            this->label2->TabIndex = 1;
            this->label2->Text = L"Наименование организации";
            
            // textBox1
             
            this->textBox1->Location = System::Drawing::Point(105, 20);
            this->textBox1->Name = L"textBox1";
            this->textBox1->Size = System::Drawing::Size(152, 20);
            this->textBox1->TabIndex = 2;
            // 
            // textBox2
            // 
            this->textBox2->Location = System::Drawing::Point(105, 68);
            this->textBox2->Name = L"textBox2";
            this->textBox2->Size = System::Drawing::Size(152, 20);
            this->textBox2->TabIndex = 3;
            
            // button1
            
            this->button1->Location = System::Drawing::Point(115, 125);
            this->button1->Name = L"button1";
            this->button1->Size = System::Drawing::Size(142, 49);
            this->button1->TabIndex = 4;
            this->button1->Text = L"Сформировать документ";
            this->button1->UseVisualStyleBackColor = true;
            
            // Form1
            
            this->AutoScaleDimensions = System::Drawing::SizeF(6, 13);
            this->AutoScaleMode = System::Windows::Forms::AutoScaleMode::Font;
            this->ClientSize = System::Drawing::Size(284, 262);
            this->Controls->Add(this->button1);
            this->Controls->Add(this->textBox2);
            this->Controls->Add(this->textBox1);
            this->Controls->Add(this->label2);
            this->Controls->Add(this->label1);
            this->Name = L"Form1";
            this->Text = L"Form1";
            this->ResumeLayout(false);
            this->PerformLayout();
 
        }
#pragma endregion
    private: System::Void label1_Click(System::Object^  sender, System::EventArgs^  e) {
             }
    };
}

@Pavel83 · 20.01.2016, 06:57 **[ТС]**

Вот форма

Вставка текста из textBox windows form в нужное место шаблона word

Если не хотите бесплатно помочь, можно договориться за материальное вознаграждение!Очень нужно!

@Pavel83 · 20.01.2016, 19:31 **[ТС]**

Странно, неужели ни кто не хочет помочь даже за деньги?

@Pavel83 · 26.01.2016, 20:17 **[ТС]**

Ну как же так, что нет совсем мастеров программирования, к Word подключился, текст в него попадает

C++
1
2
3
4
5
6
7
8
9
10
11
12
             auto Pasha = gcnew Microsoft::Office::Interop::Word::Application();
             Pasha->Visible =true;
             // Переменная с "пустым" значением, для того, чтобы ставить значения по умолчанию
             auto t = Type::Missing;
                // Открываем новый документ MS Word:
                auto Document = Pasha->Documents->Add(t, t, t, t);
                // Вводим текст в документ MS WORD с текущей позиции:
                Pasha->Selection->TypeText("ТАБЛИЦА ДАННЫХ");
        Pasha->Selection->default = textBox1->Text;
                
                Object ^ Name = "good.doc";
                Pasha->ActiveDocument->SaveAs(Name, t, t, t, t, t, t, t, t, t, t, t, t, t, t, t);

Добавлено через 15 минут
теперь нужно что то типа

C#
1
oDoc.Bookmarks("mark").Range.Text = TextBox8.Value

но это на шарпе а как на с++ переделать

Новые блоги и статьи Все статьи Все блоги /
Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем	10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .

@Pavel83 0 / 0 / 1 Регистрация: 19.01.2016 Сообщений: 13
	20.01.2016, 06:57 [ТС]
	Вот форма Если не хотите бесплатно помочь, можно договориться за материальное вознаграждение!Очень нужно! 0

@Pavel83 0 / 0 / 1 Регистрация: 19.01.2016 Сообщений: 13
	20.01.2016, 19:31 [ТС]
	Странно, неужели ни кто не хочет помочь даже за деньги? 0