frmMain.fmx 2.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293
  1. object frMain: TfrMain
  2. Left = 0
  3. Top = 0
  4. Caption = 'Simple CRUD client example'
  5. ClientHeight = 220
  6. ClientWidth = 360
  7. Position = DesktopCenter
  8. FormFactor.Width = 320
  9. FormFactor.Height = 480
  10. FormFactor.Devices = [Desktop]
  11. DesignerMasterStyle = 0
  12. object pnBottom: TPanel
  13. Align = Bottom
  14. Padding.Left = 2.000000000000000000
  15. Padding.Top = 2.000000000000000000
  16. Padding.Right = 2.000000000000000000
  17. Padding.Bottom = 2.000000000000000000
  18. Position.Y = 184.000000000000000000
  19. Size.Width = 360.000000000000000000
  20. Size.Height = 36.000000000000000000
  21. Size.PlatformDefault = False
  22. TabOrder = 1
  23. object btLoad: TButton
  24. Align = Left
  25. Position.X = 2.000000000000000000
  26. Position.Y = 2.000000000000000000
  27. Size.Width = 80.000000000000000000
  28. Size.Height = 32.000000000000000000
  29. Size.PlatformDefault = False
  30. TabOrder = 0
  31. Text = 'Load'
  32. OnClick = btLoadClick
  33. end
  34. object btSave: TButton
  35. Align = Right
  36. Enabled = False
  37. Position.X = 278.000000000000000000
  38. Position.Y = 2.000000000000000000
  39. Size.Width = 80.000000000000000000
  40. Size.Height = 32.000000000000000000
  41. Size.PlatformDefault = False
  42. TabOrder = 1
  43. Text = 'Save'
  44. OnClick = btSaveClick
  45. end
  46. end
  47. object Grid1: TGrid
  48. Align = Client
  49. CanFocus = True
  50. ClipChildren = True
  51. Size.Width = 360.000000000000000000
  52. Size.Height = 159.000000000000000000
  53. Size.PlatformDefault = False
  54. TabOrder = 4
  55. Viewport.Width = 356.000000000000000000
  56. Viewport.Height = 134.000000000000000000
  57. end
  58. object BindNavigator1: TBindNavigator
  59. Align = Bottom
  60. Position.Y = 159.000000000000000000
  61. Size.Width = 360.000000000000000000
  62. Size.Height = 25.000000000000000000
  63. Size.PlatformDefault = False
  64. TabOrder = 9
  65. DataSource = BindSourceDB
  66. VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbEdit, nbPost, nbCancel]
  67. xRadius = 4.000000000000000000
  68. yRadius = 4.000000000000000000
  69. end
  70. object DataSource: TDataSource
  71. DataSet = Client.FDMemTable
  72. Left = 80
  73. Top = 72
  74. end
  75. object BindSourceDB: TBindSourceDB
  76. DataSet = Client.FDMemTable
  77. ScopeMappings = <>
  78. Left = 176
  79. Top = 72
  80. end
  81. object BindingsList: TBindingsList
  82. Methods = <>
  83. OutputConverters = <>
  84. Left = 276
  85. Top = 72
  86. object LinkGridToDataSourceBindSourceDB1: TLinkGridToDataSource
  87. Category = 'Quick Bindings'
  88. DataSource = BindSourceDB
  89. GridControl = Grid1
  90. Columns = <>
  91. end
  92. end
  93. end