Ayuda Con Consulta

[[enecumene]]

disculpa kuan-yiu, espero que no te este haciendo perder el tiempo, pero no entiendo con lo que me quisiste decir, soy un newbie y bruto total , me podrias decir como es?, gracias

[[kuan-yiu]]

Perdón a veces me explico fatal.
1) Crea la consulta entera como un string, escríbela en una variable string.

Código Delphi [-]
miConsulta := 'SELECT telefono1_cliente, nombre_cliente, apellido_cliente FROM tbClientes WHERE telefono1_cliente = ' + MaskEdit1.Text;

2) Pásale esto al "Add", o sea la variable "miConsulta".
3) Vuelca en algún lado (mediante código) la consulta, por ejemplo a un fichero, o por pantalla.
4) El texto que te muestre pégalo tal cual directamente en el editor de SQL que tenga tu BD.

5) Si funciona directamente en la BD debería funcionar también a través de Delphi.

[[enecumene]]

yo entiendo todo lo demas pero eso de volcar en algun lado o por pantalla no lo entiendo, y disculpas de nuevo...

[ContraVeneno]

Código Delphi [-]
qryCliente.Close;
qryCliente.SQL.Add(' SELECT telefono1_cliente, nombre_cliente, apellido_cliente FROM tbClientes ');
qryCliente.SQL.Add('WHERE telefono1_cliente = ''' + MaskEdit1.Text + '''');
qryCliente.Open;

o Tambien:

Código Delphi [-]
qryCliente.Close;
qryCliente.SQL.Add(' SELECT telefono1_cliente, nombre_cliente, apellido_cliente FROM tbClientes ');
qryCliente.SQL.Add('WHERE telefono1_cliente = '+ quotedstr(MaskEdit1.Text) );
qryCliente.Open;

P.D. Extraño a delphi

[[enecumene]]

gracias contraveneno me funciona perfecto, pero ahora me surge otro problema, despues de teclear un telefono me sale el nombre en el dbtext, lo limpio para teclear otro y cuando lo hago me sale esto:

Syntax error, in query expression 'telefono1_cliente = '809-804-7530'
SELECT telefono1_cliente, nombre_cliente, apellidos_cliente FROM tbClientes
WHERE telefono1_cliente = '809-508-7990''

cual es el problema ahora?, quisiera tambien que luego de teclear el telefono me pase automaticamente al edit de peliculas...

gracias!!!

[ContraVeneno]

El problema esta en las dobles apóstrofes al final del número. No deberías tener dobles apóstrofes.

Para pasar al siguiente contro, yo te recomiendo que al teclar enter en el control, validez el número de teléfono, y si este es válido, entonces hacer un edtPeliculas.SetFocus

Muchas personas hacen el cambio en el evento teléfono.lostfocus, pero a mi me parece que no sería correcto hacerlo en ese evento, por eso te recomiendo que lo hagas al presionar enter.

[[enecumene]]

gracias ContraVeneno, pero me podrias decir como hacerlo?? acordad que soy un total newbie...

te envio el codigo de nuevo para que lo veas:

procedure TAlquiler.MaskEdit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key=#13 then
begin
qryCliente.Close;
qryCliente.SQL.Add(' SELECT telefono1_cliente, nombre_cliente, apellidos_cliente FROM tbClientes ');
qryCliente.SQL.Add('WHERE telefono1_cliente = '+quotedstr(MaskEdit1.Text) );
qryCliente.Open;
if not qryCliente.IsEmpty then
DBText1.Caption:=qryClientenombre_cliente.Value+' '+qryClienteapellidos_cliente.Value;
end;
end;