Na verdade como será um unico grid voce não precisa usar PageControl mas sim o 
TabControl

Com o TabControl vc coloca

if (SeuDataSet.Active) then
    SeuDataSet.Close;
SeuDataSet.Sql.Clear;

Case TabControl.TabIndex do
    0: SeuDataSet.Sql.Add('SELECT * FROM TABELA WHERE CAMPO = VALOR1');
    1: SeuDataSet.Sql.Add('SELECT * FROM TABELA WHERE CAMPO = VALOR2');
    0: SeuDataSet.Sql.Add('SELECT * FROM TABELA WHERE CAMPO = VALOR3');
end;
SeuDataSet.Open;

Marcelo Silva
Cel. 11 9693-4251
ICQ - 49224093
MSN [EMAIL PROTECTED]

----- Original Message ----- 
From: Marcelo Silva 
To: [EMAIL PROTECTED] 
Sent: Monday, September 20, 2004 5:01 PM
Subject: Re: [delphi-br] Re: DbGrid! Por favor!!!


Coloque um Grid em cada TabSheet
Coloque um Componente TDataSource e um DataSet no Form
Ligue todos os Grids ao mesmo DataSouce

no OnShow de cada TabSheet vc coloca:

if (SeuDataSet.Active) then
    SeuDataSet.Close;
SeuDataSet.Sql.Clear;
SeuDataSet.Sql.Add('SELECT * FROM TABELA WHERE CAMPO = VALOR');
SeuDataSet.Open;

* Onde Campo sde refere ao Campo que dever ser pesquisado e o valor consequentemente o 
valor requerido
* Ex.( WHERE ENSINO = 'MEDIO' )  ou  ( WHERE ENSINO = BASICO ) 

Marcelo Silva
Cel. 11 9693-4251
ICQ - 49224093
MSN [EMAIL PROTECTED]

  ----- Original Message ----- 
  From: mbtales 
  To: [EMAIL PROTECTED] 
  Sent: Monday, September 20, 2004 4:18 PM
  Subject: [delphi-br] Re: DbGrid! Por favor!!!


  Meu dbgrid é assim> não tem nada... Eu coloquei no editor de códigos 
  pra criar as colunas (não sei se coluna é o mesmo que select)... 
  Bom... Daria pra você, fazendo um grande favor, entrar em detalhes, 
  ou criar um código exemplo pra mim, fazendo um grande favor?

  --- Em [EMAIL PROTECTED], "Marcelo Silva" <[EMAIL PROTECTED]> 
  escreveu
  > Como está colocando seus selects ? 
  > No componente query ou via codigo ?
  > 
  > Se for no componente deverá usar um componente para cada Select
  > Se form no código vc pode colocar o Select no OnShow de cada ABA do 
  PageControl
  > 
  > Marcelo Silva
  > Cel. 11 9693-4251
  > ICQ - 49224093
  > MSN [EMAIL PROTECTED]
  >   ----- Original Message ----- 
  >   From: mbtales 
  >   To: [EMAIL PROTECTED] 
  >   Sent: Monday, September 20, 2004 3:42 PM
  >   Subject: [delphi-br] Re: DbGrid! Por favor!!!
  > 
  > 
  >   Mas como faço para colocar nas querys, cada escolaridade... É 
  porque 
  >   eu não sou bom em query...
  > 
  >   --- Em [EMAIL PROTECTED], "Eduardo Jedliczka" 
  >   <[EMAIL PROTECTED]> escreveu
  >   > Crie várias querys diferentes, uma para cada escolaridade, e 
  ligue 
  >   cada dbgrid numa query diferente... ;-)
  >   > 
  >   > [s]
  >   > 
  >   > =====================
  >   > Eduardo Jedliczka
  >   > GeraSoft Informática
  >   > Apucarana - PR
  >   > =====================
  >   >   ----- Original Message ----- 
  >   >   From: mbtales 
  >   >   To: [EMAIL PROTECTED] 
  >   >   Sent: Monday, September 20, 2004 3:25 PM
  >   >   Subject: [delphi-br] DbGrid! Por favor!!!
  >   > 
  >   > 
  >   >   Olá... Por favor, peço ajuda:
  >   > 
  >   >   Tenho um DBGrid. Ele está dentro de um
  >   >   PageControl. Num dos campos do DBGrid, se chama Escolaridade. 
  Aí,
  >   >   eu
  >   >   preciso criar outras alças no pagecontrol, cada um com um 
  dbgrid
  >   >   igual ao original. No primeiro dbgrid, no campo Escolaridade 
  fica
  >   >   Ensino médio, e no outro dbgrid, no campo escolaridade fica 5ª
  >   >   a 8ª
  >   >   Séries. Como faço?
  >   > 
  >   >   Lembrando que cada dbgrid fica em uma alça diferente no
  >   >   pagecontrol.
  >   > 
  >   >   Simplificando mais: Tenho a tabela leitor. Tenho dois dbgrids 
  que 
  >   >   cada um tem um campo da tabela leitor chamado Escolaridade. 
  >   Preciso 
  >   >   simplesmente de que um dos dbGrids receba apenas ENS. MÉDIO do
  >   >   campo 
  >   >   escolaridade, e o outro receba apenas 5ª a 8ª séries. Essas
  >   >   opções 
  >   >   são cadastradas no campo escolaridade por um dbcombobox, então
  >   >   ele 
  >   >   escolhe um dos dois.
  >   > 
  >   >   Por favor, se alguém não entender, pergunte de volta.
  >   > 
  >   >   É muito importante....
  >   > 
  >   >   Obrigado à todos...
  >   > 
  >   > 
  >   > 
  >   > 
  >   >   -- 
  >   >   <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
  >>>>>
  >   > 
  >   >   Para ver as mensagens antigas, acesse:
  >   >   http://br.groups.yahoo.com/group/delphi-br/messages
  >   > 
  >   >   Para falar com o moderador, envie um e-mail para:
  >   >   [EMAIL PROTECTED] ou [EMAIL PROTECTED]
  >   > 
  >   > 
  >   > 
  >   >         Yahoo! Grupos, um serviço oferecido por: 
  >   >           
  >   > 
  >   > 
  >   > ----------------------------------------------------------------
  ----
  >   ----------
  >   >   Links do Yahoo! Grupos
  >   > 
  >   >     a.. Para visitar o site do seu grupo na web, acesse:
  >   >     http://br.groups.yahoo.com/group/delphi-br/
  >   >       
  >   >     b.. Para sair deste grupo, envie um e-mail para:
  >   >     [EMAIL PROTECTED]
  >   >       
  >   >     c.. O uso que você faz do Yahoo! Grupos está sujeito aos 
  Termos 
  >   do Serviço do Yahoo!. 
  >   > 
  >   > 
  >   > 
  >   > [As partes desta mensagem que não continham texto foram 
  removidas]
  > 
  > 
  > 
  >   -- 
  >   <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
  > 
  >   Para ver as mensagens antigas, acesse:
  >   http://br.groups.yahoo.com/group/delphi-br/messages
  > 
  >   Para falar com o moderador, envie um e-mail para:
  >   [EMAIL PROTECTED] ou [EMAIL PROTECTED]
  > 
  > 
  > 
  >         Yahoo! Grupos, um serviço oferecido por: 
  >           
  > 
  > 
  > --------------------------------------------------------------------
  ----------
  >   Links do Yahoo! Grupos
  > 
  >     a.. Para visitar o site do seu grupo na web, acesse:
  >     http://br.groups.yahoo.com/group/delphi-br/
  >       
  >     b.. Para sair deste grupo, envie um e-mail para:
  >     [EMAIL PROTECTED]
  >       
  >     c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos 
  do Serviço do Yahoo!. 
  > 
  > 
  > 
  > [As partes desta mensagem que não continham texto foram removidas]



  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



        Yahoo! Grupos, um serviço oferecido por: 
          


------------------------------------------------------------------------------
  Links do Yahoo! Grupos

    a.. Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/
      
    b.. Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]
      
    c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 



[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por:
 



Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. 

[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 



Responder a