Высокоуровневые методы обработки информации и программирования
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: мировая торговля, соціологія шпори
| Добавил(а) на сайт: Maljutin.
Предыдущая страница реферата | 3 4 5 6 7 8 9 10 11 12 13 | Следующая страница реферата
begin
AboutBox.ShowModal;
end;
procedure TForm1.N4Click(Sender: TObject);
begin
close;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
k:=StrToInt(edit1.Text);
if (k30)
then ShowMessage('Не верно задано значение')
else
begin
k:=StrToInt(edit1.Text);
Form2.StringGrid1.ColCount:=(k+1);
Form2.visible:=true;
Form1.visible:=false;
end;
Form2.StringGrid1.Cells[0,0]:='X';
Form2.StringGrid1.Cells[0,1]:='Y';
end;
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (key in ['0'..'9']) then key:=#0;
Рекомендуем скачать другие рефераты по теме: реферат по технологии, реферат эволюция.
Категории:
Предыдущая страница реферата | 3 4 5 6 7 8 9 10 11 12 13 | Следующая страница реферата