Ayuda con SELECT
Publicado por Manuel Medina (332 intervenciones) el 10/04/2008 05:57:11
Que tal foro, ya falta poco.
Quiero saber si es posible salir de un select usando ENTER.
EJEMPLO:
SELECT MATRICULA,NOMBRE,APELLIDO FROM ESTUDIANTES WHERE APELLIDO="MEDINA"
Cuando optenga el resultado quiero pulsar ENTER y colocar la matricula y el nombre en el formulario, pero no se como salir del select.
Tengo una idea pero no se como aplicarla, algo asi:
on key label ENTER DO (ALGUN PROCEDIMIENTO QUE QUITE EL SELECT)
SELECT MATRICULA,NOMBRE,APELLIDO FROM ESTUDIANTES WHERE APELLIDO="MEDINA"
ON KEY LABEL ENTER
**************************************
SEGUNDO:
Esta busqueda en el interactive change funciona bien rapido en la red pero la quiero decalificar por la siguiente:
A media que busca y se muestran los registros en un grid quiero que el primero que encuentre aperezca en la parte superior del grid y no abajo como aparece ya que esto hace perder un poco al usuario.
Pruevenla por favor
SELECT ARTICULO
SET ORDER TO DESCRIP && DESCRIP
IF this.Value <>' '
m.busca=ALLTRIM(this.Value)
SEEK m.busca
Endif
Thisform.grid1.Refresh()
Gracias, foro.
Quiero saber si es posible salir de un select usando ENTER.
EJEMPLO:
SELECT MATRICULA,NOMBRE,APELLIDO FROM ESTUDIANTES WHERE APELLIDO="MEDINA"
Cuando optenga el resultado quiero pulsar ENTER y colocar la matricula y el nombre en el formulario, pero no se como salir del select.
Tengo una idea pero no se como aplicarla, algo asi:
on key label ENTER DO (ALGUN PROCEDIMIENTO QUE QUITE EL SELECT)
SELECT MATRICULA,NOMBRE,APELLIDO FROM ESTUDIANTES WHERE APELLIDO="MEDINA"
ON KEY LABEL ENTER
**************************************
SEGUNDO:
Esta busqueda en el interactive change funciona bien rapido en la red pero la quiero decalificar por la siguiente:
A media que busca y se muestran los registros en un grid quiero que el primero que encuentre aperezca en la parte superior del grid y no abajo como aparece ya que esto hace perder un poco al usuario.
Pruevenla por favor
SELECT ARTICULO
SET ORDER TO DESCRIP && DESCRIP
IF this.Value <>' '
m.busca=ALLTRIM(this.Value)
SEEK m.busca
Endif
Thisform.grid1.Refresh()
Gracias, foro.
Valora esta pregunta


0