Задани 1
Требуется создать приложение отображающее расписание занятий в табличной форме. Предметы выбираются из списка и по щелчку мыши заносятся в выбранную ячейку таблицы.
1. Создать приложение. На форме разместить необходимые компоненты.

2. Установить следующие свойства:
| Компонент | Свойство | Значение |
| Form1 | Caption | Расписание |
| Form1 | BorderStyle | bsSingle |
| Form1 | BorderIcons->biMaximize | false |
| Label1 | Caption | Предметы |
| ComboBox1 | Text | |
| Button1 | Caption | Добавить |
| Button2 | Caption | Удалить |
| Button3 | Caption | Выход |
| StringGrid1 | BorderStyle | bsNone |
| StringGrid1 | ColCount | |
| StringGrid1 | RowCownt | |
| StringGrid1 | ScrollBars | ssNone |
3. Задать начальный список предметов в c свойстве Items компонента ComboBox1. Первый элемент в списке должен быть пустым для возможности удаления предмета из ячейки таблицы.
4. Создать обработчик события OnShow компонента Form1. Это событие возникает в момент прорисовки формы. В тело обработчика события ввести код:
AnsiString par[] = {"1 пара","2 пара","3 пара","4 пара",
"5 пара","6 пара"};
AnsiString day[] = {"Пн","Вт","Ср","Чт","Пт","Сб"};
for(int i=1;i<7;i++)
{
StringGrid1->Cells[0][i]=par[i-1];
StringGrid1->Cells[i][0]=day[i-1];
}
5. Создать обработчик события OnClick компонента Button1. В тело обработчика события вести код:
ComboBox1->Items->Add(ComboBox1->Text);
ComboBox1->Text="";
6. Создать обработчик события OnClick компонента Button2. В тело обработчика события вести код:
if(ComboBox1->ItemIndex >=1)
ComboBox1->Items->Delete(ComboBox1->ItemIndex);
7. Создать обработчик события OnClick компонента Button3. В тело обработчика события вести код:
Close();
8. Создать обработчик события OnSelectCell компонента StringGrid1. В тело обработчика события вести код:
StringGrid1->Cells[ACol][ARow]=
ComboBox1->Items->Strings[ComboBox1->ItemIndex];
Запустить приложение. Убедиться в работоспособности всех функций приложения.






