home *** CD-ROM | disk | FTP | other *** search
/ Hot Shareware 32 / hot34.iso / ficheros / 9EDU / NATURO10.ZIP / natur10.exe / NATUP1 / NATUP1.EXE / 0 / RCDATA / TFORM44315 / TFORM44315.txt
Text File  |  1995-05-10  |  9KB  |  283 lines
  1. object Form44315: TForm44315
  2.   Left = -4
  3.   Top = -4
  4.   Width = 648
  5.   Height = 488
  6.   Caption = 'Balande de las ventas diarias (Base de Datos)'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   WindowState = wsMaximized
  12.   OnActivate = FormActivate
  13.   PixelsPerInch = 96
  14.   TextHeight = 13
  15.   object SpeedButton1: TSpeedButton
  16.     Left = 16
  17.     Top = 240
  18.     Width = 57
  19.     Height = 49
  20.     Hint = 'Ayuda'
  21.     Caption = '&Ayuda'
  22.     ParentShowHint = False
  23.     ShowHint = True
  24.     OnClick = SpeedButton1Click
  25.   end
  26.   object TEXTO1: TDBGrid
  27.     Left = 0
  28.     Top = 0
  29.     Width = 633
  30.     Height = 457
  31.     BorderStyle = bsNone
  32.     Columns = <
  33.       item
  34.         FieldName = 'Fecha y Hora'
  35.         Width = 114
  36.       end
  37.       item
  38.         FieldName = 'Producto'
  39.         Width = 297
  40.       end
  41.       item
  42.         FieldName = 'Importe'
  43.         Width = 91
  44.       end>
  45.     DataSource = DataSource1
  46.     Font.Color = clBlack
  47.     Font.Height = -12
  48.     Font.Name = 'Arial'
  49.     Font.Style = []
  50.     Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
  51.     ParentFont = False
  52.     TabOrder = 0
  53.     TitleFont.Color = clWindowText
  54.     TitleFont.Height = -11
  55.     TitleFont.Name = 'MS Sans Serif'
  56.     TitleFont.Style = []
  57.   end
  58.   object Panel1: TPanel
  59.     Left = 528
  60.     Top = 16
  61.     Width = 81
  62.     Height = 425
  63.     BevelInner = bvLowered
  64.     BevelWidth = 2
  65.     BorderWidth = 1
  66.     BorderStyle = bsSingle
  67.     TabOrder = 1
  68.     object Label1: TLabel
  69.       Left = 8
  70.       Top = 16
  71.       Width = 65
  72.       Height = 73
  73.       Hint = 'Borrar registros'
  74.       Alignment = taCenter
  75.       Caption = 'Borrar'
  76.       Font.Color = clRed
  77.       Font.Height = -13
  78.       Font.Name = 'Arial'
  79.       Font.Style = []
  80.       ParentFont = False
  81.       ParentShowHint = False
  82.       ShowHint = True
  83.       Transparent = True
  84.     end
  85.     object SpeedButton2: TSpeedButton
  86.       Left = 16
  87.       Top = 232
  88.       Width = 49
  89.       Height = 49
  90.       Hint = 'Ayuda'
  91.       Glyph.Data = {
  92.         76020000424D7602000000000000760000002800000020000000200000000100
  93.         0400000000000000000000000000000000001000000010000000000000000000
  94.         8000008000000080800080000000800080008080000080808000C0C0C0000000
  95.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFF0
  96.         0000000FFFFFFFFFFFFFFFFFFFFFFFF0BFBFBF00FFFFFFFFFFFFFFFFFFFFFFF0
  97.         FBFBFB0B0FFFFFFFFFFFFFFFFFFFFFF0BFBFBF0BB0FFFFFFFFFFFFFFFFFFFFF0
  98.         FBFBFB0BB07FFFFFFFFFFFFFFFFFFFF00000000BB077FFFFFFFFFFFFFFFFFFFF
  99.         0BBBBBB0B077FFFFFFFFFFFFFFFFFFF00000000B0077FFFFFFFFFFFFFFFFFFF0
  100.         FBFBFB00B077FFFFFFFFFFFFFFFFFFF0BFBFBF0B0FF7FFFFFFFFFFFFFFFFFFF0
  101.         FBFBFB0BB07FFFFFFFFFFFFFFFFFFFF0BFBFBFB0B077FFFFFFFFFFFFFFFFFFF0
  102.         FBFBFBF0B077FFFFFFFFFFFFFFFFFFFF0FBFBFBF0077FFFFFFFFFFFFFFFFFFFF
  103.         0BFBFBFBF0777FFFFFFFFFFFFFFFFFFFF0BFBFBFBF0777FFFFFFFFFF0000000F
  104.         FF0BFBFBFB00777FFFFFFFFF0FBFBF0FFFF0BFBFBFB00777FFFFFFFF0BFBFB0F
  105.         FFFF0BFBFBF0B077FFFFFFFF0FBFBF0FFFFF0FBFBFB0B077FFFFFFFF0BFBFB0F
  106.         FFFF0BFBFBF0BB077FFFFFFF0FBFBFB0FFF0BFBFBFB0BB077FFFFFFF0BFBFBFB
  107.         000BFBFBFBF0BB077FFFFFFFF0BFBFBFBFBFBFBFBF0BBB077FFFFFFFF0FBFBFB
  108.         FBFBFBFBFB0BBB077FFFFFFFFF0FBFBFBFBFBFBFB0BBBB077FFFFFFFFFF0FBFB
  109.         FBFBFBFB0BBBB077FFFFFFFFFFFF00BFBFBFBF00BBBBB077FFFFFFFFFFFFF000
  110.         000000BBBBBB077FFFFFFFFFFFFFFF0BBBBBBBBBBBB077FFFFFFFFFFFFFFFFF0
  111.         0BBBBBBBB0077FFFFFFFFFFFFFFFFFFFF0000000077FFFFFFFFF}
  112.       ParentShowHint = False
  113.       ShowHint = True
  114.       OnClick = SpeedButton2Click
  115.     end
  116.     object SALIDA: TBitBtn
  117.       Left = 16
  118.       Top = 344
  119.       Width = 49
  120.       Height = 49
  121.       Hint = 'Volver al Men∩┐╜'
  122.       ParentShowHint = False
  123.       ShowHint = True
  124.       TabOrder = 0
  125.       OnClick = SALIDAClick
  126.       Glyph.Data = {
  127.         76020000424D7602000000000000760000002800000020000000200000000100
  128.         0400000000000000000000000000000000001000000010000000000000000000
  129.         8000008000000080800080000000800080008080000080808000C0C0C0000000
  130.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  131.         7777777777777777777777777777777777777777777777777777777777777777
  132.         777777777777777777777777777777731444444E131313131377777777FFFF71
  133.         F4444EE9F9F9F13131777777777777739B44449B9B9B9B9B93777FFFF7777771
  134.         F9CCC4F931F939F9F1777777777777739B9CCC4B139B139B9377777777744471
  135.         F9F4CCC431F931F9F1777777774CCC439BA44CCE139B139B9377744774CCCCC4
  136.         4AA4CCE931F931F9F17774444CCCCCCCAAA3339B139B139B93777E4444CEECCA
  137.         AA4BBB3931F931F9F17777E44EE77ECCA4CCBB3B9B9B9B9B9377777EEE7777EC
  138.         4CCCE38444443339F177777777777774CCCE0AACCCCCBB3B937777777777774C
  139.         CCEAAACCCCCCBBB3F1777777777774CCCECAACCCEEEEBB3B9377777777777ECC
  140.         CCECCCCE313133F9F1777111111117ECCCCECCE31313139B937771999999997E
  141.         CCCCCCB1313131F9F177719999999973ECCCCBBB1313139B937771999FF99971
  142.         FEECBBBBB13131F9F177719999FF99739B888B3B3313139B9377719FFFFFF971
  143.         F9888833313131F9F177719999FF99739B44444444139B9B937771999FF99971
  144.         F9CCCCCCCCF9F9F9F1777199999999739BEECCCCEE9B9B9B9377779999999971
  145.         F9F9CCCEF9F9F131317777777777777313131313131313131377777777777777
  146.         7777777777777777777777777777777777777777777777777777}
  147.     end
  148.     object IMPRIMIR: TBitBtn
  149.       Left = 16
  150.       Top = 128
  151.       Width = 49
  152.       Height = 49
  153.       Hint = 'Imprimir Pantalla'
  154.       ParentShowHint = False
  155.       ShowHint = True
  156.       TabOrder = 1
  157.       OnClick = IMPRIMIRClick
  158.       Glyph.Data = {
  159.         76020000424D7602000000000000760000002800000020000000200000000100
  160.         0400000000000000000000000000000000001000000010000000000000000000
  161.         8000008000000080800080000000800080008080000080808000C0C0C0000000
  162.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00700000000000
  163.         000000000000000000070F8888888888888888888888888888800FF800000000
  164.         000000000000008888800FF708888888888888888888880778800FF70F777777
  165.         777777777777778078800FF70F777777777777777777778808800FF70F777777
  166.         777777777777778808800FF708888888888888888888888808800FF000000000
  167.         000000000000000808800F0888888888888888888888888008800F0777777777
  168.         777777777777777808800F0777777777777777777777777880800F0777777777
  169.         777777777777777888000F0777777777777777777777777888000F0777777777
  170.         777777777777777888000F0777777777777777777999977888000F0777777777
  171.         777777777777777888000F0FFFFFFFFFFFFFFFFFFFFFFFF888000F0777777777
  172.         777777777777777F88000FF0777700000000000000008777F8000FF700000FFF
  173.         FFFFFFFFFFF0000000000FF777770FFCCCCCCCCCCFF0777778800FF777770FFF
  174.         FFFFFFFFFFF0777778800FF7777788F8CCCCCCCCC8F8877778800FF7777770FF
  175.         FFFFFFFFFFFF077778800FF77777770FFCCCCCCCCCCFF07778800FF777777770
  176.         FFFFFFFFFFFFFF0778800FF7777777788FCCCCCCCCCCFF8878800FF777777777
  177.         0FFFFFFFFFFFFFF078800FFFFFFFFFFF0FFFFFFFFFFFFFF0FF800FFFFFFFFFFF
  178.         0FFFFFFFFFFFFFF0FFF070000000000000000000000000000007}
  179.     end
  180.     object DBNavigator1: TDBNavigator
  181.       Left = 16
  182.       Top = 32
  183.       Width = 49
  184.       Height = 49
  185.       DataSource = DataSource1
  186.       VisibleButtons = [nbDelete]
  187.       TabOrder = 2
  188.     end
  189.   end
  190.   object Panel2: TPanel
  191.     Left = 0
  192.     Top = 0
  193.     Width = 633
  194.     Height = 457
  195.     BevelInner = bvLowered
  196.     DragMode = dmAutomatic
  197.     TabOrder = 2
  198.     object Memo100: TMemo
  199.       Left = 16
  200.       Top = 16
  201.       Width = 601
  202.       Height = 425
  203.       Color = clWhite
  204.       DragMode = dmAutomatic
  205.       Font.Color = clBlack
  206.       Font.Height = -15
  207.       Font.Name = 'Arial'
  208.       Font.Style = []
  209.       Lines.Strings = (
  210.         ' '
  211.         
  212.           '                                                                ' +
  213.           '  - AYUDA -'
  214.         ''
  215.         
  216.           ' En ∩┐╜sta pantalla se recogen todas las ventas diarias realizadas' +
  217.           ' y que hallamos '
  218.         
  219.           ' realizado mediante: Sumar Productos, opci∩┐╜n que encontrar∩┐╜ en e' +
  220.           'l Men∩┐╜ de Opciones'
  221.         ' de la pantalla principal.'
  222.         ''
  223.         ''
  224.         ' INSTRUCCIONES:'
  225.         ''
  226.         
  227.           '- Para borrar cualquiera de los datos registrados (ventas diaria' +
  228.           's), s∩┐╜lo ha de pulsar en el '
  229.         '  registro deseado y a continuaci∩┐╜n pulsar en el bot∩┐╜n: Borrar.'
  230.         ''
  231.         
  232.           '- Para imprimir el balance o las ventas realizadas, deber∩┐╜ de pu' +
  233.           'lsar el bot∩┐╜n cuyo icono '
  234.         '  es una impresora.')
  235.       ParentFont = False
  236.       ReadOnly = True
  237.       TabOrder = 0
  238.       Visible = False
  239.     end
  240.     object BotonOCULTAR: TButton
  241.       Left = 488
  242.       Top = 392
  243.       Width = 115
  244.       Height = 33
  245.       Caption = '&Ocultar la Ayuda'
  246.       Font.Color = clBlack
  247.       Font.Height = -12
  248.       Font.Name = 'Arial'
  249.       Font.Style = [fsBold]
  250.       ParentFont = False
  251.       TabOrder = 1
  252.       OnClick = BotonOCULTARClick
  253.     end
  254.   end
  255.   object DataSource1: TDataSource
  256.     DataSet = Table1
  257.     Left = 378
  258.     Top = 234
  259.   end
  260.   object Table1: TTable
  261.     Active = True
  262.     DatabaseName = 'C:\NATUP1'
  263.     TableName = 'Ventas.DB'
  264.     Left = 442
  265.     Top = 242
  266.     object Table1FechayHora: TDateTimeField
  267.       DisplayWidth = 22
  268.       FieldName = 'Fecha y Hora'
  269.       Required = True
  270.     end
  271.     object Table1Producto: TStringField
  272.       DisplayWidth = 38
  273.       FieldName = 'Producto'
  274.       Size = 45
  275.     end
  276.     object Table1Importe: TIntegerField
  277.       DisplayWidth = 17
  278.       FieldName = 'Importe'
  279.       Required = True
  280.     end
  281.   end
  282. end
  283.