object DMMalGrp: TDMMalGrp OldCreateOrder = True OnCreate = DMrehgrCreate OnDestroy = DMrehgrDestroy Left = 516 Top = 172 Height = 218 Width = 247 object MalGrp_DS: TDataSource DataSet = MalGrp Left = 30 Top = 10 end object MalGrp: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select * From ShopMalGrp' 'Order By MalKodu' '') FetchRows = 1 BeforeInsert = MalGrpBeforeInsert BeforeEdit = MalGrpBeforeEdit BeforePost = MalGrpBeforePost OnDeleteError = UpdateError OnEditError = UpdateError OnNewRecord = MalGrpNewRecord OnPostError = UpdateError Left = 30 Top = 64 object MalGrpAdi: TStringField FieldName = 'Adi' Required = True Size = 6 end object MalGrpMaladi: TStringField DisplayLabel = 'Shop Mal Ad'#305 FieldKind = fkLookup FieldName = 'MalAdi' LookupDataSet = ShopMal LookupKeyFields = 'Kodu' LookupResultField = 'Tanimi' KeyFields = 'MalKodu' Size = 30 Lookup = True end object MalGrpMalKodu: TStringField DisplayLabel = 'Shop Mal Kodu' FieldName = 'MalKodu' LookupDataSet = ShopMal LookupKeyFields = 'Kodu' LookupResultField = 'Tanimi' KeyFields = 'MalKodu' Size = 15 end end object MalGrpTMP: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select * From ShopMalGrp') Left = 176 Top = 16 end object ShopMal: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Kodu, Tanimi From ShopMal') FetchRows = 1 Left = 112 Top = 96 object ShopMalKodu: TStringField FieldName = 'Kodu' Size = 15 end object ShopMalTanimi: TStringField FieldName = 'Tanimi' Size = 30 end end end