Реферат Моделювання дошки Гальтона на C + + Borland Builder

Тема: Курсовые обзорные

ToolBar1-> Visible; -> Visible =! CoolBar1-> Visible; (); ();

}

// ---------------------------------------- ----------------------------------- __fastcall TForm1 :: N21Click (TObject * Sender)

{-> Visible =! StatusBar1-> Visible; (); ();

}

// ---------------------------------------- ----------------------------------- __fastcall TForm1 :: N19Click (TObject * Sender)

{* About = new TAbout (this);> ShowModal (); About;

}

// ---------------------------------------- ----------------------------------- __fastcall TForm1 :: N17Click (TObject * Sender)

{(! TeorOpened)

{= new TTeory (Application);

{> RichEdit1-> Lines-> LoadFromFile ("Теорія/Розподіл Максвелла. rtf");

} (EFOpenError &)

{("Відсутній файл теорії!");;

} = true;> Show ();

}

{> Visible = true;> SetFocus ();

}

// ---------------------------------------- ----------------------------------- __fastcall TForm1 :: FormActivate (TObject * Sender)

{(! Activated)

{_Init = false; = 10; -> Position = 50-dt; -> Position = StrToInt (Edit1-> Text); -> Position = StrToInt (Edit2-> Text); (Form1-> Width> 105) StatusBar1-> Panels-> Items [0] -> Width = Form1-> Width-100; StatusBar1-> Panels-> Items [0] - > Width = 5; = 50; (); -> Color = (TColor) RGB (255,218,119); -> Color = (TColor) RGB (255,153,85); -> Color = (TColor) RGB ( 52,134,224); -> Color = clRed; * Distrib = new char [120];

Distrib [0] = 0; (Distrib, "Розподіл кульок по осередках:");

for (int w = 0; w

{(Distrib, IntToStr (M [w]). c_str ()); (Distrib, "");

} -> Panels-> Items [0] -> Text = Distrib; Distrib;

} (); = true;

}

// ---------------------------------------- ----------------------------------- __fastcall TForm1 :: N25Click (TObject * Sender)

{(0);

}

// ---------------------------------------- ----------------------------------- __fastcall TForm1 :: N23Click (TObject * Sender)

{-> Execute (); ();

}