main.lfm 691 B

12345678910111213141516171819202122232425262728293031323334353637383940
  1. object Form1: TForm1
  2. Left = 343
  3. Height = 621
  4. Top = 226
  5. Width = 1025
  6. Caption = 'Form1'
  7. ClientHeight = 621
  8. ClientWidth = 1025
  9. OnClose = FormClose
  10. OnCreate = FormCreate
  11. LCLVersion = '1.9.0.0'
  12. object Memo1: TMemo
  13. Left = 8
  14. Height = 540
  15. Top = 8
  16. Width = 1008
  17. Lines.Strings = (
  18. 'Memo1'
  19. )
  20. TabOrder = 0
  21. end
  22. object btnFromJson: TButton
  23. Left = 920
  24. Height = 25
  25. Top = 582
  26. Width = 94
  27. Caption = 'FromJson'
  28. OnClick = btnFromJsonClick
  29. TabOrder = 1
  30. end
  31. object btnToJson: TButton
  32. Left = 808
  33. Height = 25
  34. Top = 582
  35. Width = 99
  36. Caption = 'ToJson'
  37. OnClick = btnToJsonClick
  38. TabOrder = 2
  39. end
  40. end