Jose Newton, Informe mais detalhes sobre o erro!
-- Gildenor Teixeira Autogere - Sistemas de Automação e Gestão 61 9985-9008 2009/10/9 Jose Newton Araujo <jose.new...@jnewton.com.br> > > > Conterraneo, > > Também não funcionou LocateSuccess := TblInsumos.Locate('CODEINSUMO' , > '03TR0542', []); > Sds > > Jose Newton > > De: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br> [mailto: > delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br>] Em > nome de Gildenor - Autogere Informática > Enviada em: sexta-feira, 9 de outubro de 2009 11:11 > Para: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br> > Assunto: Re: [delphi-br] Preciso de um Help > > > Jose Newton > > O seu locate apresenta um "vicio" em funcao do loPartialKey, > tire-o dentre as chaves. > deixe assim: > LocateSuccess := TblInsumos.Locate('CODEINSUMO' > > , '03TR0542', > []); > > -- > Gildenor Teixeira > Autogere - Sistemas de Automação e Gestão > 61 9985-9008 > > 2009/10/9 Jose Newton Araujo > <jose.new...@jnewton.com.br<jose.newton%40jnewton.com.br> > <mailto:jose.newton%40jnewton.com.br <jose.newton%2540jnewton.com.br>> > > > > > > > > > Quem pode me dizer o que esta errado que não funciona ? Que besteira > estou > > fazendo aqui: > > > > TblInsumos.Close; > > > > TblInsumos.Open; > > > > TblInsumos.First; > > > > LocateSuccess := TblInsumos.Locate('CODEINSUMO', '03TR0542', > > [loPartialKey]); > > > > if LocateSuccess = FALSE then ShowMessage('Verifique o Status do > > Transporte Coletivo Urbano...') else > > > > if not VarIsNull(TblInsumos['PREUNTSUMO']) then EditPUOnibusCol.Text := > > FloatToStr(TblInsumos['PREUNTSUMO']); > > > > TblInsumos.First; > > > > LocateSuccess := TblInsumos.Locate('CODEINSUMO', '03TR0543', > > [loPartialKey]); > > > > if LocateSuccess = FALSE then ShowMEssage('Verifique o Status do > > Transporte Coletivo - Metro Urbano...') else > > > > if not VarIsNull(TblInsumos['PREUNTSUMO']) then EditPUMetro.Text := > > FloatToStr(TblInsumos['PREUNTSUMO']); > > > > TblInsumos.Close; > > > > Nota: o Table existe ligado no Dataset, e todos os campos caregados. > > > > Obrigado > > > > Jose Newton > > > > [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] > > > [As partes desta mensagem que não continham texto foram removidas]