Olá,
Então, use o evento STATECHANGE do seu datasource pra controlar o estado dos
botões:
procedure TForm1.DataSource1StateChange(Sender: TObject); begin
Case DataSource1.State of
dsInactive:
begin
botaoIncluir.Enabled:=TRUE;
botaoDeletar.Enabled:=FALSE;
botaoSalvar.Enabled:=FALSE;
botaoCancelar.Enabled:=FALSE;
botaoPesquisar.Enabled:=TRUE;
end;
dsInsert:
begin
botaoIncluir.Enabled:=FALSE;
botaoDeletar.Enabled:=FALSE;
botaoSalvar.Enabled:=TRUE;
botaoCancelar.Enabled:=TRUE;
botaoPesquisar.Enabled:=FALSE;
end;
dsEdit:
begin
botaoIncluir.Enabled:=FALSE;
botaoDeletar.Enabled:=FALSE;
botaoSalvar.Enabled:=TRUE;
botaoCancelar.Enabled:=TRUE;
botaoPesquisar.Enabled:=FALSE;
end;
dsBrowse:
begin
botaoIncluir.Enabled:=TRUE;
botaoDeletar.Enabled:=TRUE;
botaoSalvar.Enabled:=FALSE;
botaoCancelar.Enabled:=FALSE;
botaoPesquisar.Enabled:=TRUE;
end;
end;
end;
Tente e reporte.
[]'s
Alexandre Oliveira Campioni
Analista de Sistemas
A-Tecnologia e Sistemas de Informacao Ltda.
Sao Joaquim da Barra - Sao Paulo - Brasil
[EMAIL PROTECTED]
-----Mensagem original-----
De: Catiúscia A. Barrilli da Cruz [mailto:[EMAIL PROTECTED]
Enviada em: segunda-feira, 7 de março de 2005 10:13
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Mensagem para DBGrid
mas eu gostaria que, quando passasse de um linha para outra os botões de
inlcuir, alterar e etc voltassem o enabled ao normal...
-------Mensagem original-------
De: Murilo Cunha (Yahoo)
Data: 03/06/05 10:41:58
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Mensagem para DBGrid
Catiuscia,
Quando vc muda de linha no DBGrid eh dado um POST automatico no banco.
Não se preocupe com isto (de não gravar)!!!
Se preocupe com o usuario não inserir valores validos nas colunas ou falta
de dado ou inserir dado "escravo" sem o "mestre"... Isto vai dar bastante
trabalho... Insercoes com DBGrid!!!
----------------------------------------------------------------------------
MSc.: Murilo Cesar Starke da Cunha
Engenheiro Agrônomo
[EMAIL PROTECTED]
[EMAIL PROTECTED] (MSN)
-----Mensagem original-----
De: Catiúscia A. Barrilli da Cruz [mailto:[EMAIL PROTECTED]
Enviada em: sábado, 5 de março de 2005 09:41
Para: Delphi-Br
Assunto: [delphi-br] Mensagem para DBGrid
Bom Dia !!!
Gostaria de saber como se faz para, por exemplo, se ao incluir ou alterar,
alguma linha num dbGrid, e o usuário faz alguma coisa que o cursor vai pra
outra linha, sem ter gravado, como faço para gravar antes de sair da linha q
está incluindo ou alterando ???
Cati
[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
--
<<<<< 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!.
__________ NOD32 1.1017 (20050302) Information __________
This message was checked by NOD32 antivirus system.
http://www.nod32.com
[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
--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.6.2 - Release Date: 04/03/2005
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.6.2 - Release Date: 04/03/2005
--
<<<<< 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
