unit1.lfm 3.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135
  1. object CheckRideMain: TCheckRideMain
  2. Left = 341
  3. Height = 593
  4. Top = 155
  5. Width = 758
  6. Caption = 'CheckRide'
  7. ClientHeight = 573
  8. ClientWidth = 758
  9. Menu = MainMenu1
  10. OnActivate = FormActivate
  11. OnClose = FormClose
  12. OnCreate = FormCreate
  13. LCLVersion = '0.9.31'
  14. object ServerName: TLabeledEdit
  15. Left = 120
  16. Height = 23
  17. Top = 9
  18. Width = 216
  19. EditLabel.AnchorSideTop.Control = ServerName
  20. EditLabel.AnchorSideTop.Side = asrCenter
  21. EditLabel.AnchorSideRight.Control = ServerName
  22. EditLabel.AnchorSideBottom.Control = ServerName
  23. EditLabel.AnchorSideBottom.Side = asrBottom
  24. EditLabel.Left = 14
  25. EditLabel.Height = 16
  26. EditLabel.Hint = 'Server name or IP address for the helper'
  27. EditLabel.Top = 12
  28. EditLabel.Width = 103
  29. EditLabel.Caption = 'Helper server name'
  30. EditLabel.ParentColor = False
  31. LabelPosition = lpLeft
  32. TabOrder = 0
  33. OnEditingDone = ServerNameEditingDone
  34. end
  35. object ServerPort: TLabeledEdit
  36. Left = 120
  37. Height = 23
  38. Top = 49
  39. Width = 104
  40. EditLabel.AnchorSideTop.Control = ServerPort
  41. EditLabel.AnchorSideTop.Side = asrCenter
  42. EditLabel.AnchorSideRight.Control = ServerPort
  43. EditLabel.AnchorSideBottom.Control = ServerPort
  44. EditLabel.AnchorSideBottom.Side = asrBottom
  45. EditLabel.Left = 22
  46. EditLabel.Height = 16
  47. EditLabel.Top = 52
  48. EditLabel.Width = 95
  49. EditLabel.Caption = 'Helper server port'
  50. EditLabel.ParentColor = False
  51. EditLabel.Layout = tlBottom
  52. LabelPosition = lpLeft
  53. TabOrder = 1
  54. OnEditingDone = ServerPortEditingDone
  55. end
  56. object ConnectButton: TButton
  57. Left = 304
  58. Height = 25
  59. Top = 76
  60. Width = 75
  61. Caption = 'Connect'
  62. OnClick = ConnectButtonClick
  63. TabOrder = 2
  64. end
  65. object DisconnectButton: TButton
  66. Left = 392
  67. Height = 25
  68. Top = 76
  69. Width = 75
  70. Caption = 'Disconnect'
  71. OnClick = DisconnectButtonClick
  72. TabOrder = 3
  73. end
  74. object Memo1: TMemo
  75. Left = 8
  76. Height = 474
  77. Top = 112
  78. Width = 750
  79. TabOrder = 4
  80. end
  81. object TunnelProcess: TAsyncProcess
  82. Active = False
  83. Options = []
  84. Priority = ppNormal
  85. StartupOptions = []
  86. ShowWindow = swoNone
  87. WindowColumns = 0
  88. WindowHeight = 0
  89. WindowLeft = 0
  90. WindowRows = 0
  91. WindowTop = 0
  92. WindowWidth = 0
  93. FillAttribute = 0
  94. left = 696
  95. top = 16
  96. end
  97. object VNCGUIProcess: TAsyncProcess
  98. Active = False
  99. Options = []
  100. Priority = ppNormal
  101. StartupOptions = []
  102. ShowWindow = swoNone
  103. WindowColumns = 0
  104. WindowHeight = 0
  105. WindowLeft = 0
  106. WindowRows = 0
  107. WindowTop = 0
  108. WindowWidth = 0
  109. FillAttribute = 0
  110. left = 600
  111. top = 16
  112. end
  113. object MainMenu1: TMainMenu
  114. left = 512
  115. top = 16
  116. object FileMenu: TMenuItem
  117. Caption = '&File'
  118. object QuitMenu: TMenuItem
  119. Caption = 'Quit'
  120. OnClick = QuitMenuClick
  121. end
  122. end
  123. object HelpMenu: TMenuItem
  124. Caption = '&Help'
  125. object MenuLicense: TMenuItem
  126. Caption = '&Licenses'
  127. OnClick = MenuLicenseClick
  128. end
  129. object AboutMenu: TMenuItem
  130. Caption = '&About'
  131. OnClick = AboutMenuClick
  132. end
  133. end
  134. end
  135. end