SwagDoc/Demos/GenerateUnitFileForMVCFramework/Sample.Main.fmx at 02bba84d552b76e4f5132c4e9d1ebc6d82b5deda · marcelojaloto/SwagDoc · 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
object Form1: TForm1
  Left = 0
  Top = 0
  Caption = 'Sample Api with Documentation Swagger using SwagDoc'
  ClientHeight = 685
  ClientWidth = 605
  FormFactor.Width = 320
  FormFactor.Height = 480
  FormFactor.Devices = [Desktop]
  DesignerMobile = False
  DesignerWidth = 0
  DesignerHeight = 0
  DesignerDeviceName = ''
  DesignerOrientation = 0
  DesignerOSVersion = ''
  object TabControl1: TTabControl
    Align = Bottom
    Height = 200.000000000000000000
    Position.Y = 40.000000000000000000
    TabIndex = 1
    TabOrder = 2
    Width = 200.000000000000000000
    object TabItem1: TTabItem
      CustomIcon = <
        item
        end>
      Height = 24.000000000000000000
      IsSelected = False
      TabOrder = 0
      Text = 'Swagger JSON'
      Width = 94.000000000000000000
      object Memo1: TMemo
        Touch.InteractiveGestures = [Pan, LongTap, DoubleTap]
        Align = Client
        Height = 176.000000000000000000
        TabOrder = 0
        Width = 200.000000000000000000
      end
    end
    object TabItem2: TTabItem
      CustomIcon = <
        item
        end>
      Height = 24.000000000000000000
      IsSelected = True
      TabOrder = 0
      Text = 'Delphi Client'
      Width = 85.000000000000000000
      object Memo2: TMemo
        Touch.InteractiveGestures = [Pan, LongTap, DoubleTap]
        Align = Client
        Height = 176.000000000000000000
        TabOrder = 0
        Width = 200.000000000000000000
      end
    end
  end
  object btnGenerateClient: TButton
    Height = 22.000000000000000000
    Position.X = 24.000000000000000000
    Position.Y = 8.000000000000000000
    TabOrder = 3
    Text = 'Generate Client'
    Width = 80.000000000000000000
    OnClick = btnGenerateClientClick
  end
end