Re: [delphi-br] Pegar caption do botão

2004-11-17 Por tôpico Luciano R. Machado
Olá Vitor, Só queria lembrar que esse código irá gera uma exceção caso seja usado em um botão da classe TBitBtn. Que tal se fizerem assim: if (Sender is TBitBtn) then begin if TBitBtn(Sender).Caption = 'Inserir' then Procedimentos de inserção ... else ... end; -- Luciano Rodrigues

Re: [delphi-br] Pegar caption do botão

2004-11-17 Por tôpico Vitor Luiz Redes
if (Sender as TButton).Caption = 'Inserir' then begin Procedimentos de inserção ... end else Vitor Redes - Original Message - From: Hélton Ribeiro Nunes To: [EMAIL PROTECTED] Sent: Wednesday, November 17, 2004 2:06 PM Subject: [delphi

[delphi-br] Pegar caption do botão

2004-11-17 Por tôpico Hélton Ribeiro Nunes
Pessoal Preciso, dentro do evento onclick de um botão, utilizar o caption dele. Quero fazer isso para não ter q programar cada um dos botões q tenho no formulário, e sim, apenas uma unica vez. []´s -- < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM > Para ver as mensagens