ayuda con error en qurry
 

engo el siguiente codigo

Código SQL [-]
size="2">size="2">begin 
 frm_DataModule.qry_select_doc.Close; 
 frm_DataModule.qry_select_doc.SQL.Clear; 
 frm_DataModule.qry_select_doc.SQL.Add('SELECT ID_MAESTRO FROM DOCENTES WHERE ID_MAESTRO=' +QuotedStr(frm_DataModule.qry_select_doc.Fields[6].AsString)); 
 frm_DataModule.qry_select_doc.Open; 
 frm_DataModule.qry_select_doc.Close; 

y me marca el siguiente error y la verdad no se que se que es muy dificil que me puedan ayudar asi pero le e buscado y no mas no he podido

error:
projet bmis.exe raised exeption class EListError with message 'List index out of bound( 6 )' Proses stoped. use step or run to continue

Estas queriendo asignar un campo que todavía no tiene asignado...

es decir, con la instrucción:
frm_DataModule.qry_select_doc.Close; cerraste el query, por lo tanto, no lo puedes accesar, no tienes campos, esta vacio, no existe....

y luego lo quieres utilizar dentro de la misma asignación.

Por eso te marca ese error, "Index out of bounds" o sea, " ese índice no existe" y obvio qu eno existe, porque el dataset esta cerrado.

Necesitas obtener el valor de otro lado, alguna variable, algún control, pero no puedes utilizar el mismo qry_select_doc.

Saludos

Te has fijado que el valor que tomas para asignarlo a la sentencia es del mismo qry_select_doc y que este lo cierras antes de tomar algun valor?

Código Delphi [-]
frm_DataModule.qry_select_doc.SQL.Add('SELECT ID_MAESTRO FROM DOCENTES WHERE ID_MAESTRO=' +QuotedStr(frm_DataModule.qry_select_doc.Fields[6].AsString));

Barbaro Contraveneno.:D

No amigo, pura casualidad que andaba por estos rumbos... :D

gracias amigos me han salvado la vida

ya quedo:D

el siguiente texto:
.qry_select_doc.Fields[6].
se refiere al septimo campo del query (la numeración de los campos comienza en cero). Verifica cuantos campos traes en la consulta. Deben ser menos
[quote=UREÑA]engo el siguiente codigo


<DIV class=frame_codigo_sql>Código SQL [-]<DIV class=texto_codigo_sql id=sql_div_46687178606ba><FONT face=Arial>