First commit 14/02/1999

BuscarEntreLineas.dfm

@@ -0,0 +1,72 @@
+object Form1: TForm1
+  Left = 206
+  Top = 126
+  Width = 413
+  Height = 180
+  Caption = 'Form1'
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Name = 'MS Sans Serif'
+  Font.Style = []
+  OldCreateOrder = False
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Label1: TLabel
+    Left = 0
+    Top = 0
+    Width = 401
+    Height = 57
+    Alignment = taCenter
+    Caption = 'Busqueda de Facturas por CONTENIDO'
+    Font.Charset = ANSI_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -19
+    Font.Name = 'Arial Black'
+    Font.Style = []
+    ParentFont = False
+    WordWrap = True
+  end
+  object Button1: TButton
+    Left = 128
+    Top = 88
+    Width = 145
+    Height = 25
+    Caption = '&Localizar Factura'
+    TabOrder = 0
+    OnClick = Button1Click
+  end
+  object Button2: TButton
+    Left = 128
+    Top = 120
+    Width = 145
+    Height = 25
+    Caption = '&Salir'
+    TabOrder = 1
+    OnClick = Button2Click
+  end
+  object Empresas: TDatabase
+    Connected = True
+    DatabaseName = 'TpvWin'
+    DriverName = 'STANDARD'
+    Params.Strings = (
+      'PATH=DATOS\'
+      'DEFAULT DRIVER=PARADOX'
+      'ENABLE BCD=FALSE')
+    SessionName = 'Default'
+    Top = 48
+  end
+  object TbVentasC: TTable
+    DatabaseName = 'TpvWin'
+    TableName = 'Ventas (cabecera).db'
+    Left = 40
+    Top = 80
+    object TbVentasCEnlaceFactura: TAutoIncField
+      FieldName = 'EnlaceFactura'
+    end
+    object TbVentasCCodFactura: TIntegerField
+      FieldName = 'CodFactura'
+    end
+  end
+end