object f_telep: Tf_telep
  Left = 111
  Top = 106
  ActiveControl = Edit1
  BiDiMode = bdLeftToRight
  BorderStyle = bsSingle
  Caption = 'Delivery'
  ClientHeight = 559
  ClientWidth = 753
  Color = 14739693
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  ParentBiDiMode = False
  Position = poScreenCenter
  OnCloseQuery = FormCloseQuery
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label5: TLabel
    Left = 186
    Top = 410
    Width = 29
    Height = 20
    Alignment = taCenter
    Caption = '--->'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object DBText1: TDBText
    Left = 280
    Top = 440
    Width = 57
    Height = 17
    Alignment = taCenter
    DataField = 'POINTIN'
    DataSource = DataSource1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object DBText2: TDBText
    Left = 376
    Top = 440
    Width = 89
    Height = 17
    Alignment = taCenter
    DataField = 'POINTOUT'
    DataSource = DataSource1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object DBText3: TDBText
    Left = 472
    Top = 440
    Width = 89
    Height = 17
    Alignment = taCenter
    DataField = 'bal'
    DataSource = DataSource1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label6: TLabel
    Left = 352
    Top = 440
    Width = 7
    Height = 20
    Caption = '-'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object RzPanel2: TRzPanel
    Left = 4
    Top = 218
    Width = 564
    Height = 185
    BorderInner = fsFlat
    BorderOuter = fsGroove
    BorderWidth = 7
    TabOrder = 0
    object Label1: TLabel
      Left = 19
      Top = 20
      Width = 33
      Height = 29
      Caption = 'Tel:'
      Font.Charset = ARABIC_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = 'Traditional Arabic'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object Label3: TLabel
      Left = 14
      Top = 64
      Width = 61
      Height = 29
      Caption = 'Name :'
      Font.Charset = ARABIC_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = 'Traditional Arabic'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object Label2: TLabel
      Left = 13
      Top = 98
      Width = 76
      Height = 24
      Caption = 'Address 1 :'
      Font.Charset = ARABIC_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Traditional Arabic'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object Label4: TLabel
      Left = 13
      Top = 134
      Width = 69
      Height = 24
      Caption = 'Card No: '
      Font.Charset = ARABIC_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Traditional Arabic'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object SpeedButton12: TSpeedButton
      Left = 537
      Top = 100
      Width = 15
      Height = 22
      Caption = '...'
      OnClick = SpeedButton12Click
    end
    object SpeedButton13: TSpeedButton
      Left = 539
      Top = 136
      Width = 14
      Height = 22
      Caption = '...'
      OnClick = SpeedButton13Click
    end
    object lqty: TBUBlinkingLabel
      Left = 317
      Top = 26
      Width = 196
      Height = 22
      Alignment = taCenter
      AutoSize = False
      Caption = '   '
      Font.Charset = ARABIC_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
      Visible = False
    end
    object Edit1: TEdit
      Left = 86
      Top = 23
      Width = 227
      Height = 32
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnExit = Edit1Exit
      OnKeyPress = Edit1KeyPress
    end
    object Edit3: TEdit
      Left = 86
      Top = 64
      Width = 337
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnExit = Edit3Exit
      OnKeyPress = Edit3KeyPress
    end
    object Edit2: TEdit
      Left = 86
      Top = 99
      Width = 451
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      OnKeyPress = Edit2KeyPress
    end
    object Edit4: TEdit
      Left = 86
      Top = 135
      Width = 451
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 3
      OnKeyPress = Edit4KeyPress
    end
  end
  object RzPanel1: TRzPanel
    Left = 4
    Top = 2
    Width = 390
    Height = 211
    BorderInner = fsFlat
    BorderOuter = fsGroove
    BorderWidth = 7
    TabOrder = 1
    object SpeedButton4: TSpeedButton
      Left = 13
      Top = 13
      Width = 90
      Height = 60
      Cursor = crHandPoint
      Caption = '4'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -1
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Glyph.Data = {
        [encoded data, 8256 characters]
        0000000000000000000000000000000000000000000000000000}
      ParentFont = False
      OnClick = SpeedButton1Click
    end
    object SpeedButton3: TSpeedButton
      Left = 104
      Top = 13
      Width = 90
      Height = 60
      Cursor = crHandPoint
      Caption = '3'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -1
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Glyph.Data = {
        [encoded data, 8256 characters]
        0000000000000000000000000000000000000000000000000000}
      ParentFont = False
      OnClick = SpeedButton1Click
    end
    object SpeedButton2: TSpeedButton
      Left = 195
      Top = 13
      Width = 90
      Height = 60
      Cursor = crHandPoint
      Caption = '2'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -1
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Glyph.Data = {
        [encoded data, 8256 characters]
        0000000000000000000000000000000000000000000000000000}
      ParentFont = False
      OnClick = SpeedButton1Click
    end
    object SpeedButton1: TSpeedButton
      Left = 286
      Top = 13
      Width = 90
      Height = 60
      Cursor = crHandPoint
      Caption = '1'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Glyph.Data = {
        [encoded data, 6208 characters]
        0080800080800080800080800080800080800080800080800080}
      ParentFont = False
      OnClick = SpeedButton1Click
    end
    object SpeedButton8: TSpeedButton
      Left = 13
      Top = 74
      Width = 90
      Height = 60
      Cursor = crHandPoint
      Caption = '8'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -1
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Glyph.Data = {
        [encoded data, 8256 characters]
        0000000000000000000000000000000000000000000000000000}
      ParentFont = False
      OnClick = SpeedButton1Click
    end
    object SpeedButton7: TSpeedButton
      Left = 104
      Top = 74
      Width = 90
      Height = 60
      Cursor = crHandPoint
      Caption = '7'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -1
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Glyph.Data = {
        [encoded data, 8256 characters]
        0000000000000000000000000000000000000000000000000000}
      ParentFont = False
      OnClick = SpeedButton1Click
    end
    object SpeedButton6: TSpeedButton
      Left = 195
      Top = 74
      Width = 90
      Height = 60
      Cursor = crHandPoint
      Caption = '6'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -1
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Glyph.Data = {
        [encoded data, 8256 characters]
        0000000000000000000000000000000000000000000000000000}
      ParentFont = False
      OnClick = SpeedButton1Click
    end
    object SpeedButton5: TSpeedButton
      Left = 286
      Top = 74
      Width = 90
      Height = 60
      Cursor = crHandPoint
      Caption = '5'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -1
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Glyph.Data = {
        [encoded data, 8256 characters]
        0000000000000000000000000000000000000000000000000000}
      ParentFont = False
      OnClick = SpeedButton1Click
    end
    object SpeedButton11: TSpeedButton
      Left = 13
      Top = 135
      Width = 90
      Height = 60
      Cursor = crHandPoint
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      Glyph.Data = {
        F2060000424DF206000000000000360400002800000019000000190000000100
        080000000000BC02000000000000000000000001000000010000000000000000
        80000080000000808000800000008000800080800000C0C0C000C0DCC000F0C8
        A400000000000000000000000000000000000000000000000000000000000000
        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
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FDFDFDFDFDFD
        FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD000000FD000000000000000000
        000000000000000000FD0000000000000000FD00FFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFF00FD00FFFFFF00000000FD00FFFCFCFCFCFFFCFCFCFFFCFCFCFFFCFF
        00FD00F9F9F900000000FD00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FD00F9
        00F900000000FD00FFFCFCFFFCFCFCFFFCFCFCFFFCFCFCFF00FD00F900F90000
        0000FD00FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFF00FD00F9F9F900000000FD00
        FF0000FCFCFCFFFCFCFFFCFCFCFFFCFF00FD00FFFFFF00000000FD00FFFF00FF
        FFFFFFFFFFFFFFFFFFFFFFFF00FD0000FF0000000000FD00FFFCFC00FCFFFFFC
        FCFCFFFCFCFCFCFF00FDFD00FF00FD000000FD00FFFFFFFF000000FF00F900FF
        FFFFFFFF00FDFD000000FD000000FD00FFFCFCFC00000000F9FBF900FFFCFCFF
        00FDFDFDFDFDFD000000FD00FFFFFFFFFF00000000F9FBF900FFFFFF00FDFDFD
        000000000000FD00FFFCFCFC000000000000F9FBF90000000000000000010100
        0000FD00FFFFFFFF00F9FB0000FFFF00FBF9FBF9FBF9FBF9000101000000FD00
        FFFCFCFC0000F9FB00FFFF00F9FBF9FBF9FBF9FB00F9F9000000FD00FFFFFFFF
        FF00FBF9FB0000F9FBF9FBF9FBF9FBF900F9F9000000FD00FFFCFCFCFCFFFC00
        F9FBF9FBF9FBF9FBF9FBF9FB00F9F9000000FD00FFFFFFFFFFFFFCFF0000FBF9
        FBF9FBF9FBF9FBF900F9F9000000FD00FFFCFCFCFCFCFC00FC0000FBF9FBF9FB
        F900000000F9F9000000FD00FFFFFFFFFFFFFFFFFFFF00000000000000FDFDFD
        000000000000FD000000000000000000000000000000000000FDFDFDFDFDFD00
        0000FD000000000000000000000000000000000000FDFDFDFDFDFD000000FDFD
        FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD000000FDFDFDFDFDFD
        FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD000000}
      ParentFont = False
      OnClick = SpeedButton11Click
    end
    object SpeedButton10: TSpeedButton
      Left = 195
      Top = 135
      Width = 90
      Height = 60
      Cursor = crHandPoint
      Caption = '0'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -1
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Glyph.Data = {
        [encoded data, 6208 characters]
        0000000000000000000000000000000000000000000000000000}
      ParentFont = False
      OnClick = SpeedButton1Click
    end
    object SpeedButton9: TSpeedButton
      Left = 286
      Top = 135
      Width = 90
      Height = 60
      Cursor = crHandPoint
      Caption = '9'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -1
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Glyph.Data = {
        [encoded data, 8256 characters]
        0000000000000000000000000000000000000000000000000000}
      ParentFont = False
      OnClick = SpeedButton1Click
    end
  end
  object RzPanel3: TRzPanel
    Left = 0
    Top = 469
    Width = 753
    Height = 90
    Align = alBottom
    TabOrder = 2
    object BitBtn1: TRzBitBtn
      Left = 2
      Top = 2
      Width = 521
      Height = 86
      Align = alClient
      Caption = 'Ok'
      Color = 16766640
      Font.Charset = ARABIC_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = 'Traditional Arabic'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = BitBtn1Click
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333330000333333333333333333333333F33333333333
        00003333344333333333333333388F3333333333000033334224333333333333
        338338F3333333330000333422224333333333333833338F3333333300003342
        222224333333333383333338F3333333000034222A22224333333338F338F333
        8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
        33333338F83338F338F33333000033A33333A222433333338333338F338F3333
        0000333333333A222433333333333338F338F33300003333333333A222433333
        333333338F338F33000033333333333A222433333333333338F338F300003333
        33333333A222433333333333338F338F00003333333333333A22433333333333
        3338F38F000033333333333333A223333333333333338F830000333333333333
        333A333333333333333338330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
    object fcImageBtn3: TRzBitBtn
      Left = 523
      Top = 2
      Width = 228
      Height = 86
      Align = alRight
      Color = 14739693
      Font.Charset = ARABIC_CHARSET
      Font.Color = clRed
      Font.Height = -19
      Font.Name = 'Traditional Arabic'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      Kind = bkCancel
    end
  end
  object efrom: TEdit
    Left = 16
    Top = 408
    Width = 161
    Height = 21
    TabOrder = 3
  end
  object eto: TEdit
    Left = 224
    Top = 408
    Width = 169
    Height = 21
    TabOrder = 4
  end
  object nrDeviceBox1: TnrDeviceBox
    Left = 15
    Top = 444
    Width = 241
    Height = 21
    nrComm = nrCommTAPI1
    ResetOnChanged = False
    ItemHeight = 13
    TabOrder = 5
  end
  object RzPanel4: TRzPanel
    Left = 569
    Top = 0
    Width = 184
    Height = 469
    Align = alRight
    TabOrder = 6
    object cxGrid1: TcxGrid
      Left = 2
      Top = 2
      Width = 180
      Height = 465
      Align = alClient
      TabOrder = 0
      object cxGrid1DBCardView1: TcxGridDBCardView
        NavigatorButtons.ConfirmDelete = False
        FilterBox.CustomizeDialog = False
        BackgroundBitmaps.Background.Data = {
          [encoded data, 16576 characters]
          6399301036666663000596569185660060033532548633003408}
        DataController.DataSource = DataSource1
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        LayoutDirection = ldVertical
        OptionsData.CancelOnExit = False
        OptionsData.Deleting = False
        OptionsData.DeletingConfirmation = False
        OptionsData.Editing = False
        OptionsData.Inserting = False
        OptionsSelection.CellSelect = False
        OptionsSelection.HideFocusRectOnExit = False
        OptionsSelection.InvertSelect = False
        OptionsSelection.UnselectFocusedRecordOnExit = False
        OptionsView.CaptionSeparator = #0
        OptionsView.CardAutoWidth = True
        OptionsView.CardBorderWidth = 2
        OptionsView.CardIndent = 3
        OptionsView.CardWidth = 86
        OptionsView.CategorySeparatorWidth = 10
        OptionsView.CellAutoHeight = True
        OptionsView.RowCaptionAutoHeight = True
        object cxGrid1DBCardView1Row1: TcxGridDBCardViewRow
          Caption = 'Name :'
          DataBinding.FieldName = 'NAME'
          Options.Editing = False
          Options.Filtering = False
          Options.Expanding = False
          Position.BeginsLayer = True
        end
        object cxGrid1DBCardView1Row9: TcxGridDBCardViewRow
          Caption = 'W :'
          DataBinding.FieldName = 'WPHONE'
          Position.BeginsLayer = True
        end
        object cxGrid1DBCardView1Row2: TcxGridDBCardViewRow
          Caption = 'H :'
          DataBinding.FieldName = 'HPHONE'
          Options.Editing = False
          Options.Filtering = False
          Options.Expanding = False
          Position.BeginsLayer = True
        end
        object cxGrid1DBCardView1Row3: TcxGridDBCardViewRow
          Caption = 'Cell :'
          DataBinding.FieldName = 'CELL'
          Options.Editing = False
          Options.Filtering = False
          Options.Expanding = False
          Position.BeginsLayer = True
        end
        object cxGrid1DBCardView1Row8: TcxGridDBCardViewRow
          Caption = 'Fax :'
          DataBinding.FieldName = 'FAX'
          Position.BeginsLayer = True
        end
        object cxGrid1DBCardView1Row5: TcxGridDBCardViewRow
          Caption = ' '
          DataBinding.FieldName = 'CREATETIME'
          Options.Editing = False
          Options.Filtering = False
          Options.Expanding = False
          Position.BeginsLayer = True
        end
        object cxGrid1DBCardView1Row7: TcxGridDBCardViewRow
          Caption = ' '
          DataBinding.FieldName = 'FROMTO'
          Position.BeginsLayer = True
        end
      end
      object cxGrid1Level1: TcxGridLevel
        GridView = cxGrid1DBCardView1
      end
    end
  end
  object RzBitBtn1: TRzBitBtn
    Left = 416
    Top = 80
    Width = 137
    Height = 113
    Caption = 'Point Card'
    Color = 15791348
    HighlightColor = 16026986
    HotTrack = True
    HotTrackColor = 3983359
    TabOrder = 7
    OnClick = RzBitBtn1Click
    Glyph.Data = {
      36060000424D3606000000000000360400002800000020000000100000000100
      0800000000000002000000000000000000000001000000000000000000003300
      00006600000099000000CC000000FF0000000033000033330000663300009933
      0000CC330000FF33000000660000336600006666000099660000CC660000FF66
      000000990000339900006699000099990000CC990000FF99000000CC000033CC
      000066CC000099CC0000CCCC0000FFCC000000FF000033FF000066FF000099FF
      0000CCFF0000FFFF000000003300330033006600330099003300CC003300FF00
      330000333300333333006633330099333300CC333300FF333300006633003366
      33006666330099663300CC663300FF6633000099330033993300669933009999
      3300CC993300FF99330000CC330033CC330066CC330099CC3300CCCC3300FFCC
      330000FF330033FF330066FF330099FF3300CCFF3300FFFF3300000066003300
      66006600660099006600CC006600FF0066000033660033336600663366009933
      6600CC336600FF33660000666600336666006666660099666600CC666600FF66
      660000996600339966006699660099996600CC996600FF99660000CC660033CC
      660066CC660099CC6600CCCC6600FFCC660000FF660033FF660066FF660099FF
      6600CCFF6600FFFF660000009900330099006600990099009900CC009900FF00
      990000339900333399006633990099339900CC339900FF339900006699003366
      99006666990099669900CC669900FF6699000099990033999900669999009999
      9900CC999900FF99990000CC990033CC990066CC990099CC9900CCCC9900FFCC
      990000FF990033FF990066FF990099FF9900CCFF9900FFFF99000000CC003300
      CC006600CC009900CC00CC00CC00FF00CC000033CC003333CC006633CC009933
      CC00CC33CC00FF33CC000066CC003366CC006666CC009966CC00CC66CC00FF66
      CC000099CC003399CC006699CC009999CC00CC99CC00FF99CC0000CCCC0033CC
      CC0066CCCC0099CCCC00CCCCCC00FFCCCC0000FFCC0033FFCC0066FFCC0099FF
      CC00CCFFCC00FFFFCC000000FF003300FF006600FF009900FF00CC00FF00FF00
      FF000033FF003333FF006633FF009933FF00CC33FF00FF33FF000066FF003366
      FF006666FF009966FF00CC66FF00FF66FF000099FF003399FF006699FF009999
      FF00CC99FF00FF99FF0000CCFF0033CCFF0066CCFF0099CCFF00CCCCFF00FFCC
      FF0000FFFF0033FFFF0066FFFF0099FFFF00CCFFFF00FFFFFF00000080000080
      000000808000800000008000800080800000C0C0C00080808000191919004C4C
      4C00B2B2B200E5E5E500C8AC2800E0CC6600F2EABF00B59B2400D8E9EC009933
      6600D075A300ECC6D900646F710099A8AC00E2EFF10000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000E8E8E8E8E8E8
      5E5EE8E8E8E8E8E8E8E8E8E8E8E8E8E88181E8E8E8E8E8E8E8E8E8E8E8E8E85E
      D7D75EE8E8E8E8E8E8E8E8E8E8E8E881E8E881E8E8E8E8E8E8E8E8E8E8E8E85E
      D7D75EE8E8E8E8E8E8E8E8E8E8E8E881E8E881E8E8E8E8E8E8E85EE8E8E85ED7
      D75EE8E8E85E095EE8E881E8E8E881E8E881E8E8E8AC81ACE8E85E5EE8E85ED7
      D75EE8E8E8090909E8E88181E8E881E8E881E8E8E8818181E8E85ED75E5ED7D7
      5EE8E8E8E85E095EE8E881E88181E8E881E8E8E8E8AC81ACE8E85ED7D7D7D7D7
      5EE8E8E8E8E8E8E8E8E881E8E8E8E8E881E8E8E8E8E8E8E8E8E85ED7D7D7D7D7
      5E5E5E5EE85E095EE8E881E8E8E8E8E881818181E8AC81ACE8E85ED7D7D7D7D7
      D7D75EE8E8090909E8E881E8E8E8E8E8E8E881E8E8818181E8E85ED7D7D7D7D7
      D75EE8E8E85E09095EE881E8E8E8E8E8E881E8E8E8AC8181ACE85ED7D7D7D7D7
      5EE8E8E8E8E81009095E81E8E8E8E8E881E8E8E8E8E8818181AC5ED7D7D7D75E
      E8E8E8E8E8E8E809090981E8E8E8E881E8E8E8E8E8E8E88181815ED7D7D75EE8
      E8E8E85E095EE85E090981E8E8E881E8E8E8E8AC81ACE8AC81815ED7D75EE8E8
      E8E8E8090909E809090981E8E881E8E8E8E8E8818181E88181815ED75EE8E8E8
      E8E8E85E09090909095E81E881E8E8E8E8E8E8AC8181818181AC5E5EE8E8E8E8
      E8E8E8E85E0909095EE88181E8E8E8E8E8E8E8E8AC818181ACE8}
    NumGlyphs = 2
  end
  object RzBitBtn5: TRzBitBtn
    Left = 416
    Top = 8
    Width = 129
    Height = 49
    Caption = 'Out Point'
    Color = 15791348
    HighlightColor = 16026986
    HotTrack = True
    HotTrackColor = 3983359
    TabOrder = 8
    OnClick = RzBitBtn5Click
    Glyph.Data = {
      36060000424D3606000000000000360400002800000020000000100000000100
      0800000000000002000000000000000000000001000000000000000000003300
      00006600000099000000CC000000FF0000000033000033330000663300009933
      0000CC330000FF33000000660000336600006666000099660000CC660000FF66
      000000990000339900006699000099990000CC990000FF99000000CC000033CC
      000066CC000099CC0000CCCC0000FFCC000000FF000033FF000066FF000099FF
      0000CCFF0000FFFF000000003300330033006600330099003300CC003300FF00
      330000333300333333006633330099333300CC333300FF333300006633003366
      33006666330099663300CC663300FF6633000099330033993300669933009999
      3300CC993300FF99330000CC330033CC330066CC330099CC3300CCCC3300FFCC
      330000FF330033FF330066FF330099FF3300CCFF3300FFFF3300000066003300
      66006600660099006600CC006600FF0066000033660033336600663366009933
      6600CC336600FF33660000666600336666006666660099666600CC666600FF66
      660000996600339966006699660099996600CC996600FF99660000CC660033CC
      660066CC660099CC6600CCCC6600FFCC660000FF660033FF660066FF660099FF
      6600CCFF6600FFFF660000009900330099006600990099009900CC009900FF00
      990000339900333399006633990099339900CC339900FF339900006699003366
      99006666990099669900CC669900FF6699000099990033999900669999009999
      9900CC999900FF99990000CC990033CC990066CC990099CC9900CCCC9900FFCC
      990000FF990033FF990066FF990099FF9900CCFF9900FFFF99000000CC003300
      CC006600CC009900CC00CC00CC00FF00CC000033CC003333CC006633CC009933
      CC00CC33CC00FF33CC000066CC003366CC006666CC009966CC00CC66CC00FF66
      CC000099CC003399CC006699CC009999CC00CC99CC00FF99CC0000CCCC0033CC
      CC0066CCCC0099CCCC00CCCCCC00FFCCCC0000FFCC0033FFCC0066FFCC0099FF
      CC00CCFFCC00FFFFCC000000FF003300FF006600FF009900FF00CC00FF00FF00
      FF000033FF003333FF006633FF009933FF00CC33FF00FF33FF000066FF003366
      FF006666FF009966FF00CC66FF00FF66FF000099FF003399FF006699FF009999
      FF00CC99FF00FF99FF0000CCFF0033CCFF0066CCFF0099CCFF00CCCCFF00FFCC
      FF0000FFFF0033FFFF0066FFFF0099FFFF00CCFFFF00FFFFFF00000080000080
      000000808000800000008000800080800000C0C0C00080808000191919004C4C
      4C00B2B2B200E5E5E500C8AC2800E0CC6600F2EABF00B59B2400D8E9EC009933
      6600D075A300ECC6D900646F710099A8AC00E2EFF10000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000E8E8E8E8E8E8
      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8121212
      12121212121212E8E8E8E8E8E881818181818181818181E8E8E8E8E812181818
      1818121812121212E8E8E8E881E2E2E2E2E281E281818181E8E8E8E8121E1818
      1818181218121212E8E8E8E881ACE2E2E2E2E281E2818181E8E8E8E812181E18
      1818181812181212E8E8E8E881E2ACE2E2E2E2E281E28181E8E8E8E8121E181E
      1818181818121812E8E8E8E881ACE2ACE2E2E2E2E281E281E8E8E8E8121E1E18
      1E18181818181212E8E8E8E881ACACE2ACE2E2E2E2E28181E8E8E8E8128D1E1E
      181E181818181812E8E8E8E881E3ACACE2ACE2E2E2E2E281E8E8E8E8128D8D1E
      1E181E1818181812E8E8E8E881E3E3ACACE2ACE2E2E2E281E8E8E8E8E8121212
      12121212121212E8E8E8E8E8E881818181818181818181E8E8E8E8E8E8E8E8E8
      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8}
    NumGlyphs = 2
  end
  object Query1: TQuery
    OnCalcFields = Query1CalcFields
    DatabaseName = 'server'
    SessionName = 'Default'
    RequestLive = True
    SQL.Strings = (
      'select * FROM CONTACTLIST'
      'WHERE WPHONE=:MYTEL  or CRADNO=:myCARD')
    Left = 136
    Top = 152
    ParamData = <
      item
        DataType = ftString
        Name = 'MYTEL'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'myCARD'
        ParamType = ptUnknown
      end>
    object Query1ID: TIntegerField
      FieldName = 'ID'
      Origin = 'SERVER.CONTACTLIST.ID'
    end
    object Query1NAME: TStringField
      FieldName = 'NAME'
      Origin = 'SERVER.CONTACTLIST.NAME'
      Size = 50
    end
    object Query1COMPANY: TStringField
      FieldName = 'COMPANY'
      Origin = 'SERVER.CONTACTLIST.COMPANY'
      Size = 50
    end
    object Query1JOBDESCR: TStringField
      FieldName = 'JOBDESCR'
      Origin = 'SERVER.CONTACTLIST.JOBDESCR'
      Size = 30
    end
    object Query1WPHONE: TStringField
      FieldName = 'WPHONE'
      Origin = 'SERVER.CONTACTLIST.WPHONE'
    end
    object Query1HPHONE: TStringField
      FieldName = 'HPHONE'
      Origin = 'SERVER.CONTACTLIST.HPHONE'
    end
    object Query1CELL: TStringField
      FieldName = 'CELL'
      Origin = 'SERVER.CONTACTLIST.CELL'
    end
    object Query1ADDRESS1: TStringField
      FieldName = 'ADDRESS1'
      Origin = 'SERVER.CONTACTLIST.ADDRESS1'
      Size = 70
    end
    object Query1ADDRESS2: TStringField
      FieldName = 'ADDRESS2'
      Origin = 'SERVER.CONTACTLIST.ADDRESS2'
      Size = 70
    end
    object Query1FAX: TStringField
      FieldName = 'FAX'
      Origin = 'SERVER.CONTACTLIST.FAX'
    end
    object Query1EMAIL: TStringField
      FieldName = 'EMAIL'
      Origin = 'SERVER.CONTACTLIST.EMAIL'
      Size = 70
    end
    object Query1POBOX: TStringField
      FieldName = 'POBOX'
      Origin = 'SERVER.CONTACTLIST.POBOX'
      Size = 10
    end
    object Query1NOTE: TStringField
      FieldName = 'NOTE'
      Origin = 'SERVER.CONTACTLIST.NOTE'
      Size = 100
    end
    object Query1CRADNO: TStringField
      FieldName = 'CRADNO'
      Origin = 'SERVER.CONTACTLIST.CRADNO'
    end
    object Query1POINTIN: TFloatField
      FieldName = 'POINTIN'
      Origin = 'SERVER.CONTACTLIST.POINTIN'
    end
    object Query1POINTOUT: TFloatField
      FieldName = 'POINTOUT'
      Origin = 'SERVER.CONTACTLIST.POINTOUT'
    end
    object Query1BALANCE: TFloatField
      FieldName = 'BALANCE'
      Origin = 'SERVER.CONTACTLIST.BALANCE'
    end
    object Query1TOTAL: TFloatField
      FieldName = 'TOTAL'
      Origin = 'SERVER.CONTACTLIST.TOTAL'
    end
    object Query1BAL: TFloatField
      FieldKind = fkCalculated
      FieldName = 'BAL'
      DisplayFormat = '0'
      Calculated = True
    end
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 156
    Top = 202
  end
  object nrCommTAPI1: TnrCommTAPI
    Retries = 3
    PauseOnRepeat = 3000
    RingsBeforeAnswer = 0
    CountryCode = 0
    OnRing = nrCommTAPI1Ring
    DeviceIndex = -1
    Pulse = False
    DeviceModem.SpeakerVol = svLow
    DeviceModem.SpeakerMode = smCallSetup
    DeviceModem.InactivityTimeout = 0
    DeviceModem.CallFailTimer = 60
    DeviceModem.BaudRateMax = 115200
    DeviceModem.Options = [moErrorControl, moWaitTone]
    DeviceModem.FlowControl = spHardware
    Voice = False
    TerminalUsage = tuNone
    TerminalEcho = True
    EventListOnLine = False
    TraceStates = []
    EventChar = #0
    BufferInSize = 4096
    BufferOutSize = 4096
    TimeoutRead = 0
    TimeoutWrite = 10
    Left = 96
  end
  object MYORDER: TQuery
    DatabaseName = 'pos'
    SessionName = 'Default'
    SQL.Strings = (
      'select * from currfac'
      'where iactive='#39'D'#39
      'order by createtime,autono')
    Left = 546
    Top = 187
    object MYORDERID: TIntegerField
      FieldName = 'ID'
      Origin = 'POS.CURRFAC.ID'
    end
    object MYORDERAUTONO: TIntegerField
      FieldName = 'AUTONO'
      Origin = 'POS.CURRFAC.AUTONO'
    end
    object MYORDERFNO: TStringField
      FieldName = 'FNO'
      Origin = 'POS.CURRFAC.FNO'
    end
    object MYORDERVAT: TFloatField
      FieldName = 'VAT'
      Origin = 'POS.CURRFAC.VAT'
    end
    object MYORDERSUBTOTAL: TFloatField
      FieldName = 'SUBTOTAL'
      Origin = 'POS.CURRFAC.SUBTOTAL'
    end
    object MYORDERTOTAL: TFloatField
      FieldName = 'TOTAL'
      Origin = 'POS.CURRFAC.TOTAL'
    end
    object MYORDERCASHIN: TFloatField
      FieldName = 'CASHIN'
      Origin = 'POS.CURRFAC.CASHIN'
    end
    object MYORDERCASHOUT: TFloatField
      FieldName = 'CASHOUT'
      Origin = 'POS.CURRFAC.CASHOUT'
    end
    object MYORDERTABLENO: TStringField
      FieldName = 'TABLENO'
      Origin = 'POS.CURRFAC.TABLENO'
    end
    object MYORDERIACTIVE: TStringField
      FieldName = 'IACTIVE'
      Origin = 'POS.CURRFAC.IACTIVE'
      Size = 5
    end
    object MYORDERNAME: TStringField
      FieldName = 'NAME'
      Origin = 'POS.CURRFAC.NAME'
      Size = 50
    end
    object MYORDERCOVER: TIntegerField
      FieldName = 'COVER'
      Origin = 'POS.CURRFAC.COVER'
    end
    object MYORDERISTATE: TIntegerField
      FieldName = 'ISTATE'
      Origin = 'POS.CURRFAC.ISTATE'
    end
    object MYORDERLASTTIME: TDateTimeField
      FieldName = 'LASTTIME'
      Origin = 'POS.CURRFAC.LASTTIME'
    end
    object MYORDERCREATETIME: TDateTimeField
      FieldName = 'CREATETIME'
      Origin = 'POS.CURRFAC.CREATETIME'
    end
    object MYORDERDISCOUNT: TFloatField
      FieldName = 'DISCOUNT'
      Origin = 'POS.CURRFAC.DISCOUNT'
    end
    object MYORDERPRN: TStringField
      FieldName = 'PRN'
      Origin = 'POS.CURRFAC.PRN'
      Size = 5
    end
    object MYORDERCHEF: TStringField
      FieldName = 'CHEF'
      Origin = 'POS.CURRFAC.CHEF'
      Size = 30
    end
    object MYORDERSID: TStringField
      FieldName = 'SID'
      Origin = 'POS.CURRFAC.SID'
    end
    object MYORDERCONTACT: TIntegerField
      FieldName = 'CONTACT'
      Origin = 'POS.CURRFAC.CONTACT'
    end
    object MYORDERZALEID: TIntegerField
      FieldName = 'ZALEID'
      Origin = 'POS.CURRFAC.ZALEID'
    end
    object MYORDERSDISC: TFloatField
      FieldName = 'SDISC'
      Origin = 'POS.CURRFAC.SDISC'
    end
    object MYORDERPAID: TStringField
      FieldName = 'PAID'
      Origin = 'POS.CURRFAC.PAID'
      Size = 5
    end
  end
  object DMYORDER: TDataSource
    DataSet = MYORDER
    Left = 570
    Top = 155
  end
  object point: TQuery
    OnCalcFields = pointCalcFields
    DatabaseName = 'server'
    SessionName = 'Default'
    RequestLive = True
    SQL.Strings = (
      'select * FROM CONTACTLIST'
      'WHERE CRADNO=:MYTEL ')
    Left = 496
    Top = 264
    ParamData = <
      item
        DataType = ftString
        Name = 'MYTEL'
        ParamType = ptUnknown
      end>
    object pointID: TIntegerField
      FieldName = 'ID'
      Origin = 'SERVER.CONTACTLIST.ID'
    end
    object pointNAME: TStringField
      FieldName = 'NAME'
      Origin = 'SERVER.CONTACTLIST.NAME'
      Size = 50
    end
    object pointCOMPANY: TStringField
      FieldName = 'COMPANY'
      Origin = 'SERVER.CONTACTLIST.COMPANY'
      Size = 50
    end
    object pointJOBDESCR: TStringField
      FieldName = 'JOBDESCR'
      Origin = 'SERVER.CONTACTLIST.JOBDESCR'
      Size = 30
    end
    object pointWPHONE: TStringField
      FieldName = 'WPHONE'
      Origin = 'SERVER.CONTACTLIST.WPHONE'
    end
    object pointHPHONE: TStringField
      FieldName = 'HPHONE'
      Origin = 'SERVER.CONTACTLIST.HPHONE'
    end
    object pointCELL: TStringField
      FieldName = 'CELL'
      Origin = 'SERVER.CONTACTLIST.CELL'
    end
    object pointADDRESS1: TStringField
      FieldName = 'ADDRESS1'
      Origin = 'SERVER.CONTACTLIST.ADDRESS1'
      Size = 70
    end
    object pointADDRESS2: TStringField
      FieldName = 'ADDRESS2'
      Origin = 'SERVER.CONTACTLIST.ADDRESS2'
      Size = 70
    end
    object pointFAX: TStringField
      FieldName = 'FAX'
      Origin = 'SERVER.CONTACTLIST.FAX'
    end
    object pointEMAIL: TStringField
      FieldName = 'EMAIL'
      Origin = 'SERVER.CONTACTLIST.EMAIL'
      Size = 70
    end
    object pointPOBOX: TStringField
      FieldName = 'POBOX'
      Origin = 'SERVER.CONTACTLIST.POBOX'
      Size = 10
    end
    object pointNOTE: TStringField
      FieldName = 'NOTE'
      Origin = 'SERVER.CONTACTLIST.NOTE'
      Size = 100
    end
    object pointCRADNO: TStringField
      FieldName = 'CRADNO'
      Origin = 'SERVER.CONTACTLIST.CRADNO'
    end
    object pointPOINTIN: TFloatField
      FieldName = 'POINTIN'
      Origin = 'SERVER.CONTACTLIST.POINTIN'
    end
    object pointPOINTOUT: TFloatField
      FieldName = 'POINTOUT'
      Origin = 'SERVER.CONTACTLIST.POINTOUT'
    end
    object pointBALANCE: TFloatField
      FieldName = 'BALANCE'
      Origin = 'SERVER.CONTACTLIST.BALANCE'
    end
    object pointTOTAL: TFloatField
      FieldName = 'TOTAL'
      Origin = 'SERVER.CONTACTLIST.TOTAL'
    end
    object pointbal: TCurrencyField
      FieldKind = fkCalculated
      FieldName = 'bal'
      DisplayFormat = '0'
      Calculated = True
    end
  end
  object DPOINT: TDataSource
    DataSet = point
    Left = 556
    Top = 266
  end
  object contdet: TQuery
    DatabaseName = 'server'
    SessionName = 'Default'
    SQL.Strings = (
      'insert into'
      'CONTACTDET ('
      '  MId,'
      '  POINTIN ,'
      '  POINTOUT,'
      '  DDATE ,'
      '  DTIME ,'
      '  TOTAL ,'
      ' currfac'
      ')'
      
        'values(:mymid,:mypointin,:mypointout,:mydate,:mytime,:mytotal,:m' +
        'ycurrfac)')
    Left = 376
    Top = 464
    ParamData = <
      item
        DataType = ftInteger
        Name = 'mymid'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'mypointin'
        ParamType = ptUnknown
      end
      item
        DataType = ftCurrency
        Name = 'mypointout'
        ParamType = ptUnknown
      end
      item
        DataType = ftDate
        Name = 'mydate'
        ParamType = ptUnknown
      end
      item
        DataType = ftDateTime
        Name = 'mytime'
        ParamType = ptUnknown
      end
      item
        DataType = ftCurrency
        Name = 'mytotal'
        ParamType = ptUnknown
      end
      item
        DataType = ftInteger
        Name = 'mycurrfac'
        ParamType = ptUnknown
      end>
  end
  object frxcontactlist: TfrxDBDataset
    UserName = 'frxcontactlist'
    CloseDataSource = False
    FieldAliases.Strings = (
      'ID=ID'
      'NAME=NAME'
      'COMPANY=COMPANY'
      'JOBDESCR=JOBDESCR'
      'WPHONE=WPHONE'
      'HPHONE=HPHONE'
      'CELL=CELL'
      'ADDRESS1=ADDRESS1'
      'ADDRESS2=ADDRESS2'
      'FAX=FAX'
      'EMAIL=EMAIL'
      'POBOX=POBOX'
      'NOTE=NOTE'
      'CRADNO=CRADNO'
      'POINTIN=POINTIN'
      'POINTOUT=POINTOUT'
      'BALANCE=BALANCE'
      'TOTAL=TOTAL'
      'BAL=BAL')
    DataSource = DataSource1
    BCDToCurrency = False
    Left = 612
    Top = 297
  end
  object curr: TQuery
    OnCalcFields = Query1CalcFields
    DatabaseName = 'server'
    SessionName = 'Default'
    RequestLive = True
    SQL.Strings = (
      'select * FROM CONTACTLIST'
      'WHERE id=:myid')
    Left = 104
    Top = 408
    ParamData = <
      item
        DataType = ftInteger
        Name = 'myid'
        ParamType = ptUnknown
      end>
  end
end
