Estou usando essa função para fazer a gravação no banco, mas ela naum esta 
identificando as mensagem de erros gerados pelo banco, o que tenho que fazer 
nela para que mostre a mensagem que foi colocado no exception do banco.

function Gravar(cdse:TClientDataSet):Boolean;
begin
        with cdse do
        begin
                if ApplyUpdates(0) > 0 then
                begin
                        ShowMessage('Atenção! Erro na Gravação.');
                        CancelUpdates;
                        Result := False;
                end
                else
                begin
                        Result := True;
                end;
        end;
end;

Agradeço qualquer ajuda.

Sérgio Kawahara

[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