/ide/fpdoceditwindow.lfm

http://github.com/graemeg/lazarus · Unknown · 564 lines · 564 code · 0 blank · 0 comment · 0 complexity · 5b2953c7d9e4f442f0a9f8522ab79fc2 MD5 · raw file

  1. object FPDocEditor: TFPDocEditor
  2. Left = 327
  3. Height = 156
  4. Top = 397
  5. Width = 753
  6. ActiveControl = PageControl
  7. Caption = 'FPDoc editor'
  8. ClientHeight = 156
  9. ClientWidth = 753
  10. KeyPreview = True
  11. OnCreate = FormCreate
  12. OnDestroy = FormDestroy
  13. OnKeyDown = FormKeyDown
  14. OnShow = FormShow
  15. LCLVersion = '1.1'
  16. object PageControl: TPageControl
  17. Left = 33
  18. Height = 156
  19. Top = 0
  20. Width = 720
  21. ActivePage = SeeAlsoTabSheet
  22. Align = alClient
  23. TabIndex = 4
  24. TabOrder = 0
  25. TabPosition = tpBottom
  26. OnChange = PageControlChange
  27. object ShortTabSheet: TTabSheet
  28. Caption = 'ShortTabSheet'
  29. ClientHeight = 117
  30. ClientWidth = 714
  31. object LinkLabel: TLabel
  32. AnchorSideTop.Control = LinkEdit
  33. AnchorSideTop.Side = asrCenter
  34. Left = 6
  35. Height = 16
  36. Top = 27
  37. Width = 60
  38. BorderSpacing.Top = 6
  39. Caption = 'LinkLabel'
  40. ParentColor = False
  41. end
  42. object ShortLabel: TLabel
  43. AnchorSideLeft.Control = ShortTabSheet
  44. AnchorSideTop.Control = ShortEdit
  45. AnchorSideTop.Side = asrCenter
  46. Left = 6
  47. Height = 16
  48. Top = 3
  49. Width = 67
  50. BorderSpacing.Left = 6
  51. Caption = 'ShortLabel'
  52. ParentColor = False
  53. end
  54. object ShortEdit: TEdit
  55. AnchorSideLeft.Control = ShortLabel
  56. AnchorSideLeft.Side = asrBottom
  57. AnchorSideRight.Control = ShortTabSheet
  58. AnchorSideRight.Side = asrBottom
  59. Left = 79
  60. Height = 22
  61. Top = 0
  62. Width = 633
  63. Anchors = [akTop, akLeft, akRight]
  64. AutoSelect = False
  65. BorderSpacing.Left = 6
  66. BorderSpacing.Right = 2
  67. OnChange = ShortEditChange
  68. OnEditingDone = ShortEditEditingDone
  69. TabOrder = 0
  70. Text = 'ShortEdit'
  71. end
  72. object CreateButton: TButton
  73. AnchorSideTop.Control = LinkEdit
  74. AnchorSideTop.Side = asrBottom
  75. Left = 6
  76. Height = 20
  77. Top = 52
  78. Width = 107
  79. AutoSize = True
  80. BorderSpacing.Around = 6
  81. Caption = 'CreateButton'
  82. OnClick = CreateButtonClick
  83. TabOrder = 1
  84. end
  85. object LinkEdit: TEdit
  86. AnchorSideLeft.Control = LinkLabel
  87. AnchorSideLeft.Side = asrBottom
  88. AnchorSideTop.Control = ShortEdit
  89. AnchorSideTop.Side = asrBottom
  90. AnchorSideRight.Control = ShortTabSheet
  91. AnchorSideRight.Side = asrBottom
  92. Left = 72
  93. Height = 22
  94. Top = 24
  95. Width = 640
  96. Anchors = [akTop, akLeft, akRight]
  97. AutoSelect = False
  98. BorderSpacing.Left = 6
  99. BorderSpacing.Top = 2
  100. BorderSpacing.Right = 2
  101. OnChange = LinkEditChange
  102. OnEditingDone = LinkEditEditingDone
  103. TabOrder = 2
  104. Text = 'LinkEdit'
  105. end
  106. object OpenXMLButton: TButton
  107. AnchorSideTop.Control = CreateButton
  108. AnchorSideRight.Control = ShortTabSheet
  109. AnchorSideRight.Side = asrBottom
  110. Left = 588
  111. Height = 20
  112. Top = 52
  113. Width = 126
  114. Anchors = [akTop, akRight]
  115. AutoSize = True
  116. Caption = 'OpenXMLButton'
  117. OnClick = OpenXMLButtonClick
  118. ParentShowHint = False
  119. ShowHint = True
  120. TabOrder = 3
  121. end
  122. end
  123. object InheritedTabSheet: TTabSheet
  124. Caption = 'InheritedTabSheet'
  125. ClientHeight = 117
  126. ClientWidth = 714
  127. object InheritedShortLabel: TLabel
  128. Left = 0
  129. Height = 16
  130. Top = 2
  131. Width = 714
  132. Align = alTop
  133. BorderSpacing.Top = 2
  134. Caption = 'InheritedShortLabel'
  135. ParentColor = False
  136. end
  137. object InheritedShortEdit: TEdit
  138. AnchorSideLeft.Control = InheritedTabSheet
  139. AnchorSideTop.Control = InheritedShortLabel
  140. AnchorSideTop.Side = asrBottom
  141. AnchorSideRight.Control = InheritedTabSheet
  142. AnchorSideRight.Side = asrBottom
  143. Left = 0
  144. Height = 22
  145. Top = 20
  146. Width = 714
  147. Anchors = [akTop, akLeft, akRight]
  148. BorderSpacing.Top = 2
  149. ReadOnly = True
  150. TabOrder = 0
  151. Text = 'InheritedShortEdit'
  152. end
  153. object MoveToInheritedButton: TButton
  154. AnchorSideTop.Control = InheritedShortEdit
  155. AnchorSideTop.Side = asrBottom
  156. Left = 0
  157. Height = 20
  158. Top = 48
  159. Width = 176
  160. AutoSize = True
  161. BorderSpacing.Around = 6
  162. Caption = 'MoveToInheritedButton'
  163. OnClick = MoveToInheritedButtonClick
  164. TabOrder = 1
  165. end
  166. object CopyFromInheritedButton: TButton
  167. AnchorSideLeft.Control = MoveToInheritedButton
  168. AnchorSideLeft.Side = asrBottom
  169. AnchorSideTop.Control = MoveToInheritedButton
  170. AnchorSideTop.Side = asrCenter
  171. Left = 186
  172. Height = 20
  173. Top = 48
  174. Width = 191
  175. AutoSize = True
  176. BorderSpacing.Left = 10
  177. Caption = 'CopyFromInheritedButton'
  178. OnClick = CopyFromInheritedButtonClick
  179. TabOrder = 2
  180. end
  181. object AddLinkToInheritedButton: TButton
  182. AnchorSideLeft.Control = CopyFromInheritedButton
  183. AnchorSideLeft.Side = asrBottom
  184. AnchorSideTop.Control = CopyFromInheritedButton
  185. Left = 387
  186. Height = 20
  187. Top = 48
  188. Width = 194
  189. AutoSize = True
  190. BorderSpacing.Left = 10
  191. Caption = 'AddLinkToInheritedButton'
  192. OnClick = AddLinkToInheritedButtonClick
  193. TabOrder = 3
  194. end
  195. end
  196. object DescrTabSheet: TTabSheet
  197. Caption = 'DescrTabSheet'
  198. ClientHeight = 117
  199. ClientWidth = 714
  200. object DescrMemo: TMemo
  201. Left = 0
  202. Height = 89
  203. Top = 24
  204. Width = 712
  205. Align = alClient
  206. BorderSpacing.Right = 2
  207. BorderSpacing.Bottom = 4
  208. Lines.Strings = (
  209. 'DescrMemo'
  210. )
  211. OnChange = DescrMemoChange
  212. OnEditingDone = DescrMemoEditingDone
  213. ScrollBars = ssAutoBoth
  214. TabOrder = 0
  215. end
  216. object ShortPanel: TPanel
  217. Left = 0
  218. Height = 24
  219. Top = 0
  220. Width = 714
  221. Align = alTop
  222. Alignment = taLeftJustify
  223. AutoSize = True
  224. Caption = 'Short'
  225. ClientHeight = 24
  226. ClientWidth = 714
  227. TabOrder = 1
  228. object DescrShortEdit: TEdit
  229. AnchorSideLeft.Control = ShortPanel
  230. AnchorSideRight.Side = asrBottom
  231. Left = 61
  232. Height = 22
  233. Top = 1
  234. Width = 650
  235. Align = alRight
  236. Anchors = [akTop, akLeft, akRight, akBottom]
  237. AutoSelect = False
  238. BorderSpacing.Left = 60
  239. BorderSpacing.Right = 2
  240. OnChange = ShortEditChange
  241. OnEditingDone = ShortEditEditingDone
  242. ReadOnly = True
  243. TabOrder = 0
  244. Text = 'DescrShortEdit'
  245. end
  246. end
  247. end
  248. object ErrorsTabSheet: TTabSheet
  249. Caption = 'ErrorsTabSheet'
  250. ClientHeight = 117
  251. ClientWidth = 714
  252. object ErrorsMemo: TMemo
  253. Left = 0
  254. Height = 113
  255. Top = 0
  256. Width = 712
  257. Align = alClient
  258. BorderSpacing.Right = 2
  259. BorderSpacing.Bottom = 4
  260. Lines.Strings = (
  261. 'ErrorsMemo'
  262. )
  263. OnChange = ErrorsMemoChange
  264. OnEditingDone = ErrorsMemoEditingDone
  265. ScrollBars = ssAutoBoth
  266. TabOrder = 0
  267. end
  268. end
  269. object SeeAlsoTabSheet: TTabSheet
  270. Caption = 'SeeAlsoTabSheet'
  271. ClientHeight = 117
  272. ClientWidth = 714
  273. object SeeAlsoMemo: TMemo
  274. Left = 0
  275. Height = 117
  276. Top = 0
  277. Width = 714
  278. Align = alClient
  279. Lines.Strings = (
  280. 'SeeAlsoMemo'
  281. )
  282. OnChange = SeeAlsoMemoChange
  283. OnEditingDone = SeeAlsoMemoEditingDone
  284. ScrollBars = ssAutoBoth
  285. TabOrder = 0
  286. end
  287. end
  288. object ExampleTabSheet: TTabSheet
  289. Caption = 'ExampleTabSheet'
  290. ClientHeight = 122
  291. ClientWidth = 687
  292. object ExampleEdit: TEdit
  293. Left = 0
  294. Height = 21
  295. Top = 0
  296. Width = 686
  297. Align = alTop
  298. AutoSelect = False
  299. BorderSpacing.Right = 2
  300. OnChange = ExampleEditChange
  301. OnEditingDone = ExampleEditEditingDone
  302. TabOrder = 0
  303. Text = 'ExampleEdit'
  304. end
  305. object BrowseExampleButton: TButton
  306. AnchorSideTop.Control = ExampleEdit
  307. AnchorSideTop.Side = asrBottom
  308. AnchorSideRight.Control = ExampleTabSheet
  309. AnchorSideRight.Side = asrBottom
  310. Left = 549
  311. Height = 23
  312. Top = 27
  313. Width = 133
  314. Anchors = [akTop, akRight]
  315. AutoSize = True
  316. BorderSpacing.Around = 6
  317. Caption = 'BrowseExampleButton'
  318. OnClick = BrowseExampleButtonClick
  319. TabOrder = 1
  320. end
  321. end
  322. object TopicSheet: TTabSheet
  323. Caption = 'Topics'
  324. ClientHeight = 122
  325. ClientWidth = 687
  326. object Panel1: TPanel
  327. Left = 518
  328. Height = 99
  329. Top = 0
  330. Width = 170
  331. Align = alRight
  332. BorderSpacing.Left = 5
  333. BevelOuter = bvNone
  334. ClientHeight = 99
  335. ClientWidth = 170
  336. TabOrder = 0
  337. object Panel2: TPanel
  338. Left = 0
  339. Height = 25
  340. Top = 0
  341. Width = 170
  342. Align = alTop
  343. AutoSize = True
  344. BevelOuter = bvNone
  345. ClientHeight = 25
  346. ClientWidth = 170
  347. TabOrder = 0
  348. object NewTopicButton: TButton
  349. Left = 100
  350. Height = 25
  351. Top = 0
  352. Width = 70
  353. Align = alRight
  354. AutoSize = True
  355. Caption = 'New'
  356. OnClick = NewTopicButtonClick
  357. TabOrder = 0
  358. end
  359. object NewTopicNameEdit: TEdit
  360. Left = 0
  361. Height = 25
  362. Top = 0
  363. Width = 95
  364. Align = alClient
  365. BorderSpacing.Right = 5
  366. OnEnter = TopicControlEnter
  367. TabOrder = 1
  368. end
  369. end
  370. object TopicListBox: TListBox
  371. Left = 0
  372. Height = 69
  373. Top = 30
  374. Width = 170
  375. Align = alClient
  376. BorderSpacing.Top = 5
  377. ItemHeight = 0
  378. OnClick = TopicListBoxClick
  379. OnEnter = TopicControlEnter
  380. TabOrder = 1
  381. end
  382. end
  383. object Panel3: TPanel
  384. Left = 0
  385. Height = 99
  386. Top = 0
  387. Width = 513
  388. Align = alClient
  389. BevelOuter = bvNone
  390. ClientHeight = 99
  391. ClientWidth = 513
  392. TabOrder = 1
  393. object TopicShort: TEdit
  394. Left = 0
  395. Height = 22
  396. Top = 0
  397. Width = 513
  398. Align = alTop
  399. AutoSelect = False
  400. OnChange = TopicDescrChange
  401. OnEnter = TopicControlEnter
  402. TabOrder = 0
  403. end
  404. object TopicDescr: TMemo
  405. Left = 0
  406. Height = 72
  407. Top = 27
  408. Width = 513
  409. Align = alClient
  410. BorderSpacing.Top = 5
  411. OnChange = TopicDescrChange
  412. OnEnter = TopicControlEnter
  413. TabOrder = 1
  414. end
  415. end
  416. end
  417. end
  418. object LeftBtnPanel: TPanel
  419. Left = 0
  420. Height = 156
  421. Top = 0
  422. Width = 33
  423. Align = alLeft
  424. AutoSize = True
  425. BevelOuter = bvNone
  426. ChildSizing.Layout = cclLeftToRightThenTopToBottom
  427. ChildSizing.ControlsPerLine = 3
  428. ClientHeight = 156
  429. ClientWidth = 33
  430. FullRepaint = False
  431. ParentShowHint = False
  432. ShowHint = True
  433. TabOrder = 1
  434. object BoldFormatButton: TSpeedButton
  435. Left = 0
  436. Height = 4
  437. Top = 0
  438. Width = 4
  439. Constraints.MaxHeight = 23
  440. Constraints.MaxWidth = 20
  441. OnClick = FormatButtonClick
  442. end
  443. object ItalicFormatButton: TSpeedButton
  444. Tag = 1
  445. Left = 4
  446. Height = 4
  447. Top = 0
  448. Width = 11
  449. Constraints.MaxHeight = 23
  450. Constraints.MaxWidth = 20
  451. OnClick = FormatButtonClick
  452. end
  453. object UnderlineFormatButton: TSpeedButton
  454. Tag = 2
  455. Left = 15
  456. Height = 4
  457. Top = 0
  458. Width = 18
  459. Constraints.MaxHeight = 23
  460. Constraints.MaxWidth = 20
  461. OnClick = FormatButtonClick
  462. end
  463. object InsertVarTagButton: TSpeedButton
  464. Tag = 5
  465. Left = 0
  466. Height = 20
  467. Top = 4
  468. Width = 4
  469. Constraints.MaxHeight = 23
  470. Constraints.MaxWidth = 20
  471. OnClick = FormatButtonClick
  472. end
  473. object InsertParagraphSpeedButton: TSpeedButton
  474. Tag = 6
  475. Left = 4
  476. Height = 20
  477. Top = 4
  478. Width = 11
  479. Constraints.MaxHeight = 23
  480. Constraints.MaxWidth = 20
  481. Caption = 'P'
  482. OnClick = FormatButtonClick
  483. end
  484. object InsertLinkSpeedButton: TSpeedButton
  485. Left = 15
  486. Height = 20
  487. Top = 4
  488. Width = 18
  489. Constraints.MaxHeight = 23
  490. Constraints.MaxWidth = 20
  491. Caption = 'Li'
  492. Enabled = False
  493. OnClick = InsertLinkSpeedButtonClick
  494. ShowHint = True
  495. ParentShowHint = False
  496. end
  497. object InsertCodeTagButton: TSpeedButton
  498. Tag = 3
  499. Left = 0
  500. Height = 20
  501. Top = 24
  502. Width = 4
  503. Constraints.MaxHeight = 23
  504. Constraints.MaxWidth = 20
  505. OnClick = FormatButtonClick
  506. ShowHint = True
  507. ParentShowHint = False
  508. end
  509. object InsertRemarkButton: TSpeedButton
  510. Tag = 4
  511. Left = 4
  512. Height = 20
  513. Top = 24
  514. Width = 11
  515. Constraints.MaxHeight = 23
  516. Constraints.MaxWidth = 20
  517. OnClick = FormatButtonClick
  518. ShowHint = True
  519. ParentShowHint = False
  520. end
  521. object InsertPrintShortSpeedButton: TSpeedButton
  522. Tag = 7
  523. Left = 15
  524. Height = 20
  525. Top = 24
  526. Width = 18
  527. Constraints.MaxHeight = 23
  528. Constraints.MaxWidth = 20
  529. Caption = 'PS'
  530. OnClick = FormatButtonClick
  531. ShowHint = True
  532. ParentShowHint = False
  533. end
  534. object InsertURLTagSpeedButton: TSpeedButton
  535. Tag = 8
  536. Left = 0
  537. Height = 4
  538. Top = 44
  539. Width = 4
  540. Constraints.MaxHeight = 23
  541. Constraints.MaxWidth = 20
  542. OnClick = FormatButtonClick
  543. ShowHint = True
  544. ParentShowHint = False
  545. end
  546. object SaveButton: TSpeedButton
  547. AnchorSideLeft.Side = asrBottom
  548. Left = 0
  549. Height = 29
  550. Top = 127
  551. Width = 33
  552. Align = alBottom
  553. Caption = 'Save'
  554. OnClick = SaveButtonClick
  555. end
  556. end
  557. object OpenDialog: TOpenDialog
  558. Title = 'Open example file'
  559. Filter = 'pascal file|*.pas; *.pp; *.p'
  560. FilterIndex = 0
  561. left = 240
  562. top = 16
  563. end
  564. end