FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Ayuda Con .locate En Delphi 7
NO ENTIENDO NADA DE NADA DE LOCATE OSEA NO SE ACTIVAR EL: TLOCATEOPTIONS POR MAS QUE BUSCO NADA ME SALE. SI ALGUIEN PUEDE AYUDARME Y MANDARME LOS CODIGOS DE UN PROGRAMA SENCILLO SOLO QUIERO VER DONDE ES QUE SE PONE:
Unit DB type TLocateOption = (loCaseInsensitive, loPartialKey); TLocateOptions = set of TLocateOption; SE LO AGRADECERIA EN EL ALMA ATT. EUDYNET |
#2
|
||||
|
||||
recordar q locate devuelve verdadero cuando encuentra un registro:
ejemplo 1: ejemplo 2: ejemplo 3:
__________________
self.free; |
#3
|
|||
|
|||
Ayudaaaa
GRACIAS POR LA AYUDA. PERO LO QUE EN VERDAD NECESITO SABER ES DONDE ES QUE DEBO DE PONER :
Unit DB type TLocateOption = (loCaseInsensitive, loPartialKey); TLocateOptions = set of TLocateOption; NO SE DONDE SE PONE ESO AYUDENME POR FAVOR AYUDENME QUE ESO ES PARA AHORITA Última edición por eudy.net fecha: 05-06-2007 a las 07:13:32. |
#4
|
||||
|
||||
No tienes que ponerlo en ningún lado, son tipos de datos que ya están declarados en la unidad db.pas. Si en lugar de desesperarte revisas con atención el ejemplo que te puso droguerman, verás que el LocateOptions no es algo que debas activar, sino que se trata de un parámetro que indica a Locate cómo hacer la búsqueda.
Y por favor, no repitas hilos. // Saludos |
#5
|
||||
|
||||
Cita:
Revisa la Guía de estilo y recordarte que una búsqueda en los foros sobre locate te dará muchos hilos sobre el tema con mucho código de ejemplo.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#6
|
|||
|
|||
exacto como dicen el locate te devuelve un valor falso o verdadero, lo unico que tienes que hacer es declarar una variable (opcion:TLocateOptions
y donde vayas a utilizar el locate puede ser como esto... ZTable1.Locate('Clave',Edit1.Text,opcion); if ZTable1.Locate('Clave',Edit1.Text,opcion)=False then Begin ShowMessage('Escuela no encontrada, por favor escriba otra DPR'); Edit1.Clear(); Edit1.SetFocus(); end else Button8.Enabled:=True; end; donde clave es el nombre del campo en donde va a buscar, edit1.text de donde va a sacar lo que va a buscar. si es false quiere decir que no encontro y si es true es encontrado. |
#7
|
||||
|
||||
Mira aqui te pongo un codigo que hice hace como 6 años, ahora todo lo manejo por query's, busca en el foro para que empieces a dominar delphi, por lo que veo utilizas Paradox, buena eleccion para empezar pero te recomiendo que leas mas acerca de Firebird y MySQL para que veas que existe un abismo entre Paradox y los otros 2
Tenia un Edit (txtclave) 1 Table 1 datasource En tu caso los DBedits que vayas a necesitar var options:tlocateoptions; clave:string; begin clave:=txtclave.Text; // In this section I'm checking that someboby writes the Clave, to avoid show dates wrongs if(clave='')then begin txtclave.Text:='Escribe tu codigo'; txtclave.SetFocus(); messagebox (handle,'Escribe la clave','Error',mb_ok); end else begin // And in this section i begin to find the dates if not table1.locate ('clave',txtclave.text,options) then begin messagebox (handle,'Clave no existente','Information',mb_ok); txtclave.Text:='Escribe de nuevo'; txtclave.SetFocus(); end else begin // Aqui pones tus campos de tu tabla DBEdit1.DataField:='campo1'; DBEdit2.DataField:='campo2'; ..... N campos options:=[lopartialkey]; end; end; Atte: Karla |
#8
|
||||
|
||||
Usad TAG's cuando escribáis código Delphi, no es tan difícil...
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Yo uso LOCATE y tu......... | JULIOCTORRESG | Varios | 1 | 02-03-2007 01:10:47 |
ayuda con LOCATE | vivamotos | C++ Builder | 4 | 27-08-2006 04:40:46 |
Locate | sanrp2004 | Varios | 3 | 21-06-2006 20:30:37 |
Instalar Ayuda (.HLP) en la Ayuda de Delphi? | MasterXP | Varios | 6 | 12-04-2006 06:57:49 |
No puedo abrir la ayuda de delphi 8/delphi 2005 | ASAPLTDA | Varios | 0 | 24-12-2004 16:20:53 |
|