ainForm.Im5Click ( Sender: TObject);;;
TMainForm.Im5MouseDown (Sender: TObject; Button: TMouseButton;: TShiftState; X, Y: Integer);. GetBitmap (5, im5.Picture.Bitmap);. Repaint;;
TMainForm.Im5MouseEnter (Sender: TObject);. GetBitmap (5, im5.Picture.Bitmap);. Repaint;;
TMainForm.Im5MouseLeave (Sender: TObject);. GetBitmap (5, im5.Picture.Bitmap);. Repaint;;
TMainForm.Im5Mous eUp (Sender: TObject; Button: TMouseButton;: TShiftState; X, Y: Integer);. GetBitmap (5, im5.Picture.Bitmap);. Repaint;;
TMainForm.Im2Click (Sender: TObject);;;
TMainForm.Im2MouseDown (Sender: TObject; Button: TMouseButton;: TShiftState; X, Y: Integer);. GetBitmap (2, im2.Picture.Bitmap);. Repaint;;
TMainForm.Im2MouseEnter (Sender: TObject);. GetBitmap (2, im2.Picture.Bitmap);. Repaint;;
TMainForm.Im2MouseLeave (Sender: TObject);. GetBitmap (2, im2.Picture.Bitmap);. Repaint;;
TMainForm.Im2MouseUp (Sender: TObject; Button: TMouseButton;: TShiftState; X, Y: Integer);. GetBitmap (2, im2.Picture.Bitmap);. Repaint;;
TMainForm.Im1Click (Sender: TObject);;;
TMainForm.Im1MouseDown (Sender: TObject; Button: TMouseButton;: TShiftState; X, Y: Integer);. GetBitmap (1, im1.Picture.Bitmap);. Repaint;;
TMainForm.Im1MouseEnter (Sender: TObject);. GetBitmap (1, im1.Picture.Bitmap);. Repaint;;
TMainForm.Im1MouseLeave (Sender: TObject);. GetBitmap (1, im1.Picture.Bitmap);. Repaint;; TMainForm.Im1MouseUp (Sender: TObject; Button: TMouseButton;: TShiftState; X, Y: Integer);. GetBitmap (1, im1.Picture.Bitmap);. Repaint;;
TMainForm.Im6Click (Sender: TObject);;;
TMainForm.Im6MouseDown (Sender: TObject; Button: TMouseButton;: TShiftState; X, Y: Integer);. GetBitmap (6, im6.Picture.Bitmap);. Repaint;;
TMainForm.Im6MouseEnter (Sender: TObject);. GetBitmap (6, im6.Picture.Bitmap);. Repaint;;
TMainForm.Im6MouseLeave (Sender: TObject);. GetBitmap (6, im6.Picture.Bitmap);. Repaint;;
TMainForm.Im6MouseUp (Sender: TObject; Button: TMouseButton;: TShiftState; X, Y: Integer);. GetBitmap (6, im6.Picture.Bitmap);. Repaint;;
TMainForm.Im7Click (Sender: TObject);;;
TMainForm.Im7MouseDown (Sender: TObject; Button: TMouseButton;: TShiftState; X, Y: Integer);. GetBitmap (7, im7.Picture.Bitmap);. Repaint;;
TMainForm.Im7MouseEnter (Sender: TObject);. GetBitmap (7, im7.Picture.Bitmap);. Repaint;; TMainForm.Im7MouseLeave (Sender: TObject);. GetBitmap (7, im7.Picture . Bitmap);. Repaint;;
TMainForm.Im7MouseUp (Sender: TObject; Button: TMouseButton;: TShiftState; X, Y: Integer);. ...