TestTaskBuilds/unit1.lfm at main · OlegMathProg/TestTaskBuilds · 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
object F_Switch_Pages: TF_Switch_Pages
  Left = 599
  Height = 59
  Top = 282
  Width = 444
  Caption = 'Switch Pages'
  ClientHeight = 59
  ClientWidth = 444
  OnClose = FormClose
  OnCreate = FormCreate
  OnMouseLeave = FormMouseLeave
  OnResize = FormResize
  LCLVersion = '2.2.0.4'
  object BB_Prev: TBitBtn
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = BB_Next
    AnchorSideBottom.Side = asrBottom
    Left = 0
    Height = 40
    Top = 8
    Width = 216
    Anchors = [akTop, akLeft, akRight]
    Caption = 'Prev'
    Color = clInactiveBorder
    Font.CharSet = ANSI_CHARSET
    Font.Color = 8863039
    Font.Height = 22
    Font.Name = '@Malgun Gothic'
    Font.Style = [fsBold]
    OnClick = BB_PrevClick
    OnMouseLeave = FormMouseLeave
    ParentFont = False
    TabOrder = 0
  end
  object BB_Next: TBitBtn
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Side = asrBottom
    Left = 216
    Height = 40
    Top = 8
    Width = 228
    Anchors = [akTop, akLeft, akRight]
    Caption = 'Next'
    Color = clInactiveBorder
    Font.CharSet = ANSI_CHARSET
    Font.Color = 8863039
    Font.Height = 22
    Font.Name = '@Malgun Gothic'
    Font.Style = [fsBold]
    OnClick = BB_NextClick
    OnMouseLeave = FormMouseLeave
    ParentFont = False
    TabOrder = 1
  end
end