Главная База знаний "Allbest" Программирование, компьютеры и кибернетика Программа "Ход конем"

Программа "Ход конем"

Создание программы движения коня по шахматной доске, ее функциональное и эксплуатационное назначение, требования пользователя к программному изделию. Виды скриншотов, информационная совместимость, программные ограничения и требования к документации.

Рубрика Программирование, компьютеры и кибернетика
Вид курсовая работа
Язык русский
Дата добавления 17.02.2010
Размер файла 1,4 M

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

Страница:

Image14.Picture:=Image68.Picture;

Image15.Picture:=Image68.Picture;

Image16.Picture:=Image68.Picture;

Image17.Picture:=Image68.Picture;

Image18.Picture:=Image68.Picture;

Image19.Picture:=Image68.Picture;

Image20.Picture:=Image68.Picture;

Image21.Picture:=Image68.Picture;

Image22.Picture:=Image68.Picture;

Image23.Picture:=Image68.Picture;

Image24.Picture:=Image68.Picture;

Image25.Picture:=Image68.Picture;

Image26.Picture:=Image68.Picture;

Image27.Picture:=Image68.Picture;

Image28.Picture:=Image68.Picture;

Image29.Picture:=Image68.Picture;

Image30.Picture:=Image68.Picture;

Image31.Picture:=Image68.Picture;

Image32.Picture:=Image68.Picture;

Image33.Picture:=Image68.Picture;

Image34.Picture:=Image68.Picture;

Image35.Picture:=Image68.Picture;

Image36.Picture:=Image68.Picture;

Image37.Picture:=Image68.Picture;

Image38.Picture:=Image68.Picture;

Image39.Picture:=Image68.Picture;

Image40.Picture:=Image68.Picture;

Image41.Picture:=Image68.Picture;

Image42.Picture:=Image68.Picture;

Image43.Picture:=Image68.Picture;

Image44.Picture:=Image68.Picture;

Image45.Picture:=Image68.Picture;

Image46.Picture:=Image68.Picture;

Image47.Picture:=Image68.Picture;

Image48.Picture:=Image68.Picture;

Image49.Picture:=Image68.Picture;

Image50.Picture:=Image68.Picture;

Image51.Picture:=Image68.Picture;

Image52.Picture:=Image68.Picture;

Image53.Picture:=Image68.Picture;

Image54.Picture:=Image68.Picture;

Image55.Picture:=Image68.Picture;

Image56.Picture:=Image68.Picture;

Image57.Picture:=Image68.Picture;

Image58.Picture:=Image68.Picture;

Image59.Picture:=Image68.Picture;

Image60.Picture:=Image68.Picture;

Image61.Picture:=Image68.Picture;

Image62.Picture:=Image68.Picture;

Image4.Picture:=Image68.Picture;

Image64.Picture:=Image68.Picture;

Image65.Picture:=Image68.Picture;

Image66.Picture:=Image68.Picture;

Image67.Picture:=Image68.Picture;

end;

procedure TForm1.Image64MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

begin

Image64.Picture.LoadFromFile('ukaz.bmp');

Image5.Picture:=Image68.Picture;

Image6.Picture:=Image68.Picture;

Image7.Picture:=Image68.Picture;

Image8.Picture:=Image68.Picture;

Image9.Picture:=Image68.Picture;

Image10.Picture:=Image68.Picture;

Image11.Picture:=Image68.Picture;

Image12.Picture:=Image68.Picture;

Image13.Picture:=Image68.Picture;

Image14.Picture:=Image68.Picture;

Image15.Picture:=Image68.Picture;

Image16.Picture:=Image68.Picture;

Image17.Picture:=Image68.Picture;

Image18.Picture:=Image68.Picture;

Image19.Picture:=Image68.Picture;

Image20.Picture:=Image68.Picture;

Image21.Picture:=Image68.Picture;

Image22.Picture:=Image68.Picture;

Image23.Picture:=Image68.Picture;

Image24.Picture:=Image68.Picture;

Image25.Picture:=Image68.Picture;

Image26.Picture:=Image68.Picture;

Image27.Picture:=Image68.Picture;

Image28.Picture:=Image68.Picture;

Image29.Picture:=Image68.Picture;

Image30.Picture:=Image68.Picture;

Image31.Picture:=Image68.Picture;

Image32.Picture:=Image68.Picture;

Image33.Picture:=Image68.Picture;

Image34.Picture:=Image68.Picture;

Image35.Picture:=Image68.Picture;

Image36.Picture:=Image68.Picture;

Image37.Picture:=Image68.Picture;

Image38.Picture:=Image68.Picture;

Image39.Picture:=Image68.Picture;

Image40.Picture:=Image68.Picture;

Image41.Picture:=Image68.Picture;

Image42.Picture:=Image68.Picture;

Image43.Picture:=Image68.Picture;

Image44.Picture:=Image68.Picture;

Image45.Picture:=Image68.Picture;

Image46.Picture:=Image68.Picture;

Image47.Picture:=Image68.Picture;

Image48.Picture:=Image68.Picture;

Image49.Picture:=Image68.Picture;

Image50.Picture:=Image68.Picture;

Image51.Picture:=Image68.Picture;

Image52.Picture:=Image68.Picture;

Image53.Picture:=Image68.Picture;

Image54.Picture:=Image68.Picture;

Image55.Picture:=Image68.Picture;

Image56.Picture:=Image68.Picture;

Image57.Picture:=Image68.Picture;

Image58.Picture:=Image68.Picture;

Image59.Picture:=Image68.Picture;

Image60.Picture:=Image68.Picture;

Image61.Picture:=Image68.Picture;

Image62.Picture:=Image68.Picture;

Image63.Picture:=Image68.Picture;

Image4.Picture:=Image68.Picture;

Image65.Picture:=Image68.Picture;

Image66.Picture:=Image68.Picture;

Image67.Picture:=Image68.Picture;

end;

procedure TForm1.Image65MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

begin

Image65.Picture.LoadFromFile('ukaz.bmp');

Image5.Picture:=Image68.Picture;

Image6.Picture:=Image68.Picture;

Image7.Picture:=Image68.Picture;

Image8.Picture:=Image68.Picture;

Image9.Picture:=Image68.Picture;

Image10.Picture:=Image68.Picture;

Image11.Picture:=Image68.Picture;

Image12.Picture:=Image68.Picture;

Image13.Picture:=Image68.Picture;

Image14.Picture:=Image68.Picture;

Image15.Picture:=Image68.Picture;

Image16.Picture:=Image68.Picture;

Image17.Picture:=Image68.Picture;

Image18.Picture:=Image68.Picture;

Image19.Picture:=Image68.Picture;

Image20.Picture:=Image68.Picture;

Image21.Picture:=Image68.Picture;

Image22.Picture:=Image68.Picture;

Image23.Picture:=Image68.Picture;

Image24.Picture:=Image68.Picture;

Image25.Picture:=Image68.Picture;

Image26.Picture:=Image68.Picture;

Image27.Picture:=Image68.Picture;

Image28.Picture:=Image68.Picture;

Image29.Picture:=Image68.Picture;

Image30.Picture:=Image68.Picture;

Image31.Picture:=Image68.Picture;

Image32.Picture:=Image68.Picture;

Image33.Picture:=Image68.Picture;

Image34.Picture:=Image68.Picture;

Image35.Picture:=Image68.Picture;

Image36.Picture:=Image68.Picture;

Image37.Picture:=Image68.Picture;

Image38.Picture:=Image68.Picture;

Image39.Picture:=Image68.Picture;

Image40.Picture:=Image68.Picture;

Image41.Picture:=Image68.Picture;

Image42.Picture:=Image68.Picture;

Image43.Picture:=Image68.Picture;

Image44.Picture:=Image68.Picture;

Image45.Picture:=Image68.Picture;

Image46.Picture:=Image68.Picture;

Image47.Picture:=Image68.Picture;

Image48.Picture:=Image68.Picture;

Image49.Picture:=Image68.Picture;

Image50.Picture:=Image68.Picture;

Image51.Picture:=Image68.Picture;

Image52.Picture:=Image68.Picture;

Image53.Picture:=Image68.Picture;

Image54.Picture:=Image68.Picture;

Image55.Picture:=Image68.Picture;

Image56.Picture:=Image68.Picture;

Image57.Picture:=Image68.Picture;

Image58.Picture:=Image68.Picture;

Image59.Picture:=Image68.Picture;

Image60.Picture:=Image68.Picture;

Image61.Picture:=Image68.Picture;

Image62.Picture:=Image68.Picture;

Image63.Picture:=Image68.Picture;

Image64.Picture:=Image68.Picture;

Image4.Picture:=Image68.Picture;

Image66.Picture:=Image68.Picture;

Image67.Picture:=Image68.Picture;

end;

procedure TForm1.Image66MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

begin

Image66.Picture.LoadFromFile('ukaz.bmp');

Image5.Picture:=Image68.Picture;

Image6.Picture:=Image68.Picture;

Image7.Picture:=Image68.Picture;

Image8.Picture:=Image68.Picture;

Image9.Picture:=Image68.Picture;

Image10.Picture:=Image68.Picture;

Image11.Picture:=Image68.Picture;

Image12.Picture:=Image68.Picture;

Image13.Picture:=Image68.Picture;

Image14.Picture:=Image68.Picture;

Image15.Picture:=Image68.Picture;

Image16.Picture:=Image68.Picture;

Image17.Picture:=Image68.Picture;

Image18.Picture:=Image68.Picture;

Image19.Picture:=Image68.Picture;

Image20.Picture:=Image68.Picture;

Image21.Picture:=Image68.Picture;

Image22.Picture:=Image68.Picture;

Image23.Picture:=Image68.Picture;

Image24.Picture:=Image68.Picture;

Image25.Picture:=Image68.Picture;

Image26.Picture:=Image68.Picture;

Image27.Picture:=Image68.Picture;

Image28.Picture:=Image68.Picture;

Image29.Picture:=Image68.Picture;

Image30.Picture:=Image68.Picture;

Image31.Picture:=Image68.Picture;

Image32.Picture:=Image68.Picture;

Image33.Picture:=Image68.Picture;

Image34.Picture:=Image68.Picture;

Image35.Picture:=Image68.Picture;

Image36.Picture:=Image68.Picture;

Image37.Picture:=Image68.Picture;

Image38.Picture:=Image68.Picture;

Image39.Picture:=Image68.Picture;

Image40.Picture:=Image68.Picture;

Image41.Picture:=Image68.Picture;

Image42.Picture:=Image68.Picture;

Image43.Picture:=Image68.Picture;

Image44.Picture:=Image68.Picture;

Image45.Picture:=Image68.Picture;

Image46.Picture:=Image68.Picture;

Image47.Picture:=Image68.Picture;

Image48.Picture:=Image68.Picture;

Image49.Picture:=Image68.Picture;

Image50.Picture:=Image68.Picture;

Image51.Picture:=Image68.Picture;

Image52.Picture:=Image68.Picture;

Image53.Picture:=Image68.Picture;

Image54.Picture:=Image68.Picture;

Image55.Picture:=Image68.Picture;

Image56.Picture:=Image68.Picture;

Image57.Picture:=Image68.Picture;

Image58.Picture:=Image68.Picture;

Image59.Picture:=Image68.Picture;

Image60.Picture:=Image68.Picture;

Image61.Picture:=Image68.Picture;

Image62.Picture:=Image68.Picture;

Image63.Picture:=Image68.Picture;

Image64.Picture:=Image68.Picture;

Image65.Picture:=Image68.Picture;

Image4.Picture:=Image68.Picture;

Image67.Picture:=Image68.Picture;

end;

procedure TForm1.Image67MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

begin

Image67.Picture.LoadFromFile('ukaz.bmp');

Image5.Picture:=Image68.Picture;

Image6.Picture:=Image68.Picture;

Image7.Picture:=Image68.Picture;

Image8.Picture:=Image68.Picture;

Image9.Picture:=Image68.Picture;

Image10.Picture:=Image68.Picture;

Image11.Picture:=Image68.Picture;

Image12.Picture:=Image68.Picture;

Image13.Picture:=Image68.Picture;

Image14.Picture:=Image68.Picture;

Image15.Picture:=Image68.Picture;

Image16.Picture:=Image68.Picture;

Image17.Picture:=Image68.Picture;

Image18.Picture:=Image68.Picture;

Image19.Picture:=Image68.Picture;

Image20.Picture:=Image68.Picture;

Image21.Picture:=Image68.Picture;

Image22.Picture:=Image68.Picture;

Image23.Picture:=Image68.Picture;

Image24.Picture:=Image68.Picture;

Image25.Picture:=Image68.Picture;

Image26.Picture:=Image68.Picture;

Image27.Picture:=Image68.Picture;

Image28.Picture:=Image68.Picture;

Image29.Picture:=Image68.Picture;

Image30.Picture:=Image68.Picture;

Image31.Picture:=Image68.Picture;

Image32.Picture:=Image68.Picture;

Image33.Picture:=Image68.Picture;

Image34.Picture:=Image68.Picture;

Image35.Picture:=Image68.Picture;

Image36.Picture:=Image68.Picture;

Image37.Picture:=Image68.Picture;

Image38.Picture:=Image68.Picture;

Image39.Picture:=Image68.Picture;

Image40.Picture:=Image68.Picture;

Image41.Picture:=Image68.Picture;

Image42.Picture:=Image68.Picture;

Image43.Picture:=Image68.Picture;

Image44.Picture:=Image68.Picture;

Image45.Picture:=Image68.Picture;

Image46.Picture:=Image68.Picture;

Image47.Picture:=Image68.Picture;

Image48.Picture:=Image68.Picture;

Image49.Picture:=Image68.Picture;

Image50.Picture:=Image68.Picture;

Image51.Picture:=Image68.Picture;

Image52.Picture:=Image68.Picture;

Image53.Picture:=Image68.Picture;

Image54.Picture:=Image68.Picture;

Image55.Picture:=Image68.Picture;

Image56.Picture:=Image68.Picture;

Image57.Picture:=Image68.Picture;

Image58.Picture:=Image68.Picture;

Image59.Picture:=Image68.Picture;

Image60.Picture:=Image68.Picture;

Image61.Picture:=Image68.Picture;

Image62.Picture:=Image68.Picture;

Image63.Picture:=Image68.Picture;

Image64.Picture:=Image68.Picture;

Image65.Picture:=Image68.Picture;

Image66.Picture:=Image68.Picture;

Image4.Picture:=Image68.Picture;

end;

procedure TForm1.Image4Click(Sender: TObject);

begin

Edit1.Text:='1';

Edit2.Text:='1';

Panel1.Enabled:=false;

Image4.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image5Click(Sender: TObject);

begin

Edit1.Text:='1';

Edit2.Text:='2';

Panel1.Enabled:=false;

Image5.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image6Click(Sender: TObject);

begin

Edit1.Text:='1';

Edit2.Text:='3';

Panel1.Enabled:=false;

Image6.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image7Click(Sender: TObject);

begin

Edit1.Text:='1';

Edit2.Text:='4';

Panel1.Enabled:=false;

Image7.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image8Click(Sender: TObject);

begin

Edit1.Text:='1';

Edit2.Text:='5';

Panel1.Enabled:=false;

Image8.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image9Click(Sender: TObject);

begin

Edit1.Text:='1';

Edit2.Text:='6';

Panel1.Enabled:=false;

Image9.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image10Click(Sender: TObject);

begin

Edit1.Text:='1';

Edit2.Text:='7';

Panel1.Enabled:=false;

Image10.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image11Click(Sender: TObject);

begin

Edit1.Text:='1';

Edit2.Text:='8';

Panel1.Enabled:=false;

Image11.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image12Click(Sender: TObject);

begin

Edit1.Text:='2';

Edit2.Text:='1';

Panel1.Enabled:=false;

Image12.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image13Click(Sender: TObject);

begin

Edit1.Text:='2';

Edit2.Text:='2';

Panel1.Enabled:=false;

Image13.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image14Click(Sender: TObject);

begin

Edit1.Text:='2';

Edit2.Text:='3';

Panel1.Enabled:=false;

Image14.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image15Click(Sender: TObject);

begin

Edit1.Text:='2';

Edit2.Text:='4';

Panel1.Enabled:=false;

Image15.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image16Click(Sender: TObject);

begin

Edit1.Text:='2';

Edit2.Text:='5';

Panel1.Enabled:=false;

Image16.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image17Click(Sender: TObject);

begin

Edit1.Text:='2';

Edit2.Text:='6';

Panel1.Enabled:=false;

Image17.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image18Click(Sender: TObject);

begin

Edit1.Text:='2';

Edit2.Text:='7';

Panel1.Enabled:=false;

Image18.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image19Click(Sender: TObject);

begin

Edit1.Text:='2';

Edit2.Text:='8';

Panel1.Enabled:=false;

Image19.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image20Click(Sender: TObject);

begin

Edit1.Text:='3';

Edit2.Text:='1';

Panel1.Enabled:=false;

Image20.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image21Click(Sender: TObject);

begin

Edit1.Text:='3';

Edit2.Text:='2';

Panel1.Enabled:=false;

Image21.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image22Click(Sender: TObject);

begin

Edit1.Text:='3';

Edit2.Text:='3';

Panel1.Enabled:=false;

Image22.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image23Click(Sender: TObject);

begin

Edit1.Text:='3';

Edit2.Text:='4';

Panel1.Enabled:=false;

Image23.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image24Click(Sender: TObject);

begin

Edit1.Text:='3';

Edit2.Text:='5';

Panel1.Enabled:=false;

Image24.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image25Click(Sender: TObject);

begin

Edit1.Text:='3';

Edit2.Text:='6';

Panel1.Enabled:=false;

Image25.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image26Click(Sender: TObject);

begin

Edit1.Text:='3';

Edit2.Text:='7';

Panel1.Enabled:=false;

Image26.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image27Click(Sender: TObject);

begin

Edit1.Text:='3';

Edit2.Text:='8';

Panel1.Enabled:=false;

Image27.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image28Click(Sender: TObject);

begin

Edit1.Text:='4';

Edit2.Text:='1';

Panel1.Enabled:=false;

Image28.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image29Click(Sender: TObject);

begin

Edit1.Text:='4';

Edit2.Text:='2';

Panel1.Enabled:=false;

Image29.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image30Click(Sender: TObject);

begin

Edit1.Text:='4';

Edit2.Text:='3';

Panel1.Enabled:=false;

Image30.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image31Click(Sender: TObject);

begin

Edit1.Text:='4';

Edit2.Text:='4';

Panel1.Enabled:=false;

Image31.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image32Click(Sender: TObject);

begin

Edit1.Text:='4';

Edit2.Text:='5';

Panel1.Enabled:=false;

Image32.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image33Click(Sender: TObject);

begin

Edit1.Text:='4';

Edit2.Text:='6';

Panel1.Enabled:=false;

Image33.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image34Click(Sender: TObject);

begin

Edit1.Text:='4';

Edit2.Text:='7';

Panel1.Enabled:=false;

Image34.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image35Click(Sender: TObject);

begin

Edit1.Text:='4';

Edit2.Text:='8';

Panel1.Enabled:=false;

Image35.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image36Click(Sender: TObject);

begin

Edit1.Text:='5';

Edit2.Text:='1';

Panel1.Enabled:=false;

Image36.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image37Click(Sender: TObject);

begin

Edit1.Text:='5';

Edit2.Text:='2';

Panel1.Enabled:=false;

Image37.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image38Click(Sender: TObject);

begin

Edit1.Text:='5';

Edit2.Text:='3';

Panel1.Enabled:=false;

Image38.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image39Click(Sender: TObject);

begin

Edit1.Text:='5';

Edit2.Text:='4';

Panel1.Enabled:=false;

Image39.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image40Click(Sender: TObject);

begin

Edit1.Text:='5';

Edit2.Text:='5';

Panel1.Enabled:=false;

Image40.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image41Click(Sender: TObject);

begin

Edit1.Text:='5';

Edit2.Text:='6';

Panel1.Enabled:=false;

Image41.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image42Click(Sender: TObject);

begin

Edit1.Text:='5';

Edit2.Text:='7';

Panel1.Enabled:=false;

Image42.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image43Click(Sender: TObject);

begin

Edit1.Text:='5';

Edit2.Text:='8';

Panel1.Enabled:=false;

Image43.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image44Click(Sender: TObject);

begin

Edit1.Text:='6';

Edit2.Text:='1';

Panel1.Enabled:=false;

Image44.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image45Click(Sender: TObject);

begin

Edit1.Text:='6';

Edit2.Text:='2';

Panel1.Enabled:=false;

Image45.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image46Click(Sender: TObject);

begin

Edit1.Text:='6';

Edit2.Text:='3';

Panel1.Enabled:=false;

Image46.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image47Click(Sender: TObject);

begin

Edit1.Text:='6';

Edit2.Text:='4';

Panel1.Enabled:=false;

Image47.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image48Click(Sender: TObject);

begin

Edit1.Text:='6';

Edit2.Text:='5';

Panel1.Enabled:=false;

Image48.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image49Click(Sender: TObject);

begin

Edit1.Text:='6';

Edit2.Text:='6';

Panel1.Enabled:=false;

Image49.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image50Click(Sender: TObject);

begin

Edit1.Text:='6';

Edit2.Text:='7';

Panel1.Enabled:=false;

Image50.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image51Click(Sender: TObject);

begin

Edit1.Text:='6';

Edit2.Text:='8';

Panel1.Enabled:=false;

Image51.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image52Click(Sender: TObject);

begin

Edit1.Text:='7';

Edit2.Text:='1';

Panel1.Enabled:=false;

Image52.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image53Click(Sender: TObject);

begin

Edit1.Text:='7';

Edit2.Text:='2';

Panel1.Enabled:=false;

Image53.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image54Click(Sender: TObject);

begin

Edit1.Text:='7';

Edit2.Text:='3';

Panel1.Enabled:=false;

Image54.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image55Click(Sender: TObject);

begin

Edit1.Text:='7';

Edit2.Text:='4';

Panel1.Enabled:=false;

Image55.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image56Click(Sender: TObject);

begin

Edit1.Text:='7';

Edit2.Text:='5';

Panel1.Enabled:=false;

Image56.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image57Click(Sender: TObject);

begin

Edit1.Text:='7';

Edit2.Text:='6';

Panel1.Enabled:=false;

Image57.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image58Click(Sender: TObject);

begin

Edit1.Text:='7';

Edit2.Text:='7';

Panel1.Enabled:=false;

Image58.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image59Click(Sender: TObject);

begin

Edit1.Text:='7';

Edit2.Text:='8';

Panel1.Enabled:=false;

Image59.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image60Click(Sender: TObject);

begin

Edit1.Text:='8';

Edit2.Text:='1';

Panel1.Enabled:=false;

Image60.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image61Click(Sender: TObject);

begin

Edit1.Text:='8';

Edit2.Text:='2';

Panel1.Enabled:=false;

Image61.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image62Click(Sender: TObject);

begin

Edit1.Text:='8';

Edit2.Text:='3';

Panel1.Enabled:=false;

Image62.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image63Click(Sender: TObject);

begin

Edit1.Text:='8';

Edit2.Text:='4';

Panel1.Enabled:=false;

Image63.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image64Click(Sender: TObject);

begin

Edit1.Text:='8';

Edit2.Text:='4';

Panel1.Enabled:=false;

Image64.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image65Click(Sender: TObject);

begin

Edit1.Text:='8';

Edit2.Text:='6';

Panel1.Enabled:=false;

Image65.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image66Click(Sender: TObject);

begin

Edit1.Text:='8';

Edit2.Text:='7';

Panel1.Enabled:=false;

Image66.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.Image67Click(Sender: TObject);

begin

Edit1.Text:='8';

Edit2.Text:='8';

Panel1.Enabled:=false;

Image67.Picture.LoadFromFile('kon.bmp');

end;

procedure TForm1.epEfButton3Click(Sender: TObject);

begin

Image5.Picture:=Image68.Picture;

Image6.Picture:=Image68.Picture;

Image7.Picture:=Image68.Picture;

Image8.Picture:=Image68.Picture;

Image9.Picture:=Image68.Picture;

Image10.Picture:=Image68.Picture;

Image11.Picture:=Image68.Picture;

Image12.Picture:=Image68.Picture;

Image13.Picture:=Image68.Picture;

Image14.Picture:=Image68.Picture;

Image15.Picture:=Image68.Picture;

Image16.Picture:=Image68.Picture;

Image17.Picture:=Image68.Picture;

Image18.Picture:=Image68.Picture;

Image19.Picture:=Image68.Picture;

Image20.Picture:=Image68.Picture;

Image21.Picture:=Image68.Picture;

Image22.Picture:=Image68.Picture;

Image23.Picture:=Image68.Picture;

Image24.Picture:=Image68.Picture;

Image25.Picture:=Image68.Picture;

Image26.Picture:=Image68.Picture;

Image27.Picture:=Image68.Picture;

Image28.Picture:=Image68.Picture;

Image29.Picture:=Image68.Picture;

Image30.Picture:=Image68.Picture;

Image31.Picture:=Image68.Picture;

Image32.Picture:=Image68.Picture;

Image33.Picture:=Image68.Picture;

Image34.Picture:=Image68.Picture;

Image35.Picture:=Image68.Picture;

Image36.Picture:=Image68.Picture;

Image37.Picture:=Image68.Picture;

Image38.Picture:=Image68.Picture;

Image39.Picture:=Image68.Picture;

Image40.Picture:=Image68.Picture;

Image41.Picture:=Image68.Picture;

Image42.Picture:=Image68.Picture;

Image43.Picture:=Image68.Picture;

Image44.Picture:=Image68.Picture;

Image45.Picture:=Image68.Picture;

Image46.Picture:=Image68.Picture;

Image47.Picture:=Image68.Picture;

Image48.Picture:=Image68.Picture;

Image49.Picture:=Image68.Picture;

Image50.Picture:=Image68.Picture;

Image51.Picture:=Image68.Picture;

Image52.Picture:=Image68.Picture;

Image53.Picture:=Image68.Picture;

Image54.Picture:=Image68.Picture;

Image55.Picture:=Image68.Picture;

Image56.Picture:=Image68.Picture;

Image57.Picture:=Image68.Picture;

Image58.Picture:=Image68.Picture;

Image59.Picture:=Image68.Picture;

Image60.Picture:=Image68.Picture;

Image61.Picture:=Image68.Picture;

Image62.Picture:=Image68.Picture;

Image63.Picture:=Image68.Picture;

Image64.Picture:=Image68.Picture;

Image65.Picture:=Image68.Picture;

Image66.Picture:=Image68.Picture;

Image67.Picture:=Image68.Picture;

Image4.Picture:=Image68.Picture;

Panel1.Visible:=true;

Panel1.Enabled:=true;

Edit1.Text:='';

Edit2.Text:='';

Edit3.Text:='';

end;

end.

Страница:


Подобные документы

  • Метод наискорейшего спуска

    Функциональное и эксплуатационное назначение изделия. Перечень требований пользователя к программному изделию. Программные ограничения, совместимость. Требования к параметрам технических средств. Безопасность и секретность, требования к надежности.

    курсовая работа [574,6 K], добавлен 27.04.2011

  • Поиск пути в лабиринте

    Разработка программного продукта (лабиринт с входом и выходом, состоящий из комнат) в среде разработки Borland C++ Builder 6. Требования пользователя к программному изделию. Программные ограничения, совместимость. Основные процессы разработки программы.

    курсовая работа [819,9 K], добавлен 14.01.2013

  • Программа "Обход конем"

    Разработка программы нахождения оптимального пути обхода шахматной доски шахматным конем с обязательной визуализацией процесса и пошаговой демонстрацией. Тестирование графического интерфейса. Исходный код программы, составление и проверка алгоритма.

    курсовая работа [468,3 K], добавлен 11.12.2012

  • Программа определения достижимости населенного пункта в системе односторонних дорог

    Функциональное и эксплуатационное назначение изделия, методологические ограничения. Требования к составу и параметрам технических средств. Описание алгоритма, входные и выходные данные. Стадии и этапы разработки, технико-экономическое обоснование.

    курсовая работа [564,4 K], добавлен 18.01.2014

  • Генератор заданий для вычислительной практики

    Функциональное и эксплуатационное назначение генератора. Требования к составу и параметрам технических средств. Информационная и программная совместимость. Результирующие компоненты изделия. Безопасность и секретность. Удобства эксплуатации, мобильность.

    курсовая работа [2,1 M], добавлен 07.03.2013

  • Диспансеризация детей и подростков

    Разработка программы ведения базы данных для отделения диспансеризации подростков студенческой поликлиники. Требования к программному изделию и программной документации. Стадии и этапы разработки программы. Требования к написанию пояснительной записки.

    курсовая работа [18,9 K], добавлен 02.05.2009

  • Прогнозирование количественными методами

    Разработка программы для автоматического формирования и заполнения "Ведомости на выдачу денег из кассы подотчётным лицам", предназначенной для использования бюджетными организациями. Основные требования к программному изделию. Руководство пользователя.

    курсовая работа [175,5 K], добавлен 28.04.2009

  • Создание приложения на Windows Phone 7 для просмотра расписания ТПУ

    Требования к программе или программному изделию, к информационной и программной совместимости. Проектирование программного продукта. Процедура установки и удаления. Описание интерфейса, главное окно приложения. Основные возможности пользователя.

    курсовая работа [678,1 K], добавлен 15.02.2016

  • Создание приложения по перемножение матриц NM и MN

    Средства программирования, описание языка С++. Назначение программы, требования к документации. Стадии разработки, виды испытаний. Используемые технические, программные средства. Вызов и загрузка, входные и выходные данные. Программа и методика испытаний.

    контрольная работа [205,3 K], добавлен 23.07.2013

  • Исследование программного изделия для сравнения алгоритмов

    Обоснование выбора средства программирования: входная и выходная информация, требования к аппаратному и программному обеспечению. Функциональное назначение программы, её глобальные переменные и константы, внутренняя структура и руководство пользователя.

    курсовая работа [1,4 M], добавлен 07.09.2012

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.

© 2000 — 2023, ООО «Олбест» Все права защищены