Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
aleshy Profissional

Registrado: Terça-Feira, 13 de Março de 2007 Mensagens: 627
|
Enviada: Qui Fev 12, 2009 2:16 am Assunto: Duvida com campo Lookup (Resolvido) |
|
|
Ola pessoal.
Estou desenvolvendo uma sistema que tem o seguinte.
Um campo CODIGO e um DESCRICAO. Descricao é um campo LookUp.
Quando digito o codigo ele tras a descricao.
Queria saber como fazer para que quando fosse digitado um codigo que nao existe ele apresentasse a messagem de erro.
O que acontece atualmente é que se digitar um codigo que nao existe ele nao dá nenhum erro.
Ex: Se eu digitar 1 ele tras SALVADOR. Se eu digitar 2 e este codigo nao existir ele nao dá erro e a descricao continua SALVADOR.
Como posso controlar isso?
Obrigado! _________________ Alex Vieira
Desenvolvedor
Salvador - Ba
Editado pela última vez por aleshy em Sex Fev 13, 2009 4:24 pm, num total de 1 vez |
|
Voltar ao Topo |
|
 |
abagattini Mestre

Registrado: Terça-Feira, 29 de Novembro de 2005 Mensagens: 758 Localização: Porto Alegre/RS
|
Enviada: Qui Fev 12, 2009 2:35 pm Assunto: |
|
|
Código: | lookup.keyvalue:=codigo
if(lookup.text<>'')tehn
codigo existe
else
codigo não existe |
|
|
Voltar ao Topo |
|
 |
aleshy Profissional

Registrado: Terça-Feira, 13 de Março de 2007 Mensagens: 627
|
Enviada: Qui Fev 12, 2009 3:15 pm Assunto: |
|
|
Ok amigo abagattini!
Mas, eu coloco esse codigo em algum evento especifico ou escolho um ao meu modo?
Se vc ja fez isso em algum evento especifico qual foi ele?
Valeu! _________________ Alex Vieira
Desenvolvedor
Salvador - Ba |
|
Voltar ao Topo |
|
 |
abagattini Mestre

Registrado: Terça-Feira, 29 de Novembro de 2005 Mensagens: 758 Localização: Porto Alegre/RS
|
Enviada: Qui Fev 12, 2009 3:36 pm Assunto: |
|
|
pode ser no próprio evento OnExit do componente |
|
Voltar ao Topo |
|
 |
aleshy Profissional

Registrado: Terça-Feira, 13 de Março de 2007 Mensagens: 627
|
Enviada: Sex Fev 13, 2009 4:18 pm Assunto: |
|
|
Valeu Brother.
Vi seu codigo e adaptei a minha necessidade. Ficou assim:
Código: |
procedure TDMProfissionais.CDSCodEstadoChange(Sender: TField);
begin
inherited;
if CDSLookEstado.Text = '' then
ShowMessage('teste');
end;
|
Valeu ai amigao! _________________ Alex Vieira
Desenvolvedor
Salvador - Ba |
|
Voltar ao Topo |
|
 |
|