no evento onclik do dbnavigator... if button = nbinsert then begin aqui vc coloca o codigo... end;
inserir registro = nbinsert salvar registro = nbpost ... espero ter te ajudado! Atenciosamente Hudson Dias www.alcancedigital.com.br MSN: [EMAIL PROTECTED] Skype: hudson_bh Tele: (31)3434-6304 ----- Original Message ----- From: Satoy Matsuoka To: delphi-br@yahoogrupos.com.br Sent: Friday, August 31, 2007 7:43 AM Subject: Re: [delphi-br] Commit automático Obrigado Fábio, Mas quando utilizo uma tabela ??? Na verdde uso Tquery pq as próprias pessoas da lista me disseram que não poderia utilizar o Ttable. Mas uso o DBgrid ou DBEdit e DBnavigator ... Onde vou dar o commit ???? E como ??? Grato Abraços []'s Satoy Em 30/08/07, fabio giro <[EMAIL PROTECTED]> escreveu: > > Quando trabalhava com IBX fazia assim: > > with DM.qryManut do > begin > close; > sql.clear; > if btIncAlt.caption = 'Incluir' then > begin > sql.add('INSERT INTO EMPRESA (CODEMP, DESCRICAO) sql.add(' VALUES > (:pcodemp, :pdescr); > end > else > if btIncAlt.caption = 'Alterar' then > begin > sql.add('UPDATE EMPRESA'); > sql.add(' SET DESCRICAO = :pdescr'); > sql.add(' WHERE CODEMP = :pcodemp'); > end; > if not Transaction.InTransaction then > Transaction.StartTransaction; > prepare; > Params.ByName('pcodemp').asstring := trim(edtCodEmp.text); > Params.ByName('pdescr').asstring := trim(edtDescr.text); > ExecQuery; > try > Transaction.Commit; > except > Transaction.Rollback; > end; > end; > > Mais uma coisa, sempre que você acessar o banco (select, insert, update, > delete), tem que dar commit; > > Espero ter ajudado. > > Satoy Matsuoka <[EMAIL PROTECTED] <satoym%40gmail.com>> escreveu: > Olá Rubem, > > Mas não é o que ocorre com minha aplicação. > > Ex. se estou na tela simples (Cód. descrição). > Depois que faço a atualização, (aperto o botão de insert do DBNavigator), > e > sem sair da tela, faço a query por fora do sistema, ela não me responde > com > as alterações feitas. > > Somente depois que saido, ou dou um commit explícito, é que enchergo as > alterações. > > Então estou fazendo algo de errado na minha estrutura ?? > > Grato > []'s > Satoy > > Em 30/08/07, Rubem Nascimento da Rocha <[EMAIL PROTECTED]<djpardalrocha%40hotmail.com>> > escreveu: > > > > > > Até onde me consta, em qualquer SGBD relacional, se você envia somente > uma > > instrução SQL de DML (INSERT, UPDATE ou DELETE) ao banco de dados, e > este > > não está envolvido em um contexto transacional, o COMMIT ocorrerá de > forma > > automática pelo servidor. > > > > Ou seja, se você tem várias operações SQL de DML que necessitam ser > > efetivadas de forma atômica (ou seja, ou tudo ou nada!), faça o contexto > > transacional (START TRANSACTION/COMMIT/ROLLBACK) envolvendo todas essas > > operações. Se for apenas uma única operação, o banco se encarrega de > fazer > > COMMIT ou ROLLBACK automático se ocorrer alguma operação errada. > > > > Sds. > > > > To: [EMAIL PROTECTED]<delphi-br%40yahoogrupos.com.brFrom><delphi-br%40yahoog > rupos.com.brFrom>: > > [EMAIL PROTECTED] <satoym%40gmail.comDate> <satoym%40gmail.comDate>: > Thu, 30 Aug 2007 11:34:22 > > -0300Subject: [delphi-br] Commit automático > > > > Bom dia pessoal,Estou usando o D7 com Firebird e IBX.Queria saber se > > existe alguma forma de configurar o Delphi para fazer ocommit > > automático.Ou seja qq insert já faz o commit.Seja em um execsql, ou > usando > > um DBNagivator ...Sem ter que ficar dando o Commit explicito.Grato > []'s[As > > partes desta mensagem que não continham texto foram removidas] > > > > __________________________________________________________ > > Receba as últimas notícias do Brasil e do mundo direto no seu Messenger > > com Alertas MSN! É GRÁTIS! > > http://alertas.br.msn.com/ > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > Flickr agora em português. Você clica, todo mundo vê. Saiba mais. > > [As partes desta mensagem que não continham texto foram removidas] > > > [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]