Nos botões anterior e proximo para manipular o registro, estou com o
seguinte problema
Quando não tem nda no banco ele da um erro EVariantError, estava
tentando tratar...mas ainda não consegui.
 
 
 
procedure Tfrm_os.btn_anteriorClick(Sender: TObject);
begin
try
  DTM.tb_os.Prior;
  btn_novo.Enabled := True;
  btn_gravar.Enabled := False;
  CODIGO_OS := DTM.dsn_os.DataSet['os_codigo'];
except
on EVariantError do
begin
  ShowMessage('Nenhuma OS');
  abort;
 end;
end;
 
 
Rodrigo


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