umain.lfm 732 B

12345678910111213141516171819202122232425262728293031323334353637383940
  1. object Form1: TForm1
  2. Left = 379
  3. Height = 457
  4. Top = 208
  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 = 424
  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 = 424
  25. Width = 123
  26. Cancel = True
  27. Caption = 'Load From Json'
  28. OnClick = btnLoadJsonClick
  29. TabOrder = 1
  30. end
  31. object meInfo: TMemo
  32. Left = 19
  33. Height = 407
  34. Top = 9
  35. Width = 549
  36. ReadOnly = True
  37. ScrollBars = ssAutoBoth
  38. TabOrder = 2
  39. end
  40. end