| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
rafmattos
Colaborador
Registrado: Quinta-Feira, 11 de Fevereiro de 2010
Mensagens: 3416
Localização: Campo Grande/MS
|
 Enviada: Sex Ago 13, 2010 11:26 am Assunto: Pegar o ActiveControl [Resolvido] |
 |
|
Pessoal não estou conseguindo pegar o ActiveControl TcxDBTextEdit da (DEVEXPRESS), sera q ele nao retorna o ActiveControl, ou se vcs sabem alguma outra maneira de pegar.
meu código
| Código: |
if (ActiveControl is TcxDBTextEdit) then begin
ShowMessage('OK');
//
end;
|
grato desde já
Editado pela última vez por rafmattos em Sex Ago 13, 2010 12:07 pm, num total de 1 vez |
|
| Voltar ao Topo |
|
 |
juniormiranda
Experiente
Registrado: Segunda-Feira, 13 de Fevereiro de 2006
Mensagens: 413
|
| Enviada: Sex Ago 13, 2010 12:03 pm Assunto: Re: Pegar o ActiveControl |
|
|
| rafmattos escreveu: | Pessoal não estou conseguindo pegar o ActiveControl TcxDBTextEdit da (DEVEXPRESS), sera q ele nao retorna o ActiveControl, ou se vcs sabem alguma outra maneira de pegar.
meu código
| Código: |
if (ActiveControl is TcxDBTextEdit) then begin
ShowMessage('OK');
//
end;
|
grato desde já |
| Código: |
if (Screen.ActiveControl.Parent is TcxDBTextEdit) then
ShowMessage('Ok!');
|
[]'s
_________________
Júnior Miranda
Analista de Sistemas. |
|
| Voltar ao Topo |
|
|
rafmattos
Colaborador
Registrado: Quinta-Feira, 11 de Fevereiro de 2010
Mensagens: 3416
Localização: Campo Grande/MS
|
| Enviada: Sex Ago 13, 2010 12:05 pm Assunto: |
|
|
*************** RESOLVIDO **********************
tive que verificar pela class TcxCustomInnerTextEdit e depois verificar se Parent era o TcxDbTextEdit
| Código: |
if (ActiveControl is TcxCustomInnerTextEdit) then begin
if (ActiveControl as TcxCustomInnerTextEdit).Parent is TcxDbTextEdit then
ShowMessage('Campo Focado: '+((ActiveControl as TcxCustomInnerTextEdit).Parent as TcxDbTextEdit).DataBinding.Field.DisplayName);
end;
|
|
|
| Voltar ao Topo |
|
|
rafmattos
Colaborador
Registrado: Quinta-Feira, 11 de Fevereiro de 2010
Mensagens: 3416
Localização: Campo Grande/MS
|
| Enviada: Sex Ago 13, 2010 12:07 pm Assunto: Re: Pegar o ActiveControl |
|
|
| PlenusJunior escreveu: |
| Código: |
if (Screen.ActiveControl.Parent is TcxDBTextEdit) then
ShowMessage('Ok!');
|
[]'s |
VLW Melhor ainda desse jeito vlw PlenusJunior |
|
| Voltar ao Topo |
|
|
|
FAQ
Pesquisar
Membros
Grupos
Registrar
Perfil
Entrar e ver Mensagens Particulares
Entrar
