Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   editar solo celdas vacías del dbgrid (https://www.clubdelphi.com/foros/showthread.php?t=91636)

yuyidt 23-03-2017 17:10:24

editar solo celdas vacías del dbgrid
 
Hola buenas tardes. Quiero hacerles una consulta:
Tengo un dbgrid conectado a un FDQuery me muestra los siguientes campos (pregunta-respuesta-puntos)
Quisiera poder editar únicamente las celdas que se encuentren vacías de la pestaña puntos. Como puedo hacerlo?

ecfisa 23-03-2017 17:47:27

Hola.

Fijate si te resulta de este modo:
Código Delphi [-]
procedure TtuForm.FormCreate( Sender: TObject );
var
  i : Integer;
begin
  for i := 0 to FDQuery.FieldCount - 1 do
    FDQuery.Fields[i].ReadOnly := True;
end;

procedure TtuForm.FDQueryAfterScroll( DataSet: TDataSet );
begin
  FDQuery.FieldByName( 'PUNTOS' ).ReadOnly :=
    not FDQuery.FieldByName( 'PUNTOS' ).IsNull;   // Suponiendo que el campo se llama "puntos"
end;
No dispongo del componente TFDQuery para corroborarlo, pero dada esta información, el código debería hacer lo que solicitas.

Saludos :)

yuyidt 23-03-2017 18:10:46

Gracias ecfisa
 
pero donde coloco este código, en que evento? o yo misma debo agregar el procedure?
Cita:

procedure TtuForm.FDQueryAfterScroll( DataSet: TDataSet );
begin
FDQuery.FieldByName( 'PUNTOS' ).ReadOnly :=
not FDQuery.FieldByName( 'PUNTOS' ).IsNull; // Suponiendo que el campo se llama "puntos"
end;
olvide comentar que el query al que se conecta el dbgrid lo tengo en un datamodule

yuyidt 23-03-2017 19:05:07

Ya me ha funcionado, gracias
 
El código lo coloque en el query del datamodule y funciono. Muchísimas Gracias ecfisa


La franja horaria es GMT +2. Ahora son las 11:14:24.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi