451 lines
15 KiB
Plaintext
451 lines
15 KiB
Plaintext
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
|