FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Meter el resultado de un quey en una variable.
Buenos Dias haber si podeis decirme si hay forma de que el resultado de una consulta Query almacenarlo en alguna variable un edit lo que sea de forma que despues yo pueda conparar ese resultado con otro para poder hacer ciertas acciones dependiendo del usuario.
Es una duda que me lleva quitando el sueño ya varios dias Muchas Gracias. |
#2
|
||||
|
||||
Código:
query1.Open; Valor:= query1.fieldByName('ElCampoQueTeInterese').asString; query1.Close; if Valor = OtraVariable then HazLoQueSea;
__________________
Saludos, Peter Investment |
#3
|
|||
|
|||
este es mi codigo
//Cerramos y desactivamos la consulta.
Query_control_usuario.Active:=false; Query_control_usuario.Close; //Pasamos los parametros a la consulta. Query_control_usuario.ParamByName('nu').AsString := Form2.Edit1.Text; //Activamos y Abrimos la consulta. Query_control_usuario.Active:=true; Query_control_usuario.Open; //Guardamos el resultado de la consulta en una variable ya declarada arriba. resultado := query_control_usuario.FieldByName('TipoUsuario').AsString; //Dependiendo del resultado que nos devuelva la consulta se haran distintas cosas. If resultado='Administrador' then gbadmin.Visible:=true else gbadmin.Visible:=false; end; Este es mi codigo y lo e echo como me as dicho pero no me lo esta haciendo no se si es porque no me esta devolviendo el valor de esa variable no lo se . Haber si me puedes echar una manilla. Muchas gracias |
#4
|
||||
|
||||
Código:
//Cerramos y desactivamos la consulta. Query_control_usuario.Active:=false; Query_control_usuario.Close; //Pasamos los parametros a la consulta. Query_control_usuario.ParamByName('nu').AsString := Form2.Edit1.Text; //Activamos y Abrimos la consulta. Query_control_usuario.Active:=true; Query_control_usuario.Open; //Guardamos el resultado de la consulta en una variable ya declarada arriba. resultado := query_control_usuario.FieldByName('TipoUsuario').AsString; //Dependiendo del resultado que nos devuelva la consulta se haran distintas cosas. If resultado='Administrador' then gbadmin.Visible:=true else gbadmin.Visible:=false; end; Código:
if Query_control_usuario.EOF then ShowMessage('La consulta no ha devuelto nada') else ShowMessage('La consulta ha devuelto: ' + resultado )
__________________
Saludos, Peter Investment |
#5
|
||||
|
||||
Por cierto, no se pq pones la query como active = true y luego la haces un open. Una de las dos cosas te sobra:
Código:
//Cerramos y desactivamos la consulta. Query_control_usuario.Close; //Pasamos los parametros a la consulta. Query_control_usuario.ParamByName('nu').AsString := Form2.Edit1.Text; //Activamos y Abrimos la consulta. Query_control_usuario.Open; //Guardamos el resultado de la consulta en una variable ya declarada arriba. resultado := query_control_usuario.FieldByName('TipoUsuario').AsString; if Query_control_usuario.EOF then ShowMessage('La consulta no ha devuelto nada') else ShowMessage('La consulta ha devuelto: ' + resultado ) ; //Dependiendo del resultado que nos devuelva la consulta se haran distintas cosas. If resultado='Administrador' then gbadmin.Visible:=true else gbadmin.Visible:=false; end;
__________________
Saludos, Peter Investment |
#6
|
||||
|
||||
Tambien puede ser un problema de mayusculas y minusculas... o de espacios. Puedes asegurla con lo siguiente:
Código:
If Trim(Uppercase(resultado))='ADMINISTRADOR' then gbadmin.Visible:=true else gbadmin.Visible:=false; end;
__________________
Saludos, Peter Investment |
#7
|
||||
|
||||
con un dbedit???
Hola,
yo tengo el mismo drama,,,, lo ke hago es, poner un DBEDIT no visible, y poner el datasource del dbedit enganchado con el source de la query,, o sea ke levante en ele dbedit lo ke devuelve la quuery,,, despues con un DBEDIT.TEXT recupero el contenido,,, es algo chancho, pero anda,,, espero ke sirva,,, saludos RAffa |
#8
|
|||
|
|||
Muchas Gracias investiment ya todo va a las mil maravillas.
Muchas gracias. |
|
|
|