II Form!

this->AutoScaleDimensions = System: : Drawing: :SizeF(6, 13); this->AutoScaleMode = System: :Windows:: Forms::AutoScaieMode:: Font; Ithis-X:iientSize = System::Drawing::Size(207, 164); this->Controls->Add (this->listBox2); Lthis-x:ontrols->Add (this->listBoxl); Fthis->Controls->Add (this->button2); this->Controls->Add(this->buttonl) ; iis->Name = L Forml ; lthis->Text = L Forml ; this->ResumeLayout (false) ; I

ipragma endregion rivate: System::Void button2 Click(System::Object sender, System::EventArgs e)

this->Close() ;

private: System::Void buttonl Click(System::Object sender. System::EventArgs e)

ShowDialog 0 возвращает имя файла в FileName this->openFileDialogl->ShowDialogо; String a=this->openFileDialogl->FileName;

LoadFromFile(a, this->listBoxl); Загрузка файла в ListBoxl

/*Выбор имени и пути для выходного файла с помощью SaveFiieDiaiog/ Имя файла будет в FileName*/ this->saveFileDialogl->ShowDialog(); a=this->saveFileDialogl->FileName; SaveToFile(a,this->listBoxl); сохранение файла из Listboxl чтение сохраненного файла в ListBox2

this->openFileDialogl->ShowDialog(); a=this->openFileDialogl->FileNaitie; LoadFroniFile(a, this->listBox2);

Компонент ColorDialog

Компонент находится в списке Dialogs палитры компонентов. Он делает возможным выбор цвета в диалоговом окне, работает точно так же, как и остальные диалоговые компоненты: выполняется метод ShowDialog(), открывается палитра цветов, из которой нужно выбрать необходимый цвет. Значение цвета помещается в свойство Color компонента, после чего цвет может использоваться в дальнейшем. Пример работы компонента показан на рис. 11.115.

а Forml (Г1[б]1ц ет

Форма после запуска приложения. Нажимаем на кнопку Загрузить...

Отфывается эта палитра, из которой щелчком на клетке с цветом и нажатием ОК выбираем цвет

т Forml

Основные цвета:

шгггг\ шгггг\

Додолнительные цвета.

гггггггг гггггггг

Определить цвет > >

\ ОК j I Отмена

Результат

Рис. 11.115. Пример использования компонента ColorDialog

Текст обработчика кнопки, изменяющего цвет шрифта формы, приводится в листинге 11.27.

СТИ1

нг 11.27

xivate: System:iVoid buttonl Click(System:zObject sender, ystera:: EventArgs e)

this->colorDialogl->ShowDialog () ;

this->ForeColor = this->colorDialogl->Color;

private: System: :Void button2 Click(System: :Object sender, Jystem: :EventArgs e)

this->Close () ;

Компонент FontDialog

Компонент находится в списке Dialogs палитры компонентов, обеспечивает выбор шрифта и его атрибутов (стиля, размера, цвета и т. п.) в диалоговом режиме.

После выбора нужного шрифта его название попадает в свойство компонента ?ont. Пример использования компонента демонстрируется на рис. 11.116 и влистинге 11.28.

Цстинг 11.28

private: System::Void button2 Click(System::Object sender. System:: EventArgs e)

this->Close () ;

private: System: :Void buttonl Click(System: :Object sender. System::EventArgs e) (

this->fontDialogl->ShowDialog 0 ; this->Font = this->fontDialogl->Font;