Ver Mensaje Individual
  #1  
Antiguo 04-04-2005
kryna kryna is offline
Miembro
 
Registrado: mar 2005
Posts: 46
Reputación: 0
kryna Va por buen camino
como modificar si los ds son de solo lectura

hola
Necesito modificar algun campo de los registros de las tablas pero
antes necesito buscar dicho registro y mostrarlo.. para asi poder
escribir en el dbedit correspondiente el nuevo valor...
El principal problema que tengo es que luego que realizo una
busqueda..

no puedo modificar los datos que estan en los dbedit entonces no
puedo probar ninguno de las entencias que tengo..
¿ como tengo que hacer para desbloquear los dbedit ? tengo la
propiedad resquestlive en true..

estoy usando como gestor paradox, la busqueda que realizo por sql es

SELECT especialidad.Cod_especialidad,
especialidad.Descripcion_especialidad, especialidad.Orden,
especialidad.Nota, concepto.Cod_especialidad, concepto.Cod_concepto,
concepto.Descripcion_concepto, costos.Cod_concepto, costos.Fecha,
costos.Costo
FROM especialidad, concepto, costos
WHERE (especialidad.Cod_especialidad =
concepto.Cod_especialidad)
AND (concepto.Cod_concepto = costos.Cod_concepto)
AND concepto.Cod_concepto = :Codigo

y el codigo en delphi es

if editorcodigo <> nil then

qrycodigo.Close;
qrycodigo.ParamByName('Codigo').AsInteger := StrToInt
(editorcodigo.text);
Dsconcepto.dataset := qrycodigo;
qrycodigo.Open;


qrycostos.Close;
qrycostos.ParamByName('Codigo').AsInteger := StrToInt
(editorcodigo.text);
Dscostos.dataset := qrycostos;
qrycostos.Open;


qryespecialidad.Close;
qryespecialidad.ParamByName('Codigo').AsInteger := StrToInt
(editorcodigo.text);
Dsespecialidad.dataset := qryespecialidad;
qryespecialidad.Open;


if qrycodigo.EOF then
ShowMessage('No encontré ningún Registro!');

de verdad no se que hacer..

saludos
Responder Con Cita