ayuda Onchanging

[alfgonso84]

A ver si alguno de ustedes tiene idea de si esto que tengo en mente se puede hacer, generalmente el libro de Delphi en 14 dias me saca de la duda pero no especifica que no se pueda
Lo que pasa es que tengo una forma con un PageControl si no se han seleccionado determinadas opciones o tiene caso que pase a las demas pero tube que poner una ultima pestaña llamada configuracion para opciones especiales
el problema es que como esta hasta ahora no cambia a ninguna pestaña

Código Delphi [-]
 if PageControl1.ActivePage = tbsPrimero then
  begin
    if query.IsEmpty then
    begin
      AllowChange := false;
      showMessage('No se puede');
      exit;
    end;
  end;

como decia esto esta en el OnChanging quero saber si hay alguna condicion para que a deerminadas pestañas si y a otras no

[[egostar]]

Y ya checaste que el Query no este vacio???

Esto solo te pasa en el primer Tab.

Salud OS.

Edito

En todo caso, deberías de pasar el control a otro tab, por ejemplo al segundo

Algo asi:

Código Delphi [-]
 if PageControl1.ActivePage = tbsPrimero then
  begin
    if query.IsEmpty then
    begin
      AllowChange := false;
      showMessage('No se puede');
      PageControl1.ActivePage := tbsSegundo;
      //exit; esto no creo se se requiera.
    end;
  end;

[alfgonso84]

Lo hace perfecto si se presiona un boton el query se llena y me permite cambiar a cualquiera de las pestañas para trabajar sobre la tabla

Pero en una de las opciones para crear datos nuevos nesesitas un consecutivo ese se genera en la ultima pestaña entonces nesesito que el allowchange sea true pero solo para una de las pestañas

[alfgonso84]

Super simple gracias y cuando este en segundo regrese a primero para que no te permita pasar a las demas mientras no llenes el query gracias