Actualizar campo de dbgrid

[[egostar]]

Creo ver el problema, como estas usando el mismo Query, se pierde la relación de los registros que estas seleccionando, yo te sugiero que uses otro Query para hacer la actualización, solo cambia en el código Query1 por Query2 o el nombre que tenga el nuevo Query.

Solo recuerda que después de actualizar, debes de cerrar y abrir el Query1 para que veas los cambios.

Salud OS.

[jorelivi]

Lo voy a intentar, sigo con ustedes y gracias.

Una duda como coloco una imagen para mi usuario y que se vea como los demas del foro. ??????

[[Caral]]

Hola
HUiiiii esto si que es mas complicado que tu problema, tienes que pertenecer a un grupo selecto muy selecto de foristas........ES BROMA.
Solo editas tu perfil y buscas editar avatar en el pones la foto, es facil.
Saludos

[[Caral]]

Hola
Segun entiendo el problema dices sigue estando en esta parte:

Código Delphi [-]
 QueryTrab:='Update cuen01 set Fecha_venc=Fecha_apli+:dias Where cclie= :cclie And Docto= :docto';
                       Query1.Close;
                       Query1.SQL.Clear;
                       Query1.SQL.Add(Querytrab);
                       Query1.ParamByName('docto').AsString:=  Query1.FieldByName('docto').AsString;
                       Query1.ParamByName('cclie').AsString:=Edit1.Text;
                       Query1.ParamByName('dias').AsInteger:=StrtoInt(Edit4.Text);
                       Query1.ExecSQL;

Me dices si me equivoco.?
Pra mi el problema esta aqui, si es asi, verdad:

Código Delphi [-]
Query1.ParamByName('docto').AsString:=  Query1.FieldByName('docto').AsString;

Se saca la informacion del mismo sitio donde se pide, es la misma, para mi curioso.
Saludos

[jorelivi]

Siiipp, ese es el detalle y no se como hacerlo, me ayudan.

[[egostar]]

Haber, yo sigo insistiendo, debes usar otro Query para la actualización, no puedes hacerlo sobre el mismo Query1.

Así debería de verse y no tendrias ningún problema.

Código Delphi [-]
for i := 0 to DBGrid1.SelectedRows.Count-1 do begin
    GotoBookmark(Pointer(DBGrid1.SelectedRows.Items[i]));
    QueryTrab:='Update cuen01 set Fecha_venc=Fecha_apli+:dias Where cclie= :cclie And Docto= :docto';
    Query2.Close;
    Query2.SQL.Clear;
    Query2.SQL.Add(Querytrab);
    Query2.ParamByName('docto').AsString:=  Query1.FieldByName('docto').AsString;
    Query2.ParamByName('cclie').AsString:=Edit1.Text;
    Query2.ParamByName('dias').AsInteger:=StrtoInt(Edit4.Text);
    Query2.ExecSQL;
end;
Query1.Close;
Query1.Open;

Salud OS.

[[Caral]]

Hola jorelivi
Pues yo creo que ya Egostar te lo indico, tienes que trabajar con otro query adicional.
query1= ve informacion grid
qurey2= actualiza
La otra opcion es usar como indique text en vez de add, con el text se borra en contenida del query con add, pues eso se añade al query.
Saludos

[jorelivi]

Bueno, creo que ya les di mucha lata, solo espero que estos comentarios que hemos hecho sean contructivos para los demas por que no sabemos cuando ni donde, nos volveremos a encontrar.

Gracias por sus comentarios y diculpenme por lo torpe que he sido.


Gracias Egostar, eres muy paciente y de verdad un buen dia, lo has logrado una vez mas, dejando tus conocimientos en alguien mas.

Caral, que puedo decir, al igual que a Egostar, ¡¡¡¡ L o h a n l o g r a d o!!!!! y de verdad les estoy muy agradecido. aaahhh que mas les puedo decir.

Bye, Bye (Funciono)