Res: [delphi-br] Ordenar TTable
IndexFieldNames := 'CAMPO1'; Não funga? De: Juliano Silva - Yahoo smjjuli...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Quinta-feira, 18 de Dezembro de 2008 11:38:53 Assunto: [delphi-br] Ordenar TTable Pessoal, bom dia Alguém já precisou Ordenar um TTable em tempo de execução? É possível? att. Juliano Silva [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: [delphi-br] DELPHI NAO FUNCIONA PARA PROJETO DE GRANDE PORTE NUM UNICO EXECUTAVEL.
Até onde sei, um executável com 51 mb é indesejado em qualquer linguagem. Você pode sim modularizar projetos que usam Units em comum, é só listar essas units e criar um package de units utilizadas regularmente por outros packages. Esse package de units seria adicionado aos packages que precisarem dele (como funciona com os componentes na verdade). Na verdade modularizar um projeto muito grande é muito trabalhoso, mas é necessário e se apoiado por um pré-projeto minucioso, que liste todas as units e suas respectivas funções, pode ser um projeto de sucesso, que irá poupar seu tempo futuramente. Nunca vi um executável de 51 mb em nenhum software, veja o office, tá, os caras escondem mb atrás de dlls, mas mesmo assim, elas não são carregadas inicialmente como seriam num executável de 51 mb. De: Josi Ferri Marin jfm_...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Quinta-feira, 18 de Dezembro de 2008 11:30:06 Assunto: [delphi-br] DELPHI NAO FUNCIONA PARA PROJETO DE GRANDE PORTE NUM UNICO EXECUTAVEL. Bom dia pessoal. Após tanta procura, pesquisa, etc ... cheguei a conclusão de que o delphi não serve para projetos de grande porte. Depois de um determinado tamanho, começa a dar erros de compilação, erros de ntdll.dll, erros de out of memory, todos esses erros dando no momento da compilação em qualquer maquina ou sistema operacional independente de processador( P4, core 2 duo, amd) ou quantidade de memória(1 gb, 3 gb). Se compilo um projeto menor, funciona sem problema. Usamos o delphi 7. Entrei em contato com o pessoal da borland e me disseram que tinham conhecimentos de projeto maiores que o nosso e que compilava sem problema. Pedi um desses exemplos e não me falaram. Depois retornaram dizendo que a solução seria modularizar o projeto. Ou seja, realmente ele não funciona, o que é uma pena. Como modularizar um projeto que tem mais de 1000 arquivos .pas que hoje gera um executavel de mais ou menos 51 MB, sendo que uma unit pode ser usada em dezenas de outras. Esses erros no delphi já acontecem a muitos anos e a borland infelizmente não forneceu solução, pelo menos não nos patchs que temos aqui. Se alguém sabe uma forma de resolver esses erros de compilação ou uma forma de modularizar um projeto desse temanho, por favor digam. Obrigado e um Feliz Natal a todos. 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] 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: [delphi-br] Table1.Filter = DataVazia
DATADEVOL=NULL De: Rogerio Rios Pessanha rogerio_r...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 12 de Dezembro de 2008 10:58:11 Assunto: [delphi-br] Table1.Filter = DataVazia Quero filtrar uma tabela para que só sejam mostrados os registros que tenha o campo DATADEVOL vazio. table1.filter = DATADEVOL= ?? ; Sei que o ideal seria usar o SELECT + TQUERY , mas os alunos dessa turma que peguei para lecionar NÃO tiveram no periodo anterior o TQUERY então eu ía dar um exemplo com FILTER. Obrigado. 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: [delphi-br] Controle de Estoque - DER
Pelo que eu vi só achei estranho a tabela saída não ser mestre-detalhes, como a tabela pedido compra, tem algum motivo pra isso? Por exemplo, vai sair do estoque 12 produtos, essa operação seria realizada por 12 inserções na tabela saídas certo? Não seria melhor agrupar essa saída em uma tabela saida e jogar as doze inserções para uma segunda tabela detalhes, saidas itens? Quanto ao paradox e a discussão. Só não use-o profissionalmente e se tiver de usar, fazer o que. Mas se puder escolhe... De: marcio fernando_...@ymail.com Para: delphi-br@yahoogrupos.com.br Enviadas: Quinta-feira, 11 de Dezembro de 2008 22:58:49 Assunto: [delphi-br] Controle de Estoque - DER opa estou estudando delphi e as duvidas vão surgindo, o prof mandou a gente fazer um DER de um Controle de Estoque e eu kria a opinião dos colegas de grupo com relação ao meu: Tables: (Paradox) Tbl Saídas CAMPO TIPOTAM CHAVE Controle+ * CodigoProd N Motivo A 3 Quantidade N ValorUnitario $ ValorTotal $ DataMovimento D Lógico A 1 Cliente A 40 Tbl MotivoSaida CAMPO TIPOTAM CHAVE CodigoMotivoA 3 * Motivo A 30 Tbl Clientes CAMPO TIPOTAM CHAVE Cód + * NomeA 40 Cpf A 14 Rg A 18 End A 50 Cidade A 25 UF A 2 Cep A 10 FoneA 18 Celular A 18 Email A 50 Tbl PedidoCompra CAMPO TIPOTAM CHAVE NumeroPedidoCompra A 10 * DataPedido D Fornecedor N ValorTotalPedido$ DataPrevistaEntrega D Liquidado A 1 Cancelado A 1 DetalhesA 100 Tbl ItemPedidoCompra CAMPO TIPOTAM CHAVE CodigoItem + * NumeroPedidoCompra A 10 CodigoProduto N Quantidade N CalorCompra $ Tbl Produtos CAMPO TIPOTAM CHAVE CodigoProduto + * Código N Produto A 40 Fabricante A 20 ValorVenda $ ValorCompra $ Estoque N Tbl Fornecedores CAMPO TIPOTAM CHAVE Código + * RazaoSocial A 40 NomeFantasiaA 40 CNPJA 18 InscricaoEstadual A 18 Contato A 40 FoneA 18 Fax A 18 Email A 50 SiteA 50 Link da img do DER: http://www.forum- hacker.com. br/forum/ picture.php? albumid=121 pictureid= 480 Alguma sugestão? Grato 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: [delphi-br] Interbase instalado?
Todo bando de dados tem uma dll específica, no caso do cliente, o Interbase acho que é a gds32.dll. Não lembro se é ou não, enfim... você pode testar se existe essa dll. Pode testar chaves de registro... Tem um componente na paleta Interbase Admin, chamado IBInstall, você pode usa-lo para configurar a instalação do Interbase, mas uma DLL a mais é requerida pelo componente, IbInstal.dll. De: Evaldo evaldoave...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 12 de Dezembro de 2008 11:32:48 Assunto: [delphi-br] Interbase instalado? Algúem tem alguma rotina, para saber se a máquina tem o interbase está instalado? - Atenciosamente: Evaldo Avelar Marques Desenvolvedor Debian GNU/Linux. Pelo Prazer de ser Livre evaldoavelar@ yahoo.com. br Belo Horizonte/MG Brazil [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] Interbase instalado?
String de pesquisa no Google: installed programs delphi. http://www.greatis.com/delphicb/tips/lib/system-installprog.html De: Evaldo evaldoave...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 12 de Dezembro de 2008 13:39:32 Assunto: Re: Res: [delphi-br] Interbase instalado? Não posso pesquisar pelas dll, porque por exemplo a gds32.dll , o firebird poderia usar para retrocompatibilidad e, entao o fato dela estar la não me granate que quem vai estar instalado é o interbase; Mesmo assim obrigado pela resposta. - Atenciosamente: Evaldo Avelar Marques Desenvolvedor Debian GNU/Linux. Pelo Prazer de ser Livre evaldoavelar@ yahoo.com. br Belo Horizonte/MG Brazil [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] Controle de Estoque - DER
Cara eu disse que seria mais fácil ter uma relação mestre-detalhe entre SAIDA e ITENS de saída. Do que você tá falando??? De: marcio fernando_...@ymail.com Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 12 de Dezembro de 2008 15:32:42 Assunto: Re: Res: [delphi-br] Controle de Estoque - DER Pelo que eu vi só achei estranho a tabela saída não ser mestre- detalhes, como a tabela pedido compra, tem algum motivo pra isso? Por exemplo, vai sair do estoque 12 produtos, essa operação seria realizada por 12 inserções na tabela saídas certo? Não seria melhor agrupar essa saída em uma tabela saida e jogar as doze inserções para uma segunda tabela detalhes, saidas itens? Quanto ao paradox e a discussão. Só não use-o profissionalmente e se tiver de usar, fazer o que. Mas se puder escolhe... Opa, entaum como vc acha que deve ser o DER baseado no que vc falou, somente o nome das tabelas para que eu venha desenvolvê-lo sosinho falow? grato 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: [delphi-br] Firebird X Oracle
Isso é um saco e na verdae são campos tratados de forma diferente mesmo, você pode gambiarrar e fazer um cast nas situações em que os campos acusarem conflito. SELECT CAST( ORACLE.TABELA.CAMPO_NUM AS DECIMAL( 11, 2 ) ) AS CAMPO_NUM Ou você pode deletar os campos adicionados aos TClientDataSets e TSimpleDataSets da vida e trabalhar com FieldByName. Na verdade eu prefiro dessa forma, mas você pode enfrentar alguns problemas com componentes DBWare que exigem que os campos estejam devidamente criados no DataSetContainer, mas, de novo, você pode contornar esses problemas adicionando os campos em run time. Vitor. De: Paulo Pontes [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 25 de Novembro de 2008 9:30:03 Assunto: [delphi-br] Firebird X Oracle Bom dia a todos! Tenho uma aplicação que roda em firebird. Utilizo o DBExpress para acessar o banco. Agora estou tentando rodar essa aplicação no oracle mas estou tendo diversos problemas com os tipos dos campos. Ex.: Ao rodar um 'select' em uma tabela no firebird com campo do tipo 'DECIMAL(11, 2)' no ClientDataSet esse campo fica como tipo 'Float', mas ao rodar esse mesmo 'select' no oracle (campo tipo NUMERIC(11,2) ) ele retorna o campo com o tipo 'TFmtBcd'. Tenho que fazer alguma configuração no DBEXpress para que ele carregue os campos com o mesmo tipo? Obrigado! [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: [delphi-br] Assigned nao funciona
Tente isso: if not Assigned( FMQUALQUER ) then Application.CreateForm( TFMQUALQUER, FMQUALQUER ); FMQUALQUER.ShowModal( ); FMQUALQUER.Release( ); FMQUALQUER := nil; De: Marlon David de Souza [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 11 de Novembro de 2008 9:49:10 Assunto: Re: [delphi-br] Assigned nao funciona Faça assim: fForm1 := TfForm1.Create( Self); try fForm1.ShowModal; finally fForm1.Release; fForm1 := nil; end; Obs: não coloque o comando fForm1 := nil no evento onClose do formulário modal. Alexandre Rodrigues escreveu: Caro Leandro não vejo sentido no uso de assigned nesse caso já que o form é exibido no modo modal, eu faria assim: fForm1 := TfForm1.Create( nil); try fForm1.ShowModal; finally FreeAndNil(fForm1) ; end; FreeAndNil, se não me engano, só a partir do delphi 7, senão tem que ser o velho fForm1.free; fForm1 := nil; [EMAIL PROTECTED] com.br escreveu: Pessoal, Tenho o seguinte código, dentro de um menu no form principal do meu projeto: if not Assigned(fForm1) then fForm1 := TfForm1.Create( Application) ; fForm1.ShowModal; e no OnClose do Form1, eu tenho: Action := caFree; Form1 := nil; Se eu clicar no menu uma vez após a outra, dá Access Violation, por que na segunda vez nao entra no IF do Assigned, ou seja, trata como se o Form1 ainda estivesse na memória. Agora, o engraçado é que se eu colocar o mesmo código do menu em um outro formulário, sem ser o principal, funciona. Eu só mudei o Application para Self. Ficou assim: if not Assigned(fForm1) then fForm1 := TfForm1.Create( Self); fForm1.ShowModal; Alguém poderia dizer: ora bolas, coloque o Self no código do menu também. Já tentei, só que não funcionou. O que eu quero é que, sempre que fechar esse form, ele seja automaticamente destruído. Uso Delphi 2007 e os forms são SDI. Alguem teria alguma idéia? Obrigado, Leandro Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Re: Mais uma dúvida Importante !
if not TABELA.Eof then TABELA.Next( ) else ShowMessage( 'FIM da Tabela ) _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Nicolas Enviada em: quarta-feira, 24 de setembro de 2008 09:33 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Re: Mais uma dúvida Importante ! sem muito tecniquês, é o seguinte: O last é um comando, ou seja, você está mandando se posicionar no ÚLTIMO registro O eof testa se o registro é o último da tabela. Alexandre - Original Message - From: victor_scampini To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Wednesday, September 24, 2008 7:33 AM Subject: [delphi-br] Re: Mais uma dúvida Importante ! Ok amigo, vou tentar eof...Mais você pode me explicar porque se possível ?...Obrigado desde já ! Abraço ! -- No virus found in this incoming message. Checked by AVG - http://www.avg. http://www.avg.com com Version: 8.0.169 / Virus Database: 270.7.1/1687 - Release Date: 23/9/2008 18:32 [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] COBOL X DELPHI - FIREBIRD
Olha, teoricamente é muito fácil. É só montar uma tabela com as empresas que podem acessar X, Y e Z tabelas, mais ou menos assim: EMPRESA TABELAPERMISSAO EMPRESA A CLIENTES TIPO_PERMISSAO EMPRESA A PRODUTOS TIPO_PERMISSAO EMPRESA A TRANSACOES TIPO_PERMISSAO EMPRESA B CLIENTES PERMITIDO EMPRESA C CLIENTES NEGADO Dá pra inventar bastante coisa... mas como você explicou pouco no e-mail, não dá pra entender direito qual é a intensão... se o sistema é multi-empresa e algumas tabelas são compartilhadas ou sei lá o q... _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alosi yahoo Enviada em: terça-feira, 16 de setembro de 2008 21:58 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] COBOL X DELPHI - FIREBIRD Num banco apenas ou vários bancos? pena_rs escreveu: Boa noite pessoal, tenho uma duvida aqui pra colocar em foco de como seria uma parametrização em delphi. Trabalho em softhouse bem conceituada aqui na região centro do RS, mas... a empresa por incrivel que pareça trabalha com cobol microfocus, até ae tudo bem, pq temos mais de 1.000 clientes nos mais diversos tipos de sistemas, mas vamos ao que interessa. Hj temos como padronizar que na empresa A da automação, compartilha o cadastro de clientes com a Empresa B, e que a empresa A da automação compartilha seu cadastro de produtos com a empresa C, como seria feito isso em DELPHI X FIREBIRD? [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] [MAF] tempo de execução de pr ocesso
System = TTimer? - Vitor Luiz Redes Redsystem Bureau Software - _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Marcos Ferreira Enviada em: quinta-feira, 11 de setembro de 2008 03:51 Para: delphi-br@yahoogrupos.com.br Cc: [EMAIL PROTECTED] Assunto: [delphi-br] [MAF] tempo de execução de processo Pessoal. precisava saber em milessegundos quanto tempo demorou um processo meu. Tenho que enviar umas informações por Socket, que já está funcionando, mas precisava saber o tempo que está demorando. Alguém poderia me dar uma dica? Att, Marcos A. Ferreira Consultor SAP/ABAP São Paulo - Brasil +55 1183376968 Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode usar, copiar, ou divulgar as informações nela contidas ou tomar qualquer ação baseada nestas informações. Se você recebeu esta mensagem por engano, por favor, avise imediatamente o remetente, respondendo o email e em seguida, apague-o. Agradecemos sua cooperação. This message may contain confidential and/or privileged information. If you are not the addressee or authorized to receive this for the addressee, you must not use, copy, disclose or take any action based on this message or any information herein. If you have received this message in error, please, advise the sender immediately by reply e-mail and delete this message. Thank you for your cooperation. Antes de imprimir pense em sua responsabilidade e compromisso com o MEIO AMBIENTE. ENVIRONMENT commitment and responsibility, think about Before Printing. [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] [MAF] Ordenação de matriz
Felicidade garantida. E para mostrar os dados, caso necessário, é incomensuravelmente mais fácil. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Luciano Calenzani Simões Enviada em: quinta-feira, 11 de setembro de 2008 15:53 Para: delphi-br@yahoogrupos.com.br Assunto: Res: [delphi-br] [MAF] Ordenação de matriz Ou ainda, transfira esses dados para um ClientDataSet, crie suas chaves e seja feliz. Luciano Calenzani Simões - Mensagem original De: Rubem Nascimento da Rocha djpardalrocha@ mailto:djpardalrocha%40hotmail.com hotmail.com Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Enviadas: Quinta-feira, 11 de Setembro de 2008 15:49:55 Assunto: RE: [delphi-br] [MAF] Ordenação de matriz Não existem rotinas no Object Pascal para dar suporte à ordenação de vetores(arrays) e matrizes(arrays de arrays). Sugiro que vc procure por implementações de algoritmos de ordenação na Internet (Google, AltaVista, etc.), adapte um algoritmo em específico (recomendo QuickSort) para criar uma rotina que atende a sua necessidade. Ou então, procure por biblitoecas( units) ou exemplos de rotinas (tb na Internet) que já implementem essa ordenação que vc necessita! Boa sorte! Sds.,Rubem Rocha To: [EMAIL PROTECTED] os.com.brFrom: [EMAIL PROTECTED] consultoria. com.brDate: Thu, 11 Sep 2008 15:33:17 -0300Subject: [delphi-br] [MAF] Ordenação de matriz Pessoal,tenho uma matriz declarada dessa formaarrAluno[ 1..8, 1..3] of String;onde vou preencher da seguinte formaarrAluno[ 1, 1] = '1';arrAluno[ 1, 2] = 'Aluno A';arrAluno[ 1, 3] = 'Cidade A';arrAluno[ 2, 1] = '2';arrAluno[ 2, 2] = 'Aluno B';arrAluno[ 2, 3] = 'Cidade B';...arrAluno[ 8, 1] = '8';arrAluno[ 8, 2] = 'Aluno H';arrAluno[ 8, 3] = 'Cidade H';Gostaria de ter uma forma de poder ordená-la hora pelo nome dele e hora por cidade. Alguém sabe como fazer?Att,Marcos A. FerreiraSão Paulo - Brasil Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new. http://br.new.mail.yahoo.com/addresses mail.yahoo.com/addresses [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] DB - qual o melhor ?
É... Se uma empresa qualquer chamar um iniciante para trabalhar com Oracle e ele utilizar esse discurso de: o melhor banco de dados é aquele que você sabe e bla bla bla... Acho que ele perde a vaga pra qualquer Zé Mané. Agora tentando responder a sua pergunta. Se você aprender a trabalhar com um banco de dados de cabo-a-rabo, provavelmente aprenderá a trabalhar com todos, existem detalhes diferentes? SM mas é irrelevante, nada que você não aprenda JÁ trabalhando entende? O mais comercial e o mais requisitado, pelo que vejo nas listas de empresa é o Oracle, dê uma pesquisada nos BNDES da vida e faça uma pequena pesquisa. Até mais. - Vitor Luiz Redes Redsystem Bureau Software - _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Gerson Machado Enviada em: quarta-feira, 10 de setembro de 2008 08:22 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] DB - qual o melhor ? O melhor ? é aquele com o qual vc consegue fazer tudo que precisa. --- Em ter, 9/9/08, marcio fernando_vip@ mailto:fernando_vip%40ymail.com ymail.com escreveu: De: marcio fernando_vip@ mailto:fernando_vip%40ymail.com ymail.com Assunto: [delphi-br] DB - qual o melhor ? Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Data: Terça-feira, 9 de Setembro de 2008, 22:45 Boa noite pessoal :) Estou começando em delphi e to adorando, contudo tenho algumas dúvidas,mas quem não as teve rs, falando sério, qual o melhor banco de dados para se trabalhar com delphi e qual mais comercial, ou seja, q as empresas estão requisitando profissionais ? :) Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new. http://br.new.mail.yahoo.com/addresses mail.yahoo.com/addresses [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] cxgrid
Tá, mas o que é desabilitar todos os outros?. Você pode fazer assim: Crie um StyleRepository e dois Styles, um dê o nome de Habilitado e o outro Desabilitado. No Habilitado, altere as seguintes propriedades: Text Color : clBlack; Font: Style: Bold = TRUE; No Desabilitado: Text color: clSilver Font: Style: StrikeOut = TRUE; No evento do TableView: Styles = OnGetContentStyle, faça o seguinte: if ARecord.Values[ 0 ] = TRUE then AStyle := Habilitado else AStyle := Desabilitado Onde o 0 no Values é o index da sua coluna no TableView... - Vitor Luiz Redes Redsystem Bureau Software - _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Marcelo Moacir Florindo Enviada em: segunda-feira, 8 de setembro de 2008 16:19 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] cxgrid Dá uma olhada no fórum do DevExpress.com lá irás, com certeza, sanar a tua duvida. Abraços, Marcelo 2008/9/8 dhsb [EMAIL PROTECTED] mailto:dionatan%40prosisinformatica.com.br rmatica.com.br Pessoal estou com um dúvida. Seguinte tenho um cxgris e uma coluna to tipo checked. Porém quero que quando eu marcar (checar) um registro desabilite todos os outros, fazendo com que fique marcado somente um unico(checado). Tem como? Tentei usar o RadioGroup Mas piorou a situação. Alguem poderia me dar um exemplo? vALEU -- Marcelo Moacir Florindo Analista/Desenvolvedor http://www.gestaote http://www.gestaotec.com.br c.com.br [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] Re: firebird web
Otimização é tudo, otimize tudo o que puder. Concentre operações rebuscadas nos triggers e stored procedures, traga somente resultados utilizando campos que tenham índice no banco de dados. Não crie formulários que estejam com os datasets ativados, não traga selects com * , traga sempre o mínimo de campos, se o usuários quiser consultar mais, ele pode muito bem abrir outra tela para ver informações mais específicas. O principal é deixar tudo para o banco de dados fazer, assim você manda a requisição, ele faz o que tem que fazer e te dá o resultado bonequinho... Flw. - Vitor Luiz Redes Redsystem Bureau Software - _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de lucsis2010 Enviada em: quinta-feira, 4 de setembro de 2008 10:44 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Re: firebird web Qunatos usuarios acessam por ponto remoto ? Vc está usando o modelo 2 camadas ou 3 camadas ? []´s --- Em [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br, Leonardo Quinino [EMAIL PROTECTED] escreveu Comigo ocorre exatamente a mesma situação, estou usando delphi 7 com dbexpress as vezes os escritórios remotos ótimos, as vezes a velocidade cae. uso o server 2 cpus, 1 giga memoria, win 2003 e firebird 2.1 classic, vou até esperar a versão 2.5 para testar a super server que deve melhorar essa perfomace. Ou então esse problema é do firebird, até nesses casos, vale a pena pensar em mysql,, que o que dizem é mais amigável no quisito web. 2008/9/3 alessandra porto [EMAIL PROTECTED] tenho aplicação que usa o bd local e via web em algumas filiais noto que em alguns momentos o via web fica lento em algumas filiais. local ele esta otimo estou usando o firebird 1.5.478 com conexão direta com ip da web sem zebedee ou qualquer outra coisa uso os componentes da paleta interbase do delphi 7 para a conexão existe alguma configuração do firebird que melhore a performace dele na web?? Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new. http://br.new.mail.yahoo.com/addresses mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas] -- Leonardo Quinino [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] Ajuda numa função que retorna Dat aSet.
Assim não funga? Tirando o Free que libera o ponteiro. with RetDados('select * from cliente') do begin ShowMessage(FieldByName('RAZAO').AsString); Free( ) end; _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Fellipe Henrique Enviada em: segunda-feira, 9 de junho de 2008 16:11 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Ajuda numa função que retorna DataSet. Davi, na verdade queria usar algo simples, sem ter que declarar nada, no estilo: with RetDados('select * from cliente') do begin ShowMessage(FieldByName('RAZAO').AsString); end; Seria pra facilitar, visto que, já tenho uma função que faz isso, porém tenho que declarar variavel, igual vc me mostrou, mas queria simplificar, claro se for possível.. :o) []s 2008/6/9 Davi Eduardo Borges Wall [EMAIL PROTECTED] mailto:davi.wall%40mult.com.br com.br: Ai ai ai ai, ta faltando teoria Felipe! Só botar a mão na massa sem entender o que está fazendo é perigoso. Você vai ter que retirar aquele CQ.FREE de dentro de sua função. Na outra ponta você faz assim: Var MeuDataSet: TDataSet; Begin MeuDataSet := RetDados('SELECT BLA FROM BLA'); try //faço o que tenho que fazer finally MeuDataSet.Free; End; Felipe vc precisa de mais entendimento da linguagem e de ponteiros, que é necessário para praticar uma boa programação. Sugiro a você comprar algum livro de Delphi e estudar mais. []'s De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br [mailto: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br] Em nome de Fellipe Henrique Enviada em: segunda-feira, 9 de junho de 2008 15:56 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Ajuda numa função que retorna DataSet. Mas Rubem, isso eu havia entendido, porém.. se eu der um RetDados.Free; estarei liberando meu cQ que está dentro da função? E tipo, não tem como eu passar os dados, fechar a Query, liberar ela, e os dados permanecerem não? Minha preocupação é com o desenrolar do sistema, muitas querys abertas sem fechar.. []s 2008/6/9 Rubem Nascimento da Rocha djpardalrocha@ mailto:djpardalrocha%40hotmail.com hotmail.comdjpardalrocha%40hotmail.commailto: djpardalrocha%40hotmail.com djpardalrocha%2540hotmail.com : É óbvio que tá dando erro! Preste atenção! Vc está liberando uma consulta que está sendo o retorno da sua função. Se vc libera a consulta, logo vai estar liberando o retorno! Esse é o erro! A consulta não deve ser liberada! Atente para isso! Sds. To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.brmailto: delphi-br%40yahoogrupos.com.br delphi-br%2540yahoogrupos.com.br delphi-br%40yahoogrupos.com.br From: [EMAIL PROTECTED] mailto:fellipeh%40gmail.com com fellipeh%40gmail.com mailto: fellipeh%40gmail.com fellipeh%2540gmail.com fellipeh%40gmail.com Date: Mon, 9 Jun 2008 15:47:04 -0300 Subject: [delphi-br] Ajuda numa função que retorna DataSet. Olá amigos, estou criando uma função, que me retorne um DataSet, com o resultado de um SQL passado como parametro, porém não estou conseguindo.. estou fazendo assim: function RetDados(sSQL: string): TDataSet; var cQ: TIBCQuery; cT: TIBCTransaction; begin cT := TIBCTransaction.Create(nil); cT.AddConnection(DM.Conexao); cQ := TIBCQuery.Create(nil); cQ.Transaction := cT; cQ.UpdateTransaction := cT; cQ.UniDirectional := True; try cQ.SQL.Text := sSQL; cQ.Open; Result := cQ; finally cQ.Free; cT.Free; end; end; Porém, sempre me retorna NIL, pois de qualquer forma passa no cQ.Free, e estou achando que quando faz isso eu perco o resultado. Seria isso mesmo? Se for, como concerto isso? Desde já agradeço. []s -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] mailto:fellipeh%40gmail.com com fellipeh%40gmail.com mailto:fellipeh%40gmail.comfellipeh%2540gmail.com fellipeh%40gmail.com Sou a favor da lei LEI 607/2007 __ Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas e muito mais no MSN Video! http://video. http://video.msn.com/?mkt=pt-br msn.com/?mkt=pt-br -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] mailto:fellipeh%40gmail.com com fellipeh%40gmail.com mailto:fellipeh%40gmail.comfellipeh%2540gmail.com Sou a favor da lei LEI 607/2007 [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] mailto:fellipeh%40gmail.com com Sou a favor da lei LEI
RES: [delphi-br] Seria isso um Bug no Delphi?
Não, se você estiver copiando deveria. Mas na herança isso não acontece com referências a outras Units. Por isso o cuidado que deve ser tomado ao herdar classes e formulários. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Fellipe Henrique Enviada em: terça-feira, 13 de maio de 2008 16:21 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Seria isso um Bug no Delphi? Olá amigos, Tenho um FormBasico, que nele, tenho as Units que declarei, quando herdo um Form dele, teoricamente, as Units não deveriam ir também? Melhor explicando..-. tenho uma função na unit uFuncoes... no FrmBasico, inclui no uses a uFuncoes, crio um outro form herdado dele, e quero usar a função novamente, eis que dá erro na compilação, sou obrigado a redeclarar a unit uFuncoes. Se estou herdando, não deveria vir tudo? []s -- -_-_-___ T.·.F.·.A.·. Fellipe Henrique HYPERLINK mailto:fellipeh%40gmail.com[EMAIL PROTECTED] Cansou do MercadoLivre como eu? Tente o www.uaileilão.-com.br. [As partes desta mensagem que não continham texto foram removidas] No virus found in this incoming message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.16/1430 - Release Date: 13/5/2008 07:31 No virus found in this outgoing message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.16/1430 - Release Date: 13/5/2008 07:31 [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Seria isso um Bug no Delphi?
To pra ver um software sem bugs... Mas essa história do delphi vocês estão transformando em exagero já... _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de [EMAIL PROTECTED] Enviada em: terça-feira, 13 de maio de 2008 16:47 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Seria isso um Bug no Delphi? Não é João, é que gato-escaldado--tem-medo--de-agua-fria.- Então, de tanto bug, ja encontrado e que acabam acompanhando novas versões, se a luz da sala pisca o culpado é o BUG do DELPHI heheheh []s Luiz Escobar - Analista/Desenvolve-dor: WEB - HTML/JavaScript/-PHP/MySQL WINDOWS - Delphi/ASSEMBLY/-MySQL/xBase SERVIDORES - CNA IntraNetWare4.-11, LINUX-(RedHat9/-Suse10.2)-, Windows 2K/XP HARBOUR Borland C++ 5.5.1 (32 bit) Harbour Devel build 1.1-1 Intl. xHarbour Compile build 1.1.0 (Simplex) Harbour MiniGUI 1.5 Extended Edition (Build 50a) - 2008.03.31 From: Joao Morais Sent: Tuesday, May 13, 2008 4:36 PM To: HYPERLINK mailto:delphi-br%40yahoogrupos.com.br[EMAIL PROTECTED] Subject: Re: [delphi-br] Seria isso um Bug no Delphi? Fellipe Henrique wrote: Olá amigos, Tenho um FormBasico, que nele, tenho as Units que declarei, quando herdo um Form dele, teoricamente, as Units não deveriam ir também? Melhor explicando..-. tenho uma função na unit uFuncoes... no FrmBasico, inclui no uses a uFuncoes, crio um outro form herdado dele, e quero usar a função novamente, eis que dá erro na compilação, sou obrigado a redeclarar a unit uFuncoes. Se estou herdando, não deveria vir tudo? Não. Como diz o filósofo: uma coisa é uma coisa, outra coisa é outra coisa. E btw que mania vocês têm de falar -- tudo é um possível bug do Delphi. -- Joao Morais [As partes desta mensagem que não continham texto foram removidas] No virus found in this incoming message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.16/1430 - Release Date: 13/5/2008 07:31 No virus found in this outgoing message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.16/1430 - Release Date: 13/5/2008 07:31 [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Programa não roda em outro micro
dbexpint.dll fbcliente.dll midas.dll, como você já declarou não precisa... _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de galvao_em Enviada em: segunda-feira, 12 de maio de 2008 11:00 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Programa não roda em outro micro Olá, desenvolvi o programa em delphi 2007 com firebird embarcado, no meu micro que tem o delphi instalado ele roda perfeitamente, mas quando coloco em um micro sem o delphi ele não abre dá erro, gostaria de saber quais dll's devo levar do delphi para que ele funcione corretamente, lembro que declarei a unit midaslib no datamodule do sistema. Att No virus found in this incoming message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.15/1426 - Release Date: 10/5/2008 11:12 No virus found in this outgoing message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.15/1426 - Release Date: 10/5/2008 11:12 [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] casas decimais
A Função FormatFloat converte o Float para String com a máscara passada como parâmetro. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Eduardo Oliveira silva Enviada em: segunda-feira, 28 de abril de 2008 15:01 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] casas decimais Vou tentar fazer assim, mais minha duvida agora é se o campo label aceita um float normalmente, não é preceso converter para string Em 28/04/08, BandaLemuelHYPERLINK mailto:bandalemuel%40yahoo.com.br[EMAIL PROTECTED] escreveu: lblvalor.caption := formatfloat( '###,##0.00' ,dmd.qcoop.fieldByN-ame('salario'-).asfloat ); Wesley From: Eduardo Oliveira silva Sent: Monday, April 28, 2008 2:03 PM To: HYPERLINK mailto:delphi-br%40yahoogrupos.com.br[EMAIL PROTECTED] Subject: [delphi-br] casas decimais Como eu posso configurar um label para dinheiro, eu estou trazendo o resultado do banco e colocando no label, porem o valor é em float ex: 1.000,25. eu estou trazendo do banco assim. LbValor.caption := floattostr(DMD.-Qcoop.FieldByNam-e('salario'-).AsValue __ Informação do NOD32 IMON 3060 (20080428) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus HYPERLINK http://www.eset.com.brhttp://www.eset.-com.br [As partes desta mensagem que não continham texto foram removidas] No virus found in this incoming message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.4/1397 - Release Date: 25/4/2008 07:42 No virus found in this outgoing message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.4/1397 - Release Date: 25/4/2008 07:42 [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Frames do Delphi 6
Fiz um teste aqui... procedure TForm1.Button1Click(Sender: TObject); var VFr : TFrame; VLb : TLabel; begin VFr := TFrame.Create( SELF ); VFr.Parent := SELF; VFr.Color := clRed; VFr.Left := 20; VFr.Top := 20; VLb := TLabel.Create( VFr ); VLb.Parent := VFr; VLb.Caption := 'Frame Loco' end; _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Rubem Nascimento da Rocha Enviada em: quarta-feira, 23 de abril de 2008 11:56 Para: delphi-br@yahoogrupos.com.br Assunto: RE: [delphi-br] Frames do Delphi 6 Prioridade: Alta Companheiro, tentei muito fazer isso, ou seja, criar um frame do zero em tempo de execução pra usá-lo de forma a criar telas de manutenção de dados dinâmicas. Não dá certo! Tem que ter pelo menos um frame adicionado em tempo de projeto pra poder criá-lo em tempo de execução. E eu olhei o fonte do TFrame e pelo que vi, realmente não tem como criar um TFrame do zero, sem ter um frame já definido em tempo de projeto na aplicação! Se vc conseguiu essa proeza, então publique aqui sua experiência para que todos na lista se beneficiem. Sds. -_-_-__ To: HYPERLINK mailto:delphi-br%40yahoogrupos.com.br[EMAIL PROTECTED] From: HYPERLINK mailto:alexandre_rodrigues_poa%40yahoo.com.br[EMAIL PROTECTED] o.-com.br Date: Wed, 23 Apr 2008 11:51:42 -0300 Subject: Re: [delphi-br] Frames do Delphi 6 O Rubem é possível sim criar Frames em tempo de execução assim como qualquer outro componente..-. Rubem Nascimento da Rocha escreveu: Modificar um frame em tempo de execução sim; criar um frame em tempo de execução, não! Sds. -_-_-__ To: HYPERLINK mailto:delphi-br%40yahoogrupos.com.br[EMAIL PROTECTED] From: HYPERLINK mailto:giovannycarvalho%40yahoo.com.br[EMAIL PROTECTED] Date: Tue, 22 Apr 2008 16:51:37 + Subject: [delphi-br] Frames do Delphi 6 Boa tarde amigos, Estou criando uma aplicação e gostaria de utilizar Frames e a minha dúvida é: É possivel modificar o frame conteudo de um frame em tempo de execução? Pode ser via código, pois o projeto será Orientado a Objetos e terei que criar várias classes mesmo. Obrigado, Giovanny Carvalho www.acmeinformatica-.com.br -_-_-_-_-_-_ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! HYPERLINK http://www.amigosdomessenger.com.brhttp://www.amigosdo-messenger.-com.br -_-_-_-_-___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. HYPERLINK http://br.yahoo.com/mailbeta/tudonovo/http://br.yahoo.-com/mailbeta/-tudon ovo/ -_-_-_-_-_-_ Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas e muito mais no MSN Video! HYPERLINK http://video.msn.com/?mkt=pt-brhttp://video.-msn.com/?-mkt=pt-br No virus found in this incoming message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.3/1391 - Release Date: 22/4/2008 08:15 No virus found in this outgoing message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.3/1391 - Release Date: 22/4/2008 08:15 [As partes desta mensagem que não continham texto foram removidas]
RES: RES: [delphi-br] Frames do Delphi 6
Sim... eu já tinha criado frames em tempo de execução para melhorar componentes de pesquisa. Os frames mostravam os possíveis filtros para cada tabela etc... mais ou menos como nos filtros da devexpress. Mandei outro e-mail ilustrando melhor ali... Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Rubem Nascimento da Rocha Enviada em: quarta-feira, 23 de abril de 2008 12:06 Para: delphi-br@yahoogrupos.com.br Assunto: RE: RES: [delphi-br] Frames do Delphi 6 Prioridade: Alta Fez o teste... mas funcionou? Sds. -_-_-__ To: HYPERLINK mailto:delphi-br%40yahoogrupos.com.br[EMAIL PROTECTED] From: HYPERLINK mailto:vredesredsystem%40yahoo.com.br[EMAIL PROTECTED] Date: Wed, 23 Apr 2008 12:00:46 -0300 Subject: RES: [delphi-br] Frames do Delphi 6 Fiz um teste aqui... procedure TForm1.Button1Click-(Sender: TObject); var VFr : TFrame; VLb : TLabel; begin VFr := TFrame.Create( SELF ); VFr.Parent := SELF; VFr.Color := clRed; VFr.Left := 20; VFr.Top := 20; VLb := TLabel.Create( VFr ); VLb.Parent := VFr; VLb.Caption := 'Frame Loco' end; _ De: HYPERLINK mailto:delphi-br%40yahoogrupos.com.br[EMAIL PROTECTED] [mailto:HYPERLINK mailto:delphi-br%40yahoogrupos.com.br[EMAIL PROTECTED] Em nome de Rubem Nascimento da Rocha Enviada em: quarta-feira, 23 de abril de 2008 11:56 Para: HYPERLINK mailto:delphi-br%40yahoogrupos.com.br[EMAIL PROTECTED] Assunto: RE: [delphi-br] Frames do Delphi 6 Prioridade: Alta Companheiro, tentei muito fazer isso, ou seja, criar um frame do zero em tempo de execução pra usá-lo de forma a criar telas de manutenção de dados dinâmicas. Não dá certo! Tem que ter pelo menos um frame adicionado em tempo de projeto pra poder criá-lo em tempo de execução. E eu olhei o fonte do TFrame e pelo que vi, realmente não tem como criar um TFrame do zero, sem ter um frame já definido em tempo de projeto na aplicação! Se vc conseguiu essa proeza, então publique aqui sua experiência para que todos na lista se beneficiem. Sds. ---_-___-__-__ To: HYPERLINK mailto:delphi--br%40yahoogrupos-.com.brHYPERLINK mailto:delphi-br%40yahoogrup-os.com.br[EMAIL PROTECTED] From: HYPERLINK mailto:alexandre_-rodrigues_-poa%40yahoo.-com.bralexandre-_rodrigues--_poa @yaho o.-com.br Date: Wed, 23 Apr 2008 11:51:42 -0300 Subject: Re: [delphi-br] Frames do Delphi 6 O Rubem é possível sim criar Frames em tempo de execução assim como qualquer outro componente..--. Rubem Nascimento da Rocha escreveu: Modificar um frame em tempo de execução sim; criar um frame em tempo de execução, não! Sds. ---_-___-__-__ To: HYPERLINK mailto:delphi--br%40yahoogrupos-.com.brHYPERLINK mailto:delphi-br%40yahoogrup-os.com.br[EMAIL PROTECTED] From: HYPERLINK mailto:giovannycar-valho%40yahoo.-com.br[EMAIL PROTECTED] Date: Tue, 22 Apr 2008 16:51:37 + Subject: [delphi-br] Frames do Delphi 6 Boa tarde amigos, Estou criando uma aplicação e gostaria de utilizar Frames e a minha dúvida é: É possivel modificar o frame conteudo de um frame em tempo de execução? Pode ser via código, pois o projeto será Orientado a Objetos e terei que criar várias classes mesmo. Obrigado, Giovanny Carvalho www.acmeinformatica--.com.br ---_-___-__-__-___-_---_-_ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! HYPERLINK HYPERLINK http://www.amigosdomessenger.com.brhttp://www.amigosdo-messenger.-com.brH YPERLINK http://www.amigosdo-messenger.-com.brhttp://www.amigosdo--messenger.--com. br ---_-___-__-__-___-_---___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. HYPERLINK HYPERLINK http://br.yahoo.com/mailbeta/tudonovo/http://br.yahoo.-com/mailbeta/-tudon ovo/HYPERLINK http://br.yahoo.-com/mailbeta/-tudonhttp://br.yahoo.--com/mailbeta/--tudon ovo/ ---_-___-__-__-___-_---_-_ Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas e muito mais no MSN Video! HYPERLINK HYPERLINK http://video.msn.com/?mkt=pt-brhttp://video.-msn.com/?-mkt=pt-brHYPERLINK http://video.-msn.com/?-mkt=pt-brhttp://video.--msn.com/-?-mkt=pt--br No virus found in this incoming message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.3/1391 - Release Date: 22/4/2008 08:15 No virus found in this outgoing message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.3/1391 - Release Date: 22/4/2008 08:15 [As partes desta mensagem que não continham texto foram removidas] -_-_-_-_-_-_ Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas e muito mais no MSN Video! HYPERLINK http://video.msn.com/?mkt=pt-brhttp://video.-msn.com/?-mkt=pt-br No virus found in this incoming message. Checked by AVG. Version:
RES: [delphi-br] Frames do Delphi 6
So pra ilustrar mais um pouco, abram uma new application e colem esse código: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } procedure VBtClick( Sender : TObject ); public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); var VFr : TFrame; VLb : TLabel; VBt : TButton; begin VFr := TFrame.Create( SELF ); VFr.Parent := SELF; VFr.Color := clRed; VFr.Left := 20; VFr.Top := 20; VFr.Name := 'FRAMEZASSO'; VLb := TLabel.Create( VFr ); VLb.Parent := VFr; VLb.Left := 8; VLb.Top := 16; VLb.Caption := 'Frame Loco'; VBt := TButton.Create( VFr ); VBt.Parent := VFr; VBt.Left := 8; VBt.Top := 32; VBt.Caption := 'Clique Aqui'; VBt.OnClick := VBtClick; VFr := TFrame.Create( SELF ); VFr.Parent := SELF; VFr.Color := clBlue; VFr.Left := 100; VFr.Top := 100; VFr.Name := 'FRAMEZASSO_2'; VLb := TLabel.Create( VFr ); VLb.Parent := VFr; VLb.Left := 8; VLb.Top := 16; VLb.Caption := 'Frame Loco'; VBt := TButton.Create( VFr ); VBt.Parent := VFr; VBt.Left := 8; VBt.Top := 32; VBt.Caption := 'Clique Aqui'; VBt.OnClick := VBtClick end; procedure TForm1.VBtClick(Sender: TObject); begin ShowMessage( 'Cliquei no Frame: ' + TButton( Sender ).Parent.Name ) end; end. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Vitor Redes Enviada em: quarta-feira, 23 de abril de 2008 12:01 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Frames do Delphi 6 Fiz um teste aqui... procedure TForm1.Button1Click-(Sender: TObject); var VFr : TFrame; VLb : TLabel; begin VFr := TFrame.Create( SELF ); VFr.Parent := SELF; VFr.Color := clRed; VFr.Left := 20; VFr.Top := 20; VLb := TLabel.Create( VFr ); VLb.Parent := VFr; VLb.Caption := 'Frame Loco' end; _ De: HYPERLINK mailto:delphi-br%40yahoogrupos.com.br[EMAIL PROTECTED] [mailto:HYPERLINK mailto:delphi-br%40yahoogrupos.com.br[EMAIL PROTECTED] Em nome de Rubem Nascimento da Rocha Enviada em: quarta-feira, 23 de abril de 2008 11:56 Para: HYPERLINK mailto:delphi-br%40yahoogrupos.com.br[EMAIL PROTECTED] Assunto: RE: [delphi-br] Frames do Delphi 6 Prioridade: Alta Companheiro, tentei muito fazer isso, ou seja, criar um frame do zero em tempo de execução pra usá-lo de forma a criar telas de manutenção de dados dinâmicas. Não dá certo! Tem que ter pelo menos um frame adicionado em tempo de projeto pra poder criá-lo em tempo de execução. E eu olhei o fonte do TFrame e pelo que vi, realmente não tem como criar um TFrame do zero, sem ter um frame já definido em tempo de projeto na aplicação! Se vc conseguiu essa proeza, então publique aqui sua experiência para que todos na lista se beneficiem. Sds. ---_-___-__-__ To: HYPERLINK mailto:delphi--br%40yahoogrupos-.com.brHYPERLINK mailto:delphi-br%40yahoogrup-os.com.br[EMAIL PROTECTED] From: HYPERLINK mailto:alexandre_-rodrigues_-poa%40yahoo.-com.bralexandre-_rodrigues--_poa @yaho o.-com.br Date: Wed, 23 Apr 2008 11:51:42 -0300 Subject: Re: [delphi-br] Frames do Delphi 6 O Rubem é possível sim criar Frames em tempo de execução assim como qualquer outro componente..--. Rubem Nascimento da Rocha escreveu: Modificar um frame em tempo de execução sim; criar um frame em tempo de execução, não! Sds. ---_-___-__-__ To: HYPERLINK mailto:delphi--br%40yahoogrupos-.com.brHYPERLINK mailto:delphi-br%40yahoogrup-os.com.br[EMAIL PROTECTED] From: HYPERLINK mailto:giovannycar-valho%40yahoo.-com.br[EMAIL PROTECTED] Date: Tue, 22 Apr 2008 16:51:37 + Subject: [delphi-br] Frames do Delphi 6 Boa tarde amigos, Estou criando uma aplicação e gostaria de utilizar Frames e a minha dúvida é: É possivel modificar o frame conteudo de um frame em tempo de execução? Pode ser via código, pois o projeto será Orientado a Objetos e terei que criar várias classes mesmo. Obrigado, Giovanny Carvalho www.acmeinformatica--.com.br ---_-___-__-__-___-_---_-_ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! HYPERLINK HYPERLINK http://www.amigosdomessenger.com.brhttp://www.amigosdo-messenger.-com.brH YPERLINK http://www.amigosdo-messenger.-com.brhttp://www.amigosdo--messenger.--com. br ---_-___-__-__-___-_---___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. HYPERLINK HYPERLINK http://br.yahoo.com/mailbeta/tudonovo/http://br.yahoo.-com/mailbeta/-tudon ovo/HYPERLINK http://br.yahoo.-com/mailbeta/-tudonhttp
RES: [delphi-br] DB Designer - Microlap
Como vocês gostam de criar polêmica a toa hein!??? Quem pede pedofilia não é criminoso então? Da onde veio essa nova perspectiva de infringir ou não regras pré-definidas? Desde que conheci essa lista essa regra é bem explícita, quem pede, colabora, vende ou dá pirataria é banido e pronto. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Fellipe Henrique Enviada em: segunda-feira, 14 de abril de 2008 13:00 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] DB Designer - Microlap Concordo... Banido porque? Só porque pediu? Na regra diz que pirataria nao pode na lista, mas pedir não é pirataria... Tem que banir quem envia, ou fornece... []s Em 14/04/08, Jackson Gomes - ToolsComps HYPERLINK mailto:jackson%40toolsandcomps.com[EMAIL PROTECTED] escreveu: Banido. Não foi muito radical? Uma advertência em private pra uma primeira pisada na bola seria o ideal. É apenas uma opinião... Jackson Gomes ToolsComps - Controle de Usuários para Desenvolvedores Borland/CodeGear Web Site: HYPERLINK http://www.toolsandcomps.comhttp://www.toolsand-comps.com Nosso Fórum: HYPERLINK http://groups.yahoo.com/group/toolsandcompshttp://groups.-yahoo.com/-group /toolsandco-mps e-mail: HYPERLINK mailto:jackson%40toolsandcomps.com[EMAIL PROTECTED] jackson%40toolsand-comps.com Fone: 27 3389 1138 - 8811 0324 Devhost - Webhost para desenvolvedores Borland HYPERLINK http://www.devhost.com.brhttp://www.devhost.-com.br HYPERLINK mailto:devhost%40devhost.com.br[EMAIL PROTECTED] devhost%40devhost.-com.br -- -_-_-___ T.·.F.·.A.·. Fellipe Henrique HYPERLINK mailto:fellipeh%40gmail.com[EMAIL PROTECTED] Cansou do MercadoLivre como eu? Tente o www.uaileilão.-com.br. [As partes desta mensagem que não continham texto foram removidas] No virus found in this incoming message. Checked by AVG. Version: 7.5.519 / Virus Database: 269.22.13/1377 - Release Date: 14/4/2008 09:26 No virus found in this outgoing message. Checked by AVG. Version: 7.5.519 / Virus Database: 269.22.13/1377 - Release Date: 14/4/2008 09:26 [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Como Fazer Perguntas Inteligentes
Cara, a postura pode iritar uns e outros, mas é uma postura adequadamente acadêmica. Você já viu um professor bom que te dê algo mastigado? Ele te dá o caminho, você trilha se quiser, pega atalhos se quiser... Enfim, ensinar a pescar é sempre melhor, a não ser nos casos mais óbvios, tipo qual o erro desse código? Vitor. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Joel Alexandre Enviada em: sexta-feira, 4 de abril de 2008 13:13 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Como Fazer Perguntas Inteligentes Rubem, Emails seus, Bruno Lichot, Davi e mais alguns daqui, eu acompanho, entro nos links por vcs colocados mesmo sabendo do assunto em questao. Agora, apesar de vc ter adotado o texto como manual de conduta (hehehe brincadeira) eu acho que são coisas incompatíveis. Seria como vc participar de um evento de perguntas a um professor de informatica, onde todas as perguntas direcionadas ao mestre seguissem a mesma resposta, ou seja, leia o livro do Fulano, leia o livro do sicrano, entre no google. Entao teríamos que transformar o grupo Delphi-br em um guia de links. Mesmo assim, espero ainda ver muitos emails seus, mesmo com o famoso bordão QUEM PROCURA ACHA. :) :) []Os Joel Não sei se vc reparou, caro Ricardo, mas em muitas (pra não dizer todas!) as situações onde foi escrito o 'bordão', sempre escrevia link(s) que pudessem dar encaminhamento ao usuário na busca de uma solução. Se ele não conseguia entender o conteúdo dos links e/ou ele quer mesmo é a coisa toda mastigada e pronta pra consumo, isso realmente eu não faço! . -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM No virus found in this incoming message. Checked by AVG. Version: 7.5.519 / Virus Database: 269.22.5/1357 - Release Date: 3/4/2008 10:48 No virus found in this outgoing message. Checked by AVG. Version: 7.5.519 / Virus Database: 269.22.5/1357 - Release Date: 3/4/2008 10:48
RES: [delphi-br] DELPHI 2005 + CRYSTAL REPORTS XI (WIN32)
Ah sim... são muitos... A business objects também tem um pacote de instalação de client run-time, é distribution pack, alguma coisa do gênero... _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Paulo Pontes Enviada em: quinta-feira, 3 de abril de 2008 14:54 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] DELPHI 2005 + CRYSTAL REPORTS XI (WIN32) Não consigo identificar quais arquivos devo liberar para rodar o relatório no cliente... 2008/4/3 Vitor Yahoo HYPERLINK mailto:vredesredsystem%40yahoo.com.br[EMAIL PROTECTED]: Tem um link para o formulário de download na página que você passou mesmo: HYPERLINK HYPERLINK http://www.businessobjects.com/products/reporting/crystalreports/vcl/downlo http://www.business-objects.com/-products/-reporting/-crystalreports/-vcl/d ownlo ad.aspApply to download the VCL now - To download either version of the VCL, fill in this form and provide your Crystal Reports registration number. To obtain a registration number, HYPERLINK HYPERLINK http://www.businessobjects.com/register/content.asphttp://www.business-obj ects.com/-register/-content.aspregister Crystal Reports. Tem que ver a versão que você tem aí do crystal antes né... _ De: HYPERLINK mailto:delphi-br%40yahoogrupos.com.br[EMAIL PROTECTED] delphi-br%40yahoog-rupos.com.-br [mailto: HYPERLINK mailto:delphi-br%40yahoogrupos.com.br[EMAIL PROTECTED] delphi-br%40yahoog-rupos.com.-br] Em nome de Paulo Pontes Enviada em: quarta-feira, 2 de abril de 2008 17:24 Para: HYPERLINK mailto:delphi-br%40yahoogrupos.com.br[EMAIL PROTECTED] delphi-br%40yahoog-rupos.com.-br Assunto: Re: [delphi-br] DELPHI 2005 + CRYSTAL REPORTS XI (WIN32) Vitor, encontrei no site link ( HYPERLINK HYPERLINK http://www.businessobjects.com/products/reporting/crystalreports/vcl/defaul http://www.business-objects.com/-products/-reporting/-crystalreports/-vcl/d efaul t.asp HYPERLINK http://www.business-objects.com/-products/-reporting/-crystalreports/-http ://www.business--objects.-com/-products/--reporting/--crystalreports/-- vcl/default.--asp) apenas para delphi 7... você tem algum link com os arquivos da VCL? Obrigado! 2008/4/2 Vitor Yahoo HYPERLINK mailto:vredesredsy-stem%40yahoo.-com.br vredesredsystem%-2540yahoo.-com.br [EMAIL PROTECTED]: O Crystal possui uma vcl para acesso, procure por VCL Crystal Reports, para delphi 2005, veja no site da Business Objects que você vai achar, é bem mais fácil do que mexer com esse activeX. Vitor. _ De: HYPERLINK mailto:delphi--br%40yahoogrupos-.com.br delphi-br%2540yaho-ogrupos.com.-br HYPERLINK mailto:delphi-br%40yahoogrup-os.com.br[EMAIL PROTECTED] delphi-br%40yahoog-rup-os.com.-br delphi-br%40yahoog--rupos.com.--br [mailto: HYPERLINK mailto:delphi--br%40yahoogrupos-.com.br delphi-br%2540yaho-ogrupos.com.-br HYPERLINK mailto:delphi-br%40yahoogrup-os.com.br[EMAIL PROTECTED] delphi-br%40yahoog-rup-os.com.-br delphi-br%40yahoog--rupos.com.--br] Em nome de Paulo Pontes Enviada em: quarta-feira, 2 de abril de 2008 13:20 Para: HYPERLINK mailto:delphi--br%40yahoogrupos-.com.br delphi-br%2540yaho-ogrupos.com.-br HYPERLINK mailto:delphi-br%40yahoogrup-os.com.br[EMAIL PROTECTED] delphi-br%40yahoog-rup-os.com.-br delphi-br%40yahoog--rupos.com.--br Assunto: Re: [delphi-br] DELPHI 2005 + CRYSTAL REPORTS XI (WIN32) João Paulo, consegui instalar o componente 'CrystalActiveXRepo---rtViewer'---, não sei se estou no caminho certo... através dele consegui abrir um arquivo '.rpt' utilizando o seguinte código... var oApp, oRpt: Variant; begin oApp := CreateOleObject(---'CrystalRuntim-e-.-Application'---); oRpt := oApp.OpenReport(---'C:\Report1.---rpt', 1); CrystalActiveXRepor---tViewer1.---ReportSource := oRpt; CrystalActiveXRepor---tViewer1.---ViewReport; end; mas acho que assim eu obrigo o usuário a ter o Crystal Reports instalado na máquina, o que não posso fazer... sabe outro forma de utilizar esse componente, ou devo utilizar outro componente? valeu! 2008/4/2 Açaí HYPERLINK mailto:joaopaulo.--jpo%40gmail.--com joaopaulo.--jpo%2540gmail.--comjoaopaulo.-jpo%-2540gmail.--com [EMAIL PROTECTED]--: Olá. Verifique se vc não está usando a versão do crystal report para web. Caso esteja com a versão win32 então vc precisa importar um activex do crystal report para o seu Delphi. Em 01/04/08, Paulo Pontes HYPERLINK mailto:pontespaulo--%40gmail.--com pontespaulo--%2540gmail.--com pontespaulo%--2540gmail.--com[EMAIL PROTECTED] gmail.com pontespaulo%---40gmail.--com- escreveu: fala galera, como faço para rodar um relatório do Crystal no Delphi 2005 Win32... ou só é possível mesmo com WinForms... valeu! [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] Melhor componente de Acesso ao Firebird 2.x
Não é o DBExpress que é unidirecional, é o componente TSQLQuery, como todos os outros componentes TQuerys da vida... o TSimpleDataSet (não recomendável) não é unidirecional. Nem os Tables... Eu tive alguns problemas com a ZeosLib quando fiz alguns testes, mas os testes não foram tão insistentes então não posso falar mal, é um projeto sério que vale a pena conhecer tb, o UIB é outro, como já indicaram. -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alisson Enviada em: quinta-feira, 13 de março de 2008 16:24 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Melhor componente de Acesso ao Firebird 2.x Eu uso o DbExpress e acho muito bom. Tem um detalhe, ele é unidirecional, você tem que usar ClientDataset para poder percorrer os registros. ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo. http://br.yahoo.com/mailbeta/tudonovo/ com/mailbeta/tudonovo/ [As partes desta mensagem que não continham texto foram removidas]
RES: RES: [delphi-br] Assinatura revista DevMedia, cobrando para ver video aulas?????
Concordo com o Rubem, falar mal é fácil. As pessoas lêem os posts alheios, cobrando por uma explicação por parte da revista e nem espera: Lá vem elas com algumas infantilidades ai meu deus, que absurdo, vou parar de pagar que isso né gente? Cobraram por uma solução, esperem os caras darem uma resposta, a DevMedia sempre foi uma empresa séria, não é porque eles estão cobrando por um artigo (2,50!!! Como se fosse uma fortuna) que deixaram de ser. Brasileiro é mesmo! -- Vitor Luiz Redes -- Bureau Redsystem Software mailto:[EMAIL PROTECTED] [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Componente RDPRINT 2.1 não imprime no XP
Cola o código inteiro aí, o problema deve ser no código não no componente. -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Bollasette Enviada em: quinta-feira, 6 de março de 2008 00:49 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Componente RDPRINT 2.1 não imprime no XP Vamos lá,,, são 00:30 do dia seguinte passei mais de 6hs nas duas máquinas. Baixei o RDprint 4 trial e o instalei no D5 na máquina do WIN98. Compilei o programa e utilizei o InnoSetup para instalá-lo na máquina do WINXP. Instalei a matricial CITIZEN GSX-190 no WINXP instalei o programa e rodei e o problema continua. ACESS VIOLATION AT ADRESS 0059640B IN MODULE EMISSOR_NF.EXE READ OF ADDRESS obrigado a todos zzz...zzz... - Original Message - From: Thales (Shubacca) - Tebo Software To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Wednesday, March 05, 2008 8:55 PM Subject: Re: [delphi-br] Componente RDPRINT 2.1 não imprime no XP Eu utilizo um opensource chamado vdoprint q roda normal. https://sourceforge https://sourceforge.net/projects/vdo/ ..net/projects/vdo/ falow Em 05/03/08, Bollasette [EMAIL PROTECTED] mailto:bollasette%40yahoo.com.br com.br escreveu: Ok,,, vou baixar então,,, - Original Message - From: Eduardo Silva dos Santos To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br ; [EMAIL PROTECTED] mailto:bollasette%40yahoo.com.br com.br bollasette%40yahoo.com.br Sent: Wednesday, March 05, 2008 8:29 PM Subject: Re: [delphi-br] Componente RDPRINT 2.1 não imprime no XP Rapaz ta difícil heim.. vc não precisa mudar de Delphi, o RDPrint 4 pode ser instalado no Delphi5. vai no site dos caras, baixa o trial, faz um teste.. se der tudo certo, faz o upgrade, vc ainda vai ter desconto por ser usuário registrado.. Em 05/03/08, Bollasette [EMAIL PROTECTED] mailto:bollasette%40yahoo.com.br com.brbollasette%40yahoo.com.br escreveu: Olá Leonardo,,, Não,,, Apenas instalei o D5 com RdPrint 2.1 no WINXP e fiz o teste e compilei sem problemas mas na hora de imprimir o problema cotinua. O fabricante com certeza vai querer me empurrar para uma versão mais recente do componente e no momento não estou interessado por causa do preço de uma atualização do Delphi. Vou ver se encontro algum componente free para instalar no D5 e refazer os códigos, quem sabe roda no WINXP para um cliente. Tks - Original Message - From: Leonardo Quinino To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.brdelphi-br%40yahoogrupos.com.br Sent: Wednesday, March 05, 2008 4:34 PM Subject: Re: [delphi-br] Componente RDPRINT 2.1 não imprime no XP Que tal tentar migrar somente a versão do RDPRINT ? Já conversou sobre isso com o fabricante ? Em 05/03/08, bollasette [EMAIL PROTECTED] mailto:bollasette%40yahoo.com.br com.brbollasette%40yahoo.com.br bollasette%40yahoo.com.br escreveu: Boa tarde a todos do Grupo... Tenho um aplicativo que desenvolvi em D5 e Win98 porém o mesmo instalado no WinXP não imprime utilizando o componente RDPRINT 2.1. (ACESS VIOLATION) Entrei em contato por email com desenvolvedor do componente situado em MARÍLIA,SP e o mesmo me retornou afirmando que dá suporte somente para o RDPRINT 4.0 Alguém jah passou por isso ? Terei que migrar para outro DELPHI ? Desde jah antecipo agradecimentos pela colaboração Bolasete (donisete) -- Leonardo Quinino [As partes desta mensagem que não continham texto foram removidas] -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.446 / Virus Database: 269.21.4/696 - Release Date: 03-03-2008 00:00 [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: eduardo.drd@ mailto:eduardo.drd%40gmail.com gmail.com eduardo.drd%40gmail.com Site: http://www.drdsiste http://www.drdsistemas.com/ mas.com/ ... [As partes desta mensagem que não continham texto foram removidas] -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.446 / Virus Database: 269.21.4/696 - Release Date: 03-03-2008 00:00 [As partes desta mensagem que não continham texto foram removidas] -- Thales Eduardo Barros de Oliveira Desenvolvedor Delphi / Firebird Emails: tebosoftware@ mailto:tebosoftware%40gmail.com gmail.com (GoogleTalk)
RES: RES: [delphi-br] Fazer o Delphi Visualizar arquivos Mhtml
Anderson, era mais ou menos asssim: Eu criei alguns arquivos no word, com imagens do próprio sistema executando algumas funções, um help meia boca mesmo. Dae no TWebBrowser, a única coisa que eu fiz foi ativar o navigate, WB.Navigate( c:\arquivo.mhtml ). Só isso mesmo, aí não funciona? As imagens não aparecem? -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Anderson F. de Rossi Enviada em: quarta-feira, 5 de março de 2008 21:46 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] Fazer o Delphi Visualizar arquivos Mhtml Então , Fazer o webBrowser carregar um doc html blz , já consegui. Mas um mhtml com imagens ..não O Vitor , vc ainda tem o código q vc usou ? vc conseguiu carregat mhtml com imagnes ? Vitor Redes escreveu: Uma vez eu fiz um helpzinho tosco e salvei em mhtml, funcionou normal no TWebBrowser, com navigate mesmo. -- Vitor Luiz Redes -- Bureau Redsystem Software vitor.redes@ mailto:vitor.redes%40redsystem.com.br redsystem.com.br mailto:vitor.redes%40redsystem.com.br _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br] Em nome de arossi75 Enviada em: terça-feira, 4 de março de 2008 13:31 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.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] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] De onde veio a chamada da procedure ?
Parâmetro? -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Flavio Enviada em: quinta-feira, 6 de março de 2008 13:54 Para: Grupo_Delphi Assunto: [delphi-br] De onde veio a chamada da procedure ? Olá pessoal, boa tarde, gostaria encontrar a procedure de onde veio o fluxo de dados, ou seja, chamo uma procedure A dentro de outra B. Agora quero saber de onde veio a chamada da procedure A. Nesse caso a resposta teria que ser B. Alguém sabe o enígma ? Obrigado pela atenção. Flávio. - 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] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] IBOConsole nao dá commit
No IBExpert funciona COMMIT WORK; -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Leandro Enviada em: terça-feira, 4 de março de 2008 17:10 Para: delphi-br@yahoogrupos.com.br Assunto: [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 Links do Yahoo! Grupos
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]
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]
RES: [delphi-br] Bematech
Leia alguns manuais, se você não sabe por onde começar complica pra todo mundo. Tente clicar em Abrir Cupom, depois em Identificar Consumidor, depois em Vender Item, depois em forma de pagamento MFD, e assim por diante, até finalizar o cupom fiscal. -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alexandre Enviada em: sexta-feira, 29 de fevereiro de 2008 11:18 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Bematech Então amigo, eu não entendo NADA disso, eu abri o emulador, cliquei com o botão da direita e cliquei em LIGAR, até ai beleza, ligou, ai aparece lá para confirmar a data apertando cinco vezes o botão PAPEL, fiz isso e aparece ECF DESBLOQUEADO, mas não sei como proceder agora para testar, eu baixei um exemplo em Delphi no site da Bematech, mas tem muitos botões lá, nem sei por onde começar para fazer um simples testes. Qualquer coisa que clico lá aparece falha da comunicação, mas a impressora esta ligada no emulador, já modifiquei o arquivo BemaFI32.ini. Alex - Original Message - From: Ricardo César Cardoso To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Friday, February 29, 2008 11:06 AM Subject: Re: [delphi-br] Bematech Se não me engano, assim que vc liga a impressora emulada, vc tem que fazer um procedimento de inicialização, como faria numa impressora real. Vc está fazendo isso? Atte, Ricardo. Alexandre alexandresoaressp@ mailto:alexandresoaressp%40yahoo.com.br yahoo.com.br escreveu: Sim, esta. - Original Message - From: Jhosef Marks To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Friday, February 29, 2008 9:25 AM Subject: Re: [delphi-br] Bematech Como vc ta verificando se ta ligada a impressora?? Em 29/02/08, Alexandre alexandresoaressp@ mailto:alexandresoaressp%40yahoo.com.br yahoo.com.br escreveu: Então, estou usando o próprio programa da Bematech para testar a impressora, e lá diz que não tem impressora conectada, mesmo eu estando com o emulador aberto e a impressora ligada. Alex - Original Message - From: Jhosef Marks To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br Sent: Friday, February 29, 2008 9:17 AM Subject: Re: [delphi-br] Bematech Emulfith = Impressora Matricial Emul2100 = Impressora Termica Os dois podem dar mensagem de erro na inicialização, mas naum deixam de funcionar, vc soh precisar fazer as chamadas certas a DLL... Em 29/02/08, Alexandre alexandresoaressp@ mailto:alexandresoaressp%40yahoo.com.br yahoo.com.bralexandresoaressp%40yahoo.com.br escreveu: Não esta não, o nome do emulador é emul2100, eu peguei no site da bematech, peguei o errado né? Alex - Original Message - From: Jhosef Marks To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.brdelphi-br%40yahoogrupos.com.br Sent: Thursday, February 28, 2008 5:56 PM Subject: Re: [delphi-br] Bematech Entaum esse erro acontece comigu tbem mas naum causa nenhum problema, na verdade soh eh uma msg avisando q naum existe porta serial conectada...simples, a DLL e o arquivo Ini podem estar na mesma pasta que o exe, naum precisa ser exatamente na pasta do windows... vlw Em 28/02/08, André Moraes - GMail andrefmoraes@ mailto:andrefmoraes%40gmail.com gmail.comandrefmoraes%40gmail.com andrefmoraes%40gmail.com escreveu: No help da DLL da Bematech é explicado como usar o Emulador. Usando a DLL vc pode configurar o INI da DLL para se comunicar com o Emulador sem a necessidade de ter 2 seriais. No caso de comunicação direta, sem DLL, vc terá q fazer um cabo ligando duas portas serias. Dae vc ira configurar o emulador na COM3 por exemplo e o programa na COM2 e terá um cabo ligando essas duas portas. Caso vc não tenha portas disponíveis no seu computador, vc pode procurar um programa chamado virtual serial port, q cria no computador pares de portas COM virtuais já interligadas. - Original Message - From: Alexandre To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.brdelphi-br%40yahoogrupos.com.brdelphi-br%4 0yahoogrupos.com.br Sent: Thursday, February 28, 2008 4:43 PM Subject: Re: [delphi-br] Bematech Exatamente, agora funcionou, engraçado que o emulador funciona, quando vou rodar o exemplo que tem no site, dá pau. Alex - Original Message - From: André Moraes - GMail To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.brdelphi-br%40yahoogrupos.com.brdelphi-br%4 0yahoogrupos.com.br Sent: Thursday, February 28, 2008 4:37 PM Subject: Re:
RES: [delphi-br] Conexão com o banco...
Eu uso dbexpress, com Firebird e sinceramente, não tenho queixas. -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Apoio Enviada em: sexta-feira, 29 de fevereiro de 2008 16:46 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Conexão com o banco... será que so eu uso dbexpress ? - Original Message - From: Vitor Redes To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Friday, February 29, 2008 4:39 PM Subject: RES: [delphi-br] Conexão com o banco... Para SQL Server é o ADO. -- Vitor Luiz Redes -- Bureau Redsystem Software vitor.redes@ mailto:vitor.redes%40redsystem.com.br redsystem.com.br _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Eloi Filho Enviada em: sexta-feira, 29 de fevereiro de 2008 13:31 Para: Grupo Lista Delphi; Grupo Delphi Iniciante; Grupo Delphi BR Assunto: [delphi-br] Conexão com o banco... Boa tarde amigos, bem eu estou desenvolvendo um novo sistema aki na empresa onde eu trabalho e gostaria de saber qual o melhor componente para conexão como o meu banco de dados. Eu uso o Delphi 7 com banco de dados MS SQL 2000, se alguém puder me dar uma luz, agradeço. abraços a todos... Eloi Filho Programador de Sistemas A.S. Rodrigues Distribuidora [EMAIL PROTECTED] mailto:efgf%40ig.com . mailto:efgf%40ig.com.br br Fone: (92) 2101-1628 - Fax: (92) 3622-2591 Celular: (92) 8172-2726 - 9117-8043 www.asrodrigues.com.br [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Conexão com o banco...
Para SQL Server é o ADO. -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Eloi Filho Enviada em: sexta-feira, 29 de fevereiro de 2008 13:31 Para: Grupo Lista Delphi; Grupo Delphi Iniciante; Grupo Delphi BR Assunto: [delphi-br] Conexão com o banco... Boa tarde amigos, bem eu estou desenvolvendo um novo sistema aki na empresa onde eu trabalho e gostaria de saber qual o melhor componente para conexão como o meu banco de dados. Eu uso o Delphi 7 com banco de dados MS SQL 2000, se alguém puder me dar uma luz, agradeço. abraços a todos... Eloi Filho Programador de Sistemas A.S. Rodrigues Distribuidora [EMAIL PROTECTED] mailto:efgf%40ig.com.br br Fone: (92) 2101-1628 - Fax: (92) 3622-2591 Celular: (92) 8172-2726 - 9117-8043 www.asrodrigues.com.br [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] Delphi parou de dar erro
Você não está utilizando o TApplicationEvents? Ou setando o evento OnException do Application para outro procedimento, onde o erro não é exibido? -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alexandre Nicolas Enviada em: terça-feira, 19 de fevereiro de 2008 14:15 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Delphi parou de dar erro boa tarde pessoal, vejam que interessante: qualquer sistema que eu compilo no meu delphi, caso aconteça algum erro durante a execução, o erro não é exibido, o sistema simplesmente ignora. a única maneira de descobrir qual o erro é rodar o sistema com o delphi aberto, ai sim é possivel descobrir qual o erro. já olhei todas as configurações de ambiente, editor, debugger, etc.. já comparei com outros computadores aqui da empresa, já reinstalei o delphi e nada. isso tá me causando problemas, pois às vezes dá algum pau no cliente e não tem como detectar qual erro está dando lá. se alguem tiver alguma dica ou já passou por situação semelhante, agradeço a ajuda. []s Alexandre [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] Record not found or changed by another user
O Select está trazendo a chave toda da tabela? Por exemplo, se a tabela tiver três campos chave, no select estão os três? -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Yahoo Enviada em: terça-feira, 19 de fevereiro de 2008 17:19 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Record not found or changed by another user Refresh acho que não dá, pois meu sistema limpa a tela depois que salva o registro. Eu só busco o registro com que o usuario vai trabalhar. ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo. http://br.yahoo.com/mailbeta/tudonovo/ com/mailbeta/tudonovo/ [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Declaraçao de forms
Vá em Tools - Environment Options - Aba Designer Veja se a opção Auto create forms data modules está marcada. Essa opção cria automaticamente os forms e módulos de data na unit do dpr (a unit pode ser acessada com ctrl+f12 e o nome do projeto). Se você não quer todas as telas sendo criadas quando o projeto for executado, então desmarque essa opção. Vá em Project - Options - Aba Forms Veja quais são os formulários e módulos de data que estão sendo criados no momento da execução do projeto em Auto-Create Forms. Tire os Formulários que não sejam necessários, agora crie-os assim: Application.CreateForm( TForm1, Form1 ); Form1.Show(); ou Form1.ShowModal(); Enfim, acho que é isso. -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de simone_cristina01 Enviada em: quinta-feira, 14 de fevereiro de 2008 15:43 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Declaraçao de forms Atraves do menu faço a chamada do form form.show, só q esta dando erro de execução. Alguem pode me ajudar - como declaro um form e porque do erro. Atenciosamente Simone Cristina [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Propagar message entre form e frame contido no form
A rotina abaixo passa por todos os eventos onkeydown dos componentes inseridos em qualquer TFrame que esteja no Formulário. Claro que, teoricamente, pq eu não testei, hehehehe. procedure TfPrincipal2.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); var VKey : Word; VShift : TShiftState; Contador, Contador2 : Integer; begin VKey := Key; VShift := Shift; For Contador := 0 to ComponentCount 1 do begin If Components[ Contador ] is TFrame then begin For Contador2 := 0 to TFrame( Components[ Contador ] ).ComponentCount -1 do Begin If Assigned( TFrame( Components[ Contador ] ).Components[ Contador2 ].OnKeyDown ) then TFrame( Components[ Contador ] ).Components[ Contador2 ].OnKeyDown( SELF, VKey, VShift ) End End end end -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Guionardo Furlan Enviada em: quinta-feira, 14 de fevereiro de 2008 14:21 Para: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED] Assunto: [delphi-br] Propagar message entre form e frame contido no form O subject ficou uma droga, por isso vou tentar explicar melhor aqui. Tenho um form principal, com um PageControl e alguns TabSheets. Em cada TabSheet, há um frame com os módulos do aplicativo. Em alguns frames (que não tem o evento onkeypress/down/up) existem componentes como TMenuItem ou TEdits que respondem a eventos de teclado. Até aí tudo bem. Mas quando, no form principal, o foco está fora do componente do frame, não há resposta aos atalhos de teclado. Então, pensei em colocar um evento onkeypress ou onkeydown no form principal e passar uma mensagem para o frame que está no tabsheet ativo, com a tecla pressionada. Achei alguma coisa com sendmessage e perform, mas não deu muito certo (erro de estouro de pilha) no fonte abaixo. procedure TfPrincipal2.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = VK_F6 then begin if not Assigned(fPrincipal) then Application.CreateForm(TfPrincipal, fPrincipal); fPrincipal.ShowModal; end else if Pages.ActivePage=tsJogos then FDj.Perform(WM_KEYDOWN,Key,0); FDj é o frame contido no tabsheet tsJogos Alguma idéia do que fazer? Grato pela ajuda. -- Timeo hominem unius libri Cogito ergo sum - Carpe diem []s Guionardo Furlan http://guionardo. http://guionardo.blogspot.com blogspot.com [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Criptografar dados no .exe
Curiosidade, que programa é esse que você usou? Outra coisa, não armazene esse tipo de informação no seu executável, por exemplo, em variáveis públicas, etc...Criptografe o conteúdo no momento do cadastramento (você pode utilizar os componentes da TurboPower, LockBox), quando o usuário digitar a senha, recupere a senha criptografada, descriptografe e compare com a senha digitada, fechando o dataset novamente. -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Tiago Enviada em: quarta-feira, 13 de fevereiro de 2008 10:11 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Criptografar dados no .exe Olá, Essa semana me despertou a curiosidade de saber o que meu .exe tinha de informações. Utilizando uma ferramenta que possibilita analisar arquivos .exe, tive um grande susto ao ver que informações como usuários e senhas de acesso ao banco de dados estavam totalmente acessíveis, e muitas outras informações que possibilitariam que um hacker possa se divertir com meus sistema. Bom a duvida é a seguinte, existe uma forma de quando eu for informar a senha de meu banco de dados no componente TDatabase essa senha fique criptografada, e ainda que eu possa deixar o meu exe com o mino de informaçãon disponível a quem tentar fazer este tipo de análise ao exe? Obrigado! [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] Caindo a Conexão...
O SQLConnection (DBExpress) tem uma propriedade chamada KeepConnection para esse tipo de situação. Você já testou com essa propriedade setada como TRUE? Faça um programinha que rode com DBExpress, e no evento AfterDisconnect alimente um arquivo texto mais ou menos assim: Var VStr : TStrings; Begin VStr.LoadFromFile( c:\conexao.txt ); VStr.Add( Desconectado do Banco de Dados: + SQLConnection1.Params.Values[ databasename ] + às + FormatDateTime( dd/mm/ hh:nn:sss, NOW ) ); VStr.SaveToFile( c:\conexao.txt ); End; No Evento AfterConnect: Var VStr : TStrings; Begin VStr.LoadFromFile( c:\conexao.txt ); VStr.Add( Conectado ao Banco de Dados: + SQLConnection1.Params.Values[ databasename ] + às + FormatDateTime( dd/mm/ hh:nn:sss, NOW ) ); VStr.SaveToFile( c:\conexao.txt ); End; Deixe o programa rodando o dia todo nas filiais que reportam queda de conexão, e veja o que realmente está acontecendo. Caso a conexão caia muito, é aconselhável que você chame o técnico responsável pela adsl para uma conversa mais séria, ou para que ele possa estabelecer um problema real da coisa, medindo a conexão e verificando se ela está ou não estável. Se o dono da empresa quer que o problema seja resolvido ele precisa antes saber onde está o problema, cobrar tudo do programador é fácil né... -- Vitor Luiz Redes -- Bureau Redsystem Software mailto:[EMAIL PROTECTED] [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Doretto Enviada em: quarta-feira, 13 de fevereiro de 2008 10:34 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Caindo a Conexão... Bom dia !!! Estou com o seguinte problema.. Trabalho com Delphi5 e Mssql2000 e estou com problema de queda de conexão quando o cliente esta usando um terminal remoto em outra cidade. Ex: Computador1: Servidor de dados (Bauru) Computador2: Terminal remoto (Jau) Computador3: Terminal remoto (Ribeirão Preto) Se o cliente usa o sistema em bauru (Computador1) conectado direto no banco o sistema funciona redondo, sem quedas de conexão. Mas se usa remotamente (Computador2 ou Computador3) o sistema gera erro de falha de conexão em certos momentos, as vezes fica duas ou três horas sem cair a conexão depois começa a cair e assim por diante, isto gera erro de dados e problemas sérios para a integridade dos mesmos. O clientes esta está desanimado e eu também.. não sei mais o que fazer para resolver este problema.. Tentei sem muito sucesso fazer um sistema em delphi7 c/ dbExpress, também cai a conexão c/ menos freqüência. Ps: Para a conexão no terminal eu uso o BDE do Delphi5. O clientes não quer saber se a internet oscila, pois a mesma segundo ele não cai, ele quer que eu resolva a situação Os amigos tem alguma idéia do que fazer ? Doretto. [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] Caindo a Conexão...
Esqueci de criar o TStrings antes. VStr := TStringList.Create( ); Ah, eu não testei o código. -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Vitor Redes Enviada em: quarta-feira, 13 de fevereiro de 2008 12:31 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Caindo a Conexão... O SQLConnection (DBExpress) tem uma propriedade chamada KeepConnection para esse tipo de situação. Você já testou com essa propriedade setada como TRUE? Faça um programinha que rode com DBExpress, e no evento AfterDisconnect alimente um arquivo texto mais ou menos assim: Var VStr : TStrings; Begin VStr.LoadFromFile( c:\conexao.txt ); VStr.Add( Desconectado do Banco de Dados: + SQLConnection1.Params.Values[ databasename ] + às + FormatDateTime( dd/mm/ hh:nn:sss, NOW ) ); VStr.SaveToFile( c:\conexao.txt ); End; No Evento AfterConnect: Var VStr : TStrings; Begin VStr.LoadFromFile( c:\conexao.txt ); VStr.Add( Conectado ao Banco de Dados: + SQLConnection1.Params.Values[ databasename ] + às + FormatDateTime( dd/mm/ hh:nn:sss, NOW ) ); VStr.SaveToFile( c:\conexao.txt ); End; Deixe o programa rodando o dia todo nas filiais que reportam queda de conexão, e veja o que realmente está acontecendo. Caso a conexão caia muito, é aconselhável que você chame o técnico responsável pela adsl para uma conversa mais séria, ou para que ele possa estabelecer um problema real da coisa, medindo a conexão e verificando se ela está ou não estável. Se o dono da empresa quer que o problema seja resolvido ele precisa antes saber onde está o problema, cobrar tudo do programador é fácil né... -- Vitor Luiz Redes -- Bureau Redsystem Software mailto:vitor.redes@ mailto:vitor.redes%40redsystem.com.br redsystem.com.br vitor.redes@ mailto:vitor.redes%40redsystem.com.br redsystem.com.br _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Doretto Enviada em: quarta-feira, 13 de fevereiro de 2008 10:34 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: [delphi-br] Caindo a Conexão... Bom dia !!! Estou com o seguinte problema.. Trabalho com Delphi5 e Mssql2000 e estou com problema de queda de conexão quando o cliente esta usando um terminal remoto em outra cidade. Ex: Computador1: Servidor de dados (Bauru) Computador2: Terminal remoto (Jau) Computador3: Terminal remoto (Ribeirão Preto) Se o cliente usa o sistema em bauru (Computador1) conectado direto no banco o sistema funciona redondo, sem quedas de conexão. Mas se usa remotamente (Computador2 ou Computador3) o sistema gera erro de falha de conexão em certos momentos, as vezes fica duas ou três horas sem cair a conexão depois começa a cair e assim por diante, isto gera erro de dados e problemas sérios para a integridade dos mesmos. O clientes esta está desanimado e eu também.. não sei mais o que fazer para resolver este problema.. Tentei sem muito sucesso fazer um sistema em delphi7 c/ dbExpress, também cai a conexão c/ menos freqüência. Ps: Para a conexão no terminal eu uso o BDE do Delphi5. O clientes não quer saber se a internet oscila, pois a mesma segundo ele não cai, ele quer que eu resolva a situação Os amigos tem alguma idéia do que fazer ? Doretto. [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] Máscara de campo hora no dbgrid
Você já selecionou o que não compila e apertou F1 pra ver em qual unit(namespace) está a função ou o tipo? -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de ca_programador007 Enviada em: quarta-feira, 13 de fevereiro de 2008 16:52 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Máscara de campo hora no dbgrid Olá Ricardo, Eu já tinha tentado dessa forma: TNumericField(datamodule.sqlx.FieldByName('HORA')).DisplayFormat := '99:99;1;_'; Mas no Delphi 2007 o TNumeric não compila e o displayformat também não. Tem alguma alternativa? Grato Ricardo César Cardoso ricardo_engsoft@ mailto:ricardo_engsoft%40yahoo.com.br yahoo.com.br escreveu: Vc pode formatar o campo usando a propriedade DisplayFormat na coluna que possui a hora ou então usar o evento GetText para o campo que possui estes dados. Dá uma olhada que já me lembro de ter visto exemplos disso na internet. Atte, Ricardo. ca_programador007 ca_programador007@ mailto:ca_programador007%40yahoo.com.br yahoo.com.br escreveu: Olá amigos, Tenho uma consulta que trago o valor do campo hora (time no banco), e carrego as informações em um dbgrid. No banco o campo hora está gravado assim: 16:30:00 Preciso que no dbgrid mostre apenas o 16:30, sem os segundos. Como faço para colocar a máscara dentro do dbgrid? No aguardo. Valeu pela ajuda. - 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] - 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] - 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] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Simular clique no formulário
Abra o seu .DPR, ctrl+f12 e o nome do seu projeto, ele deve estar mais ou menos assim: Unit1 in 'Unit1.pas' {Form1}, Unit2 in 'Unit1.pas' {Form3}, Unit3 in 'Unit1.pas' {Form2}; {$R *.res} begin Application.Initialize; Application.Title := 'Título'; Application.CreateForm(TFMPrincipal, FMPrincipal); Application.CreateForm(TDM, DM); //se houver = Aqui, faça algo mais ou menos assim Application.CreateForm( TFMLogin, FMLogin ); if FMLogin.ShowModal() = mrOk then Application.Run; else Application.Terminate; End; -- Vitor Luiz Redes -- Bureau Redsystem Software mailto:[EMAIL PROTECTED] [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Fabio Gomes Enviada em: quarta-feira, 13 de fevereiro de 2008 20:56 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Simular clique no formulário Não deu, cara. Tentei o form1.click no oncreate, no onshow do formulário e não simula o clique. Acontece que estou com problemas de dar o foco no form de login.. No oncreate do form principal eu estou criando o form de login, e ele não fica com o foco no login, ficando com o foco no form principal. Tem alguma outra alternativa? Alcistemas Informática [EMAIL PROTECTED] mailto:alcistemas%40yahoo.com.br com.br escreveu: Kra, no delphi 7 pelo menos é assim: form1.Click; - Original Message - From: Fabio Gomes To: delphi-total@ mailto:delphi-total%40yahoogrupos.com.br yahoogrupos.com.br ; [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Wednesday, February 13, 2008 3:45 PM Subject: [delphi-br] Simular clique no formulário Caros amigos, Preciso simular um clique do mouse no formulário de login. Como faço isso no Delphi 2007? Alguém tem algo para me passar de exemplo? Preciso muito. Aguardo uma ajuda Fábio Gomes. - 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] [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] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] ComboBox com Item Invisivel
Tem uma solução, não sei se é a ideal mas... TCheckListBox: Você pode adicionar os itens como a um combobox, mas o TCheckListBox tem um método legal que é: CheckListBox1.ItemEnabled[ 0 ] := FALSE = você pode desabilitar o index que não precisar utilizar. -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Nayara Enviada em: terça-feira, 12 de fevereiro de 2008 13:19 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] ComboBox com Item Invisivel Então, é por que o Index de alguns Items estão pressos em outra parte do código e não é possivel remover. Então em tempo de execução não deverá aparecer. E são só alguns ITENS... o Visible não dá pra fazer..eu acho!!! Em 12/02/08, Jose Eduardo Victorino josevictorino2002@ mailto:josevictorino2002%40yahoo.com.br yahoo.com.br escreveu: Bem meu jovem sou muito novo no forum mas e a amiga nao quer que ele apareça em execucao eh so colocar Visible= False Gerson Machado gersonamach@ mailto:gersonamach%40yahoo.com.br yahoo.com.br gersonamach%40yahoo.com.br escreveu: Bem eu penso que seja assim: Se precisa ficar invisível é porque não vai ser usado, então, basta exclui-lo(s) da relação de itens. nayarinha01 nayarinhaaa@ mailto:nayarinhaaa%40gmail.com gmail.com nayarinhaaa%40gmail.com escreveu: Bom Dia a Todos.. ALguem sabe se é possivel (se sim, COMO?) deixar alguns itens de um determinado COMBOBOX invisivel!? Nayara - 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] - 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] -- all we need is love [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: RES: [delphi-br] SetFocus
Provavelmente você está fazendo alguma coisa errada então. Se você utilizar o ActiveControl o form irá posicionar o foco no controle, a não ser que o controle esteja escondido por algum container, como um PageControl... enfim... nunca vi o activecontrol não funcionar. -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Guilherme Alves Enviada em: sexta-feira, 8 de fevereiro de 2008 21:09 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] SetFocus Vitor, nao consigo Tem mais alguma alternativa? Abraços Vitor Redes vredesredsystem@ mailto:vredesredsystem%40yahoo.com.br yahoo.com.br escreveu: Você não pode atribuir o foco no evento OnShow, atribua o componente a propriedade ActiveControl do Formulário, por exemplo: FORM.ActiveControl := EDLogin; Ou no Object Inspector mesmo, a segunda propriedade, provavelmente. -- Vitor Luiz Redes -- Bureau Redsystem Software vitor.redes@ mailto:vitor.redes%40redsystem.com.br redsystem.com.br _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Guilherme Alves Enviada em: sexta-feira, 8 de fevereiro de 2008 14:35 Para: delphi-total@ mailto:delphi-total%40yahoogrupos.com.br yahoogrupos.com.br; [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: [delphi-br] SetFocus Olá colegas da lista Tenho um projeto que se inicializa da seguinte forma: Application.CreateForm(TDataModule, DataModule); Application.CreateForm(TPrincipal, Principal); No onshow do form principal eu crio o form de login e dou o foco a ele: begin Application.CreateForm(TLogin, Login); Login.Show; Login.SetFocus; Login.BringToFront; Login.Focused; Login.edit_usuario.SetFocus; end; Estou com o seguinte problema: Não sei porque quando o form de login é mostrado, o edit_usuario não fica com o foco, tendo que o usuário clicar no edit para digitar o usuário. Já que o foco é para mostrar o cursor do mouse, dando o foco no edit, o que eu estou fazendo de errado? Mesmo eu colocando no onshow do form login o edit_usuario.SetFocus não está funcionando... Onde estou errando? Valeu amigos, - 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] [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] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Como montar uma pesquisa por apro ximação
No evento OnChange de um TEdit, ou em um evento similar de qualquer componente: DataSet.Locate( NOME, Edit1.Text, [ loPartialKey ] ); -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Angelo Louzada Enviada em: sexta-feira, 8 de fevereiro de 2008 12:05 Para: delphi-br@yahoogrupos.com.br Assunto: Res: [delphi-br] Como montar uma pesquisa por aproximação Opa, já tentei com o operador like porém o que eu estava querendo era o seguinte: A medida que o usuário fosse digitando fosse mostrando no grid o resultado palavra o palavra ou seja, tenho no grid no campo nome os seguintes registros: Ana Cecília Ana Maria Angela Silva Anderson Vieira A medida que o usuário fosse digitando em um Edit os caracteres Ang o cursor do grid já iria se posicionando, através do seu exemplo o usuário digita o nome ou parte do nome e manda fazer a pesquisa e eu queria que isso acontecesse a medida que o usuário fosse digitando caractér por caractér parecido com o comportamento do DBLookupComboBox. - Mensagem original De: Claudiney Cogo claudiney-listas@ mailto:claudiney-listas%40n2solutions.com.br n2solutions.com.br Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Enviadas: Sexta-feira, 8 de Fevereiro de 2008 9:25:52 Assunto: Re: [delphi-br] Como montar uma pesquisa por aproximação Olá Angelo. É tranquilo... Já que você tá usando o IBQuery é melhor trabalhar direto com o SQL que passa pra ele. Na entrada do form você, se preferir, carrega tudo.. (cuidado com tabelas muito grandes).. usando um comando como esse: IBQryTabela. SQL.Clear; IBQryTabela. Sql.Add(' Select * from SuaTabela'); IBQryTabela. Active := True; Depois no evento CHANGE do edit você altera o comando incluindo a opção like: IBQryTabela. SQL.Clear; IBQryTabela. Sql.Add(' Select * from SuaTabela where CampoTabela like ' + QuotedStr(Edit1. Text + '%') + ' order by CampoTabela' ); IBQryTabela. Active := True; Isso supondo que você esteja fazendo a pesquisa por um campo string, como nome ou descrição. Aqui o comando procura o que você digita no início do campo. Caso queira procurar em qualquer posição coloque um % antes do Edit1.Text também IBQryTabela. SQL.Clear; IBQryTabela. Sql.Add(' Select * from SuaTabela where CampoTabela like ' + QuotedStr('% ' + Edit1.Text + '%') + ' order by CampoTabela' ); IBQryTabela. Active := True; Porém, tome um certo cuidado com bases muito grandes. Esse tipo de consulta pode causar um pouco de perda de performance. Nesse caso é melhor não abrir a tabela toda na entrada e digitar tudo o que deseja buscar primeiro, para depois fazer a busca e selecionar só o que interessa. Isso reduz muito o tamanho do dataset que será retornado. Espero que seja isso. Abraço. _ _ ___ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Maringá - Paraná www.n2solutions. com.br www.studion2. com.br - Original Message - From: Angelo Louzada To: [EMAIL PROTECTED] os.com.br Sent: Friday, February 08, 2008 7:30 AM Subject: [delphi-br] Como montar uma pesquisa por aproximação Amigos, estou utilizando um IBQuery trazendo os dados da tabela de clientes e mostrando em um DBGrid gostaria que meu usuário digitasse em um Edit o nome do cliente e a medida que ele fosse digitando o nome do cliente o DBGrid fosse realizando o filtro palavra por palavra, alguém sabe como posso implementar isso? 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] __ NOD32 2857 (20080207) Information __ This message was checked by NOD32 antivirus system. http://www.eset. 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! http://br.mail. http://br.mail.yahoo.com/ 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] SetFocus
Você não pode atribuir o foco no evento OnShow, atribua o componente a propriedade ActiveControl do Formulário, por exemplo: FORM.ActiveControl := EDLogin; Ou no Object Inspector mesmo, a segunda propriedade, provavelmente. -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Guilherme Alves Enviada em: sexta-feira, 8 de fevereiro de 2008 14:35 Para: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br Assunto: [delphi-br] SetFocus Olá colegas da lista Tenho um projeto que se inicializa da seguinte forma: Application.CreateForm(TDataModule, DataModule); Application.CreateForm(TPrincipal, Principal); No onshow do form principal eu crio o form de login e dou o foco a ele: begin Application.CreateForm(TLogin, Login); Login.Show; Login.SetFocus; Login.BringToFront; Login.Focused; Login.edit_usuario.SetFocus; end; Estou com o seguinte problema: Não sei porque quando o form de login é mostrado, o edit_usuario não fica com o foco, tendo que o usuário clicar no edit para digitar o usuário. Já que o foco é para mostrar o cursor do mouse, dando o foco no edit, o que eu estou fazendo de errado? Mesmo eu colocando no onshow do form login o edit_usuario.SetFocus não está funcionando... Onde estou errando? Valeu amigos, - 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] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Componente Delphi para Relatórios
Eu não sou de reclamar desse tipo de coisa... Mas Felipe, alguém entende o que você escreve? Que componente? Componente delphi? Tecnologia? O que você quer saber? -- Vitor Luiz Redes -- Bureau Redsystem Software [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Felipe Nunes Enviada em: quinta-feira, 7 de fevereiro de 2008 17:35 Cc: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED] Assunto: [delphi-br] Componente Delphi para Relatórios Olá pessoal, Queria saber se alguém ja trabalhou ou trabalhar com esse tecnologia.. Eu estou querendo implementar nos relatórios que crio, a função que me permitir pegar o relatório que foi gerar e exportar para uma planilha de excel, ou ate mesmo em arquivo de texto do word ou coisa similar.. Se puderem me ajudar ficarei grato Abraço Atenciosamente, http://www.vienasis http://www.vienasistemas.com.br/assinatura.png temas.com.br/assinatura.png Felipe Nunes Analista T.I. - Atacado/Distribuidor - Bacharel em Ciências da Computação * MG: (37) 3213-4855 DF: (61) 3561-1188 BA: (71) 3341-8714 * [EMAIL PROTECTED] mailto:felipe%40vilesoft.com.br com.br * http://www.vilesoft http://www.vilesoft.com.br/ .com.br/ www.vilesoft.com.br O emitente desta mensagem é responsável por seu conteúdo e endereçamento. Cabe ao destinatário cuidar quanto ao tratamento adequado. Sem a devida autorização, a divulgação, a reprodução, a distribuição ou qualquer outra ação em desconformidade com as normas internas da Vilesoft são proibidas e passíveis de sanção disciplinar, cível e criminal. The sender of this message is responsible for its content and addressing. The receiver shall take proper care of it. Without due authorization, the publication, reproduction, distribution or the performance of any other action not conforming to Vilesoft internal policies and procedures is forbidden and liable to disciplinary, civil or criminal sanctions. El emisor de este mensaje es responsable por su contenido y direccionamiento. Cabe al destinatario darle el tratamiento adecuado. Sin la debida autorización, su divulgación, reproducción, distribución o cualquier otra acción no conforme a las normas internas de Vilesoft están prohibidas y serán pasibles de sanción disciplinaria, civil y penal. [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] Abrir formulário dentro de outro
Na verdade falta: Faça assim Form1.ManualDock( Panel1 ); Form1.Align := alClient; Form1.Show( ); _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de edersonecris Enviada em: quinta-feira, 31 de janeiro de 2008 13:59 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Abrir formulário dentro de outro É isso que estou precisando. Mas não funcionou, não apareceu nada dentro de panel. Será que falta algum detalhe que esta escapando? GRAto Jackson Gomes - ToolsComps escreveu: Pessoal tem como abrir um formulário dentro de outro? Se vc quer um form colado dentro do outro, digamos, colar o form2 dentro do form1 form2 := TForm2.Create(form1); form2.Parent := form1; (se vc tem um panel dentro do form1, poderia ser form1.panel1, assim form2 seria colado dentro do panel ) form2.show; A vantagen dessa técnica é aproveitar os muitos eventos que o TForm tem e o TFrame não tem. OnCreate, por exemplo... Acho que é isso. []'s Jackson Gomes ToolsComps - Controle de Usuários para Desenvolvedores Borland/CodeGear Web Site: http://www.toolsand http://www.toolsandcomps.com comps.com http://www.toolsand http://www.toolsandcomps.com comps.com Nosso Fórum: http://groups. http://groups.yahoo.com/group/toolsandcomps yahoo.com/group/toolsandcomps http://groups. http://groups.yahoo.com/group/toolsandcomps yahoo.com/group/toolsandcomps e-mail: [EMAIL PROTECTED] mailto:jackson%40toolsandcomps.com ps.com mailto:jackson%40toolsandcomps.com Fone: 27 3389 1138 - 8811 0324 -- Devhost - Webhost para desenvolvedores Borland http://www.devhost. http://www.devhost.com.br com.br http://www.devhost. http://www.devhost.com.br com.br [EMAIL PROTECTED] mailto:devhost%40devhost.com.br com.br mailto:devhost%40devhost.com.br -- Éderson Cassiano Bologna edersoncassiano@ mailto:edersoncassiano%40terra.com.br terra.com.br sKYPE: edersoncassiano MSN: edersoncassiano@ mailto:edersoncassiano%40hotmail.com hotmail.com www.microtechshop.com [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] [Fatal Error]
Olha, esses internal errors aterrorizam muita gente de vez em quando, o L (do L1333) quer dizer que é um linking error, o número não quer dizer muita coisa, não para nós. Dê uma olhada no google groups: http://groups.google.com.br/groups/search?hl=pt-BR http://groups.google.com.br/groups/search?hl=pt-BRie=UTF-8q=internal+erro r+L1333qt_s=Pesquisar ie=UTF-8q=internal+error+L1333qt_s=Pesquisar E tente algo que as vezes funciona, delete todas as .dcus e dê um Build no projeto. Vitor Luiz Redes Bureau Redsystem Software [EMAIL PROTECTED] Phone: +55 (41) 3379-6939 Cel. Phone: +55 (41) 8858-4555 Curitiba - PR - Brasil _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Leonardo Quinino Enviada em: terça-feira, 29 de janeiro de 2008 09:11 Para: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED] Assunto: [delphi-br] [Fatal Error] As vezes me ocorre um erro durante a compilação, eu saio do delphi e entro novamente então tento e volta ao normal. Ocorre a mensagem [Fatal Error] Internal error: L1333 Somente isso, não encontrei no help do delphi nada que se referisse ao código do erro L1333 o máximo que consegui foi uma explicação genérica do error quero saber se alguém sabe o que indica exatamente o código L1333 Se alguém souber, avisa aqui pra nós. Valeu. -- Leonardo Quinino [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Form de Login - urgente
Application.Initialize; Application.CreateForm(TFormPrincipal, FormPrincipal); //inicializa primeiro o form de login// Application.CreateForm(TFormLogin, FormLogin); = FormLogin.ShowModal(); Application.CreateForm(TDataModule, DataModule); Vitor Luiz Redes Bureau Redsystem Software [EMAIL PROTECTED] Phone: +55 (41) 3379-6939 Cel. Phone: +55 (41) 8858-4555 Curitiba - PR - Brasil _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Guilherme Alves Enviada em: segunda-feira, 28 de janeiro de 2008 13:14 Para: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED] Assunto: [delphi-br] Form de Login - urgente Olá galera Quando eu precisava fazer um form de login antes do usuário poder utilizar o sistema, eu fazia assim (no Delphi 7) FormPrincipal = form tipo MDIform FormLogin = form tipo normal No momento de inicializar eu fazia assim: begin Application.Initialize; Application.CreateForm(TFormPrincipal, FormPrincipal); //inicializa primeiro o form de login// Application.CreateForm(TFormLogin, FormLogin); Application.CreateForm(TDataModule, DataModule); Application.Run; end. Agora, estou tentando fazer a mesma coisa no Delphi 2007 e não estou conseguindo. O que pode ser? Lembrando que estou utilizando também para o formprincipal o MDIForm (pai), mas o login como form normal, pois funcionava corretamente no Delphi 7... não sei porque no Delhpi 2007 não funciona. Simplesmente ele não abre, abre direto o FormPrincipal. No aguardo, Valeu, Guilherme Alves - 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] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Re: Pegando o foco!!
Vai em nova aplicação e depois em Service Application. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de caionmoreno Enviada em: sexta-feira, 25 de janeiro de 2008 07:10 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Re: Pegando o foco!! E como que eu crio um serviço Vitor??? -- Em [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br, Vitor Redes [EMAIL PROTECTED] escreveu Crie um serviço... veja se resolve, se precisar chamar a aplicação, o serviço faz isso quando necessário, se não ele fica só na escuta Vitor. _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Leonardo Quinino Enviada em: quinta-feira, 24 de janeiro de 2008 20:30 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: Re: [delphi-br] Re: Pegando o foco!! olha uma dica ahahah para fazer um spy de teclado:) Em 24/01/08, caionmoreno caionmoreno@ mailto:caionmoreno%40yahoo.com.br yahoo.com.br escreveu: O timer de 7 em 7 segundos executa o código: Webbrowser1.Refresh; E tem um timer de 1 em 1 segundo que verifica se a pessoa aperto a sequencia de teclas para mostrar o prog. Mas jah tentei desativar esse timer de 1 segundo e continuo perdendo foco! --- Em [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br, Eduardo Silva dos Santos eduardo.drd@ escreveu Fica dificil sem saber oq exatamente o Timer faz no momento da atualização... de mais detalhes ou mostra o código ae.. Em 24/01/08, caionmoreno caionmoreno@ escreveu: Eu tenho uma aplicação que roda escondida com o form no hide! E com timer, que de tanto em tanto segundos ele atualiza uma coisa. Só que quando ele atualiza, o que eu esteja mexendo no pc (internet, programa, etc) perde o foco, eu to digitando alguma coisa, e do nada perde o foco! Alguém sabe o que pode estar causando isso? -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: eduardo.drd@ Site: http://www.drdsiste http://www.drdsiste http://www.drdsistemas.com/ mas.com/ mas.com/ ... [As partes desta mensagem que não continham texto foram removidas] -- Leonardo Quinino [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: RES: [delphi-br] [OFF] Oportunidade - Analista Programador [RJ - Centro]
Mas a discussão não é pessoal, é sobre opinião. Se as empresas praticam, tudo certo então? Claro que sim né... ta bom. Com esse tipo de argumento o mundo vai longe mesmo. Vitor Luiz Redes Bureau Redsystem Software [EMAIL PROTECTED] Phone: +55 (41) 3379-6939 Cel. Phone: +55 (41) 8858-4555 Curitiba - PR - Brasil _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Davi Eduardo Borges Wall Enviada em: sexta-feira, 25 de janeiro de 2008 15:35 Para: delphi-br@yahoogrupos.com.br Assunto: RES: RES: [delphi-br] [OFF] Oportunidade - Analista Programador [RJ - Centro] Eh tão nada a ver que as empresas o praticam! Acho que se vc tem sua opinião tranqüilo! Mas soh por que vc discorda a minha não quer dizer que aminha não tem nada a ver =) De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Vitor Redes Enviada em: sexta-feira, 25 de janeiro de 2008 16:56 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: RES: RES: [delphi-br] [OFF] Oportunidade - Analista Programador [RJ - Centro] Cara, nada a ver o teu ponto de vista. Podem falar que a empresa tem um teto pra gastar ou qualquer coisa do tipo, mas se o carinha lá, desempregado se oferecer para trabalhar abaixo do teto, eles não vão aumentar o salário do cara. Como o João falou aí, colocando a faixa salarial, você evita pessoas que querem receber mais, e evita quem não se acha qualificado o suficiente para o trabalho. Não colocar faixa salarial é sacanagem, e dá muito mais trabalho. Vitor. _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br ] Em nome de Davi Eduardo Borges Wall Enviada em: sexta-feira, 25 de janeiro de 2008 13:24 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br Assunto: RES: RES: [delphi-br] [OFF] Oportunidade - Analista Programador [RJ - Centro] 1 - Ponha-se no lugar do contratante. Não sou dono de empresa, mas se fosse gostaria de receber CV com pretensão salarial, para saber o quanto essa pessoal diz que vale! Se eu achar o currículo condizente com o valor pretendido, ainda se o currículo e valor fecham com minhas necessidades empresariais então eu chamo para fazer entrevista. 2 - Ponha-se no lugar do contratado. Eu vou mandar meu currículo com pretensão salarial por que eu pretendo ganhar 3.000 reais e não quero que a empresa me chame para me oferecer 1.500 De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Renato Enviada em: sexta-feira, 25 de janeiro de 2008 14:03 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: Res: RES: [delphi-br] [OFF] Oportunidade - Analista Programador [RJ - Centro] Cada um põe o que acha justo. Por menos só pra pegar a vaga depois pode ser pior. sindicato diz alguma coisa? que eu saiba não... - Mensagem original De: Vitor Redes vredesredsystem@ mailto:vredesredsystem%40yahoo.com.br yahoo.com.br mailto:vredesredsystem%40yahoo.com.br Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br Enviadas: Sexta-feira, 25 de Janeiro de 2008 12:10:56 Assunto: RES: [delphi-br] [OFF] Oportunidade - Analista Programador [RJ - Centro] Só um comentário nada a ver... Esse negócio de pretensão salarial é sacanagem hein! Nada contra quem mandou o e-mail e tal... mas isso é o mesmo que dizer: Quem dá menos ou Quem está mais desesperado Vitor. _ De: [EMAIL PROTECTED] os.com.br [mailto:[EMAIL PROTECTED] os.com.br] Em nome de Anderson - Yahoo Enviada em: sexta-feira, 25 de janeiro de 2008 10:31 Para: ti-empregos@ yahoogrupos. com.br; oportunidadesinform [EMAIL PROTECTED] s.com.br; Empregos_TI@ yahoogrupos. com.br; delphi-empregos@ yahoogrupos. com.br; [EMAIL PROTECTED] os.com.br; lista-delphi@ yahoogrupos. com.br; delphi-boleto@ yahoogrupos. com.br Assunto: [delphi-br] [OFF] Oportunidade - Analista Programador [RJ - Centro] Empresa no mercado de TI desde 1995 procura Analista Programador para atuar no centro do Rio de Janeiro. Requisitos: - Experiência de no mínimo 3 anos em Delphi; - Desenvolvimento de sistemas utilizando banco de dados relacionais, de preferência SQLServer 2000; - Modelagem de Dados; Contratação: - Imediato; - CLT; - VT; - TR. Os interessados deverão enviar curriculum, COM PRETENSÃO SALARIAL, para newfileajar@ mailto:newfileajar %40yahoo. com.br yahoo.com.br. Atenciosamente, Anderson [As partes desta mensagem que não continham
RES: RES: [delphi-br] [OFF] Oportunidade - Analista Programador [RJ - Centro]
Cara, nada a ver o teu ponto de vista. Podem falar que a empresa tem um teto pra gastar ou qualquer coisa do tipo, mas se o carinha lá, desempregado se oferecer para trabalhar abaixo do teto, eles não vão aumentar o salário do cara. Como o João falou aí, colocando a faixa salarial, você evita pessoas que querem receber mais, e evita quem não se acha qualificado o suficiente para o trabalho. Não colocar faixa salarial é sacanagem, e dá muito mais trabalho. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Davi Eduardo Borges Wall Enviada em: sexta-feira, 25 de janeiro de 2008 13:24 Para: delphi-br@yahoogrupos.com.br Assunto: RES: RES: [delphi-br] [OFF] Oportunidade - Analista Programador [RJ - Centro] 1 - Ponha-se no lugar do contratante. Não sou dono de empresa, mas se fosse gostaria de receber CV com pretensão salarial, para saber o quanto essa pessoal diz que vale! Se eu achar o currículo condizente com o valor pretendido, ainda se o currículo e valor fecham com minhas necessidades empresariais então eu chamo para fazer entrevista. 2 - Ponha-se no lugar do contratado. Eu vou mandar meu currículo com pretensão salarial por que eu pretendo ganhar 3.000 reais e não quero que a empresa me chame para me oferecer 1.500 De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Renato Enviada em: sexta-feira, 25 de janeiro de 2008 14:03 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: Res: RES: [delphi-br] [OFF] Oportunidade - Analista Programador [RJ - Centro] Cada um põe o que acha justo. Por menos só pra pegar a vaga depois pode ser pior. sindicato diz alguma coisa? que eu saiba não... - Mensagem original De: Vitor Redes vredesredsystem@ mailto:vredesredsystem%40yahoo.com.br yahoo.com.br mailto:vredesredsystem%40yahoo.com.br Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br Enviadas: Sexta-feira, 25 de Janeiro de 2008 12:10:56 Assunto: RES: [delphi-br] [OFF] Oportunidade - Analista Programador [RJ - Centro] Só um comentário nada a ver... Esse negócio de pretensão salarial é sacanagem hein! Nada contra quem mandou o e-mail e tal... mas isso é o mesmo que dizer: Quem dá menos ou Quem está mais desesperado Vitor. _ De: [EMAIL PROTECTED] os.com.br [mailto:[EMAIL PROTECTED] os.com.br] Em nome de Anderson - Yahoo Enviada em: sexta-feira, 25 de janeiro de 2008 10:31 Para: ti-empregos@ yahoogrupos. com.br; oportunidadesinform [EMAIL PROTECTED] s.com.br; Empregos_TI@ yahoogrupos. com.br; delphi-empregos@ yahoogrupos. com.br; [EMAIL PROTECTED] os.com.br; lista-delphi@ yahoogrupos. com.br; delphi-boleto@ yahoogrupos. com.br Assunto: [delphi-br] [OFF] Oportunidade - Analista Programador [RJ - Centro] Empresa no mercado de TI desde 1995 procura Analista Programador para atuar no centro do Rio de Janeiro. Requisitos: - Experiência de no mínimo 3 anos em Delphi; - Desenvolvimento de sistemas utilizando banco de dados relacionais, de preferência SQLServer 2000; - Modelagem de Dados; Contratação: - Imediato; - CLT; - VT; - TR. Os interessados deverão enviar curriculum, COM PRETENSÃO SALARIAL, para newfileajar@ mailto:newfileajar %40yahoo. com.br yahoo.com.br. Atenciosamente, Anderson [As partes desta mensagem que não continham texto foram removidas] [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! http://br.mail. http://br.mail.yahoo.com/ 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]
RES: [delphi-br] [OFF] Oportunidade - Analista Programador [RJ - Centro]
Só um comentário nada a ver... Esse negócio de pretensão salarial é sacanagem hein! Nada contra quem mandou o e-mail e tal... mas isso é o mesmo que dizer: Quem dá menos ou Quem está mais desesperado Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Anderson - Yahoo Enviada em: sexta-feira, 25 de janeiro de 2008 10:31 Para: [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED]; [EMAIL PROTECTED] Assunto: [delphi-br] [OFF] Oportunidade - Analista Programador [RJ - Centro] Empresa no mercado de TI desde 1995 procura Analista Programador para atuar no centro do Rio de Janeiro. Requisitos: - Experiência de no mínimo 3 anos em Delphi; - Desenvolvimento de sistemas utilizando banco de dados relacionais, de preferência SQLServer 2000; - Modelagem de Dados; Contratação: - Imediato; - CLT; - VT; - TR. Os interessados deverão enviar curriculum, COM PRETENSÃO SALARIAL, para newfileajar@ mailto:newfileajar%40yahoo.com.br yahoo.com.br. Atenciosamente, Anderson [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] Case When no Delphi
Seu select está errado, strings devem ser passadas entre aspas: Ex: .Add( WHEN 1 THEN + QuotedStr( CRIANÇA ) A primeira linha do seu seu select não está terminando em vírgula. Teste o select antes de coloca-lo no delphi, vai economizar bastante tempo. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de ca_programador007 Enviada em: quinta-feira, 24 de janeiro de 2008 09:29 Para: delphi-total delphi-total; delphi-br Assunto: [delphi-br] Case When no Delphi Olá amigos da lista Preciso de uma ajuda meio urgente.. Não sei o que eu estou fazendo de errado. Preciso utilizar o case when na minha consulta pelo seguinte: Quando vier no conteúdo do campo (varchar) o número 1, então que me retorna a palavra CRIANÇA, quando vier o número 2, que me retorna a palavra ADULTO e quando vier o número 3, que me retorna a palavra IDOSO. sql.add('select flag AS idade'); sql.add('case vci.flag'); sql.add('when 1 then CRIANÇA'); sql.add('when 2 then ADULTO'); sql.add('when 3 then IDOSO end as idade'); sql.add('from'); sql.add('tabela'); O que tem de errado aqui? no aguardo de uma ajuda.. valeu, carlos - 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] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Converter Centimetros em Inteiro
Você está indo pelo caminho errado, se eu entendi o que você quer fazer. Você deve usar as margens de impressão do componente, e não as propriedades left e top, que são para posicionamento no formulário. No QuickReport as propriedades de Margem ficam em Page, experimente fazer um teste com elas. Mas outra dica, se for para impressão de notas fiscais, utilize componentes que imprimam em matriciais, como o RDPrint, conhecidos de todos aqui, que é pago, ou o VDOPrint... Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alexandre Enviada em: quinta-feira, 24 de janeiro de 2008 15:15 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Converter Centimetros em Inteiro Deixa eu explicar melhor, fiz uma opção no meu sistema, para o usuário fazer a impressão da nota fiscal, ele define a margem superior e margem lateral de cada campo na impressão, estou usando o QuickReport, quero pegar o que o usuário colocou no programa em centimetros e passar para a propriedade TOP e LEFT do componente da impressão, entenderam?Só que a propriedade Top e Left do componente do QuickReport recebe um valor inteiro, e é óbvio que se o usuário colocar 4,5 cms vai dar pau na conversão, entendeu? Alex - Original Message - From: Alexandre Rodrigues To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Thursday, January 24, 2008 4:00 PM Subject: Re: [delphi-br] Converter Centimetros em Inteiro Cara, tu tá trocando as bolas, vamos voltar a 4º serie Centímetro é uma unidade de medidas, temos quilômetros, metros, centímetros e milímetros, etc. 1 metro tem 100 centímetros e 1 centímetro tem 10 milímetros. Agora converter Centímetro para inteiro é impossível, inteiro não uma unidade de medida. Agora digamos que tu tenhas 1,50 centímetros que um valor fracionário e você deseje retirar as duas casas decimais transformando esse valor em um numero inteiro, você pode multiplicar ele por 10 e teria 15, porém já não seriam mais centímetros e sim 15 milímetros. Entendeu? Alexandre escreveu: Pessoal alguem sabe como faço para converter um valor em centimetros em inteiro?? Alex [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo. http://br.yahoo.com/mailbeta/tudonovo/ com/mailbeta/tudonovo/ __ Information from ESET NOD32 Antivirus, version of virus signature database 2786 (20080112) __ The message was checked by ESET NOD32 Antivirus. http://www.eset. http://www.eset.com 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] URGENTE!!! Problemas com bloqueio de escrita na registry
Não conheço MySQL tão bem assim, mas presumo que o IP do cliente não tenha nada a ver com a conexão estabelecida, se tivesse, nenhum site usaria, certo? É esse mesmo o problema? Os outros bancos de dados, com os quais já tive experiência, não dependiam do IP do cliente, pelo menos... Mas se o Registry está bloqueado, escreva o arquivo necessário em alguma pasta escondida... é um solução mais simples do que passar pelo bloqueio do windows. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Jorge Ericsson Enviada em: quinta-feira, 24 de janeiro de 2008 14:39 Assunto: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry Olá amigos, Eu tenho um sistema instalado em um cliente a muito muito tempo que vinha funcionando corretamente, mas o administrador da empresa resolveu adotada uma politica de segurança devido a quantidade de vírus que esta infestando a rede. Uma dessas medidas foi a proibição da escrita na registry e retirando todos os usuários da rede como administrador da máquina. Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Espero ter sido claro no meu problema. Obs: Não gostaria de usar arquivo INI pois já tive sério problemas de exclusão de arquivos. Valew !!! -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsso http://www.jericsson.com.br n.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [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] URGENTE!!! Problemas com bloqueio de escrita na registry
Certo, legal. Então acho que a resposta do nosso amigo esta aí. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Eduardo Silva dos Santos Enviada em: quinta-feira, 24 de janeiro de 2008 20:37 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry Vitor, no Mysql ao criar um usuário vc pode determinar uma faixa de IP que o servidor vai aceitar;;; tipo se vc definir no campo host o valor 192.168.%.% o mysql so vai deixar o cliente conectar caso o IP dele seja 192.168.X.X para permitir que qualquer IP conecte ao servidor basta colocar % no campo Host.. Em 24/01/08, Vitor Redes vredesredsystem@ mailto:vredesredsystem%40yahoo.com.br yahoo.com.br escreveu: Não conheço MySQL tão bem assim, mas presumo que o IP do cliente não tenha nada a ver com a conexão estabelecida, se tivesse, nenhum site usaria, certo? É esse mesmo o problema? Os outros bancos de dados, com os quais já tive experiência, não dependiam do IP do cliente, pelo menos... Mas se o Registry está bloqueado, escreva o arquivo necessário em alguma pasta escondida... é um solução mais simples do que passar pelo bloqueio do windows. Vitor. _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br [mailto: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br] Em nome de Jorge Ericsson Enviada em: quinta-feira, 24 de janeiro de 2008 14:39 Assunto: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry Olá amigos, Eu tenho um sistema instalado em um cliente a muito muito tempo que vinha funcionando corretamente, mas o administrador da empresa resolveu adotada uma politica de segurança devido a quantidade de vírus que esta infestando a rede. Uma dessas medidas foi a proibição da escrita na registry e retirando todos os usuários da rede como administrador da máquina. Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Espero ter sido claro no meu problema. Obs: Não gostaria de usar arquivo INI pois já tive sério problemas de exclusão de arquivos. Valew !!! -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsso http://www.jericsso http://www.jericsson.com.br n.com.br n.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: eduardo.drd@ mailto:eduardo.drd%40gmail.com gmail.com Site: http://www.drdsiste http://www.drdsistemas.com/ mas.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] Re: Pegando o foco!!
Crie um serviço... veja se resolve, se precisar chamar a aplicação, o serviço faz isso quando necessário, se não ele fica só na escuta Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Leonardo Quinino Enviada em: quinta-feira, 24 de janeiro de 2008 20:30 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Re: Pegando o foco!! olha uma dica ahahah para fazer um spy de teclado:) Em 24/01/08, caionmoreno caionmoreno@ mailto:caionmoreno%40yahoo.com.br yahoo.com.br escreveu: O timer de 7 em 7 segundos executa o código: Webbrowser1.Refresh; E tem um timer de 1 em 1 segundo que verifica se a pessoa aperto a sequencia de teclas para mostrar o prog. Mas jah tentei desativar esse timer de 1 segundo e continuo perdendo foco! --- Em [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br, Eduardo Silva dos Santos [EMAIL PROTECTED] escreveu Fica dificil sem saber oq exatamente o Timer faz no momento da atualização... de mais detalhes ou mostra o código ae.. Em 24/01/08, caionmoreno [EMAIL PROTECTED] escreveu: Eu tenho uma aplicação que roda escondida com o form no hide! E com timer, que de tanto em tanto segundos ele atualiza uma coisa. Só que quando ele atualiza, o que eu esteja mexendo no pc (internet, programa, etc) perde o foco, eu to digitando alguma coisa, e do nada perde o foco! Alguém sabe o que pode estar causando isso? -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsiste http://www.drdsistemas.com/ mas.com/ ... [As partes desta mensagem que não continham texto foram removidas] -- Leonardo Quinino [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] Contabilidade + ERP
Que grande colaboração essa sua hein? Mas respondendo: Procure em sites de download, ou em sites para desenvolvedores, tem muitos sistemas de contabilidade grátis, ou sharewares da vida, a partir deles você pode ter uma idéia melhor do que fazer, de onde partir etc... Tem alguns sites que disponibilizam tutorias de contabilidade básica também. Por exemplo: http://www.google.com.br/search?sourceid=navclient http://www.google.com.br/search?sourceid=navclienthl=pt-BRie=UTF-8rlz=1T 4ADBF_pt-BRBR243BR243q=contabilidade+tutoriais hl=pt-BRie=UTF-8rlz=1T4ADBF_pt-BRBR243BR243q=contabilidade+tutoriais Mas acho que o melhor esquema é baixar os sistemas e dar uma olhada... Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Davi Eduardo Borges Wall Enviada em: terça-feira, 15 de janeiro de 2008 10:14 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Contabilidade + ERP Podes começar utilizando acentuação no seu texto. De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Samuel M. Basso Enviada em: terça-feira, 15 de janeiro de 2008 10:39 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br; lista-delphi@ mailto:lista-delphi%40yahoogrupos.com.br yahoogrupos.com.br Assunto: [delphi-br] Contabilidade + ERP Bom dia a todos!! Tenho um sistema erp e estou com interesse de acrescentar contabilidade nele, entao gostaria de pedir algumas dicas, ideias ou alguns exemplos e softwares demonstrativos para eu analisar e bolar esta ideia, a principio minha ideia é colocar plano de contas no sistema e a cada compra, venda, contas receber e pagar adicionar uma conta credito e a conta debito para no final do mes simplismente gerar relatorios pronto de balancete, dre etc. Nao tenho muito conhecimento em contabilidade mas pelo pouco que andei pesquisando essa foi minha primeira ideia, entao querendo trocar ideias com alguem que conheça. Grato. -- Atenciosamente, Samuel M. Basso Tel: (54) 3452-9126 Cel: (54) 8135-3723 E-mail: samuelbasso@ mailto:samuelbasso%40gmail.com gmail.com mailto:samuelbasso%40gmail.com MSN: samuelbasso@ mailto:samuelbasso%40gmail.com gmail.com mailto:samuelbasso%40gmail.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] Ajuda com Boleto
CobreBemX. É barato e certeiro, você pode dividir o custo com seus clientes fazendo-os pagar a licença de uso etc... Dê uma olhada... Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Marcelo Macorim Enviada em: terça-feira, 15 de janeiro de 2008 16:52 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Ajuda com Boleto Amigos da lista, preciso da ajuda da experências de vocês. Tempos atrás, fiz em minha aplicação imprimir boleto utilizando o componente RlBoleto. Bom, fazendo os testes, foi impresso um boleto e pago este, mas este não entrou na conta. Hoje, fazendo mais alguns testes, peguei um boleto contínuo do Bradesco, peguei suas informações (nosso número, dígito conta e etc) e joguei no RlBoleto. E pra espanto, ele não gerou para alguns campos as mesmas informações do formulário contínuo. Os amigos me indicam o componente RlBoleto? Alguém utiliza o RlBoleto e passou por problema semelhante? Em um outroa alternativa, qual componente vocês me indicariam? Estou desesperado por isso, pois 3 clientes estão na espera. Desde já agradeço a todos pela atenção. [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Re: Dados de um Dbgrid para outro Dbgrid de Outro Form!
Tanto faz, você tem que incluir diretamente na tabela... ou usar um clientdataset em memória... para criar um em memória, faz o seguinte: If clientdataset.active then Clientdataset.emptydataset() Else Clientdataset.createdataset(); Dae faz o que você quiser... Mas inclusão com TQuery dinâmica, acho que não vai funcionar muito bem não, vc vai ter que dar um INSERT, depois um SELECT, se o cara alterar, um UPDATE... fica meio complexo demais, sem necessidade... utilize um TClientDataSet, ligado a um TDataSetProvider, ligado a um TQuery... você vai ser mais feliz nesse caso... Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de rafaelpinto19 Enviada em: sexta-feira, 11 de janeiro de 2008 11:27 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Re: Dados de um Dbgrid para outro Dbgrid de Outro Form! Eu não estou usando ClientDataSet, estou usando Query Dinâmico(SQL cru). É possível fazer com Query DinÂmico? --- Em [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br, Vitor Redes [EMAIL PROTECTED] escreveu Agora explicou... mas seguinte, você não vai fazer isso direto no DBGrid nunca, o DBGrid depende absolutamente de um componente de acesso a dados, ou físicos, ou em memória... então você tem que inserir diretamente no TDataSet... por exemplo: Se o cliente selecionar o Produto Nº: 5556BX88 Você vai passar pro outro form o seguinte: FORM2.ClientDataSet.Insert(); FORM2.ClientDataSet.FieldByName( `PRODUTO' ).AsString := FORM1.ClientDataSet.FieldByName( `PRODUTO' ).AsString; FORM2.ClientDataSet.FieldByName( `OUTRO' ).AsDateTime := NOW; FORM2.ClientDataSet.FieldByName( `OUTRO2' ).AsString := `Johnny be good'; FORM2.ClientDataSet.Post(); FORM2.ClientDataSet.ApplyUpdates( 0 ); Vitor. _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de rafaelpinto19 Enviada em: sexta-feira, 11 de janeiro de 2008 10:23 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: [delphi-br] Re: Dados de um Dbgrid para outro Dbgrid de Outro Form! Já tentei apontar sim, mas acontece que fazendo isso, ao fazer a consulta, o DBgrid do Form de Destino, vai exibir todos os dados de todos os registros do Dbgrid do Form de Origem e não é isso que eu quero, quero só que dados de apenas um registro, o registro selecionado pelo usuário com um DuploClick, vá para o DbGrid de Form de Destino. Consegui explicar legal?? --- Em [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br, Valfrid-Ly Silva Couto valfrid_ly@ escreveu Já tentou apontar para o mesmo DataSource?! rafaelpinto19 rafaelpinto@ escreveu: Oi Pessoal, estou com problema para pasar Dados de Um Dbgrid de um Form para outro Dbgrid que fica no Outro form. Já tentei de Várias maneiras, mas só está dando erro. Já pesquisei varias vezes na Internet e não obtive resultado sobre este problema. Agradeço a atenção!!! Rafael. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos - 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] [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] Re: Dados de um Dbgrid para outro Dbgrid de Outro Form!
Agora explicou... mas seguinte, você não vai fazer isso direto no DBGrid nunca, o DBGrid depende absolutamente de um componente de acesso a dados, ou físicos, ou em memória... então você tem que inserir diretamente no TDataSet... por exemplo: Se o cliente selecionar o Produto Nº: 5556BX88 Você vai passar pro outro form o seguinte: FORM2.ClientDataSet.Insert(); FORM2.ClientDataSet.FieldByName( PRODUTO ).AsString := FORM1.ClientDataSet.FieldByName( PRODUTO ).AsString; FORM2.ClientDataSet.FieldByName( OUTRO ).AsDateTime := NOW; FORM2.ClientDataSet.FieldByName( OUTRO2 ).AsString := Johnny be good; FORM2.ClientDataSet.Post(); FORM2.ClientDataSet.ApplyUpdates( 0 ); Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de rafaelpinto19 Enviada em: sexta-feira, 11 de janeiro de 2008 10:23 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Re: Dados de um Dbgrid para outro Dbgrid de Outro Form! Já tentei apontar sim, mas acontece que fazendo isso, ao fazer a consulta, o DBgrid do Form de Destino, vai exibir todos os dados de todos os registros do Dbgrid do Form de Origem e não é isso que eu quero, quero só que dados de apenas um registro, o registro selecionado pelo usuário com um DuploClick, vá para o DbGrid de Form de Destino. Consegui explicar legal?? --- Em [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br, Valfrid-Ly Silva Couto [EMAIL PROTECTED] escreveu Já tentou apontar para o mesmo DataSource?! rafaelpinto19 [EMAIL PROTECTED] escreveu: Oi Pessoal, estou com problema para pasar Dados de Um Dbgrid de um Form para outro Dbgrid que fica no Outro form. Já tentei de Várias maneiras, mas só está dando erro. Já pesquisei varias vezes na Internet e não obtive resultado sobre este problema. Agradeço a atenção!!! Rafael. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos - 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] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Como criar tabelas no Firebird ?
Tem o IBEasy que é de grátis Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Andrei Luís Enviada em: quinta-feira, 27 de dezembro de 2007 10:51 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Como criar tabelas no Firebird ? Cara, uma sugestão: investe no livro Firebird Essencial do Carlos Cantu e/ou no livro Firebird 2 do mesmo autor. Não são caros e tu ser muito útil pra ti que está começando nesse ótimo banco que é o Firebird. Apenas complementando o que o Robson postou, a Firebase tem uma lista de discussão sobre Firebird muito boa, e é mantida pelo mesmo Carlos Cantu acima citado, que como o Walter diria: É um xiita no que se refere a defender e divulgar o Firebird. (brincadeira Walter). Uma coisa legal do IBExpert que o Robson mencionou, é que você monta as tabelas visualmente, como no Database Desktop, e ao terminar ele te mostra o SQL que foi montado e será executado para criar a tabela. Com isso você já vai aprendendo. Coloquei na seção Arquivos do grupo, uma apostila básica de SQL que me ajudou bastante a uns anos atrás quando, assim como você, saí do Paradox para o Firebird. [] Andrei Em 27/12/07, Leone Oliveira[EMAIL PROTECTED] mailto:lbdeo%40hotmail.com com escreveu: Galera é o seguinte, Eu já fiz vários programas comerciais e todos uso a tabela Paradox... Muitos dos clientes querem q o programa funcione em rede, e daí eu faço uma gambiarra pra poder rodar o paradox em rede.. Fiquei sabendo q o Firebird é ótimo pra essas coisas, mas pra falar a verdade num sei nem como se cria uma tabela nele.. hehehehehe alguém pode me dar uma luz? valeu.. __ [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Como criar tabelas no Firebird ?
Tem em qualquer site de download, ou procura no google. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Leone Oliveira Enviada em: quinta-feira, 27 de dezembro de 2007 13:31 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Como criar tabelas no Firebird ? Onde baixo o IBEasy ? - Original Message - From: Vitor Redes To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Thursday, December 27, 2007 1:20 PM Subject: RES: [delphi-br] Como criar tabelas no Firebird ? Tem o IBEasy que é de grátis Vitor. _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Andrei Luís Enviada em: quinta-feira, 27 de dezembro de 2007 10:51 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: Re: [delphi-br] Como criar tabelas no Firebird ? Cara, uma sugestão: investe no livro Firebird Essencial do Carlos Cantu e/ou no livro Firebird 2 do mesmo autor. Não são caros e tu ser muito útil pra ti que está começando nesse ótimo banco que é o Firebird. Apenas complementando o que o Robson postou, a Firebase tem uma lista de discussão sobre Firebird muito boa, e é mantida pelo mesmo Carlos Cantu acima citado, que como o Walter diria: É um xiita no que se refere a defender e divulgar o Firebird. (brincadeira Walter). Uma coisa legal do IBExpert que o Robson mencionou, é que você monta as tabelas visualmente, como no Database Desktop, e ao terminar ele te mostra o SQL que foi montado e será executado para criar a tabela. Com isso você já vai aprendendo. Coloquei na seção Arquivos do grupo, uma apostila básica de SQL que me ajudou bastante a uns anos atrás quando, assim como você, saí do Paradox para o Firebird. [] Andrei Em 27/12/07, Leone Oliveira[EMAIL PROTECTED] mailto:lbdeo%40hotmail.com com escreveu: Galera é o seguinte, Eu já fiz vários programas comerciais e todos uso a tabela Paradox... Muitos dos clientes querem q o programa funcione em rede, e daí eu faço uma gambiarra pra poder rodar o paradox em rede.. Fiquei sabendo q o Firebird é ótimo pra essas coisas, mas pra falar a verdade num sei nem como se cria uma tabela nele.. hehehehehe alguém pode me dar uma luz? valeu.. __ [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] OFFTOPIC - sobre a preguiça
Ah Rubem, nada a ver, ninguém questiona suas colaborações, só que os comentários não precisam estar em todas as mensagens... Discussões maduras nunca foram o forte de uma lista de discussões (ao menos dessa). Vai ser muito difícil ver por aqui uma discussão acadêmica sobre algum assunto, ou qualquer coisa do tipo. Mas só porque perguntam, não quer dizer que não procuram, no começo é assim mesmo... depois de bater a cabeça é que todo mundo aprende onde procurar... ninguém nasceu sabendo onde encontrar. As vezes da raiva de algumas perguntas, mas o negócio é deixar rolar o assunto, alguém sempre responde. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Rubem Nascimento da Rocha Enviada em: quarta-feira, 19 de dezembro de 2007 22:33 Para: delphi-br@yahoogrupos.com.br Assunto: RE: [delphi-br] OFFTOPIC - sobre a preguiça Prioridade: Alta OK, senhores. Peço desculpas pela minha autenticidade e honestidade perante todos. Peço desculpas por querer que a lista se torne um local de verdadeiras discussões maduras e técnicas, ao invés de um helpdesk na faixa. Recolher-me-ei a minha inginificância e darei por encerrada minhas colocações sobre tais tópicos. Vou atuar apenas como um observador nesta lista. Boas Festas a todos. Sds. To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br From: [EMAIL PROTECTED] mailto:valdirdill%40infolivre.com.br e.com.br Date: Wed, 19 Dec 2007 22:08:57 -0300 Subject: Re: [delphi-br] OFFTOPIC - sobre a preguiça Muito bem João. De novo você acertou em cheio. Valdir - Original Message - From: Joao Morais To: Sent: Wednesday, December 19, 2007 9:38 PM Subject: [delphi-br] OFFTOPIC - sobre a preguiça Rubem Nascimento da Rocha wrote: Se vejo que a pergunta tem o cunho de obter a coisa pronta, ou percebo que existe preguiça, eu chuto o balde mesmo! Não deixo de dar uma ajuda, mas tb dou minha puxada de orelha! E pq faço isso? Pra ver se o povo se toca e, de fato, verdadeiramente, pesquise a exaustão antes de simplesmente lançar dúvidas e dúvidas na lista Poizé. Mas primeiro que isso não atinge o seu alvo (o preguiçoso), e você ainda entrega a resposta. Se você julga a pergunta imbecil, ignore a pergunta. A melhor forma de educar uma pessoa para que faça a pesquisa é obriga-la a pesquisar, e ao responder você não colabora com isto. Não concorda? Você também pode colaborar trocando o subject da mensagem (tal qual pregado por você). Se não for pedir muito, estamos há muito tempo trocando mensagens inúteis nessa lista, e tudo tem começado com estes gritos inúteis na mensagem. Deixo esta última participação pública para fazer dois pedidos: - parem de tentar salvar o mundo, existem ongs nas quais vocês podem se associar (a Delphi-BR não é uma delas); - parem com bate boca inútil e totalmente fora do tópico da lista. As demais mensagens serão enviadas em private a quem insistir em ignorar as regras. -- Joao Morais -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.17.4/1189 - Release Date: 18/12/2007 21:40 -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups. http://br.groups.yahoo.com/group/delphi-br/messages yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: delphi-br-owner@ mailto:delphi-br-owner%40yahoogrupos.com.br yahoogrupos.com.br Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups. http://br.groups.yahoo.com/group/delphi-br/ yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: delphi-br-unsubscri mailto:delphi-br-unsubscribe%40yahoogrupos.com.br [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo. http://br.yahoo.com/info/utos.html com/info/utos.html __ Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger! http://www.amigosdo http://www.amigosdomessenger.com.br/ messenger.com.br/ [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Dúvidas sobre DLL
O que você pode fazer é construir as rotinas de impressão em packages, quando o package existir, a dll deve existir também... Procure sobre construção de packages no google mesmo, é simples de fazer. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Jaques Dix Enviada em: sexta-feira, 14 de dezembro de 2007 14:30 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Dúvidas sobre DLL Pessoal, Boa tarde.. Tenho um sistema que imprime nas impressoras ECF. Para a comunicação existe um DLL. Porém, não são todos os clientes que usam esse recurso. Mesmo assim ele devem ter a DLL no diretório do executável senão ele não executa. Existe algum coisa que eu possa fazer para que o sistema reconheça se precisa ou não dessa DLL? [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Delphi download
Pergunta Pacífica: É necessário tanto suporte assim? Ao que me parece existe uma série de interpretações estranhas do que vem a ser suporte. Todos os bugs reportados, ao menos os que li sobre, são bugs que podem ser concertados sem que ninguém saia prejudicado, então porque raios as pessoas precisam de tanto suporte? Será que aprendem com os Usuários e quando se tornam um não param de ligar também? Não sou defensor de ninguém, mas autonomia é uma coisa a se pregar por aqui, que isso. Vitor. [As partes desta mensagem que não continham texto foram removidas]
RES: RES: [delphi-br] Ajuda!! lógica Calculo
O Tipo Date é um disfarce, hehehehe Faça o teste, coloque um botão na tela e no código digite assim: Var VVariavel : TDate; Begin VVariavel := DATE + 2; VVariavel := VVariavel 1; End; Coloque um breakpoint e veja o valor... ou procure no help do delphi. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de eu_sossego Enviada em: terça-feira, 11 de dezembro de 2007 23:34 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] Ajuda!! lógica Calculo desculpe me intrometer mas ... o edita 2 esta digitado fora dos parenteses floattostr quando na verdade o campo dentro dos parenteses e date e nao float ou estou enganado - Original Message - From: André Moraes - GMail andrefmoraes@ mailto:andrefmoraes%40gmail.com gmail.com To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Tuesday, December 11, 2007 4:49 PM Subject: Re: RES: [delphi-br] Ajuda!! lógica Calculo Coloque 3 edits no form e um botao. No botao coloque o seguinte código: Edit2.Text := FloatToStr(date-StrToDate(Edit1.Text)) ; Edit3.Text := FloatToStr(trunc((date-StrToDate(Edit1.Text))/365.25)) ; Edit2 vai receber o numero de dias Edit3 vai receber a idade em anos - Original Message - From: itasouza [EMAIL PROTECTED] mailto:itasouza%40yahoo.com.br com.br To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Tuesday, December 11, 2007 4:38 PM Subject: Re: RES: [delphi-br] Ajuda!! lógica Calculo Coloquei no onExit do EditDatNascimento o código: EditIdade.Text:= Inttostr(Date - StrToDate(EditDataNascimento.text)); O mesmo gera erro e não compila Alguém saberia uma alternativa? Agradeço!! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.17.1/1181 - Release Date: 11/12/2007 17:05 [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] [OFF TOPIC] revista
Eu acho que o pessoal fala mal porque a clubedelphi não publica mais os mesmos artigos que publicava a 5 anos atrás. Sempre assim... Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Rubem Nascimento da Rocha Enviada em: terça-feira, 11 de dezembro de 2007 11:04 Para: delphi-br@yahoogrupos.com.br Assunto: RE: [delphi-br] [OFF TOPIC] revista Prioridade: Alta ClubeDelphi já foi melhor? Fala sério! A qualidade editorial da revista tem melhorado significativamente, fora tb as vídeo-aulas que os assinantes podem ter acesso! Sacanagem dizer isso da ClubeDelphi! ActiveDelphi pode ser boa, mas desmerecer a ClubeDelphi, acho muita injustiça! O trabalho da DevMedia é excepcional! Sds. To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br From: willian.leal@ mailto:willian.leal%40gmail.com gmail.com Date: Tue, 11 Dec 2007 08:33:28 -0200 Subject: Re: [delphi-br] [OFF TOPIC] revista Olha cara eu não sou assinante da Active Delphi mais pelo que sei são gente séria, tanto que a Borland apoia a Revista e todos os anos eles estão presentes na Borcon, apoiando o evento. Estou pensando em cancelar a minha assinatura do ClubeDelphi que já foi melhor, e assinar a ActiveDelphi, que pelo que vi está muito boa. []s Willian Leal Em 11/12/07, felipe govoni felipehietala@ mailto:felipehietala%40gmail.com gmail.com escreveu: gostaria da opiniao dos colegas sobre a revista active delphi, vale a pena assinar? e é confiavel assinar por telefone? -- Felipe Govoni -- Desenvolvedor Delphi e Php [As partes desta mensagem que não continham texto foram removidas] -- Willian Leal Desenvolvedor de Softwares MSN: willian_leal@ mailto:willian_leal%40hotmail.com hotmail.com Celular:(32) 8409 - 3077 [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.amigosdo http://www.amigosdomessenger.com.br messenger.com.br [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] SOCORRO: Gravar dados no Banco de Dados
Não sei como seu banco está configurado, mas se você gravar dois registros com o valor 0, o banco com certeza vai retornar violação de chave né... Dê mais informações, está utilizando trigger? Algum tipo de função no banco? Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de william.designer Enviada em: terça-feira, 11 de dezembro de 2007 11:39 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] SOCORRO: Gravar dados no Banco de Dados tenho os seguintes componentes em um Data module, um SQLConection, um SQLDataSet{SQLcadLista}, um DataSetProvider{DSPcadLista} e um ClientDataset{CDScadLista} Criei um formulario a partir dos campos do meu ClienteDataset... e Criei um botão para Salvar e coloque o seguinte código no Onclick do botão.. if DNNConexao.CDScadListaProgCOD.IsNull then begin DNNConexao.CDScadListaProgCOD.Value := 0; DNNConexao.CDScadListaProg.ApplyUpdates(-1); DNNConexao.CDScadListaProg.Open; DNNConexao.CDScadListaProg.Close; end else DNNConexao.CDScadListaProg.ApplyUpdates(-1); Fechar:=true; Close; O primeiro registro ele salva normal...mas quando tenho cadastrar um novo registro ele dá a seguinte mensagem... Project NomeProjeto.exe raised exception class EDBClient with message 'KeyViolation.'. Process stop. Use step or run to continue. Será que alguem pode me ajudar onde eu estou errando... [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] ClientDataSet VALOR DEFAULT
Criar em memória quer dizer que não existe vínculo direto com nenhuma base de dados, por exemplo: CDS.CreateDataSet(); CDS.Insert(); CDS.FieldByName( CODIGO ).AsInteger := 1; CDS.FieldByName( NOME ).AsString := Nome qualquer; CDS.Post(); Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Daniel Bastos Enviada em: terça-feira, 11 de dezembro de 2007 17:21 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] ClientDataSet VALOR DEFAULT mas quando vc diz que está criando em memória, vc quer dizer que ele não tem ligação com um provider ou que está criando ele por código? Abs Daniel A. Bastos Em 11/12/07, Juliano Silva - Yahoo [EMAIL PROTECTED] mailto:smjjuliano%40yahoo.com.br com.br escreveu: Não, estou criando um DataSet de memória... _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br [mailto: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br] Em nome de Frota C. Júnior Enviada em: terça-feira, 11 de dezembro de 2007 10:41 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] ClientDataSet VALOR DEFAULT Imagino que vc está acessando um banco de dados, e se for firebird, eu resolvi este problema usando no select select coalesce(campo01, 0) from tabela, o coalesce envia para o dataset o valor 0 (zero) quando o mesmo for nulo, assim nunca será nulo, mesmo em se tratando dos campo agregados, mas isso resolve o problema de uma consulta que retornou registros e que tenha uma ou mis colunas nulas, para o caso do select não retornar nulo isso não funcionará. Outra solução é você criar um campo calculado no ClientDataSet e atribui-lo o valor do campo agregado mediante um teste para verificar se o mesmo é nulo, se for basta incrementar zero. Espero ter ajudado. Cordialmente Frota C. Júnior www.apoio.eti.br -- From: Juliano Silva - Yahoo [EMAIL PROTECTED] mailto:smjjuliano%40yahoo.com.br com.br Sent: Tuesday, December 11, 2007 8:56 AM To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Subject: [delphi-br] ClientDataSet VALOR DEFAULT Pessoal Tenho um campo AGGREGATE no ClientDataSet que faz a soma de uma coluna de valores, tenho um TDBText ligado e este campo agregate, quero deixar ele com o valor 0,00 quando não houver nenhum registro, já mexi um monte no ClientDataSet no campo Agregate para fazer isso, mas não estou conseguindo... Já usei a propriedade DEFAULT mas não estou conseguindo... Juliano Silva [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Array
Não que seja gambi, mas que deve ser evitado sempre que possível deve. Geralmente uma estrutura com Exit ou Break tem alguma falha antes da chamada e por isso os breaks tornam-se necessários. Mas quando não há saída, acredito que não tem problema, algumas estruturas necessitam disso e se seu professor negar, tem que dar 0 é pra ele. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alessandro DUARTE de Moraes Enviada em: quinta-feira, 29 de novembro de 2007 08:28 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Array Break é gambiarra! Meu professor de Estruturas de Programação dava zero na nota do trabalho se visse algum break no programa. Alessandro DUARTE de Moraes A.C. Santa Casa do Rio Grande. http://www.santacas http://www.santacasarg.com.br arg.com.br - Original Message - From: Luciano Topolniak To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Wednesday, November 28, 2007 6:43 PM Subject: RES: [delphi-br] Array E que tal for com break? []'s Topolniak. De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de BandaLemuel Enviada em: quarta-feira, 28 de novembro de 2007 15:58 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: Re: [delphi-br] Array ok.. Obrigado pela dica. - Original Message - From: Alessandro DUARTE de Moraes To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Wednesday, November 28, 2007 4:45 PM Subject: Re: [delphi-br] Array Cara, ao invés de usar o FOR usa o WHILE ... + ou - assim: var bAchei : boolean; x := 0; bAchei := false; while ((not bAchei) and (xLength(array)-1)) do begin bAchei := (array[x]=valor); inc(x); end neste caso se o array tem 1000 elementos e o valor que procuras está no quinto elemento, só vai executar o loop 5 vezes ... Alessandro DUARTE de Moraes A.C. Santa Casa do Rio Grande. http://www.santacas http://www.santacasarg.com.br arg.com.br - Original Message - From: BandaLemuel To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Wednesday, November 28, 2007 9:23 AM Subject: [delphi-br] Array Lista Tem alguma forma de saber se existe um determinado valor em um array sem ter que passar por ele inteiro ??? posso usar assim for x := 0 to length ( array) - 1 do begin if array[x] = valor then result := True else result := False ; end Mas queria algo mais pratico vlw.. Wesley [As partes desta mensagem que não continham texto foram removidas] -- E-mail Seguro Vetorial.net Mensagem classificada como NÃO-SPAM. Para classificar como SPAM, encaminhe para [EMAIL PROTECTED] mailto:spam%40vetorial.net net mailto:spam%40vetorial.net Chave de Identificação: 54568,474d626d294911802914784 [As partes desta mensagem que não continham texto foram removidas] -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.16.9/1155 - Release Date: 27/11/2007 20:30 [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- E-mail Seguro Vetorial.net Mensagem classificada como NÃO-SPAM. Para classificar como SPAM, encaminhe para [EMAIL PROTECTED] mailto:spam%40vetorial.net net Chave de Identificação: 54568,474df075170179425078721 [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] Function validação de cpf/cnpj
É galera, o querido numerozinho de CPF que permite sempre, testes e mais testes existe mesmo: No do CPF: 111.111.111-11 Situação Cadastral: CANCELADA Vitor Redes _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Eduardo Silva dos Santos Enviada em: quarta-feira, 21 de novembro de 2007 07:08 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Function validação de cpf/cnpj Diego, faz o seguinte, vai no site da receita federal na parte de consulta de CPF e consilta do 1 ate 99 pra vc ver uma coisa, conforme o resultado de lá vc implementa na sua rotina. Em 21/11/07, Diego Seleguim [EMAIL PROTECTED] mailto:seleguim%40gmail.com com escreveu: É Rubem, sem dúvida, vc está certo! Mas sem generalizar, me referi apenas a validação do algorítimo! Penso que a função deveria fazer nada mais que, verificar se o CPF é verdadeiro ou não! E no caso, 111 não é um CPF válido! Em 21/11/07, Rubem Nascimento da Rocha djpardalrocha@ mailto:djpardalrocha%40hotmail.com hotmail.comdjpardalrocha%40hotmail.com escreveu: Uma coisa é o número do CPF ser válido pelo algoritmo; Outra coisa é ele ser válido para o seu cadastro de acordo com as regras do banco de dados ou das regras de negócio que seu aplicativo deve obedecer e/ou observar. Sds. To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.brdelphi-br%40yahoogrupos.com.br From: [EMAIL PROTECTED] mailto:seleguim%40gmail.com com seleguim%40gmail.com seleguim%40gmail.com Date: Wed, 21 Nov 2007 00:50:12 -0200 Subject: Re: [delphi-br] Function validação de cpf/cnpj Marcelo suas funções me ajudaram também, fico agradecido! Queria comentar também que a função CPF, quando digitada uma sequência de dados iguais, isto é, 11, ele valida como True! Fica a pergunta, existe algum problema qto a isso vcs acham? Abraços a todos! [As partes desta mensagem que não continham texto foram removidas] __ Receba as últimas notícias do Brasil e do mundo direto no seu Messenger com Alertas MSN! É GRÁTIS! http://alertas. http://alertas.br.msn.com/ br.msn.com/ [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: eduardo.drd@ mailto:eduardo.drd%40gmail.com gmail.com Site: http://www.drdsiste http://www.drdsistemas.com/ mas.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] Banco Firebird na NET
Depende de como seu banco de dados foi construído, acredito que executável local e banco no servidor, independentemente de onde seja é sempre bem melhor, mas como eu disse antes, depende de como o banco foi construído e depende de como o sistema lida com o banco. Se você usa Stored Procedures e Triggers com freqüência, então é uma boa, se não, acho que terminal service é melhor mesmo. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alosi yahoo Enviada em: quinta-feira, 22 de novembro de 2007 22:06 Para: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br; firebird-br Assunto: [delphi-br] Banco Firebird na NET Gostaria de saber de alguem que ja tenha tido experiencia com bancos firebird na net. Seria disponibilizado um servidor com 5Mbps de Down e 1Mbps de Up, onde poderia ser configurado linux ou Windows 2003(tem algumas opçoes) Qual a melhor opçao? Manter o executavel local no micro do usuario e acessar o banco firebird na net no micro com linux ou Acessar o servidor via Terminal Server do Windows 2003 com o executavel e banco nesse servidor na net? Alguem tem alguma opiniao? Pelo que podemos ver em termos de trafego de dados, no Terminal Server, o trafego do servidor com o cliente parece menor, procede minha colocaçao? Obrigado Alosi [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: RES: [delphi-br] PEGAR LINHA DE CÓDIGO
Teoricamente é só pegar o código dos componentes em questão e adapta-los, com certeza os componentes fazem mais coisas do que você precisa, ou menos... então adaptar é sempre melhor... Mas uma sugestão... Essa história de não usar componentes de terceiros eu acho uma má idéia... fica reinventando a roda a todo momento não é nada produtivo e a maioria dos componentes que o pessoal usa, são componentes comprovadamente bons, então... Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Leonardo Quinino Enviada em: quarta-feira, 21 de novembro de 2007 22:08 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] PEGAR LINHA DE CÓDIGO Sim, a minha pergunta é se existe o recurso nativo do delphi , esses componentes são de terceiros. Ultimamente, estou tentando deixar os meus códigos mais puritanos possível. Mas de toda forma, vou dr uma olhada no material. Em 21/11/07, Eduardo Silva dos Santos eduardo.drd@ mailto:eduardo.drd%40gmail.com gmail.com escreveu: Olá Leonardo, com delphi da um trabalhinho mais da pra fazer a mesma coisa, eu uso o Exceptional Magic e ta me atendendo bastante. Tem também o EurekaLog, MadException.. http://www.dimuswar http://www.dimusware.com/products/excmagic/index.html e.com/products/excmagic/index.html Em 21/11/07, Leonardo Quinino leonardo.quinino@ mailto:leonardo.quinino%40gmail.com gmail.comleonardo.quinino%40gmail.com escreveu: Eu usava isso no velho clipper, nesse aspecto, no delphi, me faz falta, a utilidade boa desse tipo de solução seria, se poder rodar isso em runtime no usuário final do aplicativo, porque a coisas mais dificil, é a a informação de um erro chegar corretamente ao suporte, se temos em mãos o exato local do problema, é muito mais prático dar um retorno ao pessoal do suporte de campo (in loco). Em 19/11/07, Alexandre Rodrigues alexandre_rodrigues mailto:alexandre_rodrigues_poa%40yahoo.com.br [EMAIL PROTECTED]alexandre_rodrigues_poa%40yahoo.com.br alexandre_rodrigues_poa%40yahoo.com.br escreveu: Isso é uma coisa que sinto falta no delphi. No java, por ser uma linguagem interpretada, sempre que ocorre uma exeção ele mostra a linha na qual a mesma ocorreu. Davi Eduardo Borges Wall escreveu: Se você está querendo usar isso para mostrar a linha que aconteceu um erro, eu aconselharia a utilizar Assert! Procure pela net por Assertion muitas empresas utilizam esta técnica. De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.brdelphi-br%40yahoogrupos.com.brdelphi-br%4 0yahoogrupos.com.brmailto: delphi-br%40yahoogrupos.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.brdelphi-br%40yahoogrupos.com.brdelphi-br%40yahoogrupos.com.brde lphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br] Em nome de sampaiobrito Enviada em: segunda-feira, 19 de novembro de 2007 16:13 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.brdelphi-br%40yahoogrupos.com.brdelphi-br%4 0yahoogrupos.com.brmailto: delphi-br%40yahoogrupos.com.br Assunto: [delphi-br] PEGAR LINHA DE CÓDIGO Amigos, há uma forma de pegar o nº da linha de código de execução no delphi em runtime? Desde já agradeço a colaboração! [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo. http://br.yahoo.com/mailbeta/tudonovo/ com/mailbeta/tudonovo/ -- Leonardo Quinino [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: eduardo.drd@ mailto:eduardo.drd%40gmail.com gmail.com eduardo.drd%40gmail.com Site: http://www.drdsiste http://www.drdsistemas.com/ mas.com/ ... [As partes desta mensagem que não continham texto foram removidas] -- Leonardo Quinino [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] Mostrar mensagem se Caps Lock estiver ligada
Pra isso você tem que declarar a XPMan na uses. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Celso Lorenzetti - GMail Enviada em: quarta-feira, 14 de novembro de 2007 16:22 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Mostrar mensagem se Caps Lock estiver ligada Olá Davi, e aquela que o XP apresenta, tem como utilizar ela? Assim como você escreveu eu já faço Obrigado. Att, Celso Lorenzetti Analista de Sistemas msn: celsolorenzetti@ mailto:celsolorenzetti%40ibest.com.br ibest.com.br -- SysRS Tecnologia da Informação Ltda. www.sysrs.com.br - Original Message - From: Davi Eduardo Borges Wall To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Wednesday, November 14, 2007 3:00 PM Subject: RES: [delphi-br] Mostrar mensagem se Caps Lock estiver ligada No Evento onEnter do Edit, verifique se a tecla Caps Lock está ligada, neste momento vc pode gerar um balão ou uma mensagem avisando que caixa alta está ligada. De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Celso Lorenzetti - GMail Enviada em: quarta-feira, 14 de novembro de 2007 16:49 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: [delphi-br] Mostrar mensagem se Caps Lock estiver ligada Boa tarde galera, alguém sabe me dizer como fazer para mostrar aquela mensagem do windows de que Caps Lock está ligada quando for um campo de senha? Obrigado. Att, Celso Lorenzetti Analista de Sistemas msn: celsolorenzetti@ mailto:celsolorenzetti%40ibest.com.br ibest.com.br mailto:celsolorenzetti%40ibest.com.br -- SysRS Tecnologia da Informação Ltda. www.sysrs.com.br [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Mostrar mensagem se Caps Lock estiver ligada
Putz, Delphi6 eu não sei não. Na Paleta de componentes Win32, tem um componente que se chama XPManifest, é dele que esta unit vem... Se o componente existir blz, se não não... tem que fazer uma gambi aí, ver se o componente é Free e instalar no seu Delphi ou coisa assim. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Celso Lorenzetti - GMail Enviada em: quarta-feira, 14 de novembro de 2007 16:36 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Mostrar mensagem se Caps Lock estiver ligada Olá Vitor, Essa unit vem com o Delphi? Eu utilizo o Delphi 6 ainda... Att, Celso Lorenzetti Analista de Sistemas msn: celsolorenzetti@ mailto:celsolorenzetti%40ibest.com.br ibest.com.br -- SysRS Tecnologia da Informação Ltda. www.sysrs.com.br - Original Message - From: Vitor Redes To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Wednesday, November 14, 2007 4:24 PM Subject: RES: [delphi-br] Mostrar mensagem se Caps Lock estiver ligada Pra isso você tem que declarar a XPMan na uses. Vitor. _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Celso Lorenzetti - GMail Enviada em: quarta-feira, 14 de novembro de 2007 16:22 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: Re: [delphi-br] Mostrar mensagem se Caps Lock estiver ligada Olá Davi, e aquela que o XP apresenta, tem como utilizar ela? Assim como você escreveu eu já faço Obrigado. Att, Celso Lorenzetti Analista de Sistemas msn: celsolorenzetti@ mailto:celsolorenzetti%40ibest.com.br ibest.com.br -- SysRS Tecnologia da Informação Ltda. www.sysrs.com.br - Original Message - From: Davi Eduardo Borges Wall To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Wednesday, November 14, 2007 3:00 PM Subject: RES: [delphi-br] Mostrar mensagem se Caps Lock estiver ligada No Evento onEnter do Edit, verifique se a tecla Caps Lock está ligada, neste momento vc pode gerar um balão ou uma mensagem avisando que caixa alta está ligada. De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Celso Lorenzetti - GMail Enviada em: quarta-feira, 14 de novembro de 2007 16:49 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: [delphi-br] Mostrar mensagem se Caps Lock estiver ligada Boa tarde galera, alguém sabe me dizer como fazer para mostrar aquela mensagem do windows de que Caps Lock está ligada quando for um campo de senha? Obrigado. Att, Celso Lorenzetti Analista de Sistemas msn: celsolorenzetti@ mailto:celsolorenzetti%40ibest.com.br ibest.com.br mailto:celsolorenzetti%40ibest.com.br -- SysRS Tecnologia da Informação Ltda. www.sysrs.com.br [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [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] Delphi X Letras Musicas Terra
Não dá pra se basear pelo script que eles proporcionam para os blogs? http://letras.terra.com.br/webmasters.php Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Elazar Dornelles Ceza Enviada em: quarta-feira, 14 de novembro de 2007 15:31 Para: delphi-br@yahoogrupos.com.br Assunto: Res: [delphi-br] Delphi X Letras Musicas Terra Em http://letras. http://letras.terra.com.br/ terra.com.br/ tem uma opção de consulta, é dali que eu gostaria de partir, pois assim que acha a musica aparece um link para o arquivo. - Mensagem original De: MiNuTo [EMAIL PROTECTED] mailto:apoio%40apoioinfor.com.br com.br Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Enviadas: Quarta-feira, 14 de Novembro de 2007 15:26:20 Assunto: Re: [delphi-br] Delphi X Letras Musicas Terra onde fica essa lista txt tem como postar o link? vc pode usar idhttp do indy ... - Original Message - From: Elazar Dornelles Ceza To: [EMAIL PROTECTED] os.com.br Sent: Wednesday, November 14, 2007 4:23 PM Subject: [delphi-br] Delphi X Letras Musicas Terra Boa tarde pessoal Estou tentando fazer um programa que tente localizar letras de musicas do site do terra (que disponibiliza em txt), mas não estou conseguindo entender a logica de como que funciona a pesquisa do site, e de como poderia fazer isto no delphi. A principio pensei em fazer o download direto do arquivo, mas logo de cara ja esbarro na questão de consulta. Alguma ideia? 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] Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail. http://br.mail.yahoo.com/ 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] Determinar de onde veio o foco
Mas existe uma lógica para a pergunta? Tipo, porque a necessidade de saber isso? No OnEnter, vc pode escrever uma rotina para pegar o cursor do mouse e comparar com a posição absoluta do componente... é uma... Dá pra utilizar o evento OnClick, ou o OnMouseDown, tem várias maneiras de se fazer isso, só não entendi a necessidade... Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Nilson Chagas Enviada em: quarta-feira, 14 de novembro de 2007 15:41 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Determinar de onde veio o foco Juntando a sua mensagem com a do Davi (antes que ele explouda. rsrsrs)... Voce pode trabalhar com uma variavel Flag para tentar descobrir isto... pq se naum me engano o evento OnClick ocorre antes do OnEnter. []s Em 14/11/07, Celso Lorenzetti - GMail clorenzettibr@ mailto:clorenzettibr%40gmail.com gmail.com escreveu: Olá Davi, acho que com o código abaixo fica mais fácil para entender o que pergunto.. procedure TMaterial.CMEnter(var Message: TCMEnter); begin FValorAnterior := GetValor; // Aqui neste IF gostaria de saber se ele clicou com o mouse ou foi um TAB, e só entrar nele se fou com um TAB. if ClFocus(FMaterial) then begin FMaterial.SelectAll; FMaterial.SetFocus; end; end; Teria que ser aqui porque aqui irá disparar sempre, mesmo que ele tecle TAB. Entendeu? Att, Celso Lorenzetti Analista de Sistemas msn: celsolorenzetti@ mailto:celsolorenzetti%40ibest.com.br ibest.com.br celsolorenzetti%40ibest.com.br -- SysRS Tecnologia da Informação Ltda. www.sysrs.com.br - Original Message - From: Davi Eduardo Borges Wall To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br Sent: Wednesday, November 14, 2007 3:13 PM Subject: RES: [delphi-br] Determinar de onde veio o foco Celso, sinceramente, ali embaixo do seu nome diz ANALISTA DE SISTEMAS. Lembre-se disso. Essas são perguntas de programador Junior. Para saber se o EDIT foi clicado, uma das alternativas (a mais simples que consigo imaginar) é pegar o EVENTO ONCLICK DO EDIT? Se gerou o evento então é pq foi clicado nesse componente? Não seria isso ??? De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br [mailto: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br] Em nome de Celso Lorenzetti - GMail Enviada em: quarta-feira, 14 de novembro de 2007 16:59 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br Assunto: [delphi-br] Determinar de onde veio o foco Mais uma, tem como eu saber se o foco que o componente TEdit recebeu, foi porque o usuário teclou um Tab no componente anterior ou se ele clicou direto nele com o mouse? Obrigado. Att, Celso Lorenzetti Analista de Sistemas msn: celsolorenzetti@ mailto:celsolorenzetti%40ibest.com.br ibest.com.br celsolorenzetti%40ibest.com.brmailto: celsolorenzetti%40ibest.com.br -- SysRS Tecnologia da Informação Ltda. www.sysrs.com.br [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Mostrar mensagem se Caps Lock estiver ligada
Sinceramente, acho infantilidade da parte de vocês esse tipo de crítica, se o primeiro que estava nervosinho por algum motivo não tivesse feitos as considerações que fez vocês não teriam dito nada. A pergunta nem foi tão idiota como vocês estão pintando, só não fui muito explicativa, mas uma resposta decente seria: Acho que a solução é X. P.S.: Você poderia formular melhor suas perguntas ok? Assinatura, Empresa, Filial, Título Ostentado, Código do Diploma, Telefone da Mãe, do Pai do Filho, Ramal de Deus, código da retina, etc... Vitor. [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Determinar de onde veio o foco
Olha, nesse caso eu faria o seguinte: Deixaria os itens que dependem do primeiro desabilitados, e no OnChange dos três ( atribua o mesmo onchange aos três) faria assim Edit_Cor.Enabled := Edit_Material.Text ; Edir_Tamanho := Edit_Cor.Text ; Algo assim, você criar uma função que retorne um Boolean tb... Function MaterialOK: Boolean; Begin if ( faça os testes aqui ) then Result := TRUE Else Result := FALSE End; Dae no OnChange Edit_Cor.Enabled := MaterialOK; Edir_Tamanho := CorOK; Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Celso Lorenzetti - GMail Enviada em: quarta-feira, 14 de novembro de 2007 17:04 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Determinar de onde veio o foco Esse evento é de um componente TPanel que dentro dele tem 3 TEdits que representam: Material + Cor + tamanho. Se o usuário clicar diretamente no Tamanho, ele está jogando o foco diretamente para o Material, porcausa daquele código do CMEnter. Mas se o usuário clicou no Tamanho deveria ficar lá... E se não tiver aquele código do CMEnter, o foco fica no TPanel quando ele tecla TAB, aí ele tem que dar um TAB a mais para o foco cair no Material. por isso queria separar as duas situações. Claro que com variáveis e eventos também daria para fazer, como outros colegas disseram, mas como gosto de coisas mais elaboradas, resolvi pedir ajuda dos colegas da lista. Obrigado, pelas respostas e interesse em ajudar Vitor. Att, Celso Lorenzetti Analista de Sistemas msn: celsolorenzetti@ mailto:celsolorenzetti%40ibest.com.br ibest.com.br -- SysRS Tecnologia da Informação Ltda. www.sysrs.com.br - Original Message - From: Vitor Redes To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Wednesday, November 14, 2007 4:43 PM Subject: RES: [delphi-br] Determinar de onde veio o foco Mas existe uma 'lógica' para a pergunta? Tipo, porque a necessidade de saber isso? No OnEnter, vc pode escrever uma rotina para pegar o cursor do mouse e comparar com a posição absoluta do componente... é uma... Dá pra utilizar o evento OnClick, ou o OnMouseDown, tem várias maneiras de se fazer isso, só não entendi a necessidade... Vitor. _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Nilson Chagas Enviada em: quarta-feira, 14 de novembro de 2007 15:41 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: Re: [delphi-br] Determinar de onde veio o foco Juntando a sua mensagem com a do Davi (antes que ele explouda. rsrsrs)... Voce pode trabalhar com uma variavel Flag para tentar descobrir isto... pq se naum me engano o evento OnClick ocorre antes do OnEnter. []s Em 14/11/07, Celso Lorenzetti - GMail clorenzettibr@ mailto:clorenzettibr%40gmail.com gmail.com escreveu: Olá Davi, acho que com o código abaixo fica mais fácil para entender o que pergunto.. procedure TMaterial.CMEnter(var Message: TCMEnter); begin FValorAnterior := GetValor; // Aqui neste IF gostaria de saber se ele clicou com o mouse ou foi um TAB, e só entrar nele se fou com um TAB. if ClFocus(FMaterial) then begin FMaterial.SelectAll; FMaterial.SetFocus; end; end; Teria que ser aqui porque aqui irá disparar sempre, mesmo que ele tecle TAB. Entendeu? Att, Celso Lorenzetti Analista de Sistemas msn: celsolorenzetti@ mailto:celsolorenzetti%40ibest.com.br ibest.com.br celsolorenzetti%40ibest.com.br -- SysRS Tecnologia da Informação Ltda. www.sysrs.com.br - Original Message - From: Davi Eduardo Borges Wall To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br Sent: Wednesday, November 14, 2007 3:13 PM Subject: RES: [delphi-br] Determinar de onde veio o foco Celso, sinceramente, ali embaixo do seu nome diz ANALISTA DE SISTEMAS. Lembre-se disso. Essas são perguntas de programador Junior. Para saber se o EDIT foi clicado, uma das alternativas (a mais simples que consigo imaginar) é pegar o EVENTO ONCLICK DO EDIT? Se gerou o evento então é pq foi clicado nesse componente? Não seria isso ??? De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br [mailto: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br] Em nome de Celso Lorenzetti - GMail Enviada em: quarta-feira, 14 de novembro de 2007 16:59 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br Assunto
RES: [delphi-br] Procurar registro no ClientDataSet
A sua entrada de dados está com máscara? É um MaskEdit? DBMaskEdit? Se for, o componente grava também, a maldita da máscara e por isso não está achando o registro... Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de André Luis de Oliveira Enviada em: segunda-feira, 12 de novembro de 2007 11:04 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Procurar registro no ClientDataSet Eitá nois ...rs, não vou falar nada sobre seu comentario... hehehe Vamos direto ao q interessa. Não fucinou pelo seguinte, o CPF existe no cdsTemp e sempre me retorna q não achou. - Original Message - From: Davi Eduardo Borges Wall To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Monday, November 12, 2007 11:54 AM Subject: RES: [delphi-br] Procurar registro no ClientDataSet Não funciona ... E ... ??? Eu fico meio revoltado com esse tipo de solicitação de ajuda. Não há nenhuma pergunta, só afirmações. André eu te pergunto, imagine você recebendo esse e-mail de alguém lhe solicitando ajudacomo vc faria pra ajudar a pessoa? Depois do puxão de orelha Vamos lá... Bom primeiramente, O que te levou a pensar que isso não funcionou? De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de André Luis de Oliveira Enviada em: segunda-feira, 12 de novembro de 2007 11:47 Para: Delphi BR Assunto: [delphi-br] Procurar registro no ClientDataSet Criei um ClientDataSet em run-time. Crio o ClientDataSet e atualizo com os dados. Quando uso a função para testar se existe o registro, não funciona: if not cdsTemp.Locate('CPFTITULAR', '12541225', []) then. André Luis de Oliveira Analista de Sistemas E-mail: [EMAIL PROTECTED] mailto:sistemas%40uniodontocamp.com.br amp.com.br mailto:sistemas%40uniodontocamp.com.br ( (19) 3322-4018 Skype: al_oliveira Uniodonto Campinas Av. Brasil, 200 - Campinas/SP ( (19) 3322-4000 Visite nosso site: www.uniodontocamp.com.br [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.15.30/1125 - Release Date: 11/11/2007 21:50 [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] como saber se o webbrowser.navigator( url ) deu certo ?
Tentem o evento OnDocumentComplete Occurs when the document being navigated to reaches ReadyState_Complete. Delphi syntax: property OnDocumentComplete: TWebBrowserDocumentComplete; Description Write an OnDocumentComplete event handler to take specific action when a frame or document is fully loaded into the Web browser .For a document without frames, this event occurs once when the document finishes loading. On a document containing multiple frames, this event occurs once for each frame. When the multiple-frame document finishes loading, the Web browser fires the event one final time. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Marcos Bernardo Enviada em: segunda-feira, 12 de novembro de 2007 14:17 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] como saber se o webbrowser.navigator( url ) deu certo ? heheh Amigo somos dois! tambem estou com o mesmo problema uma atualização de um site e queria saber quando acaba esta pagins que roda em ASP caso vc descubra... post na lista abraço Marcos Bernardo Em 09/11/07, [EMAIL PROTECTED] mailto:escobar%40megasistema.com.br .com.br [EMAIL PROTECTED] mailto:escobar%40megasistema.com.br .com.br escreveu: estou usando o webbrowser.navigator para entrar/carregar uma pagina automaticamente de tanto em tanto tempos, como saber se o carregamento deu certo ?? tipo assim: if webbrowser1.completed then bla bla bla else bla bla bla..; Luiz Escobar - Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/ASSEMBLY/MySQL/xBase SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse10.2), Windows 2K/XP [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] Cannot Focus
Se o componente a ser focado estiver em uma outra janela, ou dentro de um Container (TPanel, TTabSheet) que não está visível no momento, a exceção é apresentada. Tenta algo assim: if ( Controle.Owner.Visible ) and ( Controle.CanFocus ) then RotanaParaSetarOFoco() else OutraRotina(); Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Diego Seleguim Enviada em: domingo, 11 de novembro de 2007 12:33 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Cannot Focus Olá galera, acabei de entrar na lista e espero trocar conhecimentos e poder ajudar a todos se possível... Obrigado pela oportunidade Bom.. estou com pequeno problema em uma função que verifica os campos obrigatórios a partir da propriedade REQUIRED. Segue o código da função e a linha onde está me gerando o erro...! function TFrmBase.FCampo_Obrigatorio:Boolean; var Cont : Integer; begin Result := True; for cont := 0 to DtSrc.DataSet.FieldCount -1 do if DtSrc.DataSet.Fields[cont].Required then if (DtSrc.DataSet.Fields[Cont].IsNull) Or (DtSrc.DataSet.Fields[cont].AsString='') then begin messagedlg('Preencha o campo'+ DtSrc.DataSet.Fields[cont].DisplayLabel+'', mtInformation,[mbOK],0); Result := False; DtSrc.DataSet.Fields[cont].FocusControl; //AQUI GERA ERRO DE FOCUS Break; end; end; Não sei por qual motivo, mas o erro é CANNOT FOCUS A DISABLE OR INVISIBLE WINDOW! Já verifiquei está tudo ENABLE... Se alguém poder me ajudar... Obrigado... [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] Ref. Panel sempre com a mesma cor
Tem a Unit XPMan no form principal? Se o sistema estiver rodando sob o componente que faz ter a aparência do XP, os panels e alguns outros componentes sempre voltarão a ter a cor do XP. O que você pode fazer é tentar o seguinte: Panel.Color := ColorToRGB( COR ); Não lembro aonde vi isso, mas sei que funciona em algumas ocasiões, mas a solução mais certa (se é que existe) é colocar um TShape dentro do panel como Align = alClient e mudar a cor do Shape, e não do Panel. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Omar Marques Enviada em: sexta-feira, 9 de novembro de 2007 09:49 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Ref. Panel sempre com a mesma cor Bom dia/tarde, Delphianos Estou com uma aplicação que já estava em uso faz uns anos e descobri que sempre que coloco, por exemplo, um panel num form e este panel está com uma cor diferente (clLime ou outra), quando eu rodo o projeto, o panel fica sempre com a cor clBtnFace; Ja tentei mudar a cor do form e rodar e ao rodar o form continua com a cor clBtnFace; Uma outra tentativa que já fiz: Ja tentei rodar um outro projeto qualquer e colocar o panel em cor diferente e roda belezinha. Tentei ver algum evento (on Activate ou outro) no form principal da aplicação e a princípio nada achei de anormal. Até ja tentei mudar a cor do panel em execução e ele não aceita. Omar M. Haddad Analista de Sistemas Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail. http://br.mail.yahoo.com/ 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] ClientDataset-Campos não aceitam va lor nulo
Cara, você acabou de dar a resposta para o seu problema... Se o campo está como Not Null como que você quer gravar Null? Nem se o TClientDataSet fosse o TNinjaGaiden ia dar... hehehe Faça o seguinte, não dê oi ApplyUpdates que fica tudo certo... Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Yahoo Enviada em: quarta-feira, 7 de novembro de 2007 20:24 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] ClientDataset-Campos não aceitam valor nulo O erro é : FIELD VALUE REQUIRED. Os campos estão como not null no BD. O que acontece é o seguinte: Eu faço uma consulta no BD e jogo os dados em um clientdataset. Serão inseridos alguns dados no ClientDataset, mas esses dados não serão gravados de volta para o BD, mas somente no ClientDataset.(Será dado apenas o Post e não ApplyUpdates) Através desse ClientDataset será impresso um relatório. Quanto ao porquê de gravar os campos com valor nulo não dá pra explicar através dessa lista de discussão. Eu teria que mostrar o sistema e explicar isso pessoalmente. [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] Tipo de String no DbExpress
O problema é que o char preenche o tamanho vazio do campo com caracteres espaço, por exemplo P em um char de 2 é igual a P e não igual a P. No clientdataset tem uma propriedade que é DisableStringTrim... pode estar como True no seu caso. Enfim, não sei se é esse exatamente o problema, mas pode ser. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de MiNuTo Enviada em: quarta-feira, 7 de novembro de 2007 09:31 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Tipo de String no DbExpress Serie='P' num é p minusculo ou P maiusculo ou falta quotedstr() v aeee c ta usando parametros ou joga direto na sql? posta ae o codigo da sql e do delphi ... mas nao escreve nao , copia e cola ... - Original Message - From: dorettodor To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Wednesday, November 07, 2007 8:13 AM Subject: [delphi-br] Tipo de String no DbExpress Bom dia !!! Acontece o seguinte.. Tenho uma banco Mssql 2000 e gravo informacoes nele pelo delphi5 (BDE) e Delphi7 (DbExpress), se eu uso um campo chave String (Ex Serie Char(2)) fazendo um select usando este campo nãoo aparece esta informacao Ex: Gravado pelo Dephi5 BDE Select Nrodoc From NF Where Empresa=1 and Nrodoc=200 and Serie='P' assim aparece fazendo o mesmo select nos dados gravados pelo delphi7 DbExpress nao aparece. Ps: Se eu tirar a campo SERIE do select ai aparece a informação... o que pode ser.. Abraço Doretto. [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] Trabalhar com formulas específicas
Walter, eu utilizo fórmulas para cálculo de custos e preços, a maneira como utilizo é a seguinte: Formula: ( A + B * ( C D ) ) / 2 Formula := StringReplace( Formula, A, 5, [ rfReplaceAll ] ); Formula := StringReplace( Formula, B, 80, [ rfReplaceAll ] ); Formula := StringReplace( Formula, C, 10, [ rfReplaceAll ] ); Formula := StringReplace( Formula, D, 6, [ rfReplaceAll ] ); Agora eu tenho a Fórmula em forma de Fórmula mesmo, que ficou assim Fórmula: ( 5 + 80 * ( 10 - 6 ) ) / 2 Para executar o cálculo eu usava um componente da paleta ActiveX, mas depois que o Rubem passou essa dica aposentei o componente, lá vai então: ShowMessage( O Resultado da Expressão acima é: + Calculate( Formula, 2 )); A função encontra-se em: http://www.swissdelphicenter.ch/en/showcode.php?id=470 E como eu disse antes, a dica é do Rubem. function Calculate(SMyExpression: string; digits: Byte): string; // Calculate a simple expression // Supported are: Real Numbers, parenthesis var z: Char; ipos: Integer; function StrToReal(chaine: string): Real; var r: Real; Pos: Integer; begin Val(chaine, r, Pos); if Pos 0 then Val(Copy(chaine, 1, Pos - 1), r, Pos); Result := r; end; function RealToStr(inreal: Extended; digits: Byte): string; var S: string; begin Str(inreal: 0: digits, S); realToStr := S; end; procedure NextChar; var s: string; begin if ipos Length(SMyExpression) then begin z := #9; Exit; end else begin s := Copy(SMyExpression, ipos, 1); z := s[1]; Inc(ipos); end; if z = ' ' then nextchar; end; function Expression: Real; var w: Real; function Factor: Real; var ws: string; begin Nextchar; if z in ['0'..'9'] then begin ws := ''; repeat ws := ws + z; nextchar until not (z in ['0'..'9', '.']); Factor := StrToReal(ws); end else if z = '(' then begin Factor := Expression; nextchar end else if z = '+' then Factor := +Factor else if Z = '-' then Factor := -Factor; end; function Term: Real; var W: Real; begin W := Factor; while Z in ['*', '/'] do if z = '*' then w := w * Factor else w := w / Factor; Term := w; end; begin w := term; while z in ['+', '-'] do if z = '+' then w := w + term else w := w - term; Expression := w; end; begin ipos := 1; Result := RealToStr(Expression, digits); end; _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de [EMAIL PROTECTED] Enviada em: quinta-feira, 25 de outubro de 2007 14:27 Para: delphi-br Assunto: [delphi-br] Trabalhar com formulas específicas Boa tarde pessoal, Tenho alguns produtos cujos orçamentos são calculados a partir de formulas específicas. Uma delas é da seguinte forma: Quantidade de Tubos de PVC = (FORMACAO X METROS /6) Eu preciso de montar uma rotina que interprete o que é FORMACAO e METROS, Troque estas palavras por valores e faça este cálculo. Alguém sabe algum site aonde eu possa pesquisar sobre este assunto? Digitei no Google e no Yahoo sobre Formulas, mas vem muita coisa que não tem nada haver. Agradeço desde já a qualquer ajuda. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] mailto:wchagasj%40yahoo.com.br com.br http://www.geocitie http://www.geocities.com/SiliconValley/Bay/1058 s.com/SiliconValley/Bay/1058 MSN: whitesockets@ mailto:whitesockets%40hotmail.com hotmail.com SKYPE: WalterChagasJr [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Dúvida cruel...
Cara, isso realmente é cruel. Você tem algumas opções: - Criar um novo componente a partir o TBitbtn e programa-lo para receber duas imagens de acordo com a ação. Mas isso deve tornar a coisa meio inviável porque se você depende do TDataset para isso, vai programar um elefante branco. - Criar dois botões. Um para inserir, que quando clicado habilita o botão de salvar, que por sua vez, quando clicado, desabilita-se e habilita o botão de inserir, como qualquer outro aplicativo. - Usar imagens normais ao invés de imagens .ico. Enfim, existem várias soluções, acredito que a que você escolheu é a pior, mas também não sei o porque você a escolheu, então... se quiser explicar melhor talvez possamos ajudar, mas se eu fosse você colocaria dois botões na tela e pronto, além de ficar mais fácil fica mais visível ao usuário, no sentido de: - Cliquei aqui! Opa, aconteceu alguma coisa... Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Leonardo Cruz Costa - P. M. Quissamã Enviada em: quarta-feira, 24 de outubro de 2007 09:59 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Dúvida cruel... Olá Delphinianos! Sabemos que o TBitBtn e afins não carregam imagens ICO. Esse problema eu já resolvi criando uma rotina de conversão. Só que daí comecei a perceber algo muito, muito incômodo: o fundo das imagens ficam hora transparentes, hora todo branco. Parece alguma coisa com o windows, pois desenvolvendo o sistema em casa as imagens ficam como deveriam, com o fundo transparente. Alguém tem alguma idéia do que é que há com esse velhinho? Outra coisa: quando o usuário clica no botão, o Caption e a imagem dele muda (por exemplo, clicando em Novo, o Caption muda para Salvar e a imagem muda para um disquete). Existem duas maneiras de implementar isso: criando um código para cada botão ou inserindo o código no componente de manipulação do banco de dados (ZTable por exemplo, nos eventos After e Before). O problema é que as duas maneiras são trabalhosas. Um código pra cada botão é retrabalho e um código no componente fica gigante, geralmente manipulando botões que nem foram usados. Alguém usa uma solução diferente? Abraços. Leonardo Cruz Costa Analista de Sistemas / RH Prefeitura Municipal de Quissamã Mat.: 2601 (22)2768-9324 / 9372 [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] Calculos com Horas
22 minutos divididos por 60 ( que equivale a uma hora ) vezes o valor por hora, nesse caso 17 Vai te dar o valor correspondente aos minutos trabalhados. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Anderson Furtilho Enviada em: terça-feira, 23 de outubro de 2007 14:38 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Calculos com Horas Olá amigos da Lista! Como eu poderia proceder no caso abaixo: Exemplo: O cara trabalho 00:22:00 (22 minutos) e ele ganha 17,00 a hora. Com eu poderia fazer esta calculo em delphi ? Desde já antecipo meus agradecimentos Anderson Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail. http://br.mail.yahoo.com/ yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Off - Sonegação Fiscal
Ser homologado não quer dizer nada, e ser indicado pela bematech ou por quem quer que seja também não quer dizer nada... nesse caso. Vitor. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Joel Alexandre Enviada em: quarta-feira, 17 de outubro de 2007 23:16 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Off - Sonegação Fiscal Leonardo Quinino escreveu: A verdade sempre vem à tona, pois é.. então enfim a casa caiu... Eu mesmo já perdi diversos clientes para esse colibri . Hoje perdi os meus clientes, mas meu sono, esse não tem preço. Leonardo, nunca vi esse colibri, nem sei como é. Tb não sei o motivo técnico que levou à essa busca. Agora, de uma coisa eu sei com toda certeza, este software é homologado e passou por baterias de testes. É um software indicado pela Bematech. Tem milhares de clientes. Tá muito estranho isso. Ou deve ter outra coisa além por trás disso ou pode ser um soft clonado. []Os Joel -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos
[delphi-br] Off - Sonegação Fiscal
Somente repassando, se alguém tiver mais informações... Vitor. -- Fraude: Sonegação fiscal leva sete empresários para a prisão Terça-feira, 02/10/2007 - 13:32 Salvador - Na primeira ação resultado do convênio firmado entre as Secretarias da Fazenda (Sefaz) e Segurança Pública (SSP), o Ministério Público Estadual (MP) e o Tribunal de Justiça (TJ), foram presos na manhã de hoje (2) sete empresários do segmento de bares e restaurantes, além de donos de duas empresas da área de informática, a Networks e a Stella Sistem, apontadas como as responsáveis pelo desenvolvimento de um programa de sonegação fiscal. Foram cumpridos ainda 28 mandados de busca e apreensão de documentos e equipamentos, entre notas fiscais, computadores e máquinas emissoras de cupom fiscal. Batizada de Operação Tesouro, participaram da ação 35 equipes, num total de 264 pessoas, entre 39 delegados da Polícia Civil, policiais civis e militares, auditores fiscais, agentes de tributo, promotores e profissionais da inteligência do MP, da Sefaz e da SSP. A fraude montada a partir de um software denominado Colibri permitiu a sonegação de cerca de R$ 2 milhões, entre 2005 e 2007, conforme cálculos dos técnicos envolvidos na Operação Tesouro. O volume de estabelecimentos envolvidos no esquema pode chegar a 300, somente no ramo alimentar, segundo informou o secretário da Fazenda, Carlos Martins, acrescentando que o estado pode recuperar cerca de R$ 20 milhões sonegados. A previsão da Sefaz é que esses comerciantes vinham sonegando cerca de 40% do faturamento de suas empresas. Os presos foram encaminhados para a Delegacia de Crimes Econômicos e Contra Administração Pública (Dececap), em Piatã, e responderão por prática de sonegação fiscal, crime pelo qual poderão e ser punidos com prisão de dois a cinco anos. Segundo o chefe do Ministério Público, Lidivaldo Brito, os envolvidos no esquema fraudulento vinham sendo investigados desde 2003, inclusive com escuta telefônica autorizada pelo Tribunal de Justiça que expediu os mandados de prisão e de busca e apreensão de documentos e equipamentos. A Operação Tesouro está bem respaldada e vai continuar. Vamos apertar o cerco contra a sonegação fiscal, avisou. Os estabelecimentos não foram fechados, mas os responsáveis pela fraude além de responderem criminalmente, serão multados. Apenas uma das envolvidas no esquema, Maria Célia Carvalho Mesquita, sócia do restaurante Alfredo di Roma, não foi localizada. Conforme o secretário da Fazenda, a Operação Tesouro foi um sucesso. Entre as empresas que tiveram material apreendido pela força-tarefa estão a Networks (o proprietário Luiz Barreto Neto foi preso), Stella Sistem, o dono Frederico Tomaz Júnior também foi preso, os restaurantes Baby Beef , Abdul, Alfredo de Roma, A Porteira (da Boca do Rio e do Dique do Tororó), Bardauê, Bela Napoli, Bella Brasa, Companhia da Pizza (Imbuí e Rio Vermelho), Gibão de Couro, Mama Mia, Mistura (ex-Mistura Fina, em Itapuã), Osaka (Iguatemi e Aeroporto),Pasta Fast (Pituba, Rio Vermelho e Salvador Shopping), Pereira, Sato, Tortarelli (Amaralina e Caminho das Árvores, Trapiche Adelaide, Volare e Yoko. Fraude Tecnológica De acordo com os técnicos envolvidos na Operação Tesouro, o softwarwe Colibri desenvolvido pela Networks é um programa de dados para automação comercial de uso comum por bares, restaurantes e lanchonetes. A fraude consiste na utilização do programa com uma configuração que permite desativar o Emissor de Cupom Fiscal (ECF), evitando assim que o equipamento emita o cupom fiscal no ato de registro durante o pagamento da venda do produto ou de serviço. Com o sistema, o fraudador pode reduzir ou até mesmo eliminar os tributos incidentes na operação. Com isso, estima-se que os envolvidos na fraude tenham sonegado cerca 40% do valor total de impostos a serem pagos, conforme explica o secretário Carlos Martins, considerando o crime tipicamente tecnológico. Segundo o chefe do MP, o programa é legal, desde que devidamente registrado na Sefaz, o que não acontecia. O contribuinte informa a Sefaz a utilização do programa autorizado, mas opera com a versão ilegal, ou seja, não autorizada, emitindo um documento sem valor fiscal, esclareceu Lidivaldo Brito. A Operação Tesouro tirou o sono de muita gente, obrigada a pular da cama muito cedo. Uns, para colocar a operação em prática, outros, devido ao susto de ter seus estabelecimentos comerciais invadidos pela ação policial. Iniciada por volta das 4h, horário em que as pessoas ainda não começaram a trabalhar, muitos estabelecimentos tiveram que ser arrombados. Foi o que aconteceu, por exemplo, na sede da Networks, localizada na Pituba. Lá, foram apreendidos documentos e computadores. Já no Baby Beef, a força-tarefa encontrou alguns funcionários da área de limpeza e segurança. Outros foram aparecendo a medida em que os policiais civis faziam a apreensão de documentos, notas fiscais e
RES: [delphi-br] CTRL + Barra de Espaço
Tem alguns programas que se apropriam das teclas... um exemplo que já vi é o msn messenger, quando o msn plus está instalado. O Code Completion não funciona no Delphi. A solução é desinstalar, até porque aquilo é inútil, ou configurar o msn plus para não se apropriar das teclas de atalho referentes a outros programas, deve ter essa opção nele. Se não for isso, veja outros programas que podem agir da mesma forma. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Carlinhos Pucc Enviada em: quarta-feira, 17 de outubro de 2007 11:12 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] CTRL + Barra de Espaço Pessoal Bom Dia, Continuo com o problema com o meu Delphi 7 não funcionar o Code Completion. Ele está inteiramente configurado corretamente, mas simplesmente ele não faz nada quando pressiono CTRL + Barra de Espaço. Desinstalei tudo que eu tinha de Delphi, instalei o Delphi 7 novamente (somente ele, não tenho outra versão). E mesmo após reinstalá-lo não consegui que o Code Completion funcione. Estou até enviando a vocês a minha tela de configuração do Code Insight pra todos verem que está corretamente configurada. Alguém já passou por isso ? Tem alguma dica ? Obrigado a todos, Carlos Eduardo Campinas SP [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] [OFF] Por que TEdit para alterar campos?
Essa discussão sempre vai ser muito estranha, porque os argumentos utilizados pela maioria não são válidos e nem um pouco reais. Vou dar algumas opiniões sobre argumentos bizarros que eu vi aqui... Sobre conexão, DBWare não fica com Transação aberta quando você dá um Open no DataSet... nada a ver isso. O que acontece é o seguinte, você abre a conexão por meio de algum componente, o DataSet usa essa conexão para trazer os dados que você pediu, pronto e ponto. Sem utiliza DBWare é exatamente a mesma coisa, mas com implementação diferente em cada caso, em cada framework, etc... Grids listrados e zebrados e corzinhas e não sei mais o que... isso não é viadagem de cliente, ou qualquer coisa do tipo. Isso é necessário para que a visualização dos dados não se torne um porre. Pra quem programa é fácil falar que isso não é necessário, você trabalha COM o sistema, você trabalha O sistema. Agora, uma coisa que eu acho meio bizarra, pra quem tem framework NO-DBWare. Se eu carrego 15 registros, eu crio 15 objetos? Eu tenho um framework NO-DBAware muito funcional, mas na época que desenvolvi, esse problema eu deixei pra trás, cada Entidade carrega apenas um registro e trabalha com ele da forma que quiser... Quando o conjunto é maior, eu apelava pros DataSets, até pq fazer relatórios com Objetos é um porre. Mas alguém tem uma resposta pra pergunta acima? Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Fellipe Henrique Enviada em: quarta-feira, 17 de outubro de 2007 16:08 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] [OFF] Por que TEdit para alterar campos? Só dando pitaco... Ué, desde quando quando se usa DBWare o banco fica trabalhando? Acho que você está confundindo transações com conexão ao banco.. A nao ser que voce usando TEdit, a cada modificação, faça uma conexão ao banco, você usa do mesmo jeito que o DBWare... :o) []s Em 17/10/07, BandaLemuel bandalemuel@ mailto:bandalemuel%40yahoo.com.br yahoo.com.br escreveu: Na Minha opinião sou a favor do TEdit cia... da mais trabalho mas em compensação é muito mais fácil os controle.. e também pq vc não fica com o banco aberto enquanto esta realizando uma alteração no banco... acho que é bem melhor... Wesley De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br [mailto: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br] Em nome de Davi Eduardo Borges Wall Enviada em: quarta-feira, 17 de outubro de 2007 15:57 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br Assunto: RES: [delphi-br] [OFF] Por que TEdit para alterar campos? Escobar, na minha opinião vc não explica, vc escreve as coisas. RS.. Mas eu juro que me esforcei pra entender. Vamos La.. O que vc está querendo dizer é que se eu tiver uma única coluna em um stringgrid que me permite colocar 100 bytes em cada linha. Eu vou somente conseguir colocar 3.800 linhas? É isso que vocÊ quer dizer? Sou obrigado a testar isso Outra coisa... Você mostra 6000 registros para o usuário consultar? Por algum motivo? Eu fico me imaginando no lugar desse usuário... acho que pediria demissão. Rs... De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br mailto: delphi-br%40yahoogrupos.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.brmailto: delphi-br%40yahoogrupos.com.br ] Em nome de [EMAIL PROTECTED] mailto:escobar%40megasistema.com.br .com.br escobar%40megasistema.com.br mailto:escobar% escobar%2540megasistema.com.br Enviada em: quarta-feira, 17 de outubro de 2007 13:01 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.brmailto: delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] [OFF] Por que TEdit para alterar campos? vixe... vc num entendeu, mesmo... faça as contas... vc vai ver que 450.000 vai cair e muito... um campo de de 1 caracter daria +/- 380.000 com 50 bytes vai dar só 7000, com 100 daria 3800 registros e assim vai será que tenho que fica explicando porque a batata num é redonda !?? lembre-se foi vc que perguntou... por dia tenho uma tabela que gera +/- 6000 à 8000 com 150 bytes de comprimento, ja num ia da pra mostar 1 dia inteiro teria que ser por hora/hora, isso pro usuário ficaria ruim pois ele tem que ver o dia todo, bom num vo entrar em muitos detalhes, porque como ja disse cada um com seu cada um abraços Luiz Escobar - Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/ASSEMBLER/MySQL/xBase SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse10.2), Windows 2K/XP - Original Message -