ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Desabilitar um Botão no Delphi 7.

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
luizbeatles
Novato
Novato


Registrado: Quarta-Feira, 18 de Janeiro de 2012
Mensagens: 1

MensagemEnviada: Qua Jan 18, 2012 4:17 pm    Assunto: Desabilitar um Botão no Delphi 7. Responder com Citação

Olá, eu fiz um agenda super simples no delphi 7.

Eu gostaria de saber como que eu faço para Desabilitar o Botão Excluir quando não tiver nada para ser excluido e Reabilitá - lo qnd tiverem coisas escritar na agenda??

Exemplo:

Nome: José / Tel: 000 - 0000 / etc....

Dai eu vou lá e deleto o josé, certo?!

Minha agenda ficará com Nenhum nome e, nessa hora eu quero que o botão Exluir seja desabilitado.
Porém qnd eu colocar outra pessoa na agenda... Quero q o Botão Excluir volte.

Como fasso isso?

Grato.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
marielso
Novato
Novato


Registrado: Terça-Feira, 10 de Janeiro de 2012
Mensagens: 95

MensagemEnviada: Qua Jan 18, 2012 4:26 pm    Assunto: Re: Desabilitar um Botão no Delphi 7. Responder com Citação

sou novato nisso tbm mais axu q se vc for na propriedade enable dele e dar dois clique nela da certo
ai vc coloka esse codigo ond vc quer habilitar ele novamente

Btexcluir.Enabled:= not Btexcluir.Enabled;

axu q isso pode dar uma ajudada
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail
marcosalles
Moderador
Moderador


Registrado: Quarta-Feira, 26 de Março de 2008
Mensagens: 1695
Localização: Muriaé Mg

MensagemEnviada: Qua Jan 18, 2012 4:57 pm    Assunto: Responder com Citação

Utilize Actions
_________________
http://marcosalles.wordpress.com

Desenvolvo FreeLancer e presto Consultoria
Orientação Online DataSnap DbX ClientDataSet
POO , Padrões de Projeto e dúvidas de Delphi em
Geral
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Visitar a homepage do Usuário
raquelreis
Novato
Novato


Registrado: Quarta-Feira, 30 de Novembro de 2011
Mensagens: 97

MensagemEnviada: Qua Jan 18, 2012 5:10 pm    Assunto: Responder com Citação

Boa Tarde,

tbm sou novata. Mas tente assim:
Desabilite o botao com botao.enable := false;
Faça um busca na tabela se tiver resultado abilita o botão excluir com botao.enable = true;
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
marcosalles
Moderador
Moderador


Registrado: Quarta-Feira, 26 de Março de 2008
Mensagens: 1695
Localização: Muriaé Mg

MensagemEnviada: Qua Jan 18, 2012 5:16 pm    Assunto: Responder com Citação

raquelreis escreveu:
Boa Tarde,

tbm sou novata. Mas tente assim:
Desabilite o botao com botao.enable := false;
Faça um busca na tabela se tiver resultado abilita o botão excluir com botao.enable = true;


Então , para vcs que se julgam novatos , pelo menos dee uma pesquisada
em Açoes ...
_________________
http://marcosalles.wordpress.com

Desenvolvo FreeLancer e presto Consultoria
Orientação Online DataSnap DbX ClientDataSet
POO , Padrões de Projeto e dúvidas de Delphi em
Geral
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Visitar a homepage do Usuário
wagnercabrera
Aprendiz
Aprendiz


Registrado: Terça-Feira, 10 de Janeiro de 2012
Mensagens: 155
Localização: Arapongas - PR

MensagemEnviada: Qui Jan 19, 2012 11:05 am    Assunto: Responder com Citação

Como você utiliza essa agende meu querido? rs

se for um data set pode verificar assim:

btnexcluir.enabled := not dataset.eof;

passe mais detalhes dessa agenda.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail MSN Messenger
Djarum
Aprendiz
Aprendiz


Registrado: Quarta-Feira, 1 de Junho de 2011
Mensagens: 296

MensagemEnviada: Qui Jan 19, 2012 11:26 am    Assunto: Responder com Citação

Cara,

Nesse exemplo seu, eu colocaria um TTimer (Aba System) e colocaria algo do tipo:
Código:

if Dm1.tabela.IsEmpty then
begin
botaoexcluir.enabled := false;
end
else
botaoexcluir.enabled := true;
end;


Dependendo, dá pra ajustar a sua necessidade.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
Djarum
Aprendiz
Aprendiz


Registrado: Quarta-Feira, 1 de Junho de 2011
Mensagens: 296

MensagemEnviada: Qui Jan 19, 2012 11:27 am    Assunto: Responder com Citação

Ou também Actions.

É uma excelente dica do MarcosSalles.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
emiliolemos
Novato
Novato


Registrado: Quinta-Feira, 16 de Dezembro de 2010
Mensagens: 5

MensagemEnviada: Qui Jan 19, 2012 11:59 am    Assunto: Responder com Citação

Muito simples

no evento ondatachanged do datasource coloque

botao.enabled := (tabela.recordcount>0);
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB