transfer.~dfm

this is sample for traders

          LeaveOnUpDownKey = True
        end>
      RowsHeight = 17
      TitleRowHeight = 20
      SortWith = swFields
      Columns = <
        item
          Expanded = False
          FieldName = 'LINENO'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = 'NO'
          Width = 25
          Visible = True
        end
        item
          ButtonStyle = cbsEllipsis
          Expanded = False
          FieldName = 'ITEMCODE'
          Title.Alignment = taCenter
          Title.Caption = 'KODE-ITEM'
          Width = 135
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ITEMNAME'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = 'NAMA-ITEM'
          Width = 200
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'SAT'
          Title.Alignment = taCenter
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'QTY'
          Title.Alignment = taRightJustify
          Width = 45
          Visible = True
        end>
    end
    object dbneQTY: TDBNumEdit
      Left = 504
      Top = 56
      Width = 41
      Height = 20
      AutoSize = False
      Color = clCream
      Decimal = True
      DisplayFormat = '###.##'
      DataField = 'QTY'
      DataSource = LineSource
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Dina'
      Font.Style = []
      MaxLength = 20
      ParentFont = False
      TabOrder = 1
      Visible = False
    end
    object LkSat: TJvDBLookupCombo
      Left = 448
      Top = 56
      Width = 49
      Height = 23
      DataField = 'SAT'
      DataSource = LineSource
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Dina'
      Font.Style = []
      LookupField = 'UNITNAME'
      LookupDisplay = 'UNITNAME'
      LookupSource = dsSatItem
      ParentFont = False
      TabOrder = 2
      Visible = False
    end
  end
  object btnSave: TBitBtn
    Left = 108
    Top = 432
    Width = 91
    Height = 33
    Caption = '&Oke'
    Enabled = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ModalResult = 1
    ParentFont = False
    TabOrder = 3
    Glyph.Data = {
      26050000424D260500000000000036040000280000000F0000000F0000000100
      080000000000F00000000000000000000000000100000001000000000000FFFF
      FF009BDEFF00D5F1FF00BEE9FF00CAEDFF0090DAFF007CD3FF00F2FBFF00E0F5
      FF00B3E5FF0085D6FF008FDAFF00E9F8FF00B2E5FF0085D7FF00A7E2FF009BDD
      FF00A6E2FF00FAFDFF00BEEAFF00A7E1FF00BFE9FF00EAF8FF00B2E6FF0073D1
      FF00D6F1FF007BD3FF00A6E1FF006CCEFF0073D0FF00E0F4FF00CBEDFF00F9FD
      FF006BCEFF00B3E6FF009ADDFF0090D9FF008FD9FF00DFF5FF00CBEEFF00F9FE
      FF0066CCFF00CAEEFF00F3FAFF00000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000010000000000
      0000000000000000010000010100132C0D000000000001010000000101000817
      2700000000000101000000012900171F03000000000021010000001308000000
      0000000000000813000000080D091A051618040503090D080000000D09032B14
      0E1C0A1605030917000000090305040E1511100A04201A1F0000000320040E12
      020C02101814050300000028040A1002060F0C24150A0405000000140E1C110C
      0B1B0F0602150A16000000231202060F1B1E070B0602121800000010020C0B07
      191D19070F06111200000011260B0719222A1D1E070B25020000010000000000
      00000000000000000100}
  end
  object btnCancel: TBitBtn
    Left = 4
    Top = 432
    Width = 97
    Height = 33
    Caption = '&Cancel'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ModalResult = 2
    ParentFont = False
    TabOrder = 4
    Glyph.Data = {
      DE000000424DDE0000000000000076000000280000000D0000000D0000000100
      04000000000068000000000000000000000010000000100000000000B800FFFF
      FF00FFFFFF000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000200000000000
      2000000000000000000000000000000000000001100011000000000011011000
      0000000001110000000000000010000000000000011100000000000011011000
      0000000110001100000000000000000000000000000000000000200000000000
      2000}
  end
  object JvStaticText7: TJvStaticText
    Left = 668
    Top = 432
    Width = 105
    Height = 33
    Alignment = taCenter
    AutoSize = False
    BevelKind = bkFlat
    Caption = 'F1 - Cari'
    Color = 830714
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    HotTrackFont.Charset = ANSI_CHARSET
    HotTrackFont.Color = clWindowText
    HotTrackFont.Height = -11
    HotTrackFont.Name = 'Tahoma'
    HotTrackFont.Style = []
    Layout = tlCenter
    ParentColor = False
    ParentFont = False
    TabOrder = 5
    TextMargins.X = 5
    TextMargins.Y = 0
    WordWrap = False
  end
  object LineSource: TDataSource
    DataSet = DM1.qPurcLine
    Left = 288
    Top = 168
  end
  object PurcSplSource: TDataSource
    DataSet = DM1.SplByPurc
    Left = 288
    Top = 200
  end
  object dsPurc: TDataSource
    DataSet = DM1.qPurc
    Left = 256
    Top = 168
  end
  object dsSatItem: TDataSource
    DataSet = DM1.qSatItem
    Left = 288
    Top = 232
  end
  object spDynamicSkinForm1: TspDynamicSkinForm
    ShowIcon = False
    MaximizeOnFullScreen = False
    ShowObjectHint = False
    UseSkinCursors = False
    DefCaptionFont.Charset = ANSI_CHARSET
    DefCaptionFont.Color = clPurple
    DefCaptionFont.Height = -13
    DefCaptionFont.Name = 'Tahoma'
    DefCaptionFont.Style = [fsBold]
    DefInActiveCaptionFont.Charset = ANSI_CHARSET
    DefInActiveCaptionFont.Color = clBtnShadow
    DefInActiveCaptionFont.Height = -13
    DefInActiveCaptionFont.Name = 'Tahoma'
    DefInActiveCaptionFont.Style = [fsBold]
    DefMenuItemHeight = 20
    DefMenuItemFont.Charset = ANSI_CHARSET
    DefMenuItemFont.Color = clWindowText
    DefMenuItemFont.Height = -13
    DefMenuItemFont.Name = 'Tahoma'
    DefMenuItemFont.Style = []
    UseDefaultSysMenu = True
    SupportNCArea = True
    AlphaBlendAnimation = False
    AlphaBlendValue = 200
    AlphaBlend = False
    MenusAlphaBlend = False
    MenusAlphaBlendAnimation = False
    MenusAlphaBlendValue = 200
    MinHeight = 0
    MinWidth = 0
    Sizeable = False
    DraggAble = False
    Magnetic = True
    MagneticSize = 10
    BorderIcons = []
    Left = 316
    Top = 232
  end
end