locate

[[ElKurgan]]

Debes usar la opción "loCaseInsensitive" para que no diferencie entre mayúsculas y minúsculas, con lo que tu código quedaría asi:

 
Código Delphi [-]
 
if(dm.T_deptoimpre.Locate('nombre_departamento',edit1.Text,
  [loCaseInsensitive])) then
  dm.T_deptoimpre.Locate('nombre_departamento',edit1.Text,
    [loCaseInsensitive])
else
  showmessage('No hay impresoras en ese departamento')

Un saludo

[*Caro*]

Hola marcosmendozaa, como te dice el amigo elkurgan, la opción que necesitas es loCaseInsensitive, en tu codigo no necesitas hacer doble vez el Locate, si el Locate te devuelve True es porque ya lo ha encontrado y se ha posicionado en ese registro.

Código Delphi [-]
if(dm.T_deptoimpre.Locate('nombre_departamento',edit1.Text,[]))then
 showmessage('Ha encontrado y se ha posicionado en el registro '+
                     dm.T_deptoimpre.FieldByName(nombre_departamento).AsString)
else
 showmessage('No hay impresoras en ese departamento');

También tienes la opción loPartialKey que te hace una busqueda aproximada.

Saluditos

[marcosmendozaa]

ps muchas gracias por tu respuesta me parece muy logica, i ps asi puse el codigo

if(dm.T_deptoimpre.Locate('nombre_departamento',edit1.Text,
[loCaseInsensitive])) then
dm.T_deptoimpre.Locate('nombre_departamento',edit1.Text,
[loCaseInsensitive])
else
showmessage('No hay impresoras en ese departamento')


incluso lo intente con el lopartialkey

y no me funciona tampoco me marca error:

undeclared identifier: "loCaseInsensitive"
Incompatible types:'Tlocateoptions' and integer

[*Caro*]

Empezado por marcosmendozaa

undeclared identifier: "loCaseInsensitive"
Incompatible types:'Tlocateoptions' and integer

Hola de nuevo, debes añadir la unit BD en el uses de tu unidad y te repito, no necesitas el Locate que esta dentro del If, es suficiente con el que estas haciendo la condición.

Saluditos

[xion]

en la DB no BD por si acaso

Empezado por Caro

Hola de nuevo, debes añadir la unit BD en el uses de tu unidad y te repito, no necesitas el Locate que esta dentro del If, es suficiente con el que estas haciendo la condición.

Saluditos

[Casimiro Noteví]

Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración

Empezado por xion

en la DB no BD por si acaso

En español, Base de Datos, será BD