main.dfm 6.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269
  1. object MainForm: TMainForm
  2. Left = 276
  3. Top = 194
  4. Caption = 'Chromium Embedded'
  5. ClientHeight = 652
  6. ClientWidth = 864
  7. Color = clBtnFace
  8. TransparentColor = True
  9. TransparentColorValue = clFuchsia
  10. Font.Charset = DEFAULT_CHARSET
  11. Font.Color = clWindowText
  12. Font.Height = -11
  13. Font.Name = 'Tahoma'
  14. Font.Style = []
  15. Menu = MainMenu
  16. OldCreateOrder = False
  17. OnCloseQuery = FormCloseQuery
  18. OnCreate = FormCreate
  19. PixelsPerInch = 96
  20. TextHeight = 13
  21. object Splitter: TSplitter
  22. Left = 0
  23. Top = 430
  24. Width = 864
  25. Height = 3
  26. Cursor = crVSplit
  27. Align = alBottom
  28. Visible = False
  29. ExplicitTop = 25
  30. ExplicitWidth = 408
  31. end
  32. object crm: TChromium
  33. Left = 0
  34. Top = 25
  35. Width = 864
  36. Height = 405
  37. Align = alClient
  38. DefaultUrl = 'http://www.google.com'
  39. TabOrder = 0
  40. OnProcessMessageReceived = crmProcessMessageReceived
  41. OnLoadStart = crmLoadStart
  42. OnLoadEnd = crmLoadEnd
  43. OnBeforeContextMenu = crmBeforeContextMenu
  44. OnContextMenuCommand = crmContextMenuCommand
  45. OnAddressChange = crmAddressChange
  46. OnTitleChange = crmTitleChange
  47. OnStatusMessage = crmStatusMessage
  48. OnBeforeDownload = crmBeforeDownload
  49. OnDownloadUpdated = crmDownloadUpdated
  50. OnBeforePopup = crmBeforePopup
  51. OnBeforeResourceLoad = crmBeforeResourceLoad
  52. OnCertificateError = crmCertificateError
  53. end
  54. object DevTools: TChromiumDevTools
  55. Left = 0
  56. Top = 433
  57. Width = 864
  58. Height = 200
  59. Align = alBottom
  60. Visible = False
  61. end
  62. object StatusBar: TStatusBar
  63. Left = 0
  64. Top = 633
  65. Width = 864
  66. Height = 19
  67. Panels = <>
  68. SimplePanel = True
  69. end
  70. object Panel1: TPanel
  71. Left = 0
  72. Top = 0
  73. Width = 864
  74. Height = 25
  75. Align = alTop
  76. TabOrder = 2
  77. DesignSize = (
  78. 864
  79. 25)
  80. object SpeedButton1: TSpeedButton
  81. Left = 0
  82. Top = 0
  83. Width = 23
  84. Height = 22
  85. Action = actPrev
  86. end
  87. object SpeedButton2: TSpeedButton
  88. Left = 24
  89. Top = 0
  90. Width = 23
  91. Height = 22
  92. Action = actNext
  93. end
  94. object SpeedButton3: TSpeedButton
  95. Left = 48
  96. Top = 0
  97. Width = 23
  98. Height = 22
  99. Action = actHome
  100. end
  101. object SpeedButton4: TSpeedButton
  102. Left = 72
  103. Top = 0
  104. Width = 23
  105. Height = 22
  106. Action = actReload
  107. end
  108. object SpeedButton5: TSpeedButton
  109. Left = 841
  110. Top = 0
  111. Width = 23
  112. Height = 22
  113. Action = actGoTo
  114. Anchors = [akTop, akRight]
  115. end
  116. object edAddress: TEdit
  117. Left = 95
  118. Top = 0
  119. Width = 744
  120. Height = 21
  121. Anchors = [akLeft, akTop, akRight]
  122. TabOrder = 0
  123. Text = 'http://www.google.com'
  124. OnKeyPress = edAddressKeyPress
  125. end
  126. end
  127. object ActionList: TActionList
  128. Left = 624
  129. Top = 112
  130. object actPrev: TAction
  131. Caption = '<-'
  132. Enabled = False
  133. OnExecute = actPrevExecute
  134. OnUpdate = actPrevUpdate
  135. end
  136. object actNext: TAction
  137. Caption = '->'
  138. Enabled = False
  139. OnExecute = actNextExecute
  140. OnUpdate = actNextUpdate
  141. end
  142. object actHome: TAction
  143. Caption = 'H'
  144. OnExecute = actHomeExecute
  145. OnUpdate = actHomeUpdate
  146. end
  147. object actReload: TAction
  148. Caption = 'R'
  149. OnExecute = actReloadExecute
  150. OnUpdate = actReloadUpdate
  151. end
  152. object actGoTo: TAction
  153. Caption = '>'
  154. OnExecute = actGoToExecute
  155. end
  156. object actGetSource: TAction
  157. Caption = 'Get source'
  158. OnExecute = actGetSourceExecute
  159. end
  160. object actGetText: TAction
  161. Caption = 'Get text'
  162. OnExecute = actGetTextExecute
  163. end
  164. object actZoomIn: TAction
  165. Caption = 'Zoom in'
  166. OnExecute = actZoomInExecute
  167. end
  168. object actZoomOut: TAction
  169. Caption = 'Zoom out'
  170. OnExecute = actZoomOutExecute
  171. end
  172. object actZoomReset: TAction
  173. Caption = 'Zoom reset'
  174. OnExecute = actZoomResetExecute
  175. end
  176. object actExecuteJS: TAction
  177. Caption = 'Execute JavaScript'
  178. OnExecute = actExecuteJSExecute
  179. end
  180. object actDom: TAction
  181. Caption = 'Hook DOM'
  182. OnExecute = actDomExecute
  183. end
  184. object actDevTool: TAction
  185. AutoCheck = True
  186. Caption = 'Show DevTools'
  187. OnExecute = actDevToolExecute
  188. end
  189. object actDoc: TAction
  190. Caption = 'Documentation'
  191. OnExecute = actDocExecute
  192. end
  193. object actGroup: TAction
  194. Caption = 'Google group'
  195. OnExecute = actGroupExecute
  196. end
  197. object actFileScheme: TAction
  198. Caption = 'File Scheme'
  199. OnExecute = actFileSchemeExecute
  200. end
  201. object actPrint: TAction
  202. Caption = 'Print'
  203. OnExecute = actPrintExecute
  204. end
  205. end
  206. object MainMenu: TMainMenu
  207. Left = 624
  208. Top = 56
  209. object File1: TMenuItem
  210. Caption = '&File'
  211. object Print1: TMenuItem
  212. Action = actPrint
  213. end
  214. object Exit1: TMenuItem
  215. Caption = 'Exit'
  216. ShortCut = 16465
  217. OnClick = Exit1Click
  218. end
  219. end
  220. object est1: TMenuItem
  221. Caption = '&Test'
  222. object mGetsource: TMenuItem
  223. Action = actGetSource
  224. end
  225. object mGetText: TMenuItem
  226. Action = actGetText
  227. end
  228. object ExecuteJavaScript1: TMenuItem
  229. Action = actExecuteJS
  230. end
  231. object Zoomin1: TMenuItem
  232. Action = actZoomIn
  233. end
  234. object Zoomout1: TMenuItem
  235. Action = actZoomOut
  236. end
  237. object Zoomreset1: TMenuItem
  238. Action = actZoomReset
  239. end
  240. object actFileScheme1: TMenuItem
  241. Action = actFileScheme
  242. end
  243. object VisitDOM1: TMenuItem
  244. Action = actDom
  245. end
  246. object DevelopperTools1: TMenuItem
  247. Action = actDevTool
  248. AutoCheck = True
  249. ShortCut = 123
  250. end
  251. end
  252. object Help1: TMenuItem
  253. Caption = 'Help'
  254. OnClick = Help1Click
  255. object Documentation1: TMenuItem
  256. Action = actDoc
  257. end
  258. object Googlegroup1: TMenuItem
  259. Action = actGroup
  260. end
  261. end
  262. end
  263. object SaveDialog: TSaveDialog
  264. Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
  265. Left = 624
  266. Top = 176
  267. end
  268. end