!Листинг10.2

Файл Forml.h

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

открытие Form2

System::Windows::Forms::DialogResult dr; Form2 newDlg = gcnew Form2(); m: dr = newDlg->ShowDialog0 ;

/♦Вызывается Form2 в модальном режиме. В dr запоминается значение DialogResult. Когда Form2 закроется, то значение ее свойства DialogResult будет сравниваться с dr(T£iM перед закрытием формы мы внесем значение ОК в DialogResult):*/

if( dr == System::Windows::Forms::DialogResult::OK ) return;

else {

MessageBox::Show ( Ошибка закрытия Form2 ); goto m;

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

Вызов Form3

Forms fS = gcnew Form3();

f3->Show();

private: System::Void button3 Click(System::Object sender. System: : Event Args e)

this->Close();

Файл Fonn2.h

private: System: :Void buttonl Click(System: lObjecf sender, System: :EventArgs e)

this->DialogResult= System: :Windows: : Forms: : DialogResult: : OK; this->Close (); закрытие FonTi2

Файл Form3.h

private: System: :Void buttonl Click(System: :ОЬзес sender. System: :EventArgs e)

this->Close () ;

Рисование графиков в форме

в заключение покажем, как в форме можно рисовать графики.

Я Рисо<1Нме rpaфинd в форме И Рисование графика в форме

Рисование синусоиды

Рисование тангенсоиды

Выход

Рис. 10,35. Графики синусоиды и тангенсоиды, построенные в форме

MI3M960

[ Листинг 10.3

объявление функций ipragma once namespace Му46 {

using namespace System;

using namespace System: iCoirponentModel;

using namespace System::Collections;

using namespace System::Windows::Forms;

using namespace System::Data;

using namespace System::Drawing;

Объявление моих функций

-sin(x)-----------------------

математические функции берутся из класса Math double fs(double x) I

return(Math::Floor(Math::Sin(x)));

-tan(x)----------------------

double ft(double x) {

return(Math::Floor(Math::Tan(x)));

=====Обработчики кнопок вывода графиков функций ===========

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

Color col = gcnew Color() ;

Pen pen = gcnew Pen (col->Red) ;

Вид формы с графиками функций sin(x) и tan(x) показан на рис. 10.35. Коды обработчиков кнопок (фрагменты h-файла приложения, выводящего графики функций) - в листинге 10.3.