Se vc estiver inserindo: 

            If datasource.state in [dsInsert, dsEdit] then

                        If tabela.locate(código, ‘0001’,
[locaseInsensitive]) then

                                   ShowMessage(‘Esse cadastro já existe’)

 

Alex Canario

  _____  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Andre Mesquita
Enviada em: segunda-feira, 14 de agosto de 2006 14:19
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Re: Saida do edit

 

Escreva algo que identifique a saída ou então use uma flag.

if Sender <> btnSair then
  begin
    // Rotina de verificação
  end;

ou então declare uma variável tipo: " testaSaida : Boolean;" onde vc fará 
seus testes...


----- Original Message ----- 
From: "Cleiton" <[EMAIL PROTECTED]>
To: <delphi-br@yahoogrupos.com.br>
Sent: Monday, August 14, 2006 1:18 PM
Subject: [delphi-br] Re: Saida do edit


Ja aconteceu isso comigo também.

Eu tinha colocado uma rotina no evento on exit de um edit e quando entrava 
no form ele executava como se a rotina estive no on show do form.

Sem saber como resolver o problema eu acabei desistindo da rotina naquele 
momento.
  ----- Original Message ----- 
  From: Jean
  To: delphi-br@yahoogrupos.com.br
  Sent: Friday, August 11, 2006 2:02 PM
  Subject: [delphi-br] Saida do edit


  Boa Tarde,

  Estou tentando fazer com que na saida do Edit ele verifique se ja existe o

cadastro....
  ... o problema é que tenho um botão na tela para sair e quando clico nele 
ele continua fazendo o teste do Edit e não sai. Como Fazer????



  [As partes desta mensagem que não continham texto foram removidas]


-- 
Esta mensagem foi verificada pelo sistema de antivírus e
acredita-se estar livre de perigo.



[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>



Links do Yahoo! Grupos








 



[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]
 
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

 



Responder a