Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   locate con dos campos (https://www.clubdelphi.com/foros/showthread.php?t=36991)

ercrizeporta 30-10-2006 18:32:38

locate con dos campos
 
hola a todos!!me gustaría saber como puedo realizar un locate en una tabla pero realizando la buskeda por dos campos, es decir kiero buscar en la tabla albarán pero dandole el numero de albaran y el numero de cliente. gracias!!!

Lepe 30-10-2006 19:13:03

¿No se supone que un número de albaran es único?, es decir, un albaran solo puede tener un cliente, por tanto, bastaría ese dato para localizarlo.

En caso extraño de que lo necesites, creo recordar que hay que pasar los valores separados por punto y coma:

Código Delphi [-]
if tabla.Locate('nalbaran;cliente', '32/2005; 32', []) then
   Showmessage('encontrado y posicionado')
else
   showmessage('ups no existe');

luisgutierrezb 30-10-2006 19:52:27

Nada mas como observacion en el locate, en el segundo parametro que son los valores, cuando es mas de 1, tiene que ser VarArrayOf(valor1, valor2, etc)

Caral 30-10-2006 20:13:02

Hola
La verdad no se porque hacer una consulta unica, osea escrita en codigo sin dar al usuario opciones de busqueda.
Yo haria esta consulta, simplemente con dos edit y una sentencia sql en un query asi:
Código Delphi [-]
Query1.Clear;
Query1.Sql.Text:= 'Select * From Albaran';
Query1.Sql.Add(' Where Albaran.Numero = '+IntToStr(Edit1.Text)+'');
Query1.Sql.Add(' And Albaran.Albaran = '+IntToStr(Edit2.Text)+'');
Query1.Open;
Esto pensando en que los datos son de tipo integer, si son tipo string simplemente pones el Edit1.Text y ya.
Saludos


La franja horaria es GMT +2. Ahora son las 00:37:37.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi