Dialogs, StdCtrls, Grids, EPLabels, VCLBase, EPButtons, ExtCtrls, regions;

type

TForm1 = class(TForm)

Image1: TImage;

Edit1: TEdit;

Edit2: TEdit;

Edit3: TEdit;

StringGrid1: TStringGrid;

Image2: TImage;

Panel1: TPanel;

Image3: TImage;

Image4: TImage;

Image5: TImage;

Image6: TImage;

Image7: TImage;

Image8: TImage;

Image9: TImage;

Image10: TImage;

Image11: TImage;

Image12: TImage;

Image13: TImage;

Image14: TImage;

Image15: TImage;

Image16: TImage;

Image17: TImage;

Image18: TImage;

Image19: TImage;

Image20: TImage;

Image21: TImage;

Image22: TImage;

Image23: TImage;

Image24: TImage;

Image25: TImage;

Image26: TImage;

Image27: TImage;

Image28: TImage;

Image29: TImage;

Image30: TImage;

Image31: TImage;

Image32: TImage;

Image33: TImage;

Image34: TImage;

Image35: TImage;

Image36: TImage;

Image37: TImage;

Image38: TImage;

Image39: TImage;

Image40: TImage;

Image41: TImage;

Image42: TImage;

Image43: TImage;

Image44: TImage;

Image45: TImage;

Image46: TImage;

Image47: TImage;

Image48: TImage;

Image49: TImage;

Image50: TImage;

Image51: TImage;

Image52: TImage;

Image53: TImage;

Image54: TImage;

Image55: TImage;

Image56: TImage;

Image57: TImage;

Image58: TImage;

Image59: TImage;

Image60: TImage;

Image61: TImage;

Image62: TImage;

Image63: TImage;

Image64: TImage;

Image65: TImage;

Image66: TImage;

Image67: TImage;

Image68: TImage;

procedure epEfButton1Click(Sender: TObject);

procedure epEfButton2Click(Sender: TObject);

procedure Image4MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image5MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image6MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image7MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image8MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image9MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image10MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image11MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image12MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image13MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image14MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image15MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image16MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image17MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image18MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image19MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image20MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image21MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image22MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image23MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image24MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image25MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image26MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image27MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image28MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

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

Y: Integer);

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

Y: Integer);

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

Y: Integer);

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

Y: Integer);

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

Y: Integer);

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

Y: Integer);

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

Y: Integer);

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

Y: Integer);

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

Y: Integer);

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

Y: Integer);

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

Y: Integer);

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

Y: Integer);

procedure Image41MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image42MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image43MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image44MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image45MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image46MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image47MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image48MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image49MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image50MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image51MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image52MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image53MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image54MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image55MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image56MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image57MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image58MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image59MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image60MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image61MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image62MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Image63MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

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

Y: Integer);

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

Y: Integer);

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

Y: Integer);

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

Y: Integer);

procedure Image4Click(Sender: TObject);

procedure Image5Click(Sender: TObject);

procedure Image6Click(Sender: TObject);

procedure Image7Click(Sender: TObject);

procedure Image8Click(Sender: TObject);

procedure Image9Click(Sender: TObject);

procedure Image10Click(Sender: TObject);

procedure Image11Click(Sender: TObject);

procedure Image12Click(Sender: TObject);

procedure Image13Click(Sender: TObject);

procedure Image14Click(Sender: TObject);

procedure Image15Click(Sender: TObject);

procedure Image16Click(Sender: TObject);

procedure Image17Click(Sender: TObject);

procedure Image18Click(Sender: TObject);

procedure Image19Click(Sender: TObject);

procedure Image20Click(Sender: TObject);

procedure Image21Click(Sender: TObject);

procedure Image22Click(Sender: TObject);

procedure Image23Click(Sender: TObject);

procedure Image24Click(Sender: TObject);

procedure Image25Click(Sender: TObject);

procedure Image26Click(Sender: TObject);

procedure Image27Click(Sender: TObject);

procedure Image28Click(Sender: TObject);

procedure Image29Click(Sender: TObject);

procedure Image30Click(Sender: TObject);

procedure Image31Click(Sender: TObject);

procedure Image32Click(Sender: TObject);

procedure Image33Click(Sender: TObject);

procedure Image34Click(Sender: TObject);

procedure Image35Click(Sender: TObject);

procedure Image36Click(Sender: TObject);

procedure Image37Click(Sender: TObject);

procedure Image38Click(Sender: TObject);

procedure Image39Click(Sender: TObject);

procedure Image40Click(Sender: TObject);

procedure Image41Click(Sender: TObject);

procedure Image42Click(Sender: TObject);

procedure Image43Click(Sender: TObject);

procedure Image44Click(Sender: TObject);

procedure Image45Click(Sender: TObject);

procedure Image46Click(Sender: TObject);

procedure Image47Click(Sender: TObject);

procedure Image48Click(Sender: TObject);

procedure Image49Click(Sender: TObject);

procedure Image50Click(Sender: TObject);

procedure Image51Click(Sender: TObject);

procedure Image52Click(Sender: TObject);

procedure Image53Click(Sender: TObject);

procedure Image54Click(Sender: TObject);

procedure Image55Click(Sender: TObject);

procedure Image56Click(Sender: TObject);

procedure Image57Click(Sender: TObject);

procedure Image58Click(Sender: TObject);

procedure Image59Click(Sender: TObject);

procedure Image60Click(Sender: TObject);

procedure Image61Click(Sender: TObject);

Страницы: 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20