Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

BFI_DOPMAT / Формирование таблицы из двух массивов String

.pdf
Скачиваний:
1
Добавлен:
01.04.2022
Размер:
108.72 Кб
Скачать

#pragma endregion //Прографортаблицумизирдвстроковыхмаетмассивов

текстовом //поле,используяфункциюString::FormatКрт,овпрограммего. //участвуетэлементуправленияMenuStripдляорганизации //раскрываюменю,помощптоегьюрльзвыводитгосяватель //сформироватаблицуБлокнотцельюпоследующегоную

редактирования //ивыводанапеч ть

private: System::

Void Form1_Load(System::Object^ sender, System::EventArgs^ e)

{

this->textBox1->Multiline = true; this->textBox1->Size = Drawing::Size(320, 216); this->ClientSize = Drawing::Size(342, 266); this->Text = "Формирование таблицы";

array<String^>^ Imena = {"Андрей - раб", "Света-X", "ЖЭК", "Справкапотел",Александр" Степанович",

"Мама - дом",Карапузова" Таня", "Погодасегодня",Театр"Браво"};

array<String^>^ Tel = {"274-88-17","+38(067)7030356", "22-345-72", "009", "223-67-67 доп 32-67",

"570-38-76", "201-72-23-прямой моб", "001", "216-40-22"};

textBox1->ScrollBars = ScrollBars::Vertical;

textBox1->Font = gcnew Drawing::Font("Courier New", 9.0F); textBox1->Text = "ТАБЛИЦА ТЕЛЕФОНОВ\r\n\r\n";

for (int i = 0; i <= 8; i++)

 

textBox1->Text += String::Format(

 

"{0, -21} {1, -21}", Imena[i], Tel[i]) + "\r\n";

 

textBox1->Text += "\r\nПРИМЕЧАНИЕ:" +

 

"\r\nдлякорректногоотображениятаблицы" +

 

"\r\nвБлоукшражнотеCourierифтте New";

 

//Записьтаблицывтекстовы

й файл C:\Table.txt.

йл

//Созданиеэкземпляр

а StreamWriter длязаписивфа

auto Писатель = gcnew IO::StreamWriter("C:\\Table.txt", false, System::Text::Encoding::GetEncoding(1251));

// - здесь заказ кодовой страницы Win1251 для русских букв Писатель->Write(textBox1->Text);

Писатель->Close();

}

private: System::Void

показатьТаблицуВБлокнотеToolStripMenuItem_Click( System::Object^ sender, System::EventArgs^ e)

{

try {

Diagnostics::Process::Start("Notepad", "C:\\Table.txt");

}

catchСитуация(Exception) ^ {Отчет//обошибках

MessageBox::Show(Ситуация->Message, "Ошибка", MessageBoxButtons::OK, MessageBoxIcon::Exclamation);

} }

private: System::Void выходToolStripMenuItem_Click(System::Object^ sender,

System::EventArgs^ e)

{

//Выхизпрограммы:д this->Close();

} };

}