umain.lfm 1.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657
  1. object Form1: TForm1
  2. Left = 379
  3. Height = 457
  4. Top = 254
  5. Width = 592
  6. Caption = 'Form1'
  7. ClientHeight = 457
  8. ClientWidth = 592
  9. OnClose = FormClose
  10. OnCreate = FormCreate
  11. LCLVersion = '1.9.0.0'
  12. object btnSaveJson: TButton
  13. Left = 448
  14. Height = 25
  15. Top = 384
  16. Width = 120
  17. Caption = 'Save to Json'
  18. OnClick = btnSaveJsonClick
  19. TabOrder = 0
  20. end
  21. object btnLoadJson: TButton
  22. Left = 312
  23. Height = 25
  24. Top = 384
  25. Width = 123
  26. Caption = 'Load From Json'
  27. OnClick = btnLoadJsonClick
  28. TabOrder = 1
  29. end
  30. object meInfo: TMemo
  31. Left = 19
  32. Height = 363
  33. Top = 9
  34. Width = 549
  35. ReadOnly = True
  36. ScrollBars = ssAutoBoth
  37. TabOrder = 2
  38. end
  39. object btnSaveRegistry: TButton
  40. Left = 448
  41. Height = 25
  42. Top = 416
  43. Width = 120
  44. Caption = 'Save to Registry'
  45. OnClick = btnSaveRegistryClick
  46. TabOrder = 3
  47. end
  48. object btnLoadRegistry: TButton
  49. Left = 312
  50. Height = 25
  51. Top = 416
  52. Width = 123
  53. Caption = 'Load From Registry'
  54. OnClick = btnLoadRegistryClick
  55. TabOrder = 4
  56. end
  57. end