[delphi-br] Teste - Favor NÃO responder
TESTE. - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] [COMBOBOX]
Olá a todos ... Pessoal como faco para que um combobox mostre um valor e result outro ?? Por exemplo.. vou carregar o combobox atravez de um Sql. (codigo,NomeFuncionario). O combobox devera mostrar o Nome do Funcionario, ao clickar o combobox um edit recebera o codigo do funcionario... É possivel fazer essa amarracao ??? O combobox aceita um value e uma descricao ??? Desculpem minha pergunta primaria .. Marcio.
Res: [delphi-br] [COMBOBOX]
Somente com os componentes da Jedi vc consegue de maneira transparente, o que vc pode fazer e colocar assim: 01 - AAA 02 - BBB ou seja o codigo espaço traço espaço nome e depois dar um copy(Combobox.Text, 1, Pos(' -', Combobox.Text) -1) Meio gambiarra mas que funciona, isso funciona. Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] [COMBOBOX]
Não aconselho a fazer isso. Utilize combo.items.addobject(STRING, OBJETO) onde o seu objeto pode ser um integer contendo a PK que vc quer guardar Ou ainda Utilize o par Names=Values que também irá funcionar Ambas as soluções existem no Help do Delphi. De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Andre Luis Silveria Enviada em: terça-feira, 4 de março de 2008 08:52 Para: delphi-br@yahoogrupos.com.br Assunto: Res: [delphi-br] [COMBOBOX] Somente com os componentes da Jedi vc consegue de maneira transparente, o que vc pode fazer e colocar assim: 01 - AAA 02 - BBB ou seja o codigo espaço traço espaço nome e depois dar um copy(Combobox.Text, 1, Pos(' -', Combobox.Text) -1) Meio gambiarra mas que funciona, isso funciona. Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ [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] [COMBOBOX]
Porque você não usa um TDBLookUpComboBox ou coisa assim? -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Marcio Enviada em: terça-feira, 4 de março de 2008 08:35 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] [COMBOBOX] Olá a todos ... Pessoal como faco para que um combobox mostre um valor e result outro ?? Por exemplo.. vou carregar o combobox atravez de um Sql. (codigo,NomeFuncionario). O combobox devera mostrar o Nome do Funcionario, ao clickar o combobox um edit recebera o codigo do funcionario... É possivel fazer essa amarracao ??? O combobox aceita um value e uma descricao ??? Desculpem minha pergunta primaria .. Marcio. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Valores Monetários
Voce pode tomar a decisão correta de como manipular essa funcão através da variabel global de ambiente: DecimalSeparator nesta variável ela traz o que está definido no Reginal Settins( no painel de controle). Em 04/03/08, Joel Alexandre [EMAIL PROTECTED] escreveu: Senhores, boa noite. Deixa eu fazer uma pequena consultoria aos amigos. É o seguinte, sempre tive problemas com pontuação de casas decimais. Funções como StrToCurr da Sysutils funciona bem se o usuário define (. Ponto) nas Configurações Regionais do Painel de controle do Windows. Se o uruário define vírgula esta funçao, pelo menos comigo, já não funcionam. Gostaria de perguntar aos senhores como evitar este problema ou melhor, como trabalhar com este tipo de configuração que o usuario faz? Obrigado a todos Joel [As partes desta mensagem que não continham texto foram removidas] -- Cláudio Marconi Delphi/DirectShow Developer 55 61 8406-6451 [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Valores Monetários
Quando uma aplicação Delphi faz uso da unit SysUtils, esta define variáveis globais que espelham as configurações regionais do Windows. Entre elas, para o seu caso em particular, destacam-se as variáveis DecimalSeparator e ThousandSeparator, que correspondem, respectivamente, aos caracteres delimitadores de casas decimais e separadores de milhar. Funções que convertem valores de ponto flutuante para representações literais (CurrToStr(), FloatToStr(), etc.) e vice-versa (StrToFloat(), StrToCurr(), etc.), assim como funções de formatação relacionadas (FormatFloat(), FormatCurr()) usam esses delimitadores. Portanto, para não ter problemas, vc pode simplesmente alterar os caracteres separadores adequadamente para que StrToCurr() funcione do jeito que vc realmente necessita. É isto! Não dou o bolo pronto pra comer, e sim a orientação pra vc fazer o seu próprio bolo! Sds., Rubem Rocha. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 4 Mar 2008 00:28:38 -0300 Subject: [delphi-br] Valores Monetários Senhores, boa noite. Deixa eu fazer uma pequena consultoria aos amigos. É o seguinte, sempre tive problemas com pontuação de casas decimais. Funções como StrToCurr da Sysutils funciona bem se o usuário define (. Ponto) nas Configurações Regionais do Painel de controle do Windows. Se o uruário define vírgula esta funçao, pelo menos comigo, já não funcionam. Gostaria de perguntar aos senhores como evitar este problema ou melhor, como trabalhar com este tipo de configuração que o usuario faz? Obrigado a todos Joel [As partes desta mensagem que não continham texto foram removidas] _ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! http://www.amigosdomessenger.com.br
[delphi-br] Re: Valores Monetários
Você também pode configurar essas variáveis internamente. Dessa forma eu resolvi todos os problemas que tinha com configuração de máquina de usuário: No OnCreate do seu formulário principal: // uses ..., SysUtils, ...; procedure TfmMain.FormCreate(Sender: TObject); begin CurrencyString := 'R$'; CurrencyFormat := 0; NegCurrFormat := 0; ThousandSeparator := '.'; DecimalSeparator := ','; CurrencyDecimals := 2; DateSeparator := '/'; ShortDateFormat := 'dd/MM/'; LongDateFormat := ', d' + StrChar(' de ') + '' + StrChar(' de ') + ''; TimeSeparator := ':'; TimeAMString := ''; TimePMString := ''; ShortTimeFormat := 'hh:mm'; LongTimeFormat := 'hh:mm:ss'; ListSeparator := ';'; end; --- Em delphi-br@yahoogrupos.com.br, Claudio Marconi [EMAIL PROTECTED] escreveu Voce pode tomar a decisão correta de como manipular essa funcão através da variabel global de ambiente: DecimalSeparator nesta variável ela traz o que está definido no Reginal Settins( no painel de controle). Em 04/03/08, Joel Alexandre [EMAIL PROTECTED] escreveu: Senhores, boa noite. Deixa eu fazer uma pequena consultoria aos amigos. É o seguinte, sempre tive problemas com pontuação de casas decimais. Funções como StrToCurr da Sysutils funciona bem se o usuário define (. Ponto) nas Configurações Regionais do Painel de controle do Windows. Se o uruário define vírgula esta funçao, pelo menos comigo, já não funcionam. Gostaria de perguntar aos senhores como evitar este problema ou melhor, como trabalhar com este tipo de configuração que o usuario faz? Obrigado a todos Joel [As partes desta mensagem que não continham texto foram removidas] -- Cláudio Marconi Delphi/DirectShow Developer 55 61 8406-6451 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Valores Monetários
Na mosca Rubem :) Sabe que desde os primordios do Delphi eu tinha este problema? heheheheehe Valeu mesmo []Os Joel Quando uma aplicação Delphi faz uso da unit SysUtils, esta define variáveis globais que espelham as configurações regionais do Windows. Entre elas, para o seu caso em particular, destacam-se as variáveis DecimalSeparator e ThousandSeparator, que correspondem, respectivamente, aos caracteres delimitadores de casas decimais e separadores de milhar. -- 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] 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
[delphi-br] Re: RES: [COMBOBOX]
Davi ... Voce pode me ajudar com mais detalhes ... tente1 fazer da seguinte maneira : ComboBox1.items.addobject('Marcio', 1); e ainda nao me achei... e com o names=value como ficaria ?? Marcio. Desde ja agradeco sua ajuda. Utilize combo.items.addobject(STRING, OBJETO) onde o seu objeto pode ser um integer contendo a PK que vc quer guardar Ou ainda Utilize o par Names=Values que também irá funcionar Ambas as soluções existem no Help do Delphi. De: mailto:delphi-br%40yahoogrupos.com.brdelphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Andre Luis Silveria Enviada em: terça-feira, 4 de março de 2008 08:52 Para: mailto:delphi-br%40yahoogrupos.com.brdelphi-br@yahoogrupos.com.br Assunto: Res: [delphi-br] [COMBOBOX] Somente com os componentes da Jedi vc consegue de maneira transparente, o que vc pode fazer e colocar assim: 01 - AAA 02 - BBB ou seja o codigo espaço traço espaço nome e depois dar um copy(Combobox.Text, 1, Pos(' -', Combobox.Text) -1) Meio gambiarra mas que funciona, isso funciona. Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/http://br.mail.yahoo.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] OFF-TOPIC / SQL Firebird 2.0 - Stored Procedures
Perdoem o off-topic, é que estou com certa urgência. Quem trabalha com Stored Procedures poderá tirar essa dúvida. Olá pessoal. Estou com uma dúvida em relação a criação de Stored Procedures no Firebird 2.0. Sempre que precisei usar SPs, as criei a partir do IBExpert. Só que agora preciso de uma stored procedure que tenho que criar na unha e estou meio perdido... Trata-se de uma stored procedure para atualizar o Estoque (campo ESTOQUE) da tabela PRODUTOSESTOQUELOJAS. Preciso passar três parâmetros: CodLoja e CodProduto, e mais a Quantidade que desejo incrementar o estoque. A SP deve verificar se o produto já existe cadastrado a partir dos parâmetros de entrada CodProduto e CodLoja (se achar algum registro com os campos CodLoja e CodProduto que confiram com os parâmetros). Caso exista, deve-se dar um UPDATE na tabela para atualizar o estoque somando-o a variável QUANTIDADE (mais um parâmetro de entrada). Caso não exista ainda cadastrado, deve-se dar um INSERT na tabela cadastrando o produto com a quantidade em estoque que passei como parâmetro QUANTIDADE. O código que tenho (e que não funciona, pois dá erro na criação da SP) é esse abaixo: Código: SET TERM ^ ; CREATE PROCEDURE SP_ALTERA_ESTOQUE( CODLOJA INTEGER, CODPRODUTO INTEGER, QUANTIDADE INTEGER) AS BEGIN IF (Select Count(*) From PRODUTOSESTOQUELOJAS WHERE ((PRODUTOSESTOQUELOJAS.CODLOJA = :CODLOJA) AND (PRODUTOSESTOQUELOJAS.CODPRODUTO = :CODPRODUTO) 0) THEN BEGIN BEGIN TRANSACTION UPDATE PRODUTOSESTOQUELOJAS SET PRODUTOSESTOQUELOJAS.ESTOQUE = PRODUTOSESTOQUELOJAS.ESTOQUE + :QUANTIDADE COMMIT END ELSE BEGIN BEGIN TRANSACTION INSERT INTO PRODUTOSESTOQUELOJAS (ESTOQUE) VALUES (QUANTIDADE) COMMIT END END; SET TERM ; ^ Obrigado a todos. Edson Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] OFF-TOPIC / SQL Firebird 2.0 - Stored Procedures
Bem... não sei se entendi sua pergunta, mas se vc quer fazer isso no Delphi, pode fazer usando o TSQLConnection (DBExpress) passando esta stored procedure. Cada parâmetro é acessado por um array Params e o índice de cada parâmetro. O primeiro parâmetro tem o índice 0 no array de parâmetros e assim por diante. Para criar a procedure, vc usa o método Execute. Acho que é isso. Se não for, detalhe melhor o problema. Atte, Ricardo. Edson Cabral [EMAIL PROTECTED] escreveu: Perdoem o off-topic, é que estou com certa urgência. Quem trabalha com Stored Procedures poderá tirar essa dúvida. Olá pessoal. Estou com uma dúvida em relação a criação de Stored Procedures no Firebird 2.0. Sempre que precisei usar SPs, as criei a partir do IBExpert. Só que agora preciso de uma stored procedure que tenho que criar na unha e estou meio perdido... Trata-se de uma stored procedure para atualizar o Estoque (campo ESTOQUE) da tabela PRODUTOSESTOQUELOJAS. Preciso passar três parâmetros: CodLoja e CodProduto, e mais a Quantidade que desejo incrementar o estoque. A SP deve verificar se o produto já existe cadastrado a partir dos parâmetros de entrada CodProduto e CodLoja (se achar algum registro com os campos CodLoja e CodProduto que confiram com os parâmetros). Caso exista, deve-se dar um UPDATE na tabela para atualizar o estoque somando-o a variável QUANTIDADE (mais um parâmetro de entrada). Caso não exista ainda cadastrado, deve-se dar um INSERT na tabela cadastrando o produto com a quantidade em estoque que passei como parâmetro QUANTIDADE. O código que tenho (e que não funciona, pois dá erro na criação da SP) é esse abaixo: Código: SET TERM ^ ; CREATE PROCEDURE SP_ALTERA_ESTOQUE( CODLOJA INTEGER, CODPRODUTO INTEGER, QUANTIDADE INTEGER) AS BEGIN IF (Select Count(*) From PRODUTOSESTOQUELOJAS WHERE ((PRODUTOSESTOQUELOJAS.CODLOJA = :CODLOJA) AND (PRODUTOSESTOQUELOJAS.CODPRODUTO = :CODPRODUTO) 0) THEN BEGIN BEGIN TRANSACTION UPDATE PRODUTOSESTOQUELOJAS SET PRODUTOSESTOQUELOJAS.ESTOQUE = PRODUTOSESTOQUELOJAS.ESTOQUE + :QUANTIDADE COMMIT END ELSE BEGIN BEGIN TRANSACTION INSERT INTO PRODUTOSESTOQUELOJAS (ESTOQUE) VALUES (QUANTIDADE) COMMIT END END; SET TERM ; ^ Obrigado a todos. Edson Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: RES: [COMBOBOX]
Valeu pela dica .. apartir dela achei uma solucao ... descobri... (google) .. att. MArcio procedure TForm1.Button2Click(Sender: TObject); var S: String; I,V, Idx: Integer; begin i := 0; while i 10 do begin s := 'Alguma Coisa' + IntToStr(i); //i := ; // Seu ID V := i * 1000; ComboBox1.Items.AddObject(s, TObject(V)); // Essa é a linha mágica i:= i + 1; end; end; procedure TForm1.ComboBox1Click(Sender: TObject); var S: String; I, Idx: Integer; begin Idx := Combobox1.ItemIndex; S := ComboBox1.Items[Idx]; I := Integer(Combobox1.Items.Objects[Idx]); // continua Edit1.Text := intToStr(Idx); Edit2.Text := S; Edit3.Text := intToStr(I); end;
[delphi-br] Capturar programa
Olá... pessoal gostaria de saber se é possivel capturar um programa q esteja rodando e mandar executar ele como um GADGET da barra do vista? Deixem eu explicar melhor. É que um amigo meu tem uma Lan House e em algumas máquinas já tem o vista. O programa que ele utiliza pra gerenciamento coloca a Barra SOBRE A BARRA DO VISTA... Eu gostaria de saber se é possível pegar o handle dele e mandar ele executar dentro dentro de um gadget que eu crie para o vista (não que eu já saiba criar, mas ainda estou estudando)? vlw Thiago
[delphi-br] Fazer o Delphi Visualizar arquivos Mhtml
Pessoal boa tarde. Alguém já fez , ou sabe como, fazer com que o Delphi exiba arquivos do formato mhtml usando o TWebBrowser ? Obrigado a todos. []s Anderson. F. de Rossi
Re: [delphi-br] Fazer o Delphi Visualizar arquivos Mhtml
Dá uma olhada nesse artigo, pode ser de alguma ajuda: [ http://delphi.about.com/od/internetintranet/l/aa062904a.htm ] Atte, Ricardo. arossi75 [EMAIL PROTECTED] escreveu: Pessoal boa tarde. Alguém já fez , ou sabe como, fazer com que o Delphi exiba arquivos do formato mhtml usando o TWebBrowser ? Obrigado a todos. []s Anderson. F. de Rossi _ - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Re: RES: [COMBOBOX]
Aí Marcio parabéns! Esse é o espírito! Pegar a isca e ir pescar! De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Marcio Enviada em: terça-feira, 4 de março de 2008 12:55 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Re: RES: [COMBOBOX] Valeu pela dica .. apartir dela achei uma solucao ... descobri... (google) .. att. MArcio procedure TForm1.Button2Click(Sender: TObject); var S: String; I,V, Idx: Integer; begin i := 0; while i 10 do begin s := 'Alguma Coisa' + IntToStr(i); //i := ; // Seu ID V := i * 1000; ComboBox1.Items.AddObject(s, TObject(V)); // Essa é a linha mágica i:= i + 1; end; end; procedure TForm1.ComboBox1Click(Sender: TObject); var S: String; I, Idx: Integer; begin Idx := Combobox1.ItemIndex; S := ComboBox1.Items[Idx]; I := Integer(Combobox1.Items.Objects[Idx]); // continua Edit1.Text := intToStr(Idx); Edit2.Text := S; Edit3.Text := intToStr(I); end; [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Fazer o Delphi Visualizar arquivos Mhtml
Veja se alguma coisa aqui já te ajuda: http://delphi.about.com/b/2004/05/27/webbrowser-to-the-max.htm Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 4 Mar 2008 16:31:14 + Subject: [delphi-br] Fazer o Delphi Visualizar arquivos Mhtml Pessoal boa tarde. Alguém já fez , ou sabe como, fazer com que o Delphi exiba arquivos do formato mhtml usando o TWebBrowser ? Obrigado a todos. []s Anderson. F. de Rossi _ Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger! http://www.amigosdomessenger.com.br/
RES: [delphi-br] Fazer o Delphi Visualizar arquivos Mhtml
Uma vez eu fiz um helpzinho tosco e salvei em mhtml, funcionou normal no TWebBrowser, com navigate mesmo. -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de arossi75 Enviada em: terça-feira, 4 de março de 2008 13:31 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Fazer o Delphi Visualizar arquivos Mhtml Pessoal boa tarde. Alguém já fez , ou sabe como, fazer com que o Delphi exiba arquivos do formato mhtml usando o TWebBrowser ? Obrigado a todos. []s Anderson. F. de Rossi [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Caracteres de início e fim do código 2 de 5 intercal ado?
Boa tarde! Alguém sabe me informar quais são os caracteres de início e fim do código 2 de 5 intercalado? Agradeço a atenção de todos. Obrigado Manoel [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] OFF - RDPrint
Caros amigos da lista, Uso Delphi 2005 e FireBird 2.0. Estou precisando imprimir Notas Fiscais e para isso instalei o RDPrint, porém não sei nem por onde começar, pois normalmente uso o FastReport para meus relatórios. Alguém poderia me ajudar e dizer como se começa um relatório com o RDPrint. Desde já agradeço a atenção. sds Adjalma - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] OFF - RDPrint
Companheiro, se vc obteve o RDPrint do próprio fornecedor, olhe os exemplos que vêm com ele. O RDPrint não dispõe de um designer visual, pois o uso dele é feito 'na munheca', ou seja, codificando os relatórios literalmente com o componente. Olhe os exemplos e veja tb se tem alguma orientação no próprio site do fabricante, em http://www.deltress.com.br. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 4 Mar 2008 14:52:16 -0300 Subject: [delphi-br] OFF - RDPrint Caros amigos da lista, Uso Delphi 2005 e FireBird 2.0. Estou precisando imprimir Notas Fiscais e para isso instalei o RDPrint, porém não sei nem por onde começar, pois normalmente uso o FastReport para meus relatórios. Alguém poderia me ajudar e dizer como se começa um relatório com o RDPrint. Desde já agradeço a atenção. sds Adjalma - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] _ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! http://www.amigosdomessenger.com.br
Re: [delphi-br] OFF - RDPrint
O RdPrint é totalmente diferente, com ele vc monta o relatorio no codigo.. imprimindo linha a linha.. junto com o componente vem um excelente demo que vai de orientar tranquilamente. caso não tenha o demo baixe no site da deltress. Em 04/03/08, Adjalma Costa [EMAIL PROTECTED] escreveu: Caros amigos da lista, Uso Delphi 2005 e FireBird 2.0. Estou precisando imprimir Notas Fiscais e para isso instalei o RDPrint, porém não sei nem por onde começar, pois normalmente uso o FastReport para meus relatórios. Alguém poderia me ajudar e dizer como se começa um relatório com o RDPrint. Desde já agradeço a atenção. sds Adjalma - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Caracteres de início e fim do código 2 de 5 intercalado?
Chegou ao menos a procurar tb no Google ou no AltaVista antes? Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 4 Mar 2008 18:06:12 + Subject: RE: [delphi-br] Caracteres de início e fim do código 2 de 5 intercalado? Procurou se informar no site da autoridade em código de barras no Brasil (http://www.eanbrasil.org.br)? É o local mais óbvio pra começar a procurar! Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 4 Mar 2008 14:41:16 -0300 Subject: [delphi-br] Caracteres de início e fim do código 2 de 5 intercalado? Boa tarde! Alguém sabe me informar quais são os caracteres de início e fim do código 2 de 5 intercalado? Agradeço a atenção de todos. Obrigado Manoel [As partes desta mensagem que não continham texto foram removidas] __ Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver offline. Conheça o MSN Mobile! http://mobile.live.com/signup/signup2.aspx?lc=pt-br _ Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas e muito mais no MSN Video! http://video.msn.com/?mkt=pt-br
RE: [delphi-br] OFF - RDPrint
Ok Rubem, valeu. Vou dá uma olhada. Obrigado sds Adjalma Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Companheiro, se vc obteve o RDPrint do próprio fornecedor, olhe os exemplos que vêm com ele. O RDPrint não dispõe de um designer visual, pois o uso dele é feito 'na munheca', ou seja, codificando os relatórios literalmente com o componente. Olhe os exemplos e veja tb se tem alguma orientação no próprio site do fabricante, em http://www.deltress.com.br. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 4 Mar 2008 14:52:16 -0300 Subject: [delphi-br] OFF - RDPrint Caros amigos da lista, Uso Delphi 2005 e FireBird 2.0. Estou precisando imprimir Notas Fiscais e para isso instalei o RDPrint, porém não sei nem por onde começar, pois normalmente uso o FastReport para meus relatórios. Alguém poderia me ajudar e dizer como se começa um relatório com o RDPrint. Desde já agradeço a atenção. sds Adjalma - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] __ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! http://www.amigosdomessenger.com.br - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Caracteres de início e fim do código 2 de 5 intercalado?
Procurou se informar no site da autoridade em código de barras no Brasil (http://www.eanbrasil.org.br)? É o local mais óbvio pra começar a procurar! Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 4 Mar 2008 14:41:16 -0300 Subject: [delphi-br] Caracteres de início e fim do código 2 de 5 intercalado? Boa tarde! Alguém sabe me informar quais são os caracteres de início e fim do código 2 de 5 intercalado? Agradeço a atenção de todos. Obrigado Manoel [As partes desta mensagem que não continham texto foram removidas] _ Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver offline. Conheça o MSN Mobile! http://mobile.live.com/signup/signup2.aspx?lc=pt-br
Re: [delphi-br] Valores Monetários
Eu sempre configuro meu sistema para funcionar independentemente da configuração do Windows, para isso, eu coloco no OnCreate do form principal: DecimalSeparator:=','; ThousandSeparator:='.'; LongDateFormat:='dd/mm/'; ShortDateFormat:='dd/mm/'; assim não importa o que o usuário configurou no Windows. Alexandre. - Original Message - From: Joel Alexandre To: delphi-br@yahoogrupos.com.br Sent: Tuesday, March 04, 2008 12:28 AM Subject: [delphi-br] Valores Monetários Senhores, boa noite. Deixa eu fazer uma pequena consultoria aos amigos. É o seguinte, sempre tive problemas com pontuação de casas decimais. Funções como StrToCurr da Sysutils funciona bem se o usuário define (. Ponto) nas Configurações Regionais do Painel de controle do Windows. Se o uruário define vírgula esta funçao, pelo menos comigo, já não funcionam. Gostaria de perguntar aos senhores como evitar este problema ou melhor, como trabalhar com este tipo de configuração que o usuario faz? Obrigado a todos Joel [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] [COMBOBOX]
LookupComboBox, não serve Vinicius dos Santos Analista de Desenvolvimento Júnior MSI SOLUÇÕES Av. Dr. Altino Arantes, 131 Sala 145 - 146 Centro - Ourinhos/Sp - Brasil Fone/Fax: +55 (14) 3324-8181 www.msisolucoes.com.br - Original Message - From: Marcio To: delphi-br@yahoogrupos.com.br Sent: Tuesday, March 04, 2008 8:35 AM Subject: [delphi-br] [COMBOBOX] Olá a todos ... Pessoal como faco para que um combobox mostre um valor e result outro ?? Por exemplo.. vou carregar o combobox atravez de um Sql. (codigo,NomeFuncionario). O combobox devera mostrar o Nome do Funcionario, ao clickar o combobox um edit recebera o codigo do funcionario... É possivel fazer essa amarracao ??? O combobox aceita um value e uma descricao ??? Desculpem minha pergunta primaria .. Marcio. [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] [COMBOBOX]
Tb acho! Pra quê ficar reinventando a roda? Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 4 Mar 2008 09:34:55 -0300 Subject: Re: [delphi-br] [COMBOBOX] LookupComboBox, não serve Vinicius dos Santos Analista de Desenvolvimento Júnior MSI SOLUÇÕES Av. Dr. Altino Arantes, 131 Sala 145 - 146 Centro - Ourinhos/Sp - Brasil Fone/Fax: +55 (14) 3324-8181 www.msisolucoes.com.br - Original Message - From: Marcio To: delphi-br@yahoogrupos.com.br Sent: Tuesday, March 04, 2008 8:35 AM Subject: [delphi-br] [COMBOBOX] Olá a todos ... Pessoal como faco para que um combobox mostre um valor e result outro ?? Por exemplo.. vou carregar o combobox atravez de um Sql. (codigo,NomeFuncionario). O combobox devera mostrar o Nome do Funcionario, ao clickar o combobox um edit recebera o codigo do funcionario... É possivel fazer essa amarracao ??? O combobox aceita um value e uma descricao ??? Desculpem minha pergunta primaria .. Marcio. [As partes desta mensagem que não continham texto foram removidas] _ Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger! http://www.amigosdomessenger.com.br/
Re: [delphi-br] OFF - RDPrint
Kra eu trabalho com o RDPRint... qq coisa me contata via PVT.. [EMAIL PROTECTED] flw... Wesley From: Adjalma Costa Sent: Tuesday, March 04, 2008 3:25 PM To: delphi-br@yahoogrupos.com.br Subject: RE: [delphi-br] OFF - RDPrint Ok Rubem, valeu. Vou dá uma olhada. Obrigado sds Adjalma Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Companheiro, se vc obteve o RDPrint do próprio fornecedor, olhe os exemplos que vêm com ele. O RDPrint não dispõe de um designer visual, pois o uso dele é feito 'na munheca', ou seja, codificando os relatórios literalmente com o componente. Olhe os exemplos e veja tb se tem alguma orientação no próprio site do fabricante, em http://www.deltress.com.br. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 4 Mar 2008 14:52:16 -0300 Subject: [delphi-br] OFF - RDPrint Caros amigos da lista, Uso Delphi 2005 e FireBird 2.0. Estou precisando imprimir Notas Fiscais e para isso instalei o RDPrint, porém não sei nem por onde começar, pois normalmente uso o FastReport para meus relatórios. Alguém poderia me ajudar e dizer como se começa um relatório com o RDPrint. Desde já agradeço a atenção. sds Adjalma - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] __ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! http://www.amigosdomessenger.com.br - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 2921 (20080304) __ 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]
[delphi-br] IBOConsole nao dá commit
Boa tarde, Alguém saberia pq o IBOConsole não dá commit via comando? Tipo: UPDATE TABELA SET ALGO = 1; COMMIT; Ele nao reconhece o COMMIT; (só funciona se clicar no botão de commit). Uso fire 1.54. obrigado, Leandro [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] 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
[delphi-br] Capturar Mensagens PostgreSQL
Galera, Estou desenvolvendo uma aplicação com delphi e postgres, onde toda a lógica está contida no banco através de procedures e functions. Assim gostaria de uma ajuda para capturar s mensagens de resposta do banco quando no procedimento gerar uma Raise Notice ou Raise Exception? Gostaria de capturar e exibir para o usuário. Agradeço desde já! Atenciosamente, _ ___ _ / )| |( \ / / | Luiz Eduardo Alves Santos | \ \ _( (_ | _ _ | _) )_ (((\ \)|_/ ) ( \_|(/ /))) ( \_/ / \ \_/ ) \ / \ / \_/ \_/ / / \ \ Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] DevExpreess
Pessoal, alguém ai usa cxGrid da DevExpress ?? Meu problema é o seguinte, quando tenho um campo boolean, e marco/desmarco ele, não é acionado o evento OnChange da tabela, somente quando eu dou um enter, ou passo para outra coluna, é algo parecido com o SimpleClick do InfoPower, porém me parece que esse opção não existe no DevExpress... Alguém já passou por isso ? Vinicius dos Santos Analista de Desenvolvimento Júnior MSI SOLUÇÕES Av. Dr. Altino Arantes, 131 Sala 145 - 146 Centro - Ourinhos/Sp - Brasil Fone/Fax: +55 (14) 3324-8181 www.msisolucoes.com.br [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Capturar Mensagens PostgreSQL
Um simples try..except entre as instruções que serão colocadas no contexto transacional resolve. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 4 Mar 2008 08:12:27 -0800 Subject: [delphi-br] Capturar Mensagens PostgreSQL Galera, Estou desenvolvendo uma aplicação com delphi e postgres, onde toda a lógica está contida no banco através de procedures e functions. Assim gostaria de uma ajuda para capturar s mensagens de resposta do banco quando no procedimento gerar uma Raise Notice ou Raise Exception? Gostaria de capturar e exibir para o usuário. Agradeço desde já! Atenciosamente, _ ___ _ / )| |( \ / / | Luiz Eduardo Alves Santos | \ \ _( (_ | _ _ | _) )_ (((\ \)|_/ ) ( \_|(/ /))) ( \_/ / \ \_/ ) \ / \ / \ _/ \_ / / / \ \ Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] _ Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver offline. Conheça o MSN Mobile! http://mobile.live.com/signup/signup2.aspx?lc=pt-br
[delphi-br] Ata de Resultados
Nobres Colegas, Venho mais uma vez pedir a ajuda dos nobres colegas para poder resolver uma dúvida que me ocorre: Tenho um sistema em paradox para administração escolar rodando, estou precisando gerar a ata de resultados finais para o mesmo, porém, estou com um problema que ainda não consegui resolver. Tenho uma tabela onde ficam registradas todas as informações de notas e matérias do alunos. Ex.: Nome Matéria Nota - Maria da silva Portugues10 Maria da Silva Matemática 08 Maria da Silva Inglês 09 Maria da Silva Física 08 e assim por diante com todos os alunos da turma. Se existirem 10 matérias o nome do aluno se repete as mesmas 10 vezes. Como faria para gerar uma segunda tabela ou outra maneira de poder gerar ata de resultados finais com o tipo de tabela que possuo? Nesta sistema estou utilizando Delphi 7, Paradox e FortesReport, mas a dica poderia ser também em QR se caso fosse mais prático. Desde já agradeço a ajuda. Abraços. Ralp Alves Bezerra
Res: [delphi-br] Ata de Resultados
um group by no nome do aluno, e no fortes uma banda Group com os details não resolveria ? - Mensagem original De: Ralp Alves Bezerra [EMAIL PROTECTED] Para: Delphi BR delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 4 de Março de 2008 18:29:32 Assunto: [delphi-br] Ata de Resultados Nobres Colegas, Venho mais uma vez pedir a ajuda dos nobres colegas para poder resolver uma dúvida que me ocorre: Tenho um sistema em paradox para administração escolar rodando, estou precisando gerar a ata de resultados finais para o mesmo, porém, estou com um problema que ainda não consegui resolver. Tenho uma tabela onde ficam registradas todas as informações de notas e matérias do alunos. Ex.: Nome Matéria Nota - - --- Maria da silva Portugues10 Maria da Silva Matemática 08 Maria da Silva Inglês 09 Maria da Silva Física 08 e assim por diante com todos os alunos da turma. Se existirem 10 matérias o nome do aluno se repete as mesmas 10 vezes. Como faria para gerar uma segunda tabela ou outra maneira de poder gerar ata de resultados finais com o tipo de tabela que possuo? Nesta sistema estou utilizando Delphi 7, Paradox e FortesReport, mas a dica poderia ser também em QR se caso fosse mais prático. Desde já agradeço a ajuda. Abraços. Ralp Alves Bezerra !-- #ygrp-mkp{ border:1px solid #d8d8d8;font-family:Arial;margin:14px 0px;padding:0px 14px;} #ygrp-mkp hr{ border:1px solid #d8d8d8;} #ygrp-mkp #hd{ color:#628c2a;font-size:85%;font-weight:bold;line-height:122%;margin:10px 0px;} #ygrp-mkp #ads{ margin-bottom:10px;} #ygrp-mkp .ad{ padding:0 0;} #ygrp-mkp .ad a{ color:#ff;text-decoration:none;} -- !-- #ygrp-sponsor #ygrp-lc{ font-family:Arial;} #ygrp-sponsor #ygrp-lc #hd{ margin:10px 0px;font-weight:bold;font-size:78%;line-height:122%;} #ygrp-sponsor #ygrp-lc .ad{ margin-bottom:10px;padding:0 0;} -- !-- #ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean, sans-serif;} #ygrp-mlmsg table {font-size:inherit;font:100%;} #ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean, sans-serif;} #ygrp-mlmsg pre, code {font:115% monospace;} #ygrp-mlmsg * {line-height:1.22em;} #ygrp-text{ font-family:Georgia; } #ygrp-text p{ margin:0 0 1em 0;} #ygrp-tpmsgs{ font-family:Arial; clear:both;} #ygrp-vitnav{ padding-top:10px;font-family:Verdana;font-size:77%;margin:0;} #ygrp-vitnav a{ padding:0 1px;} #ygrp-actbar{ clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;} #ygrp-actbar .left{ float:left;white-space:nowrap;} .bld{font-weight:bold;} #ygrp-grft{ font-family:Verdana;font-size:77%;padding:15px 0;} #ygrp-ft{ font-family:verdana;font-size:77%;border-top:1px solid #666; padding:5px 0; } #ygrp-mlmsg #logo{ padding-bottom:10px;} #ygrp-vital{ background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;} #ygrp-vital #vithd{ font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;} #ygrp-vital ul{ padding:0;margin:2px 0;} #ygrp-vital ul li{ list-style-type:none;clear:both;border:1px solid #e0ecee; } #ygrp-vital ul li .ct{ font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;} #ygrp-vital ul li .cat{ font-weight:bold;} #ygrp-vital a{ text-decoration:none;} #ygrp-vital a:hover{ text-decoration:underline;} #ygrp-sponsor #hd{ color:#999;font-size:77%;} #ygrp-sponsor #ov{ padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;} #ygrp-sponsor #ov ul{ padding:0 0 0 8px;margin:0;} #ygrp-sponsor #ov li{ list-style-type:square;padding:6px 0;font-size:77%;} #ygrp-sponsor #ov li a{ text-decoration:none;font-size:130%;} #ygrp-sponsor #nc{ background-color:#eee;margin-bottom:20px;padding:0 8px;} #ygrp-sponsor .ad{ padding:8px 0;} #ygrp-sponsor .ad #hd1{ font-family:Arial;font-weight:bold;color:#628c2a;font-size:100%;line-height:122%;} #ygrp-sponsor .ad a{ text-decoration:none;} #ygrp-sponsor .ad a:hover{ text-decoration:underline;} #ygrp-sponsor .ad p{ margin:0;} o{font-size:0;} .MsoNormal{ margin:0 0 0 0;} #ygrp-text tt{ font-size:120%;} blockquote{margin:0 0 0 4px;} .replbq{margin:4;} -- Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] DevExpreess
É porque o cxGrid pega os dados em memoria, então ele nao mexe na tabela propriamente dita... tem uma opção que voce habilita chama GridMode... seta ela pra true e veja se funciona.. acho que fica no mesmo local onde vc seta o datasource, esqueci o nome agora. :o) []s Em 04/03/08, Vinicius Santos - MSI [EMAIL PROTECTED] escreveu: Pessoal, alguém ai usa cxGrid da DevExpress ?? Meu problema é o seguinte, quando tenho um campo boolean, e marco/desmarco ele, não é acionado o evento OnChange da tabela, somente quando eu dou um enter, ou passo para outra coluna, é algo parecido com o SimpleClick do InfoPower, porém me parece que esse opção não existe no DevExpress... Alguém já passou por isso ? Vinicius dos Santos Analista de Desenvolvimento Júnior MSI SOLUÇÕES Av. Dr. Altino Arantes, 131 Sala 145 - 146 Centro - Ourinhos/Sp - Brasil Fone/Fax: +55 (14) 3324-8181 www.msisolucoes.com.br [As partes desta mensagem que não continham texto foram removidas] -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Como funciona a transação no DBExpress ou Zeos?
Olá amigos, estou acostumado nos componentes derivados do IBX, onde cada DataSet, voce vincula à um transação, não importando em qual Form o DataSet esteja, porém no DBExpress como no ZeosDB, a transação é iniciada a partir da conexão, passando-se um ID. vamos a um exemplinho: FrmVenda - Inicia Transacao 1 Chama FrmCaixa - Grava informações usando a Transação 1 Chama FrmContaReceber - Grava informações usando a Transação 1 FrmVenda - Commit na Transação 1 (Gravando os dados do Caixa e Conta a Receber). Minha questão é, como vincular os datasets do Caixa e Conta à Receber, na transação iniciada no Venda? No IBX, eu só passava a propriedade Transaction, como fica no DBX e Zeos? Obrigado desde já. []s -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como funciona a transação no DBExpress ou Zeos?
Olá Fellipe, qual versão do Zeos vc ta usando? até onde sei não é necessário vincular o DataSet à transação. Inicia-se a transação no componente de conexão.. faz oq tem que ser feito e depois executa um commit; as operações feitas nesse meio tempo são feitas de forma transparente. Em 04/03/08, Fellipe Henrique [EMAIL PROTECTED] escreveu: Olá amigos, estou acostumado nos componentes derivados do IBX, onde cada DataSet, voce vincula à um transação, não importando em qual Form o DataSet esteja, porém no DBExpress como no ZeosDB, a transação é iniciada a partir da conexão, passando-se um ID. vamos a um exemplinho: FrmVenda - Inicia Transacao 1 Chama FrmCaixa - Grava informações usando a Transação 1 Chama FrmContaReceber - Grava informações usando a Transação 1 FrmVenda - Commit na Transação 1 (Gravando os dados do Caixa e Conta a Receber). Minha questão é, como vincular os datasets do Caixa e Conta à Receber, na transação iniciada no Venda? No IBX, eu só passava a propriedade Transaction, como fica no DBX e Zeos? Obrigado desde já. []s -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como funciona a transação no DBExpress ou Zeos?
Olá eduardo, estou usando a ultima versao do zeos. Bom, entendi direito? Inicio a transacao da conexao, e tudo que eu fizer no sistema, nesse meio tempo, fica na transacao aberta? ou seja, se eu criar uma transacao na venda, e com a venda aberta, for no produto e cadastrar um produto, e ao gravar a venda dá erro, e é dado o rollback, o produto cadastro não será salvo ? É isso mesmo? Porque se for, realmente o esquema de transacao do IBX é bm melhor.. []s Em 04/03/08, Eduardo Silva dos Santos [EMAIL PROTECTED] escreveu: Olá Fellipe, qual versão do Zeos vc ta usando? até onde sei não é necessário vincular o DataSet à transação. Inicia-se a transação no componente de conexão.. faz oq tem que ser feito e depois executa um commit; as operações feitas nesse meio tempo são feitas de forma transparente. Em 04/03/08, Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com escreveu: Olá amigos, estou acostumado nos componentes derivados do IBX, onde cada DataSet, voce vincula à um transação, não importando em qual Form o DataSet esteja, porém no DBExpress como no ZeosDB, a transação é iniciada a partir da conexão, passando-se um ID. vamos a um exemplinho: FrmVenda - Inicia Transacao 1 Chama FrmCaixa - Grava informações usando a Transação 1 Chama FrmContaReceber - Grava informações usando a Transação 1 FrmVenda - Commit na Transação 1 (Gravando os dados do Caixa e Conta a Receber). Minha questão é, como vincular os datasets do Caixa e Conta à Receber, na transação iniciada no Venda? No IBX, eu só passava a propriedade Transaction, como fica no DBX e Zeos? Obrigado desde já. []s -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com fellipeh%40gmail.com [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] eduardo.drd%40gmail.com Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas] -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como funciona a transação no DBExpress ou Zeos?
Veja bem, o esquema é esse, muito mais simples.. lembre-se que transações devem ser o mais curta possível.. essa questão que vc passou vai depender de como esta seu cadastro de produtos.. de como o banco trabalha com as transações se aceita sub-transações, são diversos fatores a serem analisados.. eu acho dessa forma muito mais simples. faz um teste ai pra ver se o esquema de sub-transação da certo. StartTransaction; venda... startTransaction; produto; Commit; Commit; Em 04/03/08, Fellipe Henrique [EMAIL PROTECTED] escreveu: Olá eduardo, estou usando a ultima versao do zeos. Bom, entendi direito? Inicio a transacao da conexao, e tudo que eu fizer no sistema, nesse meio tempo, fica na transacao aberta? ou seja, se eu criar uma transacao na venda, e com a venda aberta, for no produto e cadastrar um produto, e ao gravar a venda dá erro, e é dado o rollback, o produto cadastro não será salvo ? É isso mesmo? Porque se for, realmente o esquema de transacao do IBX é bm melhor.. []s Em 04/03/08, Eduardo Silva dos Santos [EMAIL PROTECTED]eduardo.drd%40gmail.com escreveu: Olá Fellipe, qual versão do Zeos vc ta usando? até onde sei não é necessário vincular o DataSet à transação. Inicia-se a transação no componente de conexão.. faz oq tem que ser feito e depois executa um commit; as operações feitas nesse meio tempo são feitas de forma transparente. Em 04/03/08, Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.comfellipeh%40gmail.com escreveu: Olá amigos, estou acostumado nos componentes derivados do IBX, onde cada DataSet, voce vincula à um transação, não importando em qual Form o DataSet esteja, porém no DBExpress como no ZeosDB, a transação é iniciada a partir da conexão, passando-se um ID. vamos a um exemplinho: FrmVenda - Inicia Transacao 1 Chama FrmCaixa - Grava informações usando a Transação 1 Chama FrmContaReceber - Grava informações usando a Transação 1 FrmVenda - Commit na Transação 1 (Gravando os dados do Caixa e Conta a Receber). Minha questão é, como vincular os datasets do Caixa e Conta à Receber, na transação iniciada no Venda? No IBX, eu só passava a propriedade Transaction, como fica no DBX e Zeos? Obrigado desde já. []s -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com fellipeh%40gmail.com fellipeh%40gmail.com [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] eduardo.drd%40gmail.com eduardo.drd%40gmail.com Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas] -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]