Estimados, utilizo Delphi 7
Estoy teniendo un problema que parece más un bug que un error mío. Uds. dirán.
Tengo un StringGrid que como opciones utiliza goRowSelect=True y goEditing =False excepto en una columna.
Para esto utilizo el código:
Código:
procedure TForm1StringGrid1SelectCell(....
begin
if ACol=1 then
StringGrid1.Options := StringGrid1.Options - [goRowSelect] + [goEditing]
else
StringGrid1.Options := StringGrid1.Options + [goRowSelect] - [goEditing];
end;
Funciona bien, excepto porque si estoy en una celda editable y hago click en otra que no pertenece a las columnas editables, la primera vez puedo editar. Si vuelvo a hacer click no, pero el primer click afuera me permite editar la celda.
Insolitamente corriendo el debugger pasa por la linea que cambia las opciones a no editable pero es como si no hiciera caso hasta que hago click de nuevo
Pruébenlo y díganme si le encuentran solución aunque sea con un artilugio tramposo o haciendo este efecto de otra forma.