Рефераты
 

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

p align="left">Image63.Picture:=Image68.Picture;

Image64.Picture:=Image68.Picture;

Image65.Picture:=Image68.Picture;

Image66.Picture:=Image68.Picture;

Image67.Picture:=Image68.Picture;

end;

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

Y: Integer);

begin

Image29.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;

Image4.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;

end;

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

Y: Integer);

begin

Image30.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;

Image4.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;

end;

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

Y: Integer);

begin

Image31.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;

Image4.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;

end;

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

Y: Integer);

begin

Image32.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;

Image4.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;

end;

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

Y: Integer);

begin

Image33.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;

Image4.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;

end;

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

Y: Integer);

begin

Image34.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;

Image4.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;

end;

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

Y: Integer);

begin

Image35.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;

Image4.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;

end;

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

Y: Integer);

begin

Image36.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;

Image4.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;

end;

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

Y: Integer);

begin

Image37.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;

Image4.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;

end;

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

Y: Integer);

begin

Image38.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;

Image4.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;

end;

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

Y: Integer);

begin

Image39.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;

Image4.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;

end;

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

Y: Integer);

begin

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

Image5.Picture:=Image68.Picture;

Image6.Picture:=Image68.Picture;

Image7.Picture:=Image68.Picture;

Image8.Picture:=Image68.Picture;

Image9.Picture:=Image68.Picture;

Страницы: 1, 2, 3, 4, 5, 6, 7


© 2010 BANKS OF РЕФЕРАТ