mini_projects/miniprojects/Episode_manager/unit4.lfm at main · PascalCorpsman/mini_projects · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
object Form4: TForm4
  Left = 324
  Height = 492
  Top = 107
  Width = 778
  Caption = 'Form4'
  ClientHeight = 492
  ClientWidth = 778
  Position = poScreenCenter
  LCLVersion = '4.99.0.0'
  OnCreate = FormCreate
  object StringGrid1: TStringGrid
    Left = 8
    Height = 440
    Top = 8
    Width = 760
    Anchors = [akTop, akLeft, akRight, akBottom]
    ColCount = 3
    Columns = <
      item
        Title.Caption = 'Title'
      end
      item
        Title.Caption = 'Title'
      end
      item
        Title.Caption = 'Title'
      end>
    FixedCols = 0
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goRowSelect, goSmoothScroll]
    PopupMenu = PopupMenu1
    RangeSelectMode = rsmMulti
    TabOrder = 0
    OnDblClick = StringGrid1DblClick
    OnDrawCell = StringGrid1DrawCell
    OnSelectCell = StringGrid1SelectCell
  end
  object Button1: TButton
    Left = 8
    Height = 25
    Top = 456
    Width = 75
    Anchors = [akLeft, akBottom]
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 1
  end
  object Button2: TButton
    Left = 693
    Height = 25
    Top = 456
    Width = 75
    Anchors = [akRight, akBottom]
    Caption = 'OK'
    ModalResult = 1
    TabOrder = 2
  end
  object ImageList1: TImageList
    Left = 245
    Top = 88
    Bitmap = {
      4C7A020000001000000010000000CC0200000000000078DAED94D94F535110C6
      CF1F22B204422492221115CBBE15080846282D5DA00B50104A5B1AB6965A50A9
      404230A841E21234C6A84FBEF9225189228A4BDCE233888A404184DB52A09FE7
      6068A8B498A0BEF130C9C99DFBBBF3CD37730F00829D580BCDB09105FE8247D9
      901EDB65AD2FBA601EB141764F03D15D258EDD9222774008C1C53C249FCD02FF
      4C0A62AC7CF01A6310A1E361237B62B413D73EDEC1950F37D1FFEE3A2EBCB98A
      DE57FDE81E3D8F8E673D383DDC85D6C736B43C6A43E3030BC22AF77878A6D9F4
      B41D97DEDF40DFDB019C7B7D193D2FFBD0F5BC17B6916EB43DE98065E8149A1F
      5A513F6886E17E238255A15E7D32CDFA41137DE72424B7D57E35B3BA8C0D9007
      6DF26943BFDBF29FB284D5DDD9E5FF17AA52A7DF5C83F157F8CB2B4B9C442671
      10B170D127DBDC0034D5BB61A85DDD9457C89D44AD70A24AB38482A33F90973B
      BF896DB5B070C3A85F4575E5B2275F2A73B0DAA8AD5986C50CB073B6608EA4A7
      D8D7F2F5752046BD1B2DCD6E74DA0073D31A0F95628994481DAC36B4D52E9A07
      14250E6465CC212DD9EEA54FAF5D25DAE32B6830AEA2BD0DA8AF5B815AE904AD
      8D9A2A174C4D583B67A6CF22F537763D2A2B9649B96A093AAAD34A7BB1989816
      EA09ED4D2E754090368B9424FB96F3613EC98A39B4504E2E012422AA855E6919
      A9B3484E9CF9E37CA5628ECD88CE01100B81A202C0A0033269CF71B1535BB212
      1147A4B47685DA05A301A8A39C4E0BEA1DFD4EA10389F17644477DF5C916172D
      12899843B98AB2F40A2D1671CC2724C44D233F77019A0A20FFC8220EEC9F4244
      F88417CBF689D64699D205BD8EE9E6984F48E04F93D8835324267A1282F479A8
      944076E60278919308091AF7F0749F8848B848E7ED82A890633E21FEF0B4271F
      15F985EC8DF84C9F7F474E36877DBC6F080C18F3D2C0F6292F671E4909333E7D
      0A0F9B20A1219F7CB2EB91183F43F887FC7B1C1C384E76EF1AFBA7FFF34F4F1D
      7933
    }
  end
  object PopupMenu1: TPopupMenu
    Left = 424
    Top = 96
    object MenuItem1: TMenuItem
      Caption = 'To left'
      OnClick = MenuItem1Click
    end
    object MenuItem2: TMenuItem
      Caption = 'Nothing'
      OnClick = MenuItem2Click
    end
  end
end