![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#3
|
|||
|
|||
No me llega a funcionar pongo como sql lo siguiente:
select * from CLIENTES where codigo like:a Luego en Código lo siguiente, lo tengo puesto que al pulsar return, se posicione la tabla en ese registro y pueda ver todos sus campos en los distintos edit's, procedure TFormClientes.EditCodigoKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); {var Busqueda:boolean; Opcion:tlocateoptions;} var a,resultado:integer; begin if key=vk_return then begin a:=strtoint(EditCodigo.Text); MyQuery.close; Myquery.ParamByName('CODIGO').AsInteger:=a ; Myquery.Open; if Myquery.RecordCount > 0 then begin Resultado := Myquery.FIeldByName('Codigo').asInteger; end else Resultado := -1; MYquery.close; end; Pero me sale como error que el Parametro Codigo no found, luego si anulo la línea "Resultado := Myquery.FIeldByName('Codigo').asInteger;" me dice que el Field a not found. He hecho programas complejos y siempre utilizaba en las búsqueda locates, pero esto me está costando, y sólo pretendo que se posicione en un registro de la tabla. |
|
|
![]() |
||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Bloquear el registro activo en SQL Server | manuel Suarez | MS SQL Server | 2 | 07-06-2005 16:33:10 |
Como dar foco en un campo del registro activo TDBGrilla | kikodelphi | MS SQL Server | 1 | 19-05-2005 15:58:39 |
Copiar registro activo en uno nuevo | fjolivares | Firebird e Interbase | 2 | 30-12-2004 15:16:32 |
Actualizar registro activo en DBLookupListBox | i.larranaga | Conexión con bases de datos | 2 | 21-07-2004 08:41:21 |
Como imprimo solo el registro activo en RAVE? | fjolivares | Impresión | 2 | 30-01-2004 16:08:53 |
![]() |
|