inherited FClientes: TFClientes
  Left = 378
  Top = 210
  ActiveControl = Edit1
  Caption = 'copia'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited CoolForm1: TCoolForm
    Mask2 = {
      3002000020000000010000002100000010020000040000000200000064010000
      030100001A000000020000004E01000003000000170000000300000051010000
      0400000015000000040000005301000005000000130000000500000055010000
      0600000012000000060000005601000007000000100000000700000058010000
      080000000F0000000800000059010000090000000E000000090000005A010000
      0A0000000C0000000A0000005C0100000C0000000B0000000C0000005D010000
      0D0000000A0000000D0000005E0100000E000000090000000E0000005F010000
      1000000008000000100000006001000011000000070000001100000061010000
      1300000006000000130000006201000015000000050000001500000063010000
      18000000040000001800000064010000ED00000005000000ED00000063010000
      F000000006000000F000000062010000F200000007000000F200000061010000
      F400000008000000F400000060010000F500000009000000F50000005F010000
      F70000000A000000F70000005E010000F80000000B000000F80000005D010000
      F90000000C000000F90000005C010000FB0000000E000000FB0000005A010000
      FC0000000F000000FC00000059010000FD00000010000000FD00000058010000
      FE00000012000000FE00000056010000FF00000013000000FF00000055010000
      0001000015000000000100005301000001010000170000000101000051010000
      020100001A000000020100004E01000003010000}
  end
  object Terminal: TLabel [1]
    Left = 72
    Top = 5
    Width = 209
    Height = 20
    Alignment = taCenter
    AutoSize = False
    Caption = 'Fichas de Clientes'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clAqua
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label1: TLabel [2]
    Left = 34
    Top = 41
    Width = 62
    Height = 20
    Caption = '&Buscar:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object SpeedButton1: TSpeedButton [3]
    Left = 329
    Top = 64
    Width = 23
    Height = 22
    Hint = 'Localizar cliente'
    Flat = True
    Glyph.Data = {
      8E030000424D8E03000000000000760000002800000042000000160000000100
      04000000000018030000C40E0000C40E00001000000010000000010102000000
      310039393900000063006F006F006C6C6C00000094000000B5000000E9006A00
      FF006F6FD900800080009400FF00AEAEAE008F8FCF00F3F3F300B2E75BBBBBBB
      BD2A83DBBBBBBBBBBBBBBBBBBBBBBBBBB2E75BBBBBBBBD2A83DBBB000000B170
      000000000036063DBBBBBBBBBBBBBBBBBBBBBBBBB170000000000036063DBB00
      0000B175FFFFFFFFFD365571FBBBBBBBBBBBBBBBBBBBBBBBB175FFFFFFFFFD36
      5571FB000000B0000000000FFD365B571FBBBB000000000000BBBBBBB0000000
      000FFD365B571F0000000FFFFFFFFFF0FD000DB280BBB0DDDDDDDDDDDD0BBBBB
      0FFFFFFFFFF0FD000DB2800000000FDFFFFFDFF0FD5BB5DB28BBB0D000000000
      0DD0BBBB0FDFFFFFDFF0FD5BB5DB280000000FFFFFFFFFF0FD5B50DBB0BBBB0D
      0FFFFFF0B0DD0BBB0FFFFFFFFFF0FD5B50DBB0000000B2FFFFFFFFFF2D5D550D
      BBBBB0000000000F0F0D0BBBB2FFFFFFFFFF2D5D550DBB000000B2FFD2DFD0FF
      00005BB2FBBBB0FFFFFFFFF0F00D0BBBB2FFD2DFD0FF00005BB2FB000000082F
      55FF2FFFF174BD50FBBBBB0F00F00FFF0F0D0BBB082F55FF2FFFF174BD50FB00
      0000800002200500174C60DBBBBBBB0FFFFFFFFF0F0D0BBB800002200500174C
      60DBBB00000082FD25FD2FDD1739B00DBBBBB000FFFFFFFFF0000BBB82FD25FD
      2FDD1739B00DBB00000008000220050001736DF2FBBBB0800F00000F00080BBB
      08000220050001736DF2FB000000BB2F55FF2FFFF0005500FBBBB080FFFFFFFF
      F0080BBBBB2F55FF2FFFF0005500FB000000BB2FD2DFD0FFF2D5FF50FBBBB000
      FFFFFFFFF0F00BBBBB2FD2DFD0FFF2D5FF50FB000000BB2FFFFFFFFFF2D5FFF2
      0FBBBBB0F000F00FF0F0BBBBBB2FFFFFFFFFF2D5FFF20F000000BB2FDDDDDFDF
      F2FD5FFF2FBBBBB0FFFFFFFFF000BBBBBB2FDDDDDFDFF2FD5FFF2F000000BB2F
      FFFFFFFFF2FD00000FBBBBB0FFF0000000BBBBBBBB2FFFFFFFFFF2FD00000F00
      0000BB2FDDDDFFFFF2FD0DBBBBBBBBBB000BBBBBBBBBBBBBBB2FDDDDFFFFF2FD
      0DBBBB000000BB2FDDDDDFFFF2FF5DBBBBBBBBBBBBBBBBBBBBBBBBBBBB2FDDDD
      DFFFF2FF5DBBBB000000BB2FFFFFFFFFF0000DBBBBBBBBBBBBBBBBBBBBBBBBBB
      BB2FFFFFFFFFF0000DBBBB000000BB000000000002BBBBBBBBBBBBBBBBBBBBBB
      BBBBBBBBBB000000000002BBBBBBBB000000}
    NumGlyphs = 3
    ParentShowHint = False
    ShowHint = True
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton [4]
    Left = 329
    Top = 96
    Width = 23
    Height = 22
    Hint = 'Alta de clientes'
    Flat = True
    Glyph.Data = {
      0E0A0000424D0E0A000000000000360400002800000042000000160000000100
      080000000000D8050000C40E0000C40E00000001000000010000000000000000
      5500000080000000AA000000D5000000FF00002B0000002B5500002B8000002B
      AA00002BD500002BFF000055000000555500005580000055AA000055D5000055
      FF000080000000805500008080000080AA000080D5000080FF0000AA000000AA
      550000AA800000AAAA0000AAD50000AAFF0000D5000000D5550000D5800000D5
      AA0000D5D50000D5FF0000FF000000FF550000FF800000FFAA0000FFD50000FF
      FF005500000055005500550080005500AA005500D5005500FF00552B0000552B
      5500552B8000552BAA00552BD500552BFF005555000055555500555580005555
      AA005555D5005555FF005580000055805500558080005580AA005580D5005580
      FF0055AA000055AA550055AA800055AAAA0055AAD50055AAFF0055D5000055D5
      550055D5800055D5AA0055D5D50055D5FF0055FF000055FF550055FF800055FF
      AA0055FFD50055FFFF008000000080005500800080008000AA008000D5008000
      FF00802B0000802B5500802B8000802BAA00802BD500802BFF00805500008055
      5500805580008055AA008055D5008055FF008080000080805500808080008080
      AA008080D5008080FF0080AA000080AA550080AA800080AAAA0080AAD50080AA
      FF0080D5000080D5550080D5800080D5AA0080D5D50080D5FF0080FF000080FF
      550080FF800080FFAA0080FFD50080FFFF00AA000000AA005500AA008000AA00
      AA00AA00D500AA00FF00AA2B0000AA2B5500AA2B8000AA2BAA00AA2BD500AA2B
      FF00AA550000AA555500AA558000AA55AA00AA55D500AA55FF00AA800000AA80
      5500AA808000AA80AA00AA80D500AA80FF00AAAA0000AAAA5500AAAA8000AAAA
      AA00AAAAD500AAAAFF00AAD50000AAD55500AAD58000AAD5AA00AAD5D500AAD5
      FF00AAFF0000AAFF5500AAFF8000AAFFAA00AAFFD500AAFFFF00D5000000D500
      5500D5008000D500AA00D500D500D500FF00D52B0000D52B5500D52B8000D52B
      AA00D52BD500D52BFF00D5550000D5555500D5558000D555AA00D555D500D555
      FF00D5800000D5805500D5808000D580AA00D580D500D580FF00D5AA0000D5AA
      5500D5AA8000D5AAAA00D5AAD500D5AAFF00D5D50000D5D55500D5D58000D5D5
      AA00D5D5D500D5D5FF00D5FF0000D5FF5500D5FF8000D5FFAA00D5FFD500D5FF
      FF00FF000000FF005500FF008000FF00AA00FF00D500FF00FF00FF2B0000FF2B
      5500FF2B8000FF2BAA00FF2BD500FF2BFF00FF550000FF555500FF558000FF55
      AA00FF55D500FF55FF00FF800000FF805500FF808000FF80AA00FF80D500FF80
      FF00FFAA0000FFAA5500FFAA8000FFAAAA00FFAAD500FFAAFF00FFD50000FFD5
      5500FFD58000FFD5AA00FFD5D500FFD5FF00FFFF0000FFFF5500FFFF8000FFFF
      AA00FFFFD5003F3F3F006B6B6B0095959500C0C0C000FFFFFF00F6F6F6F6F6F6
      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F60505050505050505F6
      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F60000F6F6
      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F605050505050505
      0505050505F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
      0000F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F605050505
      05050505050505050505F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
      F6F6F6F6000000000000000000000000000000000000000000000000F6F6F605
      050505FAFAFAFAFAFAFA0505050505F6F6F60000000000000000000000000000
      0000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00
      F6F605050505FAFAFAFAFAFAFAFAFAFA05050505F6F600FFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFF00000000FFFF1D1DFFFF1D1DFFFF1D1DFFFF1D1DFF
      FF1DFF00F6050505050505FAFAFAFAFAFAFAFAFAFA05050505F600FF1DFFFF1D
      1DFFFF1D1DFFFF1D1DFFFF1D1DFFFF00000000FF1DFFFF1D1DFFFF1D1DFFFF1D
      1DFFFF1D1DFFFF00F605050505050505FAFA000000000000FAFA050505F600FF
      FF1D1DFFFF1D1DFFFF1D1DFFFF1D1DFFFF1DFF00000000FFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFF0000000000FA0505050500FEFEFEFEFEFE00FAFA05
      050500FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000FFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0054D254D2000005050505FFFFFF000000
      0000FA05050500FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000FF
      FFFFFFFFFF000000000000FFFF0000000000FF00D254D25400FEFE05050505FF
      FFFFFEFEFEFE0005050500FFFFFFFFFFFF000000000000FFFF0000000000FF00
      000000FF0505D205FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00D2D2D2D200FFFFFF
      05050505FF0000000000FA05050500FFD2D229D2FFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFF00000000FF292905FFFF000000FF000000000000FF0000FF00D2D2D2D2
      000000FFFF05050505FFFEFEFE00FA05050500FF0505D2FFFF000000FF000000
      000000FF0000FF00000000FF2905D229FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00
      0000000000FAFA00FFFF05050505000000FAFA05050500FF05D22905FFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFF00000000FF0529D2FFFF0000000000FF0000FF0000
      0000FF00050505FAFAFAFAFA00FFFF05050505FAFAFAFA05050500FFD20529FF
      FF0000000000FF0000FF00000000FF00000000FFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFF00050505FAFAFAFAFAFA0000FF05050505FAFAFA05050500FF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000000000000000000000
      000000000000000000000000F6050505FAFAFAFAFAFAFA00FF05050505FA0505
      05F6000000000000000000000000000000000000000000000000F6F6F6F6F6F6
      F6F600FEFEFEFEFE00F6F6F6F6F6F6F6F605050505FAFAFAFAFAFAFA00000505
      0505050505F6F6F6F6F6F6F6F6F600FEFEFEFEFE00F6F6F6F6F6F6F60000F6F6
      F6F6F6F6F6F6F600FE00FE00F6F6F6F6F6F6F6F6F6F605050505FAFAFAFAFAFA
      FAFAFA0505050505F6F6F6F6F6F6F6F6F6F6F600FE00FE00F6F6F6F6F6F6F6F6
      0000F6F6F6F6F6F6F6F600FEFEFEFEFE00F6F6F6F6F6F6F6F6F6F60505050505
      FAFAFAFAFAFA0505050505F6F6F6F6F6F6F6F6F6F6F600FEFEFEFEFE00F6F6F6
      F6F6F6F60000F6F6F6F6F6F6F6F6F60000000000F6F6F6F6F6F6F6F6F6F6F6F6
      0505050505050505050505050505F6F6F6F6F6F6F6F6F6F6F6F6F60000000000
      F6F6F6F6F6F6F6F60000F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
      F6F6F6F6F6050505050505050505050505F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
      F6F6F6F6F6F6F6F6F6F6F6F60000F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
      F6F6F6F6F6F6F6F6F6F6F60505050505050505F6F6F6F6F6F6F6F6F6F6F6F6F6
      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F60000}
    NumGlyphs = 3
    ParentShowHint = False
    ShowHint = True
    OnClick = SpeedButton2Click
  end
  object Label2: TLabel [5]
    Left = 34
    Top = 65
    Width = 68
    Height = 20
    Caption = 'Nombre:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label3: TLabel [6]
    Left = 34
    Top = 113
    Width = 28
    Height = 20
    Caption = 'Nif:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label4: TLabel [7]
    Left = 178
    Top = 113
    Width = 31
    Height = 20
    Caption = 'Tlf.:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label5: TLabel [8]
    Left = 34
    Top = 137
    Width = 162
    Height = 20
    Caption = 'Tiempo RESTANTE:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clYellow
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Dig1: TDigitNum [9]
    Left = 44
    Top = 168
    Width = 65
    Height = 55
    Brush.Style = bsClear
    LED_OFF = clBlack
    LED_BRDon = clWhite
    LED_BRDoff = clBlue
    Value = 12
    MaxLength = 2
  end
  object Shape2: TShape [10]
    Left = 109
    Top = 199
    Width = 10
    Height = 10
    Brush.Color = clRed
    Pen.Color = clWhite
    Shape = stCircle
  end
  object Shape1: TShape [11]
    Left = 109
    Top = 178
    Width = 10
    Height = 10
    Brush.Color = clRed
    Pen.Color = clWhite
    Shape = stCircle
  end
  object Dig2: TDigitNum [12]
    Left = 124
    Top = 168
    Width = 65
    Height = 55
    Brush.Style = bsClear
    LED_OFF = clBlack
    LED_BRDon = clWhite
    LED_BRDoff = clBlue
    Value = 12
    MaxLength = 2
  end
  object Label6: TLabel [13]
    Left = 34
    Top = 41
    Width = 148
    Height = 20
    Caption = 'Código de Cliente:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clYellow
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object DBText1: TDBText [14]
    Left = 208
    Top = 40
    Width = 121
    Height = 25
    Alignment = taRightJustify
    DataField = 'CodCliente1'
    DataSource = DsPersonas
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clLime
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  inherited Button1: TButton
    TabOrder = 9
  end
  object Edit1: TEdit
    Left = 205
    Top = 40
    Width = 121
    Height = 21
    TabOrder = 1
    OnKeyUp = Edit1KeyUp
  end
  object DBGrid1: TDBGrid
    Left = 32
    Top = 64
    Width = 294
    Height = 168
    DataSource = DsPersonas
    ReadOnly = True
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDblClick = DBGrid1DblClick
  end
  object SelIndex: TComboBox
    Left = 98
    Top = 40
    Width = 105
    Height = 21
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    ParentFont = False
    TabOrder = 0
    Text = 'Nombre'
    OnChange = SelIndexChange
    Items.Strings = (
      'CodCliente1'
      'Nombre'
      'Apellidos'
      'Telefono 1')
  end
  object DBEdit1: TDBEdit
    Left = 104
    Top = 64
    Width = 121
    Height = 21
    DataField = 'Nombre'
    DataSource = DsPersonas
    TabOrder = 3
    OnKeyUp = DBEdit1KeyUp
  end
  object DBEdit2: TDBEdit
    Left = 104
    Top = 88
    Width = 217
    Height = 21
    DataField = 'Apellidos'
    DataSource = DsPersonas
    TabOrder = 4
    OnKeyUp = DBEdit2KeyUp
  end
  object DBEdit3: TDBEdit
    Left = 72
    Top = 112
    Width = 97
    Height = 21
    DataField = 'DocumentoDNP'
    DataSource = DsPersonas
    TabOrder = 5
    OnKeyUp = DBEdit3KeyUp
  end
  object DBEdit4: TDBEdit
    Left = 208
    Top = 112
    Width = 113
    Height = 21
    DataField = 'Telefono 1'
    DataSource = DsPersonas
    TabOrder = 6
    OnKeyUp = DBEdit4KeyUp
  end
  object Button2: TButton
    Left = 208
    Top = 138
    Width = 113
    Height = 17
    Caption = '&Comprar Bono'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 7
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 208
    Top = 170
    Width = 113
    Height = 47
    Caption = '&USAR BONO'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 8
    OnClick = Button3Click
  end
  object DsPersonas: TDataSource
    DataSet = CtrlPPal.TbPersonas
    OnDataChange = DsPersonasDataChange
  end
  object TbBonos: TTable
    BeforeOpen = TbBonosBeforeOpen
    TableName = 'datos\bonos.db'
    Top = 232
  end
end