Pasar el foco al siguiente wwdbedit "editable"
 

Buenos tardes, dias o noches, dependiendo de donde esten..
tengo un ligerillo problema (ya me habia tardado)

En una forma utilizo un wwDbgrid con tres columnas 2 de ellas son wwdbedit, los cuales pueden o no tomar valores (muestran la equivalencia del wwdedit que si admite valores)
lo que intento hacer, es que solo se pasen el foco entre los que si son editables.. algo asi..
pesos dlls
efectivo pesos *editable no editable
efectivo dlls no editable * editable
cheque pesos *editable no editable

que el foco solo se pase entre los editables.. el programa no me deja editar los no editables.. pero seria mejor si ni siquiera los seleccionara.. todo esto es en delphi 2007

eh intentado todo esto

Código Delphi [-]
procedure TT_PagosMovimientos.DBEd_PesosEnter (Sender: TObject);
begin
  if (TwwDBEdit (Sender).ReadOnly = True) then
  begin
    //SendMessage(Handle, WM_NEXTDLGCTL, 0, 0);
 
//Application.ProcessMessages;
    SelectNext(TwwdbEdit(Sender), True, True);
    //Perform(WM_NEXTDLGCTL, 0, 0);
  end;
end;

Tambien intente de esta forma..

Código Delphi [-]
if (TwwDBEdit (Sender).ReadOnly = True) then
with TStringGrid(wwDBGrid1) do 
  begin        
     if Col:=1 then col=2
    row:=row+1;
    setfocus;
end;

Next editable
 

Y que tal si al momento de colocar su propiedas en readonly le colocas la opcion de Tabstop en false. Eso evitara que ingrese al seleccionar el siguiente control.

Saludos.

Gracias por reponder tan rapido.. ya lo probe y sigue igual..
le seguire buscando. despues de la hora de comer :p


Sigo atoradisimo..

Investigando, al parecer tabstop no aplica dentro de un grid..

B u m p...

Nada? nadie?..

requete bump!

Aqui nomas resucitando al muerto.. jeje
ya no le habia dado a este problemita pero regresando al tema me doy cuenta que el evento onenter funciona como dobleclick y no con el ENTER o el TAB, otra es que el tabstop no funciona dentro del grid.. solo para los objetos de la forma.. y fuera de eso me he quedado como empece.. osea en blanco!

a ver si alguien tiene alguna idea... me imagino que sera algo en el keypress...


Gracias

ya va que no entiendo mucho, a los componentes no editables colocalos read only para que no se puedan modificar, y la propiedad tabstop en false, luego solo tendras que hacer

Código Delphi [-]
SelectNext(ActiveControl, True, True);

eso tambien podrias hacerlo con

la verdad ya habia probado con eso..
pero asi

SelectNext(TwwdbEdit(Sender), True, True);

y con lo de enabled.. pues se comporta de una manera extraña.. tambien lo habia probado y me desbilita una columna completa.. y el tabstop segun he leido no funciona dentro de un grid

Pero muchas gracias por tomarte tu tiempo.