935 lines
36 KiB
Plaintext
935 lines
36 KiB
Plaintext
object BlMVnt: TBlMVnt
|
|
Left = 192
|
|
Top = 124
|
|
Width = 640
|
|
Height = 480
|
|
HorzScrollBar.Visible = False
|
|
VertScrollBar.Visible = False
|
|
Caption = 'Balance periódico de ventas...'
|
|
Color = clBtnFace
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = 'Verdana'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
Position = poScreenCenter
|
|
Scaled = False
|
|
PixelsPerInch = 96
|
|
TextHeight = 16
|
|
object StatusBar1: TStatusBar
|
|
Left = 0
|
|
Top = 430
|
|
Width = 632
|
|
Height = 19
|
|
Panels = <
|
|
item
|
|
Width = 450
|
|
end
|
|
item
|
|
Text = 'Compras'
|
|
Width = 95
|
|
end
|
|
item
|
|
Text = 'Facturas'
|
|
Width = 95
|
|
end>
|
|
SimplePanel = False
|
|
end
|
|
object Panel2: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 632
|
|
Height = 34
|
|
Align = alTop
|
|
BorderStyle = bsSingle
|
|
TabOrder = 1
|
|
object SpeedButton1: TSpeedButton
|
|
Left = 8
|
|
Top = 3
|
|
Width = 25
|
|
Height = 25
|
|
Flat = True
|
|
Glyph.Data = {
|
|
F6000000424DF600000000000000760000002800000010000000100000000100
|
|
04000000000080000000CE0E0000D80E00001000000000000000000000000000
|
|
80000080000000808000800000008000800080800000C0C0C000808080000000
|
|
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
|
|
7777777777777777777777777777777771F77771F7777777777777111F777777
|
|
1F7777111F777771F777777111F77711F7777777111F711F77777777711111F7
|
|
7777777777111F7777777777711111F777777777111F71F77777771111F77711
|
|
F77771111F7777711F77711F7777777711F77777777777777777}
|
|
OnClick = SpeedButton1Click
|
|
end
|
|
object SpeedButton2: TSpeedButton
|
|
Left = 100
|
|
Top = 3
|
|
Width = 25
|
|
Height = 25
|
|
Enabled = False
|
|
Flat = True
|
|
Glyph.Data = {
|
|
F6000000424DF600000000000000760000002800000010000000100000000100
|
|
04000000000080000000CE0E0000C40E00001000000000000000000000000000
|
|
80000080000000808000800000008000800080800000C0C0C000808080000000
|
|
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
|
|
7777777777777777777700000777770000070F000777770F00070F000777770F
|
|
0007000000070000000700F000000F00000700F000700F00000700F000700F00
|
|
00077000000000000077770F00070F0007777700000700000777777000777000
|
|
77777770F07770F0777777700077700077777777777777777777}
|
|
end
|
|
object BusqSig: TSpeedButton
|
|
Left = 126
|
|
Top = 3
|
|
Width = 25
|
|
Height = 25
|
|
Enabled = False
|
|
Flat = True
|
|
Glyph.Data = {
|
|
76010000424D7601000000000000760000002800000020000000100000000100
|
|
04000000000000010000130B0000130B00001000000000000000000000000000
|
|
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
|
|
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
|
|
33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
|
|
00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
|
|
70E337F33333333337F3E0F33333333370E337F333FF3F3337F3E0F330030333
|
|
70E337F3377F7FF337F3E0F33003003370E337F3377F77FF37F3E0F330030003
|
|
70E337F3377F777337F3E0F33003003370E337F3377F773337F3E0F330030333
|
|
70E337F33773733337F3E0F33333333370E337F33333333337F3E0F333333333
|
|
70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
|
|
00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
|
|
NumGlyphs = 2
|
|
end
|
|
object SpeedButton4: TSpeedButton
|
|
Left = 48
|
|
Top = 3
|
|
Width = 25
|
|
Height = 25
|
|
Flat = True
|
|
Glyph.Data = {
|
|
76010000424D7601000000000000760000002800000020000000100000000100
|
|
04000000000000010000130B0000130B00001000000010000000000000000000
|
|
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
|
|
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
|
|
33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
|
|
00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
|
|
70E337F33333F33337F3E0F33333033370E337F3333FF73337F3E0F333300333
|
|
70E337F333FF773337F3E0F33300033370E337F33FF7773337F3E0F330000333
|
|
70E337F33377773337F3E0F33300033370E337F33337773337F3E0F333300333
|
|
70E337F33333773337F3E0F33333033370E337F33333373337F3E0F333333333
|
|
70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
|
|
00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
|
|
NumGlyphs = 2
|
|
end
|
|
object BusqAnt: TSpeedButton
|
|
Left = 74
|
|
Top = 3
|
|
Width = 25
|
|
Height = 25
|
|
Enabled = False
|
|
Flat = True
|
|
Glyph.Data = {
|
|
76010000424D7601000000000000760000002800000020000000100000000100
|
|
04000000000000010000130B0000130B00001000000000000000000000000000
|
|
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
|
|
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
|
|
33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
|
|
00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
|
|
70E337F33333333337F3E0F33333333370E337F3333F3FF337F3E0F333030033
|
|
70E337F3337F77F337F3E0F33003003370E337F3377F77F337F3E0F300030033
|
|
70E337F3777F77F337F3E0F33003003370E337F3377F77F337F3E0F333030033
|
|
70E337F33373773337F3E0F33333333370E337F33333333337F3E0F333333333
|
|
70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
|
|
00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
|
|
NumGlyphs = 2
|
|
end
|
|
object SpeedButton6: TSpeedButton
|
|
Left = 152
|
|
Top = 3
|
|
Width = 25
|
|
Height = 25
|
|
Flat = True
|
|
Glyph.Data = {
|
|
76010000424D7601000000000000760000002800000020000000100000000100
|
|
04000000000000010000130B0000130B00001000000000000000000000000000
|
|
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
|
|
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
|
|
33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
|
|
00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
|
|
70E337F3333F333337F3E0F33303333370E337F3337FF33337F3E0F333003333
|
|
70E337F33377FF3337F3E0F33300033370E337F333777FF337F3E0F333000033
|
|
70E337F33377773337F3E0F33300033370E337F33377733337F3E0F333003333
|
|
70E337F33377333337F3E0F33303333370E337F33373333337F3E0F333333333
|
|
70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
|
|
00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
|
|
NumGlyphs = 2
|
|
end
|
|
object Clientes: TSpeedButton
|
|
Left = 216
|
|
Top = 3
|
|
Width = 25
|
|
Height = 25
|
|
Hint = 'Mostrar ventas a clientes'
|
|
Flat = True
|
|
Glyph.Data = {
|
|
8E030000424D8E03000000000000760000002800000042000000160000000100
|
|
04000000000018030000C40E0000C40E00001000000000000000000000000000
|
|
80000080000000808000800000008000800080800000C0C0C000808080000000
|
|
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
|
|
EEEEEEEEEEEEEEEEE99999999EEEEEEE5555555555555555555555000000EEEE
|
|
88EEEEEEEEE88EEEEEEEEEE999999999999EEEEE555555555555555555555500
|
|
0000EE8EE8EEEEEEEE88EEEEEEEEEE99999999999999EEEE5555555555555555
|
|
555555000000EEEE8EEEE000EEEEEEEEEEEEE9999FFFFFFF99999EEE2AAAAA2B
|
|
C4B2ACACC22555000000EEEEEEEE07080EEEEEEEEEEE9999FFFFFFFFFF9999EE
|
|
2AAAAA2C44C2ACAC222255000000EEEEE000F0F000EEEEEEEEE999999FFFFFFF
|
|
FFF9999E2AAAAA2B4CB2ACACC2A225000000EEEE0F0707070000EEEEEEE99999
|
|
99FF000000FF999E2CACCA2C44B2AAAAA2A222000000EEEE0070707FF7880EEE
|
|
EE0000F999907777770FF9992CAC2A2BC4C2AAAAA2A2A2000000EEEE0FFFFFFF
|
|
F0000EEEEE4C4C009999FFF00000F9992CACCA2B44B2AAAAA2A2A2000000EE00
|
|
FFFF00FF07770EEEEEC4C40779999FFF777709992222222BBBB2222222A2A200
|
|
0000E060FFF0FF00FFFF8000EECCCC0FFF9999F00000F9992222222BBBB22222
|
|
2AA2A2000000E0607FFF0FFFFFFF0B080ECCCC000FF9999F7770F9992AAAAA2B
|
|
C4B2ACACC2AAA2000000006607F000000FF0BB080000000FF0FF9999000FF999
|
|
2AAAAA2C44C2ACAC22A2A20000006606600EEEEEE00B008788999FFFFF0FF999
|
|
9FFFF9992AAAAA2B4CB2ACACC2A2A20000006600660EEEEEE0BB077888999FFF
|
|
FFF00F9999FFF9992CACCA2C44B2AAAAA2A2A2000000666000EEEEEEE0007787
|
|
78E999FFFFFFF0F9999F999E2CAC2A2BC4C2AAAAA2A2A200000066660EEEEEEE
|
|
EE8FF778E8E9999FFFFFFF009999999E2CACCA2B44B2AAAAA2A2A20000006666
|
|
EEEEEEEEEE0FF777E8EE9999FFFFFFFFF99999EE2222222BBBBB222222A2A200
|
|
00006660EEEEEEEEEEE07FF7EEEEE99999FFFFFF99999EEE522AAAA2BBBBB2AA
|
|
AA22A20000006660EEEEEEEEEEE0F77FEEEEEE99999999999999EEEE55222222
|
|
2BBBBB222222A2000000660EEEEEEEEEEEE07FFEEE5EEEE999999999999EEEEE
|
|
55522AAAA2BBBBB2AAAA22000000E6EEEEEEEEEEEEEE0FEEEE5EEEEEE9999999
|
|
9EEEEEEE5555555555555555555555000000}
|
|
NumGlyphs = 3
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
OnClick = ClientesClick
|
|
end
|
|
object Productos: TSpeedButton
|
|
Left = 268
|
|
Top = 3
|
|
Width = 25
|
|
Height = 25
|
|
Hint = 'Mostrar ventas por producto'
|
|
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
|
|
AA00FFFFD5003F3F3F006B6B6B0095959500C0C0C000FFFFFF00FFFFFFFFFFFF
|
|
FFFFFFFF00FFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFF0505050505050505FF
|
|
FFFFFFFFFFFFFFFFFFFF00000E0E0E0E0016161600FFFFFFFFFFFFFF0000FFFF
|
|
FFFFFFFFFFFF0000000000FFFFFFFFFF00D22900FFFFFFFFFF05050505050505
|
|
0505050505FFFFFFFFFFFFFF00000E0E0E0E0E0E00161616160000FFFFFFFFFF
|
|
0000FFFFFFFFFFFF00000E0E00161600FFFFFF00D229FE00FFFFFFFF05050505
|
|
05050505050505050505FFFFFFFFFF000E0E0E0E0E0E0E0E0016161616161600
|
|
FFFFFFFF0000FFFFFFFF00000E0E0E0E0016161600FF00D229FE00FFFFFFFF05
|
|
050505FAFAFAFAFAFAFA0505050505FFFFFFFF000E0E0E0E0E0E0E0E00161616
|
|
1616161600FFFFFF0000FFFF00000E0E0E0E0E0E680000000000D229FE00FFFF
|
|
FFFF05050505FAFAFAFAFAFAFAFAFAFA05050505FFFFFF000E0E0E0E0E0E0E0E
|
|
00161616232316161600FFFF0000FF000E0E0E0E0E0E0E0068FFFFFF680000FE
|
|
00FFFFFFFF050505050505FAFAFAFAFAFAFAFAFAFA05050505FFFF000E0E0E0E
|
|
0E0E0E0E00161616242323161600FFFF0000FF000E0E0E0E0E0E6868FFFFFAFF
|
|
FF68000000FFFFFFFF05050505050505FAFA000000000000FAFA050505FFFF00
|
|
0E00000E0E0E0E0E00161616232324231600FFFF0000FF000E0E0E0E0E0E00FF
|
|
FFFAFFFFFFFF68001600FFFF00000000FA0505050500FEFEFEFEFEFE00FAFA05
|
|
0505FF000E000E0000000E0E00161616242423242300FFFF0000FF000E0E0E0E
|
|
0E0E00FFFAFFFFFFFFFF68001600FFFF54D254D2000005050505FFFFFF000000
|
|
0000FA050505FF000E000E0E0E0E000000161616232324232400FFFF0000FF00
|
|
0E0E0E0E0E0E00FFFFFFFFFAFAFF68001600FFFFD254D25400FEFE05050505FF
|
|
FFFFFEFEFEFE00050505FF00000E0E0E0E0000FC00000016232423242300FFFF
|
|
0000FF000E0E0E0E0E0E0068FFFFFFFAFA6868002300FFFFD2D2D2D200FFFFFF
|
|
05050505FF0000000000FA050505FF00000E0E0000FDFD00FD00160016162324
|
|
2300FFFF0000FF000E0E0E0E0E0E0E0068FFFFFF686800232400FFFFD2D2D2D2
|
|
000000FFFF05050505FFFEFEFE00FA050505FF00000000FDFDFDFDFCFDFD0016
|
|
000016231600FFFF0000FF000E0E0E0E0E00000E00686868680000232300FFFF
|
|
0000000000FAFA00FFFF05050505000000FAFA050505FF0000FDFDFDFDFDFD00
|
|
FDFD0016161600001600FFFF0000FF000E0E0E00000E0E0E0000000000162324
|
|
2300FFFF050505FAFAFAFAFA00FFFF05050505FAFAFAFA050505FFFF00FDFDFD
|
|
FDFDFDFCFDFD0016161616160000FFFF0000FF000E00000E0E0E0E0E00161616
|
|
000016231600FFFF050505FAFAFAFAFAFA0000FF05050505FAFAFA000505FF00
|
|
0E0000FDFDFDFD00FDFDFD00161600000000FFFF0000FF000000000000000000
|
|
00161616161600001600FFFFFF050505FAFAFAFAFAFAFA00FF05050505FA0505
|
|
05FFFF000E0E0E00FDFDFDFCFDFDFD000000FD0000FFFFFF0000FFFF000E0E0E
|
|
0E0E0E0023000000000000000000FFFFFF05050505FAFAFAFAFAFAFA00000505
|
|
0505050505FFFF000E0E0E0E00FDFD00FDFDFDFD0000001600FFFFFF0000FFFF
|
|
FF00000E0E0E0E0000161616161616161600FFFFFFFF05050505FAFAFAFAFAFA
|
|
FAFAFA0505050505FFFFFF000E0E0E0E0E00FDFCFD0000001616161600FFFFFF
|
|
0000FFFFFFFFFF000E0E0E00161616161616160000FFFFFFFFFFFF0505050505
|
|
FAFAFAFAFAFA0505050505FFFFFFFF000E0E0E0E0E0E00000016161616161616
|
|
00FFFFFF0000FFFFFFFFFFFF000E0E0016161616000000FFFFFFFFFFFFFFFFFF
|
|
0505050505050505050505050505FFFFFFFFFF000E0E0E000000FFFFFF000016
|
|
16161600FFFFFFFF0000FFFFFFFFFFFFFF00000016000000FFFFFFFFFFFFFFFF
|
|
FFFFFFFFFF050505050505050505050505FFFFFFFFFFFF000E0000FFFFFFFFFF
|
|
FFFFFF0000161600FFFFFFFF0000FFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFF
|
|
FFFFFFFFFFFFFFFFFFFFFF0505050505050505FFFFFFFFFFFFFFFF0000FFFFFF
|
|
FFFFFFFFFFFFFFFFFF000000FFFFFFFF0000}
|
|
NumGlyphs = 3
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
OnClick = ProductosClick
|
|
end
|
|
object Empleados: TSpeedButton
|
|
Left = 242
|
|
Top = 3
|
|
Width = 25
|
|
Height = 25
|
|
Hint = 'Mostrar ventas por empleado'
|
|
Flat = True
|
|
Glyph.Data = {
|
|
0E0A0000424D0E0A000000000000360400002800000042000000160000000100
|
|
080000000000D8050000C40E0000C40E00000001000000000000000000000000
|
|
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 = EmpleadosClick
|
|
end
|
|
object bImpresion: TSpeedButton
|
|
Left = 322
|
|
Top = 3
|
|
Width = 25
|
|
Height = 25
|
|
Flat = True
|
|
Glyph.Data = {
|
|
4E010000424D4E01000000000000760000002800000012000000120000000100
|
|
040000000000D800000000000000000000001000000010000000000000000000
|
|
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
|
|
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
|
|
DDDDDD000000DDD00000000000DDDD000000DD0777777777070DDD000000D000
|
|
000000000070DD000000D0777777FFF77000DD000000D077777799977070DD00
|
|
0000D0000000000000770D000000D0777777777707070D000000DD0000000000
|
|
70700D000000DDD0FFFFFFFF07070D000000DDDD0FCCCCCF0000DD000000DDDD
|
|
0FFFFFFFF0DDDD000000DDDDD0FCCCCCF0DDDD000000DDDDD0FFFFFFFF0DDD00
|
|
0000DDDDDD000000000DDD000000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDD
|
|
DDDDDD000000DDDDDDDDDDDDDDDDDD000000}
|
|
OnClick = bImpresionClick
|
|
end
|
|
object bGraficas: TSpeedButton
|
|
Left = 185
|
|
Top = 3
|
|
Width = 25
|
|
Height = 25
|
|
Flat = True
|
|
Glyph.Data = {
|
|
76010000424D7601000000000000760000002800000020000000100000000100
|
|
04000000000000010000120B0000120B00001000000000000000000000000000
|
|
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
|
|
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337333733373
|
|
3373337F3F7F3F7F3F7F33737373737373733F7F7F7F7F7F7F7F770000000000
|
|
000077777777777777773303333333333333337FF333333F33333709333333C3
|
|
333337773F3FF373F333330393993C3C33333F7F7F77F7F7FFFF77079797977C
|
|
77777777777777777777330339339333C333337FF73373F37F33370C333C3933
|
|
933337773F3737F37FF33303C3C33939C9333F7F7F7FF7F777FF7707C7C77797
|
|
7C97777777777777777733033C3333333C33337F37F33333373F37033C333333
|
|
33C3377F37333333337333033333333333333F7FFFFFFFFFFFFF770777777777
|
|
7777777777777777777733333333333333333333333333333333}
|
|
NumGlyphs = 2
|
|
OnClick = bGraficasClick
|
|
end
|
|
object FechaCaja: TDateTimePicker
|
|
Left = 536
|
|
Top = 3
|
|
Width = 89
|
|
Height = 24
|
|
CalAlignment = dtaLeft
|
|
Date = 36080
|
|
Time = 36080
|
|
DateFormat = dfShort
|
|
DateMode = dmComboBox
|
|
Kind = dtkDate
|
|
ParseInput = False
|
|
TabOrder = 0
|
|
OnCloseUp = FechaCajaChange
|
|
OnChange = FechaCajaChange
|
|
end
|
|
object FechaCajaMin: TDateTimePicker
|
|
Left = 432
|
|
Top = 3
|
|
Width = 92
|
|
Height = 24
|
|
CalAlignment = dtaLeft
|
|
Date = 36080
|
|
Time = 36080
|
|
DateFormat = dfShort
|
|
DateMode = dmComboBox
|
|
Kind = dtkDate
|
|
ParseInput = False
|
|
TabOrder = 1
|
|
OnCloseUp = FechaCajaChange
|
|
OnChange = FechaCajaChange
|
|
end
|
|
end
|
|
object PageControl1: TPageControl
|
|
Left = 0
|
|
Top = 34
|
|
Width = 632
|
|
Height = 231
|
|
ActivePage = Ventas
|
|
Align = alTop
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -13
|
|
Font.Name = 'Arial'
|
|
Font.Style = []
|
|
MultiLine = True
|
|
ParentFont = False
|
|
TabOrder = 2
|
|
TabPosition = tpRight
|
|
object Ventas: TTabSheet
|
|
Caption = 'Ventas'
|
|
object PageControl3: TPageControl
|
|
Left = 0
|
|
Top = 0
|
|
Width = 604
|
|
Height = 221
|
|
ActivePage = VentasCompletas
|
|
Align = alClient
|
|
TabOrder = 0
|
|
object VentasCompletas: TTabSheet
|
|
Caption = 'Completo'
|
|
object DBGridVentas: TDBGrid
|
|
Left = 0
|
|
Top = 0
|
|
Width = 596
|
|
Height = 190
|
|
Align = alClient
|
|
DataSource = DsVentasC
|
|
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
|
|
TabOrder = 0
|
|
TitleFont.Charset = ANSI_CHARSET
|
|
TitleFont.Color = clBlack
|
|
TitleFont.Height = -13
|
|
TitleFont.Name = 'Arial'
|
|
TitleFont.Style = []
|
|
OnDrawColumnCell = DBGridVentasDrawColumnCell
|
|
end
|
|
end
|
|
object VentasResumidas: TTabSheet
|
|
Caption = 'Resumen'
|
|
ImageIndex = 1
|
|
object DBGrid1: TDBGrid
|
|
Left = 0
|
|
Top = 0
|
|
Width = 393
|
|
Height = 190
|
|
Align = alLeft
|
|
DataSource = DsVentasR
|
|
TabOrder = 0
|
|
TitleFont.Charset = ANSI_CHARSET
|
|
TitleFont.Color = clBlack
|
|
TitleFont.Height = -13
|
|
TitleFont.Name = 'Arial'
|
|
TitleFont.Style = []
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object VEmpleados: TTabSheet
|
|
Caption = 'por Empleado'
|
|
ImageIndex = 2
|
|
object DBGrid3: TDBGrid
|
|
Left = 0
|
|
Top = 0
|
|
Width = 604
|
|
Height = 221
|
|
Align = alClient
|
|
DataSource = DsVentasEmpleados
|
|
TabOrder = 0
|
|
TitleFont.Charset = ANSI_CHARSET
|
|
TitleFont.Color = clBlack
|
|
TitleFont.Height = -13
|
|
TitleFont.Name = 'Arial'
|
|
TitleFont.Style = []
|
|
end
|
|
end
|
|
object Compras: TTabSheet
|
|
Caption = 'Compras'
|
|
ImageIndex = 2
|
|
object PageControl4: TPageControl
|
|
Left = 0
|
|
Top = 0
|
|
Width = 604
|
|
Height = 221
|
|
ActivePage = ComprasCompleto
|
|
Align = alClient
|
|
TabOrder = 0
|
|
object ComprasCompleto: TTabSheet
|
|
Caption = 'Completo'
|
|
object DBGridCompras: TDBGrid
|
|
Left = 0
|
|
Top = 0
|
|
Width = 596
|
|
Height = 190
|
|
Align = alClient
|
|
DataSource = DsComprasC
|
|
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
|
|
TabOrder = 0
|
|
TitleFont.Charset = ANSI_CHARSET
|
|
TitleFont.Color = clBlack
|
|
TitleFont.Height = -13
|
|
TitleFont.Name = 'Arial'
|
|
TitleFont.Style = []
|
|
OnDrawColumnCell = DBGridComprasDrawColumnCell
|
|
end
|
|
end
|
|
object ComprasResumen: TTabSheet
|
|
Caption = 'Resumen'
|
|
ImageIndex = 1
|
|
object DBGrid2: TDBGrid
|
|
Left = 0
|
|
Top = 0
|
|
Width = 393
|
|
Height = 190
|
|
Align = alLeft
|
|
DataSource = DsComprasR
|
|
TabOrder = 0
|
|
TitleFont.Charset = ANSI_CHARSET
|
|
TitleFont.Color = clBlack
|
|
TitleFont.Height = -13
|
|
TitleFont.Name = 'Arial'
|
|
TitleFont.Style = []
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object PageControl2: TPageControl
|
|
Left = 0
|
|
Top = 265
|
|
Width = 632
|
|
Height = 165
|
|
ActivePage = TabSheet2
|
|
Align = alClient
|
|
TabOrder = 3
|
|
object TabSheet1: TTabSheet
|
|
Caption = 'Datos'
|
|
object Label1: TLabel
|
|
Left = 8
|
|
Top = 16
|
|
Width = 64
|
|
Height = 22
|
|
Caption = 'Ventas:'
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -19
|
|
Font.Name = 'Arial'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object Label2: TLabel
|
|
Left = 8
|
|
Top = 48
|
|
Width = 83
|
|
Height = 22
|
|
Caption = 'Compras:'
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -19
|
|
Font.Name = 'Arial'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object Label3: TLabel
|
|
Left = 8
|
|
Top = 80
|
|
Width = 85
|
|
Height = 22
|
|
Caption = 'Beneficio:'
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -19
|
|
Font.Name = 'Arial'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object TotalVentas: TLabel
|
|
Left = 131
|
|
Top = 16
|
|
Width = 109
|
|
Height = 22
|
|
Alignment = taRightJustify
|
|
Caption = '###.###.###'
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -19
|
|
Font.Name = 'Arial'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object TotalCompras: TLabel
|
|
Left = 131
|
|
Top = 48
|
|
Width = 109
|
|
Height = 22
|
|
Alignment = taRightJustify
|
|
Caption = '###.###.###'
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -19
|
|
Font.Name = 'Arial'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object Beneficio: TLabel
|
|
Left = 131
|
|
Top = 80
|
|
Width = 109
|
|
Height = 22
|
|
Alignment = taRightJustify
|
|
Caption = '###.###.###'
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -19
|
|
Font.Name = 'Arial'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
end
|
|
object TabSheet2: TTabSheet
|
|
Caption = 'Graficas'
|
|
ImageIndex = 1
|
|
object DBChart1: TDBChart
|
|
Left = 0
|
|
Top = 0
|
|
Width = 624
|
|
Height = 134
|
|
BackWall.Brush.Color = clWhite
|
|
LeftWall.Brush.Color = clWhite
|
|
Title.AdjustFrame = False
|
|
Title.Text.Strings = (
|
|
'TDBChart')
|
|
Title.Visible = False
|
|
View3DOptions.Elevation = 315
|
|
View3DOptions.Perspective = 0
|
|
View3DOptions.Rotation = 360
|
|
Align = alClient
|
|
BevelOuter = bvLowered
|
|
TabOrder = 0
|
|
object Series1: TLineSeries
|
|
Marks.ArrowLength = 20
|
|
Marks.Style = smsLabelValue
|
|
Marks.Visible = False
|
|
DataSource = QVentasR
|
|
SeriesColor = clLime
|
|
ShowInLegend = False
|
|
XLabelsSource = 'Fecha'
|
|
Pointer.InflateMargins = True
|
|
Pointer.Style = psRectangle
|
|
Pointer.Visible = False
|
|
XValues.DateTime = True
|
|
XValues.Name = 'X'
|
|
XValues.Multiplier = 1
|
|
XValues.Order = loAscending
|
|
XValues.ValueSource = 'Fecha'
|
|
YValues.DateTime = False
|
|
YValues.Name = 'Y'
|
|
YValues.Multiplier = 1
|
|
YValues.Order = loNone
|
|
YValues.ValueSource = 'Total'
|
|
end
|
|
object Series2: TLineSeries
|
|
Marks.ArrowLength = 20
|
|
Marks.Style = smsValue
|
|
Marks.Visible = False
|
|
DataSource = QComprasR
|
|
SeriesColor = clRed
|
|
ShowInLegend = False
|
|
XLabelsSource = 'Fecha'
|
|
Pointer.InflateMargins = True
|
|
Pointer.Style = psRectangle
|
|
Pointer.Visible = False
|
|
XValues.DateTime = True
|
|
XValues.Name = 'X'
|
|
XValues.Multiplier = 1
|
|
XValues.Order = loAscending
|
|
XValues.ValueSource = 'Fecha'
|
|
YValues.DateTime = False
|
|
YValues.Name = 'Y'
|
|
YValues.Multiplier = 1
|
|
YValues.Order = loNone
|
|
YValues.ValueSource = 'Total'
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object ProgressBar1: TProgressBar
|
|
Left = 112
|
|
Top = 266
|
|
Width = 521
|
|
Height = 21
|
|
Min = 0
|
|
Max = 100
|
|
TabOrder = 4
|
|
Visible = False
|
|
end
|
|
object DsVentasC: TDataSource
|
|
DataSet = QVentasC
|
|
Left = 108
|
|
Top = 152
|
|
end
|
|
object DsComprasC: TDataSource
|
|
DataSet = QComprasC
|
|
Left = 196
|
|
Top = 160
|
|
end
|
|
object QVentasC: TQuery
|
|
BeforeOpen = QVentasCBeforeOpen
|
|
AfterOpen = QVentasCAfterOpen
|
|
DatabaseName = 'TpvWin'
|
|
SQL.Strings = (
|
|
|
|
'SELECT VentasCabecera.Contabilizada C, VentasCabecera.FechaFactu' +
|
|
'ra Fecha, (VentasCabecera.TotalSin + VentasCabecera.TotalIVA) Im' +
|
|
'porte, VentasCabecera.CodCliente, ((Personas.Nombre+'#39', '#39')+Person' +
|
|
'as.Apellidos) Nombre, Personas.Empresa, VentasCabecera.FacturaAb' +
|
|
'ierta, VentasCabecera.TotalSin Base, VentasCabecera.TotalIVA IVA'
|
|
|
|
'FROM "Ventas (cabecera).db" VentasCabecera, "personas.DB" Person' +
|
|
'as'
|
|
|
|
'WHERE (VentasCabecera.FechaFactura = '#39'01/25/2001'#39' ) AND (Ventas' +
|
|
'Cabecera.CodCliente = Personas.CodCliente1)'
|
|
' ')
|
|
Left = 108
|
|
Top = 184
|
|
end
|
|
object QComprasC: TQuery
|
|
BeforeOpen = QComprasCBeforeOpen
|
|
AfterOpen = QComprasCAfterOpen
|
|
DatabaseName = 'TpvWin'
|
|
Left = 196
|
|
Top = 192
|
|
end
|
|
object QVentasR: TQuery
|
|
Active = True
|
|
BeforeOpen = QVentasRBeforeOpen
|
|
DatabaseName = 'TpvWin'
|
|
SQL.Strings = (
|
|
|
|
'SELECT FechaFactura Fecha, SUM( TotalIva ) Base, SUM( TotalSin )' +
|
|
' IVA, SUM( TotalIva ) + SUM( TotalSin ) Total'
|
|
'FROM "Ventas (cabecera).DB" VentasCabecera'
|
|
'GROUP BY FechaFactura')
|
|
Left = 140
|
|
Top = 184
|
|
end
|
|
object DsVentasR: TDataSource
|
|
DataSet = QVentasR
|
|
Left = 144
|
|
Top = 155
|
|
end
|
|
object QComprasR: TQuery
|
|
Active = True
|
|
BeforeOpen = QComprasRBeforeOpen
|
|
DatabaseName = 'TpvWin'
|
|
SQL.Strings = (
|
|
|
|
'SELECT FechaFactura Fecha, SUM( TotalIva ) Base, SUM( TotalSin )' +
|
|
' IVA, SUM( TotalIva ) + SUM( TotalSin ) Total'
|
|
'FROM "Compras (cabecera).DB" VentasCabecera'
|
|
'GROUP BY FechaFactura')
|
|
Left = 228
|
|
Top = 184
|
|
end
|
|
object DsComprasR: TDataSource
|
|
DataSet = QComprasR
|
|
Left = 232
|
|
Top = 152
|
|
end
|
|
object mGraficas: TPopupMenu
|
|
Left = 184
|
|
Top = 34
|
|
object MostrarVentas: TMenuItem
|
|
Caption = '&Ventas'
|
|
Checked = True
|
|
OnClick = MostrarVentasClick
|
|
end
|
|
object MostrarCompras: TMenuItem
|
|
Caption = '&Compras'
|
|
Checked = True
|
|
OnClick = MostrarComprasClik
|
|
end
|
|
end
|
|
object QVentasEmpleados: TQuery
|
|
BeforeOpen = QVentasEmpleadosBeforeOpen
|
|
DatabaseName = 'TpvWin'
|
|
SQL.Strings = (
|
|
|
|
'SELECT Personas.Apellidos, Personas.Nombre Nombre, SUM( Ventas__' +
|
|
'cabecera_.TotalSin ) Base, SUM( Ventas__cabecera_.TotalIva ) IVA' +
|
|
', SUM( Ventas__cabecera_.TotalSin + Ventas__cabecera_.TotalIva ' +
|
|
' ) Total'
|
|
|
|
'FROM "Ventas (cabecera).DB" Ventas__cabecera_, "personas.DB" Per' +
|
|
'sonas'
|
|
'WHERE (Ventas__cabecera_.CodEmpleado = Personas.CodCliente1) '
|
|
|
|
' AND Ventas__cabecera_.FechaFactura BETWEEN '#39'01/01/2001'#39' AND ' +
|
|
#39'06/06/2001'#39' '
|
|
'GROUP BY Personas.Apellidos, Personas.Nombre')
|
|
Left = 284
|
|
Top = 184
|
|
end
|
|
object DsVentasEmpleados: TDataSource
|
|
DataSet = QVentasEmpleados
|
|
Left = 288
|
|
Top = 152
|
|
end
|
|
object mImpresion: TPopupMenu
|
|
Left = 328
|
|
Top = 34
|
|
object MenuItem1: TMenuItem
|
|
Caption = '&Ventas'
|
|
end
|
|
object VentasResumen1: TMenuItem
|
|
Caption = 'Ventas (Resumen)'
|
|
OnClick = VentasResumen1Click
|
|
end
|
|
object MenuItem2: TMenuItem
|
|
Caption = '&Compras'
|
|
end
|
|
object ComprasResumen1: TMenuItem
|
|
Caption = 'Compras (Resumen)'
|
|
OnClick = ComprasResumen1Click
|
|
end
|
|
object Empleados1: TMenuItem
|
|
Caption = 'Empleados'
|
|
end
|
|
object N1: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object ResumenyGrfica1: TMenuItem
|
|
Caption = 'Resumen y Gráfica'
|
|
end
|
|
end
|
|
object ElasticForm1: TElasticForm
|
|
DesignScreenWidth = 1152
|
|
DesignScreenHeight = 864
|
|
DesignPixelsPerInch = 96
|
|
MinimumTrackWidth = 640
|
|
MinimumTrackHeight = 480
|
|
DesignFormWidth = 640
|
|
DesignFormHeight = 480
|
|
DesignFormClientWidth = 632
|
|
DesignFormClientHeight = 449
|
|
DesignFormLeft = 192
|
|
DesignFormTop = 124
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = 'Verdana'
|
|
Font.Style = []
|
|
Version = 504
|
|
end
|
|
end
|