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