Re: [delphi-br] CTRL+SHIFT+C (Class Completion) - N ão funciona!!!
Para funcionar você precisa declarar ela e não pode já ter um método com este nome, senão ele não recria. Provavelmente você já tem um método e a declaração dele e a assinatura do método está em desacordo uma com a outra. 2009/5/13 Pablo Henrique Vianini Souza whsyst...@hotmail.com Galera to tendo um problema com o meu CTRL+SHIFT+C (Class Completion) quando declaro em qualquer local seja private, public e tal e depois pressiono estas teclas para efetuar o Class Completion nada acontece. Faço CTRL+F9 e ele me da os seguintes erros: [Error] ufrmPrincipal.pas(15): Unsatisfied forward or external declaration: 'TForm1.abrir' [Fatal Error] Teste.dpr(6): Could not compile used unit 'ufrmPrincipal.pas' Estou usando Delphi 7... Obrigado desde já, responsam por favor nem que seja pra dizer que não tem nem ideia do que seja... Pablo Vianini WareHouse (32) 3372-7495 (32) 9199-8328 __ Emoticons e Winks super diferentes para o Messenger. Baixe agora, é grátis! http://specials.br.msn.com/ilovemessenger/pacotes.aspx [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Problemas com Variants
Pessoal, Alguém por acaso trabalha com variants no DataSnap 2009? Utilizando o Delphi 2009, alguns eventos dão mensagem de erro de invalidVariant. Ex: MeuClientDataSet.OnDataRequest(VarArrayOf([parametros])); Isso antes funcionava e agora não funciona mais. Any sugestion? []s Daniel [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Pegar valores de duas edits e colocar em uma terceira edit
o comando é Pega edit! pega! quiz quiz!! brincadeira a parte.. faça assim: Edit3.Text := Edit1.Text + Edit2.Text; 2009/5/12 Sergio - Jundiaí / SP sergioinf...@yahoo.com.br: Boa noite qual comando para pegar valores de duas edit e colocar em uma terceira edit [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ...
RES: RES: [delphi-br] Foco nos campos da tela
Exato Andresa. O MDI vai abrir os formulários filho dentro da área disponível do form pai. Caso você coloque um menu em cima e um panel com alguma informação a esquerda, por exemplo, o form filho vai abrir no espaço que sobrou do form pai, no canto esquerdo abaixo do menu e ao lado do panel. E caso você maximize este form ele passa a integrar toda esta área, como acontece, por exemplo, no Word, no photoshop, etc. Vou criar um exemplo como você questionou para ver o que acontece. Nunca tentei fazer dessa maneira. _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Fone/Fax: (44) 3029-6053 - Maringá - Paraná http://www.n2solutions.com.br/ www.n2solutions.com.br http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br http://www.studion2.com.br/ www.studion2.com.br De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Andresa Ferreira Enviada em: terça-feira, 12 de maio de 2009 17:22 Para: delphi-br@yahoogrupos.com.br Assunto: Res: RES: [delphi-br] Foco nos campos da tela Claudiney. Não é uma apilcação MDI, pois MDI não abre dentro de um panel, não é? Meus formulários são fsNormal. Andresa De: Claudiney Cogo claudiney-lis...@n2solutions.com.br mailto:claudiney-listas%40n2solutions.com.br Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Enviadas: Terça-feira, 12 de Maio de 2009 14:29:44 Assunto: RES: [delphi-br] Foco nos campos da tela Olá Andresa Por acaso o que você está tentando fazer não é uma aplicação MDI? Onde você tem um formulário pai e os formulários filhos abrem em uma área específica dele? Abraço _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Fone/Fax: (44) 3029-6053 - Maringá - Paraná http://www.n2soluti ons.com.br/ www.n2solutions. com.br http://www.nfe. n2solutions. com.br/ www.nfe.n2solutions .com.br http://www.studion2 .com.br/ www.studion2. com.br De: delphi...@yahoogrup os.com.br [mailto:delphi...@yahoogrup os.com.br] Em nome de Andresa Ferreira Enviada em: terça-feira, 12 de maio de 2009 14:08 Para: delphi...@yahoogrup os.com.br Assunto: [delphi-br] Foco nos campos da tela Estou fazendo uma aplicação onde tem o formulário principal, nele existe um panel onde preciso abrir os demais forms dentro, utilizo os seguintes comandos: form2.Show; Form2.Parent := Form1.Panel1; Ocorre o seguinte problema, quando abro o form2 não consigo focar os edits com o mouse, apenas com o tab, mas necessito que seja também com o mouse, detectei que mudando o borderstyle do form2 para bsNone, resolve o problema, mas a aplicação não pode ficar sem bordas nos formulários, e sem os botões de maximinizar, minimizar e fechar, alguém poderia me ajudar? Já agradeço.. Andresa _ _ __ De: Adolfo Stotz abnst...@fastlane. com.br mailto:abnstotz% 40fastlane. com.br Para: delphi...@yahoogrup os.com.br mailto:delphi- br%40yahoogrupos .com.br Enviadas: Terça-feira, 12 de Maio de 2009 12:55:18 Assunto: Re: [delphi-br] DBXCommon.pas Não existe a pasta databese dentro da pasta source. Pode ser algum problema de instalação? grato - Original Message - From: Paulo Coutinho To: delphi...@yahoogrup os.com..br Sent: Tuesday, May 12, 2009 12:30 AM Subject: Re: [delphi-br] DBXCommon.pas Olá, Essa unit fica em: C:\Arquivos de programas\CodeGear\ RAD Studio\6.0\source\ database Por padrão o Delphi já deveria reconhecer. 2009/5/12 Adolfo Stotz abnst...@fastlane. com.br Estou aprendendo DataSnap/Rad Studio. A minha aplicação Server conecta com o SQLServer 2008. A aplicação cliente, tambem conecta normalmente (Connected = True), mas ao executar a aplicação, aparece o seguinte erro - Remote Error: DBXError: Error Code: 3604 e ao fazer o debug, aparece o erro - Souce File not found: DBXCommon.pas. Que programa é este ? Onde ele deveria estar ? Onde encontra-lo ? Grato [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes. com/blog Site: www.prsolucoes. com Msn: pa...@prsolucoes. com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 4066 (20090512) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset. com.br [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 4068 (20090512) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus
Re: [delphi-br] CTRL+SHIFT+C (Class Completion) - Não funciona!!!
Não tenho nem idéia do que seja... []'s Ricardo. Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em qua, 13/5/09, Pablo Henrique Vianini Souza whsyst...@hotmail.com escreveu: De: Pablo Henrique Vianini Souza whsyst...@hotmail.com Assunto: [delphi-br] CTRL+SHIFT+C (Class Completion) - Não funciona!!! Para: nddv nddv n...@yahoogrupos.com.br, delphi-br delphi-br delphi-br@yahoogrupos.com.br Data: Quarta-feira, 13 de Maio de 2009, 2:13 Galera to tendo um problema com o meu CTRL+SHIFT+C (Class Completion) quando declaro em qualquer local seja private, public e tal e depois pressiono estas teclas para efetuar o Class Completion nada acontece . Faço CTRL+F9 e ele me da os seguintes erros: [Error] ufrmPrincipal. pas(15): Unsatisfied forward or external declaration: 'TForm1.abrir' [Fatal Error] Teste.dpr(6) : Could not compile used unit 'ufrmPrincipal. pas' Estou usando Delphi 7... Obrigado desde já, responsam por favor nem que seja pra dizer que não tem nem ideia do que seja... Pablo Vianini WareHouse (32) 3372-7495 (32) 9199-8328 _ _ _ _ _ _ Emoticons e Winks super diferentes para o Messenger. Baixe agora, é grátis! http://specials. br.msn.com/ ilovemessenger/ pacotes.aspx [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
RES: RES: [delphi-br] Foco nos campos da tela
Andresa. Fiz um exemplo como você falou. Realmente acontece isso. Tendo borda, você clica e o Edit não recebe o foco. E só com o Edit acontece isso. Com radio Button e check Box, por exemplo, que testei também não dá problema. Só o Edit, e provavelmente os outros da família. Mas, ele responde ao evento click. Só não fica com o foco. Porque também, não fui a fundo pra descobrir. Mas uma forma de resolver de imediato é você ir no evento click to Edit, lá no form2 e colocar um setfocus lá, tipo: Form2.Edit1.SetFocus; Assim vai funcionar. Não sei dizer se isso é algum problema com os componentes Edit, se existe ou não correção pra isso. Mas é uma saída. De repente alguém mais tem outra opinião, ou até mesmo, uma solução diferente. Abraço. _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Fone/Fax: (44) 3029-6053 - Maringá - Paraná http://www.n2solutions.com.br/ www.n2solutions.com.br http://www.nfe.n2solutions.com.br/ www.nfe.n2solutions.com.br http://www.studion2.com.br/ www.studion2.com.br De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Andresa Ferreira Enviada em: terça-feira, 12 de maio de 2009 17:22 Para: delphi-br@yahoogrupos.com.br Assunto: Res: RES: [delphi-br] Foco nos campos da tela Claudiney. Não é uma apilcação MDI, pois MDI não abre dentro de um panel, não é? Meus formulários são fsNormal. Andresa De: Claudiney Cogo claudiney-lis...@n2solutions.com.br mailto:claudiney-listas%40n2solutions.com.br Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Enviadas: Terça-feira, 12 de Maio de 2009 14:29:44 Assunto: RES: [delphi-br] Foco nos campos da tela Olá Andresa Por acaso o que você está tentando fazer não é uma aplicação MDI? Onde você tem um formulário pai e os formulários filhos abrem em uma área específica dele? Abraço _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Fone/Fax: (44) 3029-6053 - Maringá - Paraná http://www.n2soluti ons.com.br/ www.n2solutions. com.br http://www.nfe. n2solutions. com.br/ www.nfe.n2solutions .com.br http://www.studion2 .com.br/ www.studion2. com.br De: delphi...@yahoogrup os.com.br [mailto:delphi...@yahoogrup os.com.br] Em nome de Andresa Ferreira Enviada em: terça-feira, 12 de maio de 2009 14:08 Para: delphi...@yahoogrup os.com.br Assunto: [delphi-br] Foco nos campos da tela Estou fazendo uma aplicação onde tem o formulário principal, nele existe um panel onde preciso abrir os demais forms dentro, utilizo os seguintes comandos: form2.Show; Form2.Parent := Form1.Panel1; Ocorre o seguinte problema, quando abro o form2 não consigo focar os edits com o mouse, apenas com o tab, mas necessito que seja também com o mouse, detectei que mudando o borderstyle do form2 para bsNone, resolve o problema, mas a aplicação não pode ficar sem bordas nos formulários, e sem os botões de maximinizar, minimizar e fechar, alguém poderia me ajudar? Já agradeço.. Andresa _ _ __ De: Adolfo Stotz abnst...@fastlane. com.br mailto:abnstotz% 40fastlane. com.br Para: delphi...@yahoogrup os.com.br mailto:delphi- br%40yahoogrupos .com.br Enviadas: Terça-feira, 12 de Maio de 2009 12:55:18 Assunto: Re: [delphi-br] DBXCommon.pas Não existe a pasta databese dentro da pasta source. Pode ser algum problema de instalação? grato - Original Message - From: Paulo Coutinho To: delphi...@yahoogrup os.com..br Sent: Tuesday, May 12, 2009 12:30 AM Subject: Re: [delphi-br] DBXCommon.pas Olá, Essa unit fica em: C:\Arquivos de programas\CodeGear\ RAD Studio\6.0\source\ database Por padrão o Delphi já deveria reconhecer. 2009/5/12 Adolfo Stotz abnst...@fastlane. com.br Estou aprendendo DataSnap/Rad Studio. A minha aplicação Server conecta com o SQLServer 2008. A aplicação cliente, tambem conecta normalmente (Connected = True), mas ao executar a aplicação, aparece o seguinte erro - Remote Error: DBXError: Error Code: 3604 e ao fazer o debug, aparece o erro - Souce File not found: DBXCommon.pas. Que programa é este ? Onde ele deveria estar ? Onde encontra-lo ? Grato [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes. com/blog Site: www.prsolucoes. com Msn: pa...@prsolucoes. com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 4066 (20090512) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset. com.br [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no
[delphi-br] Re: Uso de Soap no Windows2003 64Bits
Sei que o caso que vou informar é bem diferente do seu se não fosse o ponto em comum da plataforma 64 bits, mas tentei em vão configurar um ambiente Oracle XE + Delphi2007 + win Vista Ultimate 64bits. Só resolvi o problema de conexão com o Oracle quando troquei pelo Win Vista 32 Bits, ai sim pude trabalhar sem problemas.
Re: [delphi-br] Código de Barras Boleto Quick Report
Alguém tem o boleto bancario em ReportBuider ? Sei que pode ser preguiça minha, pois preciso entregar um projeto pra ontem, e se alguem me disponibiliza-lo, me adiantaria um grande lado, agradecendo por enquanto. Paulo Santana O2 Tecnologia em Sistemas Adriano Santos escreveu: Duas suspeitas: 1. Layout de página da impressora; 2. Driver da impressora laser; Adriano Santos Editor Chefe Revista ClubeDelphi 2009/5/12 nunesfelipe nunesfel...@yahoo.com.br mailto:nunesfelipe%40yahoo.com.br Ola Senhores, Esta acontecendo uma coisa muito estranha...tenho cliente que usam o boleto pelo sistema que trabalho...todos meus clientes imprime os boletos normalmente, exceto umele visualiza o boleto na tela e qndo manda imprimir, a impressão sai sem o código de barra...todos os dados sai corretamente, somente o codigo de barra sai em branco, mas na tela aparece o codigo de barra, mas não sai na impressão...ja tentei todas as posibilidades...mas pensei se seria alguma fonte que existe nos outros clientes que não existe nesse...pode ser alguma coisa parecido com isso? Ou alguém tem alguma ideia do que pode ser? Obrigado Felipe -- Adriano Santos Director X-35 Consulting and Development IT Manager SoftPark Chief Editor Magazines ClubeDelphi WebMobile www.delphitodelphi.blogspot.com www.adrianosantos.pro.br www.devmedia.com.br www.dug-sp.com [As partes desta mensagem que não continham texto foram removidas] __ Information from ESET NOD32 Antivirus, version of virus signature database 4070 (20090513) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com __ Information from ESET NOD32 Antivirus, version of virus signature database 4070 (20090513) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Projeto fonte desarrumado no desktop?
Pessoal, esta pergunta parece boba, mas é que toda vez que abro um projeto fonte os forms estão todos desarrumados, faço uma melhora na área do desktop para trabalhar com o fonte, acontece que ao abrir o delphi novamente ele se encontra do jeito anterior, com o delphi minimizado. Gosto que abre com o form principal e aparece com o form.dpr, Porque isto? grato.
[delphi-br] Como pegar o id autoincremento
Srs, Tenho duas tbl's...venda e itens...com a seguinte estrutura: venda codvenda codcliente data valortotal...etc itens codvenda codproduto qtde vl_unitario...etc o codvenda da tbl venda é autoincrementocomo faço para q o codvenda da tbl venda vá para o codvenda da tbl itens...dei uma pesquisada no tio google mas acho q nao estou sabendo procurar...se alguem puder me ajudar..ou me mostrando como proceder..ou o q devo procurar...ja procurei capturar id(ou cod) autoincremento...pegar cod autoincremento...enfim ja misturei algumas palavras q acho eu serem convenientes..mas ate agora nao achei... []'s [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Interbase ou Firebird?
Prezados, abro fontes de projetos e as vezes me deparo com o erro no teste de conexão do banco de dados, quando vou ver é que foi configurado no sqlconection para Interbase. Desativo o firebird e ativo o interbase fica ok. Pergunto: Posso mudar na configuração do driver name do sqlconection para Firebird? Gostaria de trabalhar somente com FIREBIRD. Desde já fico grato.
Re: [delphi-br] CTRL+SHIFT+C (Class Completion) - Não funciona!!!
Pode ser que tenha alguma coisa função ou procedure que tenha a declaração, mas não tenha a implementação. Já tive esse problema quando o Delphi, por exemplo, cria automaticamente o código do clique de um botão. Ele insere a declaração, mas não insere a implementação. Espere ter ajudado. __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/
Re: [delphi-br] Como pegar o id autoincremento
Isso foi discutido aqui esses dias, se não me engano semana passada. Dá uma pesquisadinha no grupo. Se mesmo assim não encontrar, qual é o banco de dados? 2009/5/13 Mario Rodrigues marioirodrig...@gmail.com Srs, Tenho duas tbl's...venda e itens...com a seguinte estrutura: venda codvenda codcliente data valortotal...etc itens codvenda codproduto qtde vl_unitario...etc o codvenda da tbl venda é autoincrementocomo faço para q o codvenda da tbl venda vá para o codvenda da tbl itens...dei uma pesquisada no tio google mas acho q nao estou sabendo procurar...se alguem puder me ajudar..ou me mostrando como proceder..ou o q devo procurar...ja procurei capturar id(ou cod) autoincremento...pegar cod autoincremento...enfim ja misturei algumas palavras q acho eu serem convenientes..mas ate agora nao achei... []'s [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Projeto fonte desarrumado no desktop?
Você trabalha com os fontes todos no Desktop? E o restante da pergunta eu me perdi, porque você tem que abrir o dpr, para depois ir abrindo os formulários agregados, você provavelmente está abrindo os formulários agregados para depois querer ver o dpr. Coisa maluca! 2009/5/13 nillgolv nillg...@bol.com.br Pessoal, esta pergunta parece boba, mas é que toda vez que abro um projeto fonte os forms estão todos desarrumados, faço uma melhora na área do desktop para trabalhar com o fonte, acontece que ao abrir o delphi novamente ele se encontra do jeito anterior, com o delphi minimizado. Gosto que abre com o form principal e aparece com o form.dpr, Porque isto? grato. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como pegar o id autoincremento
Boa pergunta. Eu perguntei sobre isso usando o trio, cds, sds e dsp, mas acho que não houve resposta. Como pegar o ultimo ID via dbExpress? 2009/5/13 Humberto Oliveira holiveira.wordpr...@gmail.com Isso foi discutido aqui esses dias, se não me engano semana passada. Dá uma pesquisadinha no grupo. Se mesmo assim não encontrar, qual é o banco de dados? 2009/5/13 Mario Rodrigues marioirodrig...@gmail.commarioirodrigues%40gmail.com Srs, Tenho duas tbl's...venda e itens...com a seguinte estrutura: venda codvenda codcliente data valortotal...etc itens codvenda codproduto qtde vl_unitario...etc o codvenda da tbl venda é autoincrementocomo faço para q o codvenda da tbl venda vá para o codvenda da tbl itens...dei uma pesquisada no tio google mas acho q nao estou sabendo procurar...se alguem puder me ajudar..ou me mostrando como proceder..ou o q devo procurar...ja procurei capturar id(ou cod) autoincremento...pegar cod autoincremento...enfim ja misturei algumas palavras q acho eu serem convenientes..mas ate agora nao achei... []'s [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Instalação do FireBird automática
Olá, gostaria de saber se existe alguma forma de instalar o firebird automaticamente, sem intervenção do usuário. pode ser usando um parâmetro e tal. igual fazemos com os produtos da microsoft onde passamos um parâmetro para o MSI e ele instala tudo em background. -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como pegar o id autoincremento
Qual o banco de dados? 2009/5/13 Paulo Coutinho pa...@prsolucoes.com Boa pergunta. Eu perguntei sobre isso usando o trio, cds, sds e dsp, mas acho que não houve resposta. Como pegar o ultimo ID via dbExpress? 2009/5/13 Humberto Oliveira holiveira.wordpr...@gmail.comholiveira.wordpress%40gmail.com Isso foi discutido aqui esses dias, se não me engano semana passada. Dá uma pesquisadinha no grupo. Se mesmo assim não encontrar, qual é o banco de dados? 2009/5/13 Mario Rodrigues marioirodrig...@gmail.commarioirodrigues%40gmail.com marioirodrigues%40gmail.com Srs, Tenho duas tbl's...venda e itens...com a seguinte estrutura: venda codvenda codcliente data valortotal...etc itens codvenda codproduto qtde vl_unitario...etc o codvenda da tbl venda é autoincrementocomo faço para q o codvenda da tbl venda vá para o codvenda da tbl itens...dei uma pesquisada no tio google mas acho q nao estou sabendo procurar...se alguem puder me ajudar..ou me mostrando como proceder..ou o q devo procurar...ja procurei capturar id(ou cod) autoincremento...pegar cod autoincremento...enfim ja misturei algumas palavras q acho eu serem convenientes..mas ate agora nao achei... []'s [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com paulo%40prsolucoes.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como pegar o id autoincremento
To usando o FireBird 2.1 e uso o trio sds, dsp, cds... D2007 2009/5/13 Humberto Oliveira holiveira.wordpr...@gmail.com Qual o banco de dados? 2009/5/13 Paulo Coutinho pa...@prsolucoes.com paulo%40prsolucoes.com Boa pergunta. Eu perguntei sobre isso usando o trio, cds, sds e dsp, mas acho que não houve resposta. Como pegar o ultimo ID via dbExpress? 2009/5/13 Humberto Oliveira holiveira.wordpr...@gmail.comholiveira.wordpress%40gmail.com holiveira.wordpress%40gmail.com Isso foi discutido aqui esses dias, se não me engano semana passada. Dá uma pesquisadinha no grupo. Se mesmo assim não encontrar, qual é o banco de dados? 2009/5/13 Mario Rodrigues marioirodrig...@gmail.commarioirodrigues%40gmail.com marioirodrigues%40gmail.com marioirodrigues%40gmail.com Srs, Tenho duas tbl's...venda e itens...com a seguinte estrutura: venda codvenda codcliente data valortotal...etc itens codvenda codproduto qtde vl_unitario...etc o codvenda da tbl venda é autoincrementocomo faço para q o codvenda da tbl venda vá para o codvenda da tbl itens...dei uma pesquisada no tio google mas acho q nao estou sabendo procurar...se alguem puder me ajudar..ou me mostrando como proceder..ou o q devo procurar...ja procurei capturar id(ou cod) autoincremento...pegar cod autoincremento...enfim ja misturei algumas palavras q acho eu serem convenientes..mas ate agora nao achei... []'s [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com paulo%40prsolucoes.com paulo% 40prsolucoes.com [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]
Re: [delphi-br] Instalação do FireBird automát ica
Existe Paulo. É só chamar o instalador usando a opção -silent (ou /silent, não me lembro) dizem (nunca procurei) alguns exemplos de script para Inno Setup que já fazem isso. Aí basta vc incluir essa chamada na sua instalação. Abraço, Ricardo Cardoso. Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em qua, 13/5/09, Paulo Coutinho pa...@prsolucoes.com escreveu: De: Paulo Coutinho pa...@prsolucoes.com Assunto: [delphi-br] Instalação do FireBird automática Para: delphi-br@yahoogrupos.com.br Data: Quarta-feira, 13 de Maio de 2009, 11:58 Olá, gostaria de saber se existe alguma forma de instalar o firebird automaticamente, sem intervenção do usuário. pode ser usando um parâmetro e tal. igual fazemos com os produtos da microsoft onde passamos um parâmetro para o MSI e ele instala tudo em background. -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes. com/blog Site: www.prsolucoes. com Msn: pa...@prsolucoes. com [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como pegar o id autoincremento
Bom..fiz uma coisa aqui q deu certo..mas gostaria de opiniao dos srs... Inseri um SimpleDataSet e fiz o seguinte: No botao Novo... SimpleDataSet1.Close; SimpleDataSet1.DataSet.CommandText:='select max(CODVENDA) as Maximo from PED_VENDA'; SimpleDataSet1.Open; dmVendas.cdsPedVendas.Append; dmVendas.cdsPedVendas.Edit; dmVendas.cdsPedVendasCODVENDA.AsInteger:=SimpleDataSet1Maximo.AsInteger+1; Deu tudo certinho...tudo uma maravilha..mas pergunto isso pode me trazer algum problema mais tarde?.. 2009/5/13 Mario Rodrigues marioirodrig...@gmail.com To usando o FireBird 2.1 e uso o trio sds, dsp, cds... D2007 2009/5/13 Humberto Oliveira holiveira.wordpr...@gmail.com Qual o banco de dados? 2009/5/13 Paulo Coutinho pa...@prsolucoes.com paulo%40prsolucoes.com Boa pergunta. Eu perguntei sobre isso usando o trio, cds, sds e dsp, mas acho que não houve resposta. Como pegar o ultimo ID via dbExpress? 2009/5/13 Humberto Oliveira holiveira.wordpr...@gmail.comholiveira.wordpress%40gmail.com holiveira.wordpress%40gmail.com Isso foi discutido aqui esses dias, se não me engano semana passada. Dá uma pesquisadinha no grupo. Se mesmo assim não encontrar, qual é o banco de dados? 2009/5/13 Mario Rodrigues marioirodrig...@gmail.commarioirodrigues%40gmail.com marioirodrigues%40gmail.com marioirodrigues%40gmail.com Srs, Tenho duas tbl's...venda e itens...com a seguinte estrutura: venda codvenda codcliente data valortotal...etc itens codvenda codproduto qtde vl_unitario...etc o codvenda da tbl venda é autoincrementocomo faço para q o codvenda da tbl venda vá para o codvenda da tbl itens...dei uma pesquisada no tio google mas acho q nao estou sabendo procurar...se alguem puder me ajudar..ou me mostrando como proceder..ou o q devo procurar...ja procurei capturar id(ou cod) autoincremento...pegar cod autoincremento...enfim ja misturei algumas palavras q acho eu serem convenientes..mas ate agora nao achei... []'s [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com paulo%40prsolucoes.com paulo% 40prsolucoes.com [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]
[delphi-br] Inclusão em firebird
Nobres colegas, estou tendo um problema aqui com um sistema em firebird que estou desenvolvendo, e o seguinte: Montei o banco todo e fiz o acesso através do dbExpress utilizando SqlDataSet + DataSetProvider + ClientDataSet + DataSource com Firebird 2.1 e Delphi 7. Porém, na hora em que vou cadastrar um registro ao clicar em novo entro com os dados necessários, até ai tudo bem. O problema ocorre quando clico em salvar, me aparece a mensagem abaixo: Não é possível localizar o registro. Nenhuma chave foi especificada. O que poderia ser? Gratos. Ralp Alves Bezerra [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como pegar o id autoincremento
Isso é o que faço atualmente também, mas obviamente tem um grande problema de concorrência caso alguém insira um valor nesse meio tempo. Via mysql você tem a função: mysql_insert_id(). http://dev.mysql.com/doc/refman/5.0/en/getting-unique-id.html Via firebird tem uma forma também: http://www.firebirdfaq.org/faq243/ Deveria existir uma forma mais prática via ClientDataSet. :( 2009/5/13 Mario Rodrigues marioirodrig...@gmail.com Bom..fiz uma coisa aqui q deu certo..mas gostaria de opiniao dos srs... Inseri um SimpleDataSet e fiz o seguinte: No botao Novo... SimpleDataSet1.Close; SimpleDataSet1.DataSet.CommandText:='select max(CODVENDA) as Maximo from PED_VENDA'; SimpleDataSet1.Open; dmVendas.cdsPedVendas.Append; dmVendas.cdsPedVendas.Edit; dmVendas.cdsPedVendasCODVENDA.AsInteger:=SimpleDataSet1Maximo.AsInteger+1; Deu tudo certinho...tudo uma maravilha..mas pergunto isso pode me trazer algum problema mais tarde?.. 2009/5/13 Mario Rodrigues marioirodrig...@gmail.commarioirodrigues%40gmail.com To usando o FireBird 2.1 e uso o trio sds, dsp, cds... D2007 2009/5/13 Humberto Oliveira holiveira.wordpr...@gmail.comholiveira.wordpress%40gmail.com Qual o banco de dados? 2009/5/13 Paulo Coutinho pa...@prsolucoes.com paulo%40prsolucoes.compaulo% 40prsolucoes.com Boa pergunta. Eu perguntei sobre isso usando o trio, cds, sds e dsp, mas acho que não houve resposta. Como pegar o ultimo ID via dbExpress? 2009/5/13 Humberto Oliveira holiveira.wordpr...@gmail.comholiveira.wordpress%40gmail.com holiveira.wordpress%40gmail.com holiveira.wordpress%40gmail.com Isso foi discutido aqui esses dias, se não me engano semana passada. Dá uma pesquisadinha no grupo. Se mesmo assim não encontrar, qual é o banco de dados? 2009/5/13 Mario Rodrigues marioirodrig...@gmail.commarioirodrigues%40gmail.com marioirodrigues%40gmail.com marioirodrigues%40gmail.com marioirodrigues%40gmail.com Srs, Tenho duas tbl's...venda e itens...com a seguinte estrutura: venda codvenda codcliente data valortotal...etc itens codvenda codproduto qtde vl_unitario...etc o codvenda da tbl venda é autoincrementocomo faço para q o codvenda da tbl venda vá para o codvenda da tbl itens...dei uma pesquisada no tio google mas acho q nao estou sabendo procurar...se alguem puder me ajudar..ou me mostrando como proceder..ou o q devo procurar...ja procurei capturar id(ou cod) autoincremento...pegar cod autoincremento...enfim ja misturei algumas palavras q acho eu serem convenientes..mas ate agora nao achei... []'s [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com paulo%40prsolucoes.com paulo% 40prsolucoes.com paulo% 40prsolucoes.com [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] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como pegar o id autoincremento
Pessoal, Se estiverem utilizando Mestre-detalhe não tem essa necessidade. A tabela filha automaticamente receberá o ID da tabela pai. Caso seja multicamadas deixe que o provider cuide de gerar o ID utilizando o BeforeUpdateRecord ;D []s Daniel. 2009/5/13 Mario Rodrigues marioirodrig...@gmail.com Bom..fiz uma coisa aqui q deu certo..mas gostaria de opiniao dos srs... Inseri um SimpleDataSet e fiz o seguinte: No botao Novo... SimpleDataSet1.Close; SimpleDataSet1.DataSet.CommandText:='select max(CODVENDA) as Maximo from PED_VENDA'; SimpleDataSet1.Open; dmVendas.cdsPedVendas.Append; dmVendas.cdsPedVendas.Edit; dmVendas.cdsPedVendasCODVENDA.AsInteger:=SimpleDataSet1Maximo.AsInteger+1; Deu tudo certinho...tudo uma maravilha..mas pergunto isso pode me trazer algum problema mais tarde?.. 2009/5/13 Mario Rodrigues marioirodrig...@gmail.commarioirodrigues%40gmail.com To usando o FireBird 2.1 e uso o trio sds, dsp, cds... D2007 2009/5/13 Humberto Oliveira holiveira.wordpr...@gmail.comholiveira.wordpress%40gmail.com Qual o banco de dados? 2009/5/13 Paulo Coutinho pa...@prsolucoes.com paulo%40prsolucoes.compaulo% 40prsolucoes.com Boa pergunta. Eu perguntei sobre isso usando o trio, cds, sds e dsp, mas acho que não houve resposta. Como pegar o ultimo ID via dbExpress? 2009/5/13 Humberto Oliveira holiveira.wordpr...@gmail.comholiveira.wordpress%40gmail.com holiveira.wordpress%40gmail.com holiveira.wordpress%40gmail.com Isso foi discutido aqui esses dias, se não me engano semana passada. Dá uma pesquisadinha no grupo. Se mesmo assim não encontrar, qual é o banco de dados? 2009/5/13 Mario Rodrigues marioirodrig...@gmail.commarioirodrigues%40gmail.com marioirodrigues%40gmail.com marioirodrigues%40gmail.com marioirodrigues%40gmail.com Srs, Tenho duas tbl's...venda e itens...com a seguinte estrutura: venda codvenda codcliente data valortotal...etc itens codvenda codproduto qtde vl_unitario...etc o codvenda da tbl venda é autoincrementocomo faço para q o codvenda da tbl venda vá para o codvenda da tbl itens...dei uma pesquisada no tio google mas acho q nao estou sabendo procurar...se alguem puder me ajudar..ou me mostrando como proceder..ou o q devo procurar...ja procurei capturar id(ou cod) autoincremento...pegar cod autoincremento...enfim ja misturei algumas palavras q acho eu serem convenientes..mas ate agora nao achei... []'s [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com paulo%40prsolucoes.com paulo% 40prsolucoes.com paulo% 40prsolucoes.com [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] -- Daniel Sobrinho Laporte Analista de Sistemas e Desenvolvedor Delphi + Firebird. Colunista e Editor Técnico ClubeDelphi - DevMedia. [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] ComboBox
Tem como pegar o valor lançado em uma combox e lançar no banco de dados. minha ideia e fazer um navegado com o historico do sites visitados. alguma ajuda agradeço [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Delphi em netbook
O problema eh a tela... rsComo vc vai enxergar e trabalhar com a ferramenta??? rs JM 2009/5/13 Elazar Dornelles Ceza elazar...@yahoo.com.br Boa tarde pessoal Alguem aqui já tentou ver se funciona o Delphi2009 ou mesmo o delphi 7 em um mini notebook? como fica a questão de performance, perde muito ou consegue trabalhar na boa? Atenc; Elazar Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- _ Jhosef Marks de Carvalho Delphi Developer Blog: http://www.jhosefmarks.com.br/ Lista: http://groups.google.com/group/soumaisdelphi # CAMPANHA POR UMA INTERNET SEGURA Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar mensagens use SEMPRE o Cco (cópia oculta). Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar um e-mail, delete todas as informações que apareçam no corpo do e-mail e que possam ser usadas por hackers. # Sent from Joinville, Santa Catarina, Brasil [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Miniatura (thumbnail) de PDF
Olás, alguém sabe como criar uma minuatura de um PDF? Queria gerar uma minuatura (em .bmp) de um pdf para permitir que o usuário veja a primeira página do pdf antes de abrir o mesmo. Igual o Windows Explorer faz quando pedimos para ele exibir os arquivos em miniatura. Alguém já fez isso? Sebe como fazer? Consegui fazer utilizando um código que necessita que tenha o Acrobat Exchange: http://www.delphi3000.com/articles/article_2752.asp?SK=pdf Porém não quero obrigar o cliente a instalar nada. Obrigado, Anderson [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Svn Tortoise ( OFF-TOPIC )
Boa tarde a todos. Alguem sabe se é possivel ter um controle de versoes por cliente, usando o Toroise ? Eu tenho um projeto, que é usado por varios clientes, to usando IFDEF, eu queria tirar o IFDEF, queria um controle melhor dessas versoes. Obrigado Jr.
Re: [delphi-br] ComboBox
Se for diretão, é só pegar o valor de ComboBox1.Text e jogar na sua query de inserção no banco de dados. 2009/5/13 Sergio - Jundiaí / SP sergioinf...@yahoo.com.br Tem como pegar o valor lançado em uma combox e lançar no banco de dados. minha ideia e fazer um navegado com o historico do sites visitados. alguma ajuda agradeço [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como pegar o id autoincremento
Não precisa dizer mais nada. 2009/5/13 Daniel Sobrinho Laporte daniel.lapo...@gmail.com Pessoal, Se estiverem utilizando Mestre-detalhe não tem essa necessidade. A tabela filha automaticamente receberá o ID da tabela pai. Caso seja multicamadas deixe que o provider cuide de gerar o ID utilizando o BeforeUpdateRecord ;D []s Daniel. 2009/5/13 Mario Rodrigues marioirodrig...@gmail.commarioirodrigues%40gmail.com Bom..fiz uma coisa aqui q deu certo..mas gostaria de opiniao dos srs... Inseri um SimpleDataSet e fiz o seguinte: No botao Novo... SimpleDataSet1.Close; SimpleDataSet1.DataSet.CommandText:='select max(CODVENDA) as Maximo from PED_VENDA'; SimpleDataSet1.Open; dmVendas.cdsPedVendas.Append; dmVendas.cdsPedVendas.Edit; dmVendas.cdsPedVendasCODVENDA.AsInteger:=SimpleDataSet1Maximo.AsInteger+1; Deu tudo certinho...tudo uma maravilha..mas pergunto isso pode me trazer algum problema mais tarde?.. 2009/5/13 Mario Rodrigues marioirodrig...@gmail.commarioirodrigues%40gmail.com marioirodrigues%40gmail.com To usando o FireBird 2.1 e uso o trio sds, dsp, cds... D2007 2009/5/13 Humberto Oliveira holiveira.wordpr...@gmail.comholiveira.wordpress%40gmail.com holiveira.wordpress%40gmail.com Qual o banco de dados? 2009/5/13 Paulo Coutinho pa...@prsolucoes.compaulo%40prsolucoes.compaulo% 40prsolucoes.compaulo% 40prsolucoes.com Boa pergunta. Eu perguntei sobre isso usando o trio, cds, sds e dsp, mas acho que não houve resposta. Como pegar o ultimo ID via dbExpress? 2009/5/13 Humberto Oliveira holiveira.wordpr...@gmail.comholiveira.wordpress%40gmail.com holiveira.wordpress%40gmail.com holiveira.wordpress%40gmail.com holiveira.wordpress%40gmail.com Isso foi discutido aqui esses dias, se não me engano semana passada. Dá uma pesquisadinha no grupo. Se mesmo assim não encontrar, qual é o banco de dados? 2009/5/13 Mario Rodrigues marioirodrig...@gmail.commarioirodrigues%40gmail.com marioirodrigues%40gmail.com marioirodrigues%40gmail.com marioirodrigues%40gmail.com marioirodrigues%40gmail.com Srs, Tenho duas tbl's...venda e itens...com a seguinte estrutura: venda codvenda codcliente data valortotal...etc itens codvenda codproduto qtde vl_unitario...etc o codvenda da tbl venda é autoincrementocomo faço para q o codvenda da tbl venda vá para o codvenda da tbl itens...dei uma pesquisada no tio google mas acho q nao estou sabendo procurar...se alguem puder me ajudar..ou me mostrando como proceder..ou o q devo procurar...ja procurei capturar id(ou cod) autoincremento...pegar cod autoincremento...enfim ja misturei algumas palavras q acho eu serem convenientes..mas ate agora nao achei... []'s [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com paulo%40prsolucoes.com paulo% 40prsolucoes.com paulo% 40prsolucoes.com paulo% 40prsolucoes.com [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] -- Daniel Sobrinho Laporte Analista de Sistemas e Desenvolvedor Delphi + Firebird. Colunista e Editor Técnico ClubeDelphi - DevMedia. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Inclusão em firebird
chave primaria, talvez 2009/5/13 Ralp Alves Bezerra r...@rdsistemas.eti.br Nobres colegas, estou tendo um problema aqui com um sistema em firebird que estou desenvolvendo, e o seguinte: Montei o banco todo e fiz o acesso através do dbExpress utilizando SqlDataSet + DataSetProvider + ClientDataSet + DataSource com Firebird 2.1 e Delphi 7. Porém, na hora em que vou cadastrar um registro ao clicar em novo entro com os dados necessários, até ai tudo bem. O problema ocorre quando clico em salvar, me aparece a mensagem abaixo: Não é possível localizar o registro. Nenhuma chave foi especificada. O que poderia ser? Gratos. Ralp Alves Bezerra [As partes desta mensagem que não continham texto foram removidas] -- Ismair C. Alves msn: ismair_al...@hotmail.com PontoConf Soluções em Software Livre. Linux User: #447538 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Miniatura (thumbnail) de PDF
alguém sabe como criar uma minuatura de um PDF? Queria gerar uma minuatura (em .bmp) de um pdf O Windows sabe, pois qdo vc configura o Explorer para listagem de thumbnails, o mesmo gera esses previews para os PDFs, portanto, há uma API para isso. http://www.google.com.br/search?hl=pt-BRq=windows+explorer+thumbnail+generate+APImeta= http://www.google.com.br/search?hl=pt-BRq=IExtractImage+APImeta=aq=foq= Jackson Gomes ToolsComps - Controle de Usuários para Desenvolvedores CodeGear Web Site: http://www.toolsandcomps.com Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps e-mail: jack...@toolsandcomps.com Fone: 27 3389 1138 - 8811 0324 http://jacklovesdelphi.blogspot.com - Delphi, Intraweb, etc Devhost - Webhost para desenvolvedores Delphi http://www.devhost.com.br devh...@devhost.com.br
Re: [delphi-br] Re: Uso de Soap no Windows2003 64Bits
Aqui descobrimos algo INÉDITO a meu ver, o mesmo programa que no Delphi 7 não funciona (dá erro de memoria quando solicitado o webserice), quando compilado no Delphi 2007 funcionou, e infelizmente não posso fazer o que você fez, o cliente comprou o equipamento já com o sistema operacional, de este custo de troca ele não vai querer arcar, existe algum update do Delphi 7 para o Soap ? Jose Henrique escreveu: Sei que o caso que vou informar é bem diferente do seu se não fosse o ponto em comum da plataforma 64 bits, mas tentei em vão configurar um ambiente Oracle XE + Delphi2007 + win Vista Ultimate 64bits. Só resolvi o problema de conexão com o Oracle quando troquei pelo Win Vista 32 Bits, ai sim pude trabalhar sem problemas. __ Information from ESET NOD32 Antivirus, version of virus signature database 4070 (20090513) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com __ Information from ESET NOD32 Antivirus, version of virus signature database 4070 (20090513) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Svn Tortoise ( OFF-TOPIC )
Você consegue controlar o que quizer utilizando o SVN, é só ir criando diretórios em formato de árvore. 1)Projetos 1.1 - Projeto... 1.2 - Projeto 1.3 - Projeto... 2) Scripts 2.1 - Script para criação do BD... 2.2 - Script para... Abs Adauri Antonio Camacho Junior escreveu: Boa tarde a todos. Alguem sabe se é possivel ter um controle de versoes por cliente, usando o Toroise ? Eu tenho um projeto, que é usado por varios clientes, to usando IFDEF, eu queria tirar o IFDEF, queria um controle melhor dessas versoes. Obrigado Jr. -- Vinicius A. Santos www.msisolucoes.com.br
Res: [delphi-br] Extrair Metadado Banco MS Access
Olá galera, Link - [http://sites.google.com/site/silvioprogbs/utilitarios-ferramentas/SQL2GDB-1.0.10.4-Win32.zip?attredirects=0]. Dá pra ter uma base de como fazer. []'s, Silvio Clécio --- Linux User: #481900 Gmail, GTalk: silviop...@gmail.com E-mail, Y! Messenger: silviop...@yahoo.com.br BlogSite: http://silvioprog.blogspot.com/ BlogSpot: http://silvioclecio.blogspot.com/ VirtualDriver: http://silvioprog.4shared.com/ °oO| Seja livre, use Linux! |Oo° De: Jhosef Marks jho...@gmail.com Para: lista-del...@yahoogrupos.com.br; delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 12 de Maio de 2009 19:13:24 Assunto: [delphi-br] Extrair Metadado Banco MS Access Alguém por acaso sabe como extrair metadados de um banco access, como gerar os create tables??? Att, -- _ _ _ __ Jhosef Marks de Carvalho Delphi Developer Blog: http://www.jhosefma rks.com.br/ Lista: http://groups. google.com/ group/soumaisdel phi Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
RES: Re: [delphi-br] Pegar valores de duas edits e colocar em uma terceira edit(Resolvido)
Na verdade, não é comando. E sim, linha(s) de código! Sds. De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Sergio - Jundiaí / SP Enviada em: terça-feira, 12 de maio de 2009 21:57 Para: delphi-br@yahoogrupos.com.br Assunto: Res: Re: [delphi-br] Pegar valores de duas edits e colocar em uma terceira edit(Resolvido) Muito obrigado Adriano ---Mensagem original--- De: Adriano Santos Data: 05/12/09 22:38:12 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Pegar valores de duas edits e colocar em uma terceira edit Edit3.Text := Edit1.Text + Edit2.Text; Adriano Santos 2009/5/12 Sergio - Jundiaí / SP sergioinf...@yahoo.com.br mailto:sergioinfosp%40yahoo.com.br Boa noite qual comando para pegar valores de duas edit e colocar em uma terceira edit [As partes desta mensagem que não continham texto foram removidas] -- Adriano Santos Director X-35 Consulting and Development IT Manager SoftPark Chief Editor Magazines ClubeDelphi WebMobile www.delphitodelphi.blogspot.com www.adrianosantos.pro.br www.devmedia.com.br www.dug-sp.com [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]
RES: [delphi-br] TCollection e Interfaces
Segundo o help do Delphi, When defining a class that supports one or more interfaces, it is convenient to use TInterfacedObject as a base class because it implements the methods of IInterface. (tradução: Quando se define uma classe que suporta uma ou mais interfaces, é conveniente usar TInterfacedObject como classe, pois este implementa os métodos de IInterface) Isso explica pq vc teve os erros apresentados, pq vc apenas fez menção à interface ITransportePedido na declaração de sua classe derivada de TCollectionItem, mas não fez a declaração e a implementação dos métodos citados nas mensagens de erro. Lembrando que o Delphi não possui herança múltipla, você não pode ter uma declaração como a seguinte: type TTransportePedido = class(TCollectionItem, TTransportePedido) Como TTransportePedido é na verdade do descendente de TInterfacedObject, este implementa os métodos de IInterface, mas não pode ser usado como um item para ser adicionado a uma coleção, por não ser descendente de TCollectionItem. A alternativa que vejo seria vc usar TList ao invés de TCollection, pois com TList vc pode adicionar objetos, sejam eles o que forem, enquanto que TCollection só admite descendentes de TCollectionItem. Sds. De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Jose Henrique Enviada em: quarta-feira, 13 de maio de 2009 09:07 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] TCollection e Interfaces Senhores bom dia, tenho uma interface criada no meu sistema (ITransportePedido) e quando fui utilizá-la numa classe descendente de (TInterfacedObject) tudo bem ! Porém ao criar outra classe que é descendente de (TCollectionItem) o compilador acusa erro dizendo que métodos não foram implementados. Erro: [Pascal Error] Pedidos.pas(48): E2003 Undeclared identifier: 'QueryInterface' [Pascal Error] Pedidos.pas(48): E2003 Undeclared identifier: '_AddRef' [Pascal Error] Pedidos.pas(48): E2003 Undeclared identifier: '_Release' A declaração das classes seria a que está abaixo, notem o comentário para evitar o erro. Nessa classe está tudo OK!! TTransportePedido = class(TInterfacedObject, ITransportePedido) Nessa outra ocorre o erro acima!! TPedido = class(TCollectionItem) //, ITransportePedido) Será que para poder utilizar a interface somente posso se implementar os métodos acima (que estão no erro). Ou melhor eu teria que implementar também a interface (IInterface) TPedido = class(TCollectionItem, IInterface, ITransportePedido) Essa seria a maneira correta ?? [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Inclusão em firebird
Você colocou pfInKey na propriedade ProviderFlag do campo chave? __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/
[delphi-br] ClientDataSet - Lookup Lento
Boa Tarde, novamente pedindo ajuda. Estou gradativamente mudando meu sistema de BDE para Multicamadas, portando deixo de usar Query para usar ClientDataSet acessando a máquina que tem o BSS, o que acontece: Preciso fazer Lookup e sei que fica lento, então na Query(BDE) em OnCalcFields eu uso uma função que Seleciona(select * from ...) UMA dentre 4 chaves(00211001, 00211***, 0021, 002*), por exemplo, de uma tabela para que eu ache um valor para calcular o Preço Líquido por exemplo da tabela principal; acontece que no BDE(query) funciona com uma velocidade até que razoável, mas ao mudar para o ClientDataSet, fica uma calamidade, até mudei a função chamada no OnCalcFields para ao invés de SQL eu passei a usar da forma abaixo, mas mesmo assim não me alegrou, será que vou ter que continuar a usar o BDE, neste caso ??? procedure TDados.ver_desconto; var wscodigo : string; begin wscodigo := Dados.CDSEstCodes.Value; Dados.CDSDes.Close; Dados.CDSDes.IndexName := 'DEFAULT_ORDER'; Dados.CDSDes.Open; Dados.CDSDes.IndexFieldNames := 'nrolinha;grupo_ini;sub_ini;nropeca'; Dados.CDSDes.SetKey; Dados.CDSDesNrolinha.Value := StrToInt(copy(wscodigo, 1, 3)); Dados.CDSDesGrupo_Ini.AsString := copy(wscodigo, 5, 1); Dados.CDSDesSub_Ini.AsString := copy(wscodigo, 6, 1); Dados.CDSDesNropeca.AsString := copy(wscodigo, 8, 3); if Dados.CDSDes.GotoKey then begin Dados.CDSEstDesconto.Value := Dados.CDSDesDesco05.Value; exit; end; Dados.CDSDes.IndexFieldNames := 'nrolinha;grupo_ini;sub_ini;nropeca'; Dados.CDSDes.SetKey; Dados.CDSDesNrolinha.Value := StrToInt(copy(wscodigo, 1, 3)); Dados.CDSDesGrupo_Ini.AsString := copy(wscodigo, 5, 1); Dados.CDSDesSub_Ini.AsString := copy(wscodigo, 6, 1); Dados.CDSDesNropeca.AsString := '***'; if Dados.CDSDes.GotoKey then begin Dados.CDSEstDesconto.Value := Dados.CDSDesDesco05.Value; exit; end; Dados.CDSDes.IndexFieldNames := 'nrolinha;grupo_ini;sub_ini;nropeca'; Dados.CDSDes.SetKey; Dados.CDSDesNrolinha.Value := StrToInt(copy(wscodigo, 1, 3)); Dados.CDSDesGrupo_Ini.AsString := copy(wscodigo, 5, 1); Dados.CDSDesSub_Ini.AsString := '*'; Dados.CDSDesNropeca.AsString := '***'; if Dados.CDSDes.GotoKey then begin Dados.CDSEstDesconto.Value := Dados.CDSDesDesco05.Value; exit; end; Dados.CDSDes.IndexFieldNames := 'nrolinha;grupo_ini;sub_ini;nropeca'; Dados.CDSDes.SetKey; Dados.CDSDesNrolinha.Value := StrToInt(copy(wscodigo, 1, 3)); Dados.CDSDesGrupo_Ini.AsString := '*'; Dados.CDSDesSub_Ini.AsString := '*'; Dados.CDSDesNropeca.AsString := '***'; if Dados.CDSDes.GotoKey then begin Dados.CDSEstDesconto.Value := Dados.CDSDesDesco05.Value; end; end; procedure TDados.CDSEstCalcFields(DataSet: TDataSet); begin ver_desconto(); Dados.CDSEstLiquido.Value := Dados.CDSEstPv1.Value * (1 - Dados.CDSEstDesconto.Value / 100); end; procedure TDados.CDSDesBeforeOpen(DataSet: TDataSet); begin Dados.CDSDes.IndexName := 'DEFAULT_ORDER'; end; grato Stainle
Re: [delphi-br] TCollection e Interfaces
2009/5/13 Jose Henrique jose_henrique...@yahoo.com.br: Senhores bom dia, tenho uma interface criada no meu sistema (ITransportePedido) e quando fui utilizá-la numa classe descendente de (TInterfacedObject) tudo bem ! Porém ao criar outra classe que é descendente de (TCollectionItem) o compilador acusa erro dizendo que métodos não foram implementados. Erro: [Pascal Error] Pedidos.pas(48): E2003 Undeclared identifier: 'QueryInterface' [Pascal Error] Pedidos.pas(48): E2003 Undeclared identifier: '_AddRef' [Pascal Error] Pedidos.pas(48): E2003 Undeclared identifier: '_Release' A declaração das classes seria a que está abaixo, notem o comentário para evitar o erro. Nessa classe está tudo OK!! TTransportePedido = class(TInterfacedObject, ITransportePedido) Nessa outra ocorre o erro acima!! TPedido = class(TCollectionItem) //, ITransportePedido) Será que para poder utilizar a interface somente posso se implementar os métodos acima (que estão no erro). Ou melhor eu teria que implementar também a interface (IInterface) TPedido = class(TCollectionItem, IInterface, ITransportePedido) Essa seria a maneira correta ?? Você só precisa relacionar a sua interface. O que você precisa fazer é implementar os métodos que são pedidos, seja copiando da implementação TInterfacedObject, seja criando métodos vazios. No primeiro caso você terá o objeto removido da memória quando sair de contexto, e no segundo caso você terá que remover o objeto da memória manualmente. Passa um pouco mais de detalhe sobre o que você pretende fazer, e conforme for, como pretende gerenciar a memória. Joao Morais
Re: [delphi-br] Svn Tortoise ( OFF-TOPIC )
2009/5/13 Adauri Antonio Camacho Junior adauri...@yahoo.com.br: Alguem sabe se é possivel ter um controle de versoes por cliente, usando o Toroise ? Eu tenho um projeto, que é usado por varios clientes, to usando IFDEF, eu queria tirar o IFDEF, queria um controle melhor dessas versoes. Você pode colocar os projetos em branches separados e fazer merge vez ou outra, mas isso é um parto para manter. Na minha humilde opinião, o melhor é eleger versões, tal como Professional, Enterprise, Architect e continuar com IFDEF. Joao Morais
Re: [delphi-br] Como pegar o id autoincremento
Humberto, mas como você salva o registro no ClientDataset sem colocar valor no campo? No caso de 3 camadas, o que você coloca no BeforeUpdateRecord do Provider? - Original Message - From: Daniel Sobrinho Laporte daniel.lapo...@gmail.com To: delphi-br@yahoogrupos.com.br Sent: Wednesday, May 13, 2009 1:07 PM Subject: Re: [delphi-br] Como pegar o id autoincremento Pessoal, Se estiverem utilizando Mestre-detalhe não tem essa necessidade. A tabela filha automaticamente receberá o ID da tabela pai. Caso seja multicamadas deixe que o provider cuide de gerar o ID utilizando o BeforeUpdateRecord ;D __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/
Re: [delphi-br] ClientDataSet - Lookup Lento
Stainle, Como vc informou qual o banco de dados, estou pressupondo que seja o firebird e neste contexto, sugiro 2 coisas: 1) no Seleciona( select * from ... )... substitua o * pelo nome dos campos que vc irá utilizar. Explicando: qd vc utiliza select * from tabela, provoca um fetch all nela mesmo que a instrução contenha uma cláusula where, o que tornará a consulta lenta, dependendo do tamanho da tabela 2) se a lookup source contiver muitas linhas, sugiro procurar uma outra alternativa, pq este componente é perfeito para aplicações desktop mas em aplicações client server ou multicamadas, um lookup de muitas linhas pode se tornar um pesadelo em termos de performance. stainle2003 escreveu: Boa Tarde, novamente pedindo ajuda. Estou gradativamente mudando meu sistema de BDE para Multicamadas, portando deixo de usar Query para usar ClientDataSet acessando a máquina que tem o BSS, o que acontece: Preciso fazer Lookup e sei que fica lento, então na Query(BDE) em OnCalcFields eu uso uma função que Seleciona(select * from ...) UMA dentre 4 chaves(00211001, 00211***, 0021, 002*), por exemplo, de uma tabela para que eu ache um valor para calcular o Preço Líquido por exemplo da tabela principal; acontece que no BDE(query) funciona com uma velocidade até que razoável, mas ao mudar para o ClientDataSet, fica uma calamidade, até mudei a função chamada no OnCalcFields para ao invés de SQL eu passei a usar da forma abaixo, mas mesmo assim não me alegrou, será que vou ter que continuar a usar o BDE, neste caso ??? procedure TDados.ver_desconto; var wscodigo : string; begin wscodigo := Dados.CDSEstCodes.Value; Dados.CDSDes.Close; Dados.CDSDes.IndexName := 'DEFAULT_ORDER'; Dados.CDSDes.Open; Dados.CDSDes.IndexFieldNames := 'nrolinha;grupo_ini;sub_ini;nropeca'; Dados.CDSDes.SetKey; Dados.CDSDesNrolinha.Value := StrToInt(copy(wscodigo, 1, 3)); Dados.CDSDesGrupo_Ini.AsString := copy(wscodigo, 5, 1); Dados.CDSDesSub_Ini.AsString := copy(wscodigo, 6, 1); Dados.CDSDesNropeca.AsString := copy(wscodigo, 8, 3); if Dados.CDSDes.GotoKey then begin Dados.CDSEstDesconto.Value := Dados.CDSDesDesco05.Value; exit; end; Dados.CDSDes.IndexFieldNames := 'nrolinha;grupo_ini;sub_ini;nropeca'; Dados.CDSDes.SetKey; Dados.CDSDesNrolinha.Value := StrToInt(copy(wscodigo, 1, 3)); Dados.CDSDesGrupo_Ini.AsString := copy(wscodigo, 5, 1); Dados.CDSDesSub_Ini.AsString := copy(wscodigo, 6, 1); Dados.CDSDesNropeca.AsString := '***'; if Dados.CDSDes.GotoKey then begin Dados.CDSEstDesconto.Value := Dados.CDSDesDesco05.Value; exit; end; Dados.CDSDes.IndexFieldNames := 'nrolinha;grupo_ini;sub_ini;nropeca'; Dados.CDSDes.SetKey; Dados.CDSDesNrolinha.Value := StrToInt(copy(wscodigo, 1, 3)); Dados.CDSDesGrupo_Ini.AsString := copy(wscodigo, 5, 1); Dados.CDSDesSub_Ini.AsString := '*'; Dados.CDSDesNropeca.AsString := '***'; if Dados.CDSDes.GotoKey then begin Dados.CDSEstDesconto.Value := Dados.CDSDesDesco05.Value; exit; end; Dados.CDSDes.IndexFieldNames := 'nrolinha;grupo_ini;sub_ini;nropeca'; Dados.CDSDes.SetKey; Dados.CDSDesNrolinha.Value := StrToInt(copy(wscodigo, 1, 3)); Dados.CDSDesGrupo_Ini.AsString := '*'; Dados.CDSDesSub_Ini.AsString := '*'; Dados.CDSDesNropeca.AsString := '***'; if Dados.CDSDes.GotoKey then begin Dados.CDSEstDesconto.Value := Dados.CDSDesDesco05.Value; end; end; procedure TDados.CDSEstCalcFields(DataSet: TDataSet); begin ver_desconto(); Dados.CDSEstLiquido.Value := Dados.CDSEstPv1.Value * (1 - Dados.CDSEstDesconto.Value / 100); end; procedure TDados.CDSDesBeforeOpen(DataSet: TDataSet); begin Dados.CDSDes.IndexName := 'DEFAULT_ORDER'; end; grato Stainle -- []’s. Evandro Siqueira Programador de Sistemas L’essentiel Lingerie (79) 3254-5511 Ramal 218 skype: evandro.lessentiel -- 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: delphi-br-ow...@yahoogrupos.com.br 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: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Instalação do FireBird automática
Vlw Ricardo, Achei algumas dessas opções: http://www.firebirdfaq.org/faq193/ Resolvido. 2009/5/13 Ricardo César Cardoso ricardo_engs...@yahoo.com.br Existe Paulo. É só chamar o instalador usando a opção -silent (ou /silent, não me lembro) dizem (nunca procurei) alguns exemplos de script para Inno Setup que já fazem isso. Aí basta vc incluir essa chamada na sua instalação. Abraço, Ricardo Cardoso. Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em qua, 13/5/09, Paulo Coutinho pa...@prsolucoes.compaulo%40prsolucoes.com escreveu: De: Paulo Coutinho pa...@prsolucoes.com paulo%40prsolucoes.com Assunto: [delphi-br] Instalação do FireBird automática Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Data: Quarta-feira, 13 de Maio de 2009, 11:58 Olá, gostaria de saber se existe alguma forma de instalar o firebird automaticamente, sem intervenção do usuário. pode ser usando um parâmetro e tal. igual fazemos com os produtos da microsoft onde passamos um parâmetro para o MSI e ele instala tudo em background. -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes. com/blog Site: www.prsolucoes. com Msn: pa...@prsolucoes. com [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como pegar o id autoincremento
Olá Alisson,
Não sou o Humberto, mas é o seguinte:
Uma técnica simples é vc colocar o valor default do campo ID como 0 e
Required := False.
Pelo Provider você verifica se o valor é 0 através do DeltaDs
if DeltaDs.FieldByName('ID').NewValue = 0 then
DeltaDs.FieldByName('ID').NewValue :=
MINHA_ROTINA_QUE_RESGATA_O_ID_NO_BANCO_DE_DADOS
Lembrando que o UpdateRecord acontece para cada dataset, logo se está dentro
de um mestre-detalhe, ele ocorrerá para cada pai e filho simultaneamente ;D
Abraços,
Daniel.
2009/5/13 Alisson alss...@yahoo.com.br
Humberto, mas como você salva o registro no ClientDataset sem colocar valor
no campo? No caso de 3 camadas, o que você coloca no BeforeUpdateRecord do
Provider?
- Original Message -
From: Daniel Sobrinho Laporte
daniel.lapo...@gmail.comdaniel.laporte%40gmail.com
To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
Sent: Wednesday, May 13, 2009 1:07 PM
Subject: Re: [delphi-br] Como pegar o id autoincremento
Pessoal,
Se estiverem utilizando Mestre-detalhe não tem essa necessidade.
A tabela filha automaticamente receberá o ID da tabela pai.
Caso seja multicamadas deixe que o provider cuide de gerar o ID utilizando
o
BeforeUpdateRecord ;D
__
Faça ligações para outros computadores com o novo Yahoo! Messenger
http://br.beta.messenger.yahoo.com/
--
Daniel Sobrinho Laporte
Analista de Sistemas e Desenvolvedor Delphi + Firebird.
Colunista e Editor Técnico ClubeDelphi - DevMedia.
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] ClientDataSet - Lookup Lento
entendi, mas o que deixa com a pulga atrás da orelha é que com a mesma sintaxe e modelo, o BDE é mais rápido do que o CDS, é isto que não entendo, estou trocando para algo melhor pelo que estou lendo e no entanto estou vendo outra coisa na prática, ou seja, o que eu fazia com o BDE não estou fazendo com BSS, ClientDataSet, etc.; pelo menos com a mesma velocidade, acho que estou fazendo algo errado, é isto que quero descobrir. Stainle --- Em qua, 13/5/09, Evandro Siqueira vans...@gmail.com escreveu: De: Evandro Siqueira vans...@gmail.com Assunto: Re: [delphi-br] ClientDataSet - Lookup Lento Para: delphi-br@yahoogrupos.com.br Data: Quarta-feira, 13 de Maio de 2009, 15:44 Stainle, Como vc informou qual o banco de dados, estou pressupondo que seja o firebird e neste contexto, sugiro 2 coisas: 1) no Seleciona( select * from ... )... substitua o * pelo nome dos campos que vc irá utilizar. Explicando: qd vc utiliza select * from tabela, provoca um fetch all nela mesmo que a instrução contenha uma cláusula where, o que tornará a consulta lenta, dependendo do tamanho da tabela 2) se a lookup source contiver muitas linhas, sugiro procurar uma outra alternativa, pq este componente é perfeito para aplicações desktop mas em aplicações client server ou multicamadas, um lookup de muitas linhas pode se tornar um pesadelo em termos de performance. stainle2003 escreveu: Boa Tarde, novamente pedindo ajuda. Estou gradativamente mudando meu sistema de BDE para Multicamadas, portando deixo de usar Query para usar ClientDataSet acessando a máquina que tem o BSS, o que acontece: Preciso fazer Lookup e sei que fica lento, então na Query(BDE) em OnCalcFields eu uso uma função que Seleciona(select * from ...) UMA dentre 4 chaves(00211001, 00211***, 0021, 002*), por exemplo, de uma tabela para que eu ache um valor para calcular o Preço Líquido por exemplo da tabela principal; acontece que no BDE(query) funciona com uma velocidade até que razoável, mas ao mudar para o ClientDataSet, fica uma calamidade, até mudei a função chamada no OnCalcFields para ao invés de SQL eu passei a usar da forma abaixo, mas mesmo assim não me alegrou, será que vou ter que continuar a usar o BDE, neste caso ??? procedure TDados.ver_desconto; var wscodigo : string; begin wscodigo := Dados.CDSEstCodes.Value; Dados.CDSDes.Close; Dados.CDSDes.IndexName := 'DEFAULT_ORDER'; Dados.CDSDes.Open; Dados.CDSDes.IndexFieldNames := 'nrolinha;grupo_ini;sub_ini;nropeca'; Dados.CDSDes.SetKey; Dados.CDSDesNrolinha.Value := StrToInt(copy(wscodigo, 1, 3)); Dados.CDSDesGrupo_Ini.AsString := copy(wscodigo, 5, 1); Dados.CDSDesSub_Ini.AsString := copy(wscodigo, 6, 1); Dados.CDSDesNropeca.AsString := copy(wscodigo, 8, 3); if Dados.CDSDes.GotoKey then begin Dados.CDSEstDesconto.Value := Dados.CDSDesDesco05.Value; exit; end; Dados.CDSDes.IndexFieldNames := 'nrolinha;grupo_ini;sub_ini;nropeca'; Dados.CDSDes.SetKey; Dados.CDSDesNrolinha.Value := StrToInt(copy(wscodigo, 1, 3)); Dados.CDSDesGrupo_Ini.AsString := copy(wscodigo, 5, 1); Dados.CDSDesSub_Ini.AsString := copy(wscodigo, 6, 1); Dados.CDSDesNropeca.AsString := '***'; if Dados.CDSDes.GotoKey then begin Dados.CDSEstDesconto.Value := Dados.CDSDesDesco05.Value; exit; end; Dados.CDSDes.IndexFieldNames := 'nrolinha;grupo_ini;sub_ini;nropeca'; Dados.CDSDes.SetKey; Dados.CDSDesNrolinha.Value := StrToInt(copy(wscodigo, 1, 3)); Dados.CDSDesGrupo_Ini.AsString := copy(wscodigo, 5, 1); Dados.CDSDesSub_Ini.AsString := '*'; Dados.CDSDesNropeca.AsString := '***'; if Dados.CDSDes.GotoKey then begin Dados.CDSEstDesconto.Value := Dados.CDSDesDesco05.Value; exit; end; Dados.CDSDes.IndexFieldNames := 'nrolinha;grupo_ini;sub_ini;nropeca'; Dados.CDSDes.SetKey; Dados.CDSDesNrolinha.Value := StrToInt(copy(wscodigo, 1, 3)); Dados.CDSDesGrupo_Ini.AsString := '*'; Dados.CDSDesSub_Ini.AsString := '*'; Dados.CDSDesNropeca.AsString := '***'; if Dados.CDSDes.GotoKey then begin Dados.CDSEstDesconto.Value := Dados.CDSDesDesco05.Value; end; end; procedure TDados.CDSEstCalcFields(DataSet: TDataSet); begin ver_desconto(); Dados.CDSEstLiquido.Value := Dados.CDSEstPv1.Value * (1 - Dados.CDSEstDesconto.Value / 100); end; procedure TDados.CDSDesBeforeOpen(DataSet: TDataSet); begin Dados.CDSDes.IndexName := 'DEFAULT_ORDER'; end; grato Stainle -- []’s. Evandro Siqueira Programador de Sistemas L’essentiel Lingerie (79) 3254-5511 Ramal 218 skype: evandro.lessentiel -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Instalação do FireBird automática
Só p facilitar, postei um artigo em meu blog com a solução em pt-br http://www.prsolucoes.com/blog/firebird/instalando-o-firebird-em-modo-silenciosoautomatico/ 2009/5/13 Paulo Coutinho pa...@prsolucoes.com Vlw Ricardo, Achei algumas dessas opções: http://www.firebirdfaq.org/faq193/ Resolvido. 2009/5/13 Ricardo César Cardoso ricardo_engs...@yahoo.com.br Existe Paulo. É só chamar o instalador usando a opção -silent (ou /silent, não me lembro) dizem (nunca procurei) alguns exemplos de script para Inno Setup que já fazem isso. Aí basta vc incluir essa chamada na sua instalação. Abraço, Ricardo Cardoso. Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em qua, 13/5/09, Paulo Coutinho pa...@prsolucoes.compaulo%40prsolucoes.com escreveu: De: Paulo Coutinho pa...@prsolucoes.com paulo%40prsolucoes.com Assunto: [delphi-br] Instalação do FireBird automática Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Data: Quarta-feira, 13 de Maio de 2009, 11:58 Olá, gostaria de saber se existe alguma forma de instalar o firebird automaticamente, sem intervenção do usuário. pode ser usando um parâmetro e tal. igual fazemos com os produtos da microsoft onde passamos um parâmetro para o MSI e ele instala tudo em background. -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes. com/blog Site: www.prsolucoes. com Msn: pa...@prsolucoes. com [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Inclusão em firebird
Eu Já havia feito isso, porém me é retornada a mensagem: Registro alterado por outro usuário. Engraçado que no primeiro sistema que fiz em firebird, não houve problema algum. De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Alisson Enviada em: quarta-feira, 13 de maio de 2009 15:29 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Inclusão em firebird Você colocou pfInKey na propriedade ProviderFlag do campo chave? __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] 6o. Firebird Developers Day
Pessoal, Gostaria de convidar todos vocês do forum à participar do Firebird Developers Day, que é hoje o maior evento de banco de dados Firebird no mundo, e será realizado no dia 04/Julho, em Piracicaba-SP. Este ano teremos a presença especial de Vlad Horsun, um dos principais desenvolvedores do Firebird, vindo diretamente da Ucrânia, e de Dmitry Kuzmenko (IBSurgeon), especialista em otimização de bancos de dados Firebird, vindo diretamente da Rússia, além, é claro, de grandes figuras da comunidade Brasileira! O evento tem um custo bastante acessível, e quanto mais cedo fizer a inscrição, mais barato custa. Além disso, os participantes podem registrar componentes e ferramentas com descontos imperdíveis! Mais informações podem ser vista diretamente no site do evento: http://tinyurl.com/qgns2h []s Carlos H. Cantu www.firebirddevelopersday.com.br
[delphi-br] ORACLE XE + Delphi 2007+ Win Vista Ultimate x64
Senhores venho aqui contar minha experiência, eu tentei em vão colocar o Oracle XE para rodar no ambiente Win Vista Ultimate 64 + Delphi Studio 2007. Infelizmente não consegui ter sucesso, sempre recebo erro ORA-12154, e em todos os fóruns e lugares onde pesquisei a configuração do TNSNames.ora, Listener.ora, SQLNet.ora, estavam perfeitas, o Banco de dados rodando e sendo acessado por outros aplicativos e também pelo administrador via Web que o Banco disponibiliza. Enfim só me restou a fazer o teste do SO, e trocando o SO para Win Vista Ultimate 32Bits, a conexão foi feita com sucesso sem nenhum problema. Agora a questão: Alguém sabe como resolver o problema do ambiente de 64Bits para o Oracle XE + Delphi 2007? Pois o Oracle XE funciona perfeitamente com o x64, mas sua instância não fica disponível para ser capturada pelo Delphi. Isso significa que o Delphi 2007 (tentei também com o Trial do Delphi 2009), são incompatíveis ainda com plataforma 64Bits !!!
Re: [delphi-br] Instalação do FireBird automát ica
Perfeito, Paulo Coutinho! Great Job! []'s Ricardo. Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em qua, 13/5/09, Paulo Coutinho pa...@prsolucoes.com escreveu: De: Paulo Coutinho pa...@prsolucoes.com Assunto: Re: [delphi-br] Instalação do FireBird automática Para: delphi-br@yahoogrupos.com.br Data: Quarta-feira, 13 de Maio de 2009, 16:55 Só p facilitar, postei um artigo em meu blog com a solução em pt-br http://www.prsoluco es.com/blog/ firebird/ instalando- o-firebird- em-modo-silencio soautomatico/ 2009/5/13 Paulo Coutinho pa...@prsolucoes. com Vlw Ricardo, Achei algumas dessas opções: http://www.firebird faq.org/faq193/ Resolvido. 2009/5/13 Ricardo César Cardoso ricardo_engsoft@ yahoo.com. br Existe Paulo. É só chamar o instalador usando a opção -silent (ou /silent, não me lembro) dizem (nunca procurei) alguns exemplos de script para Inno Setup que já fazem isso. Aí basta vc incluir essa chamada na sua instalação. Abraço, Ricardo Cardoso. Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em qua, 13/5/09, Paulo Coutinho pa...@prsolucoes. compaulo%40prsolucoes .com escreveu: De: Paulo Coutinho pa...@prsolucoes. com paulo%40prsolucoes .com Assunto: [delphi-br] Instalação do FireBird automática Para: delphi...@yahoogrup os.com.br delphi-br%40yahoog rupos.com. br Data: Quarta-feira, 13 de Maio de 2009, 11:58 Olá, gostaria de saber se existe alguma forma de instalar o firebird automaticamente, sem intervenção do usuário. pode ser usando um parâmetro e tal. igual fazemos com os produtos da microsoft onde passamos um parâmetro para o MSI e ele instala tudo em background. -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes. com/blog Site: www.prsolucoes. com Msn: pa...@prsolucoes. com [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes. com/blog Site: www.prsolucoes. com Msn: pa...@prsolucoes. com -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes. com/blog Site: www.prsolucoes. com Msn: pa...@prsolucoes. com [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] CTRL +SHIFT+C (Class Comp letion) - Não funcio na!!!
Galera obrigado pelas dicas, mas eu testei isso tanto em projetos ja existentes pensando nessa possibilidade mesmo de ja existir algo declarado, como tambem testei em um novo projeto... E acontece a mesma coisa Pablo Vianini WareHouse (32) 3372-7495 (32) 9199-8328 To: delphi-br@yahoogrupos.com.br From: alss...@yahoo.com.br Date: Wed, 13 May 2009 10:59:14 -0300 Subject: Re: [delphi-br] CTRL+SHIFT+C (Class Completion) - Não funciona!!! Pode ser que tenha alguma coisa função ou procedure que tenha a declaração, mas não tenha a implementação. Já tive esse problema quando o Delphi, por exemplo, cria automaticamente o código do clique de um botão. Ele insere a declaração, mas não insere a implementação. Espere ter ajudado. __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/ _ Deixe suas conversas mais divertidas. Baixe agora mesmo novos emoticons. É grátis! http://specials.br.msn.com/ilovemessenger/pacotes.aspx [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Ora-00923 usando zeos lib
Olá, Estou usando o componente Zeos versão 6.6.4-stable e Oracle 9i e Delphi 6, para fazer a consulta funciona normal, quando vou gravar dá a seguinte mensagem de erro SQL Error ora-00923 palavra chave FROM não localizada onde esperada. A sql é a seguinte? SELECT * FROM ATOS ORDER BY ATIVO DESC Quando adiciono os campos não dá erro, e erro só acontece quando gravo.
[delphi-br] Vaga em São Carlos - SP (Delphi)
Olá amigos. A empresa onde trabalho está buscando um programador adicional. Para conhecer mais sobre a empresa: www.mhouse.com.br Os requisitos são: - Experiência em Delphi, tanto da IDE quanto dos recursos da linguagem. Ajuda bastante se tiver noções de programação orientada a objetos. Ter experiência com IBO também é um diferencial. - Experiência com Firebird, ou bons conhecimentos de SGDBs. -- O esquema de trabalho é CLT e o salário é à combinar. Apenas uma vaga. Interessados, favor enviar currículo para mim: joaolevada [at] gmail.com Abraços;
RE: [delphi-br] CTRL +SHIFT+C (Class Comp letion) - Não funcio na!!!
Pessoal reinstalei o Delphi 7 e blz voltou a funcionar... Porem o delphi 2009 não, talvez pq eu tenha deixado da ultima instalação as configurações do usuario alguem sabe me dizer onde ficam essas configurações para eu exclui-las Abraços... Pablo Vianini WareHouse (32) 3372-7495 (32) 9199-8328 To: delphi-br@yahoogrupos.com.br From: alss...@yahoo.com.br Date: Wed, 13 May 2009 10:59:14 -0300 Subject: Re: [delphi-br] CTRL+SHIFT+C (Class Completion) - Não funciona!!! Pode ser que tenha alguma coisa função ou procedure que tenha a declaração, mas não tenha a implementação. Já tive esse problema quando o Delphi, por exemplo, cria automaticamente o código do clique de um botão. Ele insere a declaração, mas não insere a implementação. Espere ter ajudado. __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/ _ Novo Internet Explorer 8. Baixe agora, é grátis! http://brasil.microsoft.com.br/IE8/mergulhe/?utm_source=MSN%3BHotmailutm_medium=Taglineutm_campaign=IE8 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Delphi em netbook
O grande problema destes Laptops pequeninhos (uns são uma folha A4 dobrada ao meio) e que ninguem ainda se deu conta é a questão da ergonomia. Digitar num teclado miudo e ainda tentar ler dados em uma telinha de 7-8 podem perfeitamente nos trazer problemas ortopédicos e até oftalmologicos... []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: whitesock...@hotmail.com SKYPE: WalterChagasJr - Original Message - From: Eduardo Silva dos Santos To: delphi-br@yahoogrupos.com.br Sent: Wednesday, May 13, 2009 2:51 PM Subject: Re: [delphi-br] Delphi em netbook Geralmente esses mini notebook's tem processador de no máximo 1Ghz.. uns tem HD outros flashMemory.. e a telinha de 8 ou 9 polegadas e o teclado.. minúsculo. Definitivamente não da pra desenvolver. eu comprei um Dell Inspiron 1525 e to usando um teclado externo porque nao me adaptei ao teclado dele.. imagina um note menor ainda.. 2009/5/13 Elazar Dornelles Ceza elazar...@yahoo.com.br: Boa tarde pessoal Alguem aqui já tentou ver se funciona o Delphi2009 ou mesmo o delphi 7 em um mini notebook? como fica a questão de performance, perde muito ou consegue trabalhar na boa? Atenc; Elazar Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] ORACLE XE + Delphi 2007+ Win Vista Ultimate x64
José Henrique, seria uma ótima oportunidade para fazer um teste com ODac, http://www.devart.com/odac ou UniDac http://www.devart.com/unidac/ pelo visto você tentou a conexão com DBExpress 2009/5/13 Jose Henrique jose_henrique...@yahoo.com.br: Senhores venho aqui contar minha experiência, eu tentei em vão colocar o Oracle XE para rodar no ambiente Win Vista Ultimate 64 + Delphi Studio 2007. Infelizmente não consegui ter sucesso, sempre recebo erro ORA-12154, e em todos os fóruns e lugares onde pesquisei a configuração do TNSNames.ora, Listener.ora, SQLNet.ora, estavam perfeitas, o Banco de dados rodando e sendo acessado por outros aplicativos e também pelo administrador via Web que o Banco disponibiliza. Enfim só me restou a fazer o teste do SO, e trocando o SO para Win Vista Ultimate 32Bits, a conexão foi feita com sucesso sem nenhum problema. Agora a questão: Alguém sabe como resolver o problema do ambiente de 64Bits para o Oracle XE + Delphi 2007? Pois o Oracle XE funciona perfeitamente com o x64, mas sua instância não fica disponível para ser capturada pelo Delphi. Isso significa que o Delphi 2007 (tentei também com o Trial do Delphi 2009), são incompatíveis ainda com plataforma 64Bits !!! -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ...
Re: [delphi-br] Delphi em netbook
Tenho alguns amigos que usam o Delphi7 e Eclipse no netbook. Funciona numa boa. 2009/5/13 Eduardo Silva dos Santos eduardo@gmail.com Geralmente esses mini notebook's tem processador de no máximo 1Ghz.. uns tem HD outros flashMemory.. e a telinha de 8 ou 9 polegadas e o teclado.. minúsculo. Definitivamente não da pra desenvolver. eu comprei um Dell Inspiron 1525 e to usando um teclado externo porque nao me adaptei ao teclado dele.. imagina um note menor ainda.. 2009/5/13 Elazar Dornelles Ceza elazar...@yahoo.com.brelazar021%40yahoo.com.br : Boa tarde pessoal Alguem aqui já tentou ver se funciona o Delphi2009 ou mesmo o delphi 7 em um mini notebook? como fica a questão de performance, perde muito ou consegue trabalhar na boa? Atenc; Elazar Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo@gmail.com eduardo.drd%40gmail.com Site: http://www.drdsistemas.com.br/ ... -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Projeto fonte desarrumado no desktop?
Os fontes estão em uma pasta no diretório D:\PROJETO\SIST Quando disse desktop, queria dizer o visual dos forms na tela do monitor. Abro primeiro o arquivo .dpr Em 13/05/2009 11:54, Humberto Oliveira lt; holiveira.wordpr...@gmail.com gt; escreveu: Você trabalha com os fontes todos no Desktop? E o restante da pergunta eu me perdi, porque você tem que abrir o dpr, para depois ir abrindo os formulários agregados, você provavelmente está abrindo os formulários agregados para depois querer ver o dpr. Coisa maluca! 2009/5/13 nillgolv lt;nillg...@bol.com.brgt; gt; gt; gt; Pessoal, esta pergunta parece boba, mas é que toda vez que abro um projeto gt; fonte os forms estão todos desarrumados, faço uma melhora na área do desktop gt; para trabalhar com o fonte, acontece que ao abrir o delphi novamente ele se gt; encontra do jeito anterior, com o delphi minimizado. Gosto que abre com o gt; form principal e aparece com o form.dpr, Porque isto? gt; gt; grato. gt; gt; [As partes desta mensagem que não continham texto foram removidas]
