(Resolvido) Não executa o OnValidate na inserção

[viniciusfip]

Pessoal, estou começando no Delphi e me deparei com a seguinte situação: estou tentando fazer a validação de uma Inscrição estadual, no entanto na hora que tento inserir uma empresa e coloco qualquer numero para I.E não aparece nenhuma alerta de erro, mas funciona na edição!

Alguém poderia me explicar o porquê disso?! Desde já agradeço. obrigado.

Segue o código OnValidate do campo.

procedure TfrmClientes.CLTSDOC2Validate(Sender: TField);
begin

  if  ((not CLTSDOC2.IsNull) and (Length(trim(CLTSDOC2.NewValue))>0) and (not documentoValido2(CLTSDOC2.NewValue))) then  
    abort;
  
  if dd.verificaDOC(CLTS.State, CLTSID.AsInteger, 'CLIENTES','DOC2',CLTSDOC2.AsString,CLTSGENERO.AsInteger )then
    abort;
    
end;

Desculpa, mas esqueci de colocar o código que valida o documento:

function TfrmClientes.documentoValido2(doc2:string): boolean;
begin
  if length(trim(doc2))<=0 then begin
    result:=true;
    exit;
  end;
  if CLTSGENERO.AsInteger in [0,1] then
  begin
    Result:=true;
    exit;
  end;

  if length(trim(CLTSESTADO.AsString))<=0 then
  begin
    ShowMessage('UF não definida!');
    result:=false;
    exit;
  end;

      fp.ACBrValidador1.TipoDocto:=docInscEst;
      fp.ACBrValidador1.Complemento:=CLTSESTADO.AsString;
      fp.ACBrValidador1.Documento:=doc2;
      result:=fp.ACBrValidador1.Validar;
end;

Edited September 27, 2011 by viniciusfip

[viniciusfip]

Não resolveu!

Agora fiquei sem entender outra coisa estou usando ACBrValidator pra formatar e validar os campos... no entanto retirei o código do OnValidate e exibe as mensagens de erro, mas o foco vai para o campo seguinte...

Quando se utiliza o ACBrValidator pode retirar o código do onvalidate? ele valida o campo, mas perde o foco...

[viniciusfip]

O pior é que não sei se o erro é do componente ou no evento OnValidate?!?

Alguém Utiliza o ACBrValidator e poderia me dá uma força de como resolver esse problema de validação?! é como se não estivesse executando o Onvalidate, pois aparece a mensagem de alerta, mas perde o foco! tem algum comando que force o o cursor ficar em determinado campo? pois já tentei o setFocus, mas não adiantou...

[Jhonas]

Veja

http://www.djsystem.com.br/acbr/mantis/view.php?id=284

abraço

[viniciusfip]

Resolvido...

O problema não era com o componente e nem com o envento OnValidate em si, mas na função documentoValido2.

Obrigado pelas respostas.