Re: [delphi-br] Dic. de Dados e Form Automático, alguém conhece alguma coisa em delphi?
Olá Davi, agradeço sua atenção, você pode nos ajudar dando dicas de como você está procedendo, não precisa enviar o fonte - você trabalhou duro por ele, nos temos que trabalhar para o nosso, não é?! Mas idéias são sempre bem vindas.. []s Em 23/04/08, Davi Eduardo Borges Wall [EMAIL PROTECTED] escreveu: Olha eu criei um framework com este conceito após trabalhar em uma empresa que também utiliza este conceito. Foi uma das coisas mais práticas e úteis que já fiz. Ainda não terminei. Na verdade o projeto está um pouco parado. A geração de tela, controle de fluxo de dados, definições de tela estão ok. (alguns bugs que vou arrumando no decorrer da coisa) Ainda falta geração de relatórios, inclusão de macros para controle de tela, segurança e controle de usuários e suporte a dll's, entre outros... Bom falta muito ainda, mas olha, vendo isso rodando é muito legal. Eu crio uma tela de cadastro em 5 minutos! E vale muito a pensa investir nesse tipo de projeto. Se eu arrumar um tempinho eu vou disponibilizar o projeto para vocês apreciarem. (sem código fonte =) ) []'s De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em nome de Fellipe Henrique Enviada em: quarta-feira, 23 de abril de 2008 14:31 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Dic. de Dados e Form Automático, alguém conhece alguma coisa em delphi? Olá Rubem, Sim, saiu sim sobre isso na revista, porém lá dá só uma palinha, dá pra se ter uma idéia, porém queria algo mais avançado, como por exemplo, criar cadastros mestre-detalhes e por aí vai. Ah um bom tempo venho procurando esta tecnologia, porém sem êxito.. a parte de criar os formulários, não é uma das mais difíceis, o problema está na programação em si do formulário. Pois além da interface, eu poderia escrever os codigos para ele, contudo, não é possível fazer isso usando o delphi normal (object-pascal), até o momento somente vi, alguns interpretadores de script, que o proprio nome já diz, interpretador, ou seja, o que deveria ser para ficar mais rápido, acaba ficando mais lento, por causa da interpretação do script, e um script, não é uma linguagem de programação, então, não teria muitos poderes de se fazer alguma coisa.. []s Em 23/04/08, Rubem Nascimento da Rocha [EMAIL PROTECTED]djpardalrocha%40hotmail.commailto: djpardalrocha%40hotmail.com djpardalrocha%2540hotmail.com escreveu: 1) Na época do BDE, este permitia a criação de um dicionário de dados que, em tempo de design, permitia a criação dos componentes data-aware a serem arrastados para um formulário. Era uma idéia boa, pena que foi uma prática pouquíssima difundida e que outros engines(mecanismos) para acesso a bancos de dados não tiveram essa idéia. 2) Saiu há alguns meses atrás na (discriminada, mas) excelente revista ClubeDelphi, um artigo interessante sobre criação de formulários de forma automática com base em definições guardadas em bancos de dados. Não me recordo do número da revista. Sugiro que vc entre em contato com alguém da redação da DevMedia pra saber qual foi a edição. Boa sorte. Sds. To: delphi-br@yahoogrupos.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] fellipeh%40gmail.com mailto: fellipeh%40gmail.com fellipeh%2540gmail.com fellipeh%40gmail.com Date: Wed, 23 Apr 2008 14:17:45 -0300 Subject: [delphi-br] Dic. de Dados e Form Automático, alguém conhece alguma coisa em delphi? Olá amigos, alguém conhece algum componente, framework, que se cria um dicionário de dados, e com base nele, o framework cria uma tela de cadastro e/ou movimento, sem precisar ficar criar o form no próprio delphi? Deixando tudo automático? []s -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com mailto:fellipeh%40gmail.comfellipeh%2540gmail.com fellipeh%40gmail.com Cansou do MercadoLivre como eu? Tente o www.uaileilão.com.brhttp://www.uaileil%C3%A3o.com.br http://www.uaileil%C3%A3o.com.br . [As partes desta mensagem que não continham texto foram removidas] __ Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger! http://www.amigosdomessenger.com.br/ -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com mailto:fellipeh%40gmail.comfellipeh%2540gmail.com Cansou do MercadoLivre como eu? Tente o www.uaileilão.com.brhttp://www.uaileil%C3%A3o.com.br . [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] --
Re: [delphi-br] UniDAC
Olá Fellipe, O unidac como vc mesmo falou oferece acesso aos bancos que ele suporta e usando todas as funcionalidades de cada um em relação ao Transaction ele tem o TUniTransaction, que serve pra todos. depois de usar o Unidac se previsar mudar de banco é só mudar o Provider no TUniConnection, o resto ele faz, eheheh baixa o Demo e faz uns testes, qq dúvida posta no Forum que eles repondem tb. http://crlab.com/forums/viewforum.php?f=28sid=feedec792cf30efde4692a974ebf46bf sucesso ae. 2008/4/23 Fellipe Henrique [EMAIL PROTECTED]: Bom, estive vendo o site, e fiquei feliz antes do tempo! :o) Acho que não entendi muito bem o UniDAC, amigo Eduardo, talvez você possa me ajudar, já que meu inglês é um tanto ruim... Qual a vantagem de se usar o UniDAC ao invés do IBDAC? Sei que o UniDAC possibilita vários outros SGBDs, porém, vamos ao exemplo do Interbase/Firebird, sempre é necessário um IBCTransaction para que funcione um IBCDataSet, não seria interessante o UniDAC criar tipo um encapsulamento deste Transaction, afim de não usá-lo? Visto que se um sistema foi feito usando Firebird, mesmo usando o UniDAC, não é possível migrar para outro banco, por causa da transação. Teria um trabalho imenso para isso... Bom, é isso, foi o que entendi, será que estou errado? []s Em 23/04/08, Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com escreveu: Com certeza eles devem lançar uma ferramenta pra migrar do IBDAC pro UNIDAC né!? Aí sim, ficaria 10! []s Em 23/04/08, Eduardo Silva dos Santos [EMAIL PROTECTED]eduardo.drd%40gmail.com escreveu: Pessoal, a CoreLab Liberou hj a primeira Versão do UniDAC, vale a pena conferir http://crlab.com/forums/viewtopic.php?t=11972 www.crlab.com/unidac -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] eduardo.drd%40gmail.com eduardo.drd% 40gmail.com Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas] -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com Cansou do MercadoLivre como eu? Tente o www.uaileilão.com.brhttp://www.uaileil%C3%A3o.com.br http://www.uaileil%C3%A3o.com.br. -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com Cansou do MercadoLivre como eu? Tente o www.uaileilão.com.brhttp://www.uaileil%C3%A3o.com.br . [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] O que seria este código ??: ['{E085C 101-C691-4E6F-A85C-DA09FB5E8405}']
Na verdade, eu deduzi que a parte do código que foi descrita na mensagem tenha
sido gerado pelo WSDL Importer para acessar um webservice.
Sds.
To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Wed, 23 Apr 2008 19:19:56 -0300
Subject: Re: [delphi-br] O que seria este código ??:
['{E085C101-C691-4E6F-A85C-DA09FB5E8405}']
eu acessava webservices com o soaptoolkit no delphi 5 a anos..
antes de vir o .net e escrechar o negocio.
mas o que ele se refere nao tem nada a ver com webservices e sim com
interfaces de classes e tal.
esse numero é um GUID um numero gerado pelo windows que a micro$ofit afirma
que nenhum outra e iqual. no delphi ele serve pra registrar essa interface.
procura sobre criacao de componente voce vai achar junto essas interfaces..
t+
2008/4/23 Rubem Nascimento da Rocha [EMAIL PROTECTED]:
Se esse for um código pra acessar webservices, sugiro que vc use o Delphi
7 mesmo, visto que o Delphi 5 não está devidamente preparado pra acessar
webservices!
Sds.
To: [EMAIL PROTECTED] ;
[EMAIL PROTECTED] ;
delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Wed, 23 Apr 2008 19:05:53 -0300
Subject: [delphi-br] O que seria este código ??:
['{E085C101-C691-4E6F-A85C-DA09FB5E8405}']
Olá,,, B.noite a todos
O que seria este código abaixo da INTERFACE???
Como ele é gerado ? Exerce alguma função ?
IEmpresa = interface(IInterface)
['{E085C101-C691-4E6F-A85C-DA09FB5E8405}']
function GetRazaoSocial: string;
procedure SetRazaoSocial(const Valor: string);
function GetCNPJ: string;
procedure SetCNPJ(const Valor: string);
function GetInscEstadual: string;
...
...
...
end;
O SINTEGRA.PAS foi desenvolvido para o D7, entretanto
estou tentando compilar junto com um pequeno exemplo
em D5, adicionei algumas funções de outras UNITS e
consegui compilar retirando (IINTERFACE). Não sei se
terei problemas lá na frente.
Como posso substituir no D5:
IEmpresa = interface(IInterface) ?
Grato, D.H.Oliveira
Obs: fazendo uma varredura no diretório do D7 pude observar
que (IInterfaceList) e (IInterface) estão contidas na unit CLASSES.PAS e
outras, mas não no D5.
[As partes desta mensagem que não continham texto foram removidas]
__
Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de
relacionamentos com até 6,000 fotos!
http://www.amigosdomessenger.com.br
--
--
Rafael jorge alves (Analista/desenvolvedor)
www.sistemafocus.com.br
sistema focus de gestão comercial e serviços em informatica.
--
[As partes desta mensagem que não continham texto foram removidas]
_
Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos
com até 6,000 fotos!
http://www.amigosdomessenger.com.br
Re: [delphi-br] O que seria este código ??: ['{E085C101-C691-4E6F-A85C-DA09FB5E8405}']
Se eu nao me engano o IInterface é a interface base de todas as
interfaces isso a partir do Delphi 7 eu acho.
No caso do Delphi 5 seria a IUnknown.
2008/4/23 Rafael Jorge [EMAIL PROTECTED]:
eu acessava webservices com o soaptoolkit no delphi 5 a anos..
antes de vir o .net e escrechar o negocio.
mas o que ele se refere nao tem nada a ver com webservices e sim com
interfaces de classes e tal.
esse numero é um GUID um numero gerado pelo windows que a micro$ofit afirma
que nenhum outra e iqual. no delphi ele serve pra registrar essa interface.
procura sobre criacao de componente voce vai achar junto essas interfaces..
t+
2008/4/23 Rubem Nascimento da Rocha [EMAIL PROTECTED]:
Se esse for um código pra acessar webservices, sugiro que vc use o Delphi
7 mesmo, visto que o Delphi 5 não está devidamente preparado pra acessar
webservices!
Sds.
To: [EMAIL PROTECTED] lista-delphi%40yahoogrupos.com.br;
[EMAIL PROTECTED] delphi-lista%40yahoogrupos.com.br;
delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
From: [EMAIL PROTECTED] bollasette%40yahoo.com.br
Date: Wed, 23 Apr 2008 19:05:53 -0300
Subject: [delphi-br] O que seria este código ??:
['{E085C101-C691-4E6F-A85C-DA09FB5E8405}']
Olá,,, B.noite a todos
O que seria este código abaixo da INTERFACE???
Como ele é gerado ? Exerce alguma função ?
IEmpresa = interface(IInterface)
['{E085C101-C691-4E6F-A85C-DA09FB5E8405}']
function GetRazaoSocial: string;
procedure SetRazaoSocial(const Valor: string);
function GetCNPJ: string;
procedure SetCNPJ(const Valor: string);
function GetInscEstadual: string;
...
...
...
end;
O SINTEGRA.PAS foi desenvolvido para o D7, entretanto
estou tentando compilar junto com um pequeno exemplo
em D5, adicionei algumas funções de outras UNITS e
consegui compilar retirando (IINTERFACE). Não sei se
terei problemas lá na frente.
Como posso substituir no D5:
IEmpresa = interface(IInterface) ?
Grato, D.H.Oliveira
Obs: fazendo uma varredura no diretório do D7 pude observar
que (IInterfaceList) e (IInterface) estão contidas na unit CLASSES.PAS e
outras, mas não no D5.
[As partes desta mensagem que não continham texto foram removidas]
__
Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de
relacionamentos com até 6,000 fotos!
http://www.amigosdomessenger.com.br
--
--
Rafael jorge alves (Analista/desenvolvedor)
www.sistemafocus.com.br
sistema focus de gestão comercial e serviços em informatica.
--
[As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Webservice NFe
Olá. OBS: Esta foi a maneira a qual utilizei para fazer a NFPaulista mas acredito que para a eletrônica não seja diferente. Neste local tem um exemplo do que você precisa: C:\Arquivos de programas\BorlandD7\Delphi7\Demos\WebServices\PostTool Após compilar você verá a caixa para informar a URL informe então o endereço do WeBService SEFAZ/SP: https://www.nfp.fazenda.sp.gov.br/ws/arquivocf.asmx Abaixo tem um PageControl com três abas com um memo em cada uma, a primeira aba é do Request ou a requisição do serviço do webservice basta você informar o texto no padrão XML que está no manual do webservice da SEFAZ/SP , conforme a operação desejada de Enviar ou Consultar. Na aba Response ou Resposta será informado o retorno ou resposta a sua Request (REQUISIÇÃO). na terceira e última aba é apenas um log das REQUEST (REQUISIÇÃO) e RESPONSE (RESPOSTAS). Depois deste entendimento é só você trazer este código para dentro do seu aplicativo dentro dos seus padrões. Caso você não tenha o manual do WebService pode baixa-lo no site da SEFAZ/SP: https://www.nfp.fazenda.sp.gov.br haverá um link manuais e aplicativos neste link vecê vai encontrar o manual do webservice e todos os demais referente ao assunto das CAT 52/07, 85/07 e 102/07. Abraço --- Em delphi-br@yahoogrupos.com.br, Claudiney Cogo [EMAIL PROTECTED] escreveu Boa dia a todos. Sobre NFe. Acredito existir mais pessoas no mesmo caso meu. Consegui bastante material a respeito do funcionamento, mas nenhum exemplo prático de acesso a webservices, especialmente da SEFAZ. Lendo bastante aprendi muita coisa sobre xml e webservice, assunto até então desconhecido pra mim. Fiz a certificação digital e parti ao acesso no webservice da SEFAZ. Quando acesso o link https://www.sefazvirtual.fazenda.gov.br/nfeconsulta/nfeconsulta.asmx?WSDL por exemplo, ele me retorna o arquivo WSDL no browser. A dúvida é quando tento utilizar esse endereço no Delphi. Tanto pelo WSDL Importer quando no componente HTTPRIO eu recebo a mesma mensagem de retorno: Unable to load WSDL File/Location: https://www.sefazvirtual.fazenda.gov.br/nfeconsulta/nfeconsulta.asmx?WSDL. Error [Empty document]. Gostaria de uma dica de quem já passou dessa fase utilizando delphi. O que seria esse erro? Pelo que entendi preciso ter acesso ao WSDL para ter a definição das funções do webservice e poder utilizá-lo. Ou nesse caso a forma de funcionamento é outra? Não entendi o que seria isso, pois o funcionamento de webservices a princípio é simples, tanto que criei alguns de exemplo que rodei nos servidores aqui da empresa. Acessei os WSDL deles com as descrições corretas e importei para o Delphi, podendo utilizar as classes e interfaces criadas sem problema. Mas nesse caso não retorna nada. Já cheguei a desconfiar até da minha certificação, mas ele pede o certificado no momento do acesso e não dá erro de certificado inválido. É uma certificação e-CNPJ A1. Obrigado antecipadamente. Abraços. __ 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 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Tecla TAB
Bom dia a todos... Onde você quer fazer isso: A) Toda a aplicação. B) Apenas uns forms. C) Apenas em alguns componentes. Sugestão: A maneira mais simples seria através do keyDown identifique se foi teclado um TAB e retorne um 0 no lugar. [] Boa noite a todos. Eu gostaria de bloquear a tecla TAB, eu queria que esta tecla não faça nada. Deltalhe, sem passar para false os TabStops dos componentes. Obrigado
RE: [delphi-br] Trabalhar com Forms minimizados
Obrigado, deu certinho! To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Wed, 23 Apr 2008 15:52:21 -0300 Subject: Re: [delphi-br] Trabalhar com Forms minimizados Deixas os outros form com o FormStyle = fsStayOnTop ??? apenas o Form Principal vc deixa como normalacho que poderia resolver...tenta aê. Vinicius dos Santos Analista de Desenvolvimento Júnior MSI SOLUÇÕES Av. Dr. Altino Arantes, 131 Sala 145 - 146 Centro - Ourinhos/Sp - Brasil Fone/Fax: +55 (14) 3324-8181 www.msisolucoes.com.br - Original Message - From: Evandro . To: delphi-br@yahoogrupos.com.br Sent: Wednesday, April 23, 2008 3:46 PM Subject: [delphi-br] Trabalhar com Forms minimizados Ops, Mandei errado! agora sim hehe Olá, estou criando um projeto onde queria dar a possibilidade do Usuário trabalhar com várias Janelas minimizadas... até ai tudo bem, mais estou com um probleminha... Quando o Formulário principal não está Maximizado ele apresenta corretamente os forms minimizados como mostra na imagem de exemplo! http://www.kdtinformatica.com/hospedagem/tela1.JPG Agora quando o Forumlário Principal está maximizado ( marcado como wsMaximized ) não apresenta os forms minimizados.. http://www.kdtinformatica.com/hospedagem/tela2.JPG Alguem tem uma solução pra isso ?? Grato! __ Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas e muito mais no MSN Video! http://video.msn.com/?mkt=pt-br [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] _ Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o Messenger! É GRÁTIS! http://www.msn.com.br/emoticonpack [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Webservice NFe
Olá.. bom dia. Muito obrigado pelos links e pelas dicas. Vou analisar todas elas com certeza. Ontem consegui um progresso, acessando o webservice (entendi como ele funciona, até que enfim.. rs). O que tá faltando agora é criar a conexão com SSL, senão ele nega o acesso e responde com erro 403. E também a parte da assinatura digital. Estou pesquisando esses serviços agora. Tudo é novidade pra mim, por isso a grande quantidade de dúvidas rsrs Vou olhar nos links que você me passou. Provavelmente lá devo encontrar algumas respostas. Quando tiver alguma coisa mais concreta posto aqui pros colegas que ainda vão precisar. Obrigado. 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: gamarra_rs To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 24, 2008 7:55 AM Subject: [delphi-br] Re: Webservice NFe Olá. OBS: Esta foi a maneira a qual utilizei para fazer a NFPaulista mas acredito que para a eletrônica não seja diferente. Neste local tem um exemplo do que você precisa: C:\Arquivos de programas\BorlandD7\Delphi7\Demos\WebServices\PostTool Após compilar você verá a caixa para informar a URL informe então o endereço do WeBService SEFAZ/SP: https://www.nfp.fazenda.sp.gov.br/ws/arquivocf.asmx Abaixo tem um PageControl com três abas com um memo em cada uma, a primeira aba é do Request ou a requisição do serviço do webservice basta você informar o texto no padrão XML que está no manual do webservice da SEFAZ/SP , conforme a operação desejada de Enviar ou Consultar. Na aba Response ou Resposta será informado o retorno ou resposta a sua Request (REQUISIÇÃO). na terceira e última aba é apenas um log das REQUEST (REQUISIÇÃO) e RESPONSE (RESPOSTAS). Depois deste entendimento é só você trazer este código para dentro do seu aplicativo dentro dos seus padrões. Caso você não tenha o manual do WebService pode baixa-lo no site da SEFAZ/SP: https://www.nfp.fazenda.sp.gov.br haverá um link manuais e aplicativos neste link vecê vai encontrar o manual do webservice e todos os demais referente ao assunto das CAT 52/07, 85/07 e 102/07. Abraço --- Em delphi-br@yahoogrupos.com.br, Claudiney Cogo [EMAIL PROTECTED] escreveu Boa dia a todos. Sobre NFe. Acredito existir mais pessoas no mesmo caso meu. Consegui bastante material a respeito do funcionamento, mas nenhum exemplo prático de acesso a webservices, especialmente da SEFAZ. Lendo bastante aprendi muita coisa sobre xml e webservice, assunto até então desconhecido pra mim. Fiz a certificação digital e parti ao acesso no webservice da SEFAZ. Quando acesso o link https://www.sefazvirtual.fazenda.gov.br/nfeconsulta/nfeconsulta.asmx?WSDL por exemplo, ele me retorna o arquivo WSDL no browser. A dúvida é quando tento utilizar esse endereço no Delphi. Tanto pelo WSDL Importer quando no componente HTTPRIO eu recebo a mesma mensagem de retorno: Unable to load WSDL File/Location: https://www.sefazvirtual.fazenda.gov.br/nfeconsulta/nfeconsulta.asmx?WSDL. Error [Empty document]. Gostaria de uma dica de quem já passou dessa fase utilizando delphi. O que seria esse erro? Pelo que entendi preciso ter acesso ao WSDL para ter a definição das funções do webservice e poder utilizá-lo. Ou nesse caso a forma de funcionamento é outra? Não entendi o que seria isso, pois o funcionamento de webservices a princípio é simples, tanto que criei alguns de exemplo que rodei nos servidores aqui da empresa. Acessei os WSDL deles com as descrições corretas e importei para o Delphi, podendo utilizar as classes e interfaces criadas sem problema. Mas nesse caso não retorna nada. Já cheguei a desconfiar até da minha certificação, mas ele pede o certificado no momento do acesso e não dá erro de certificado inválido. É uma certificação e-CNPJ A1. Obrigado antecipadamente. Abraços. __ 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 [As partes desta mensagem que não continham texto foram removidas] __ NOD32 3051 (20080424) Information __ This message was checked by NOD32 antivirus system. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Abrir vários Data Modules
Olá, tenho um Data Module e queria poder utilizar o mesmo em toda minha aplicação, porém uso a mesma Query ( e todos os outros componentes )em vários formulários ao mesmo tempo! Como eu consigo Estanciar na memória um DM pra cada formulário que eu abrir ?? _ Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o Messenger! É GRÁTIS! http://www.msn.com.br/emoticonpack [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Abrir vários Data Modules
Var MeuDM : TDataModule; MeuDM := TNomeDataModule.Create(Self); Assim vc pode ter quantos datamódules quiser usando um datamodule como modelo. [As partes desta mensagem que não continham texto foram removidas]
RE: Res: [delphi-br] Abrir vários Data Modules
Certo, tinha tentado fazer dessa forma.. mais não consegui referenciar a tabela por essa variavel.. por exemplo! MeuDM.Query1.Open; como poderia fazer isso ? To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Thu, 24 Apr 2008 08:59:40 -0300 Subject: Res: [delphi-br] Abrir vários Data Modules Var MeuDM : TDataModule; MeuDM := TNomeDataModule.Create(Self); Assim vc pode ter quantos datamódules quiser usando um datamodule como modelo. [As partes desta mensagem que não continham texto foram removidas] _ Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver offline. Conheça o MSN Mobile! http://mobile.live.com/signup/signup2.aspx?lc=pt-br [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Tecla TAB
Bom Dia.. O problema é esse, quando eu teclo a tecla TAB, nao passa pelo keydown do form. Nao sei aonde detectar se a tecla foi teclada. Jr. - Original Message - From: Paulo Casagrande To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 24, 2008 7:35 AM Subject: Re: [delphi-br] Tecla TAB Bom dia a todos... Onde você quer fazer isso: A) Toda a aplicação. B) Apenas uns forms. C) Apenas em alguns componentes. Sugestão: A maneira mais simples seria através do keyDown identifique se foi teclado um TAB e retorne um 0 no lugar. [] Boa noite a todos. Eu gostaria de bloquear a tecla TAB, eu queria que esta tecla não faça nada. Deltalhe, sem passar para false os TabStops dos componentes. Obrigado -- No virus found in this incoming message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.4/1395 - Release Date: 24/4/2008 07:24 [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Abrir vários Data Modules
O ideal seria você ter um DTM modelo. Daí para cada instância de formulário vc estanciaria um DTM_Local herdando do DTM_modelo para o objeto do formulário em questão, desta forma herdaria as configurações de conexão e tudo mais que tiver no DTM modelo, mas de forma totalmente independente. Luciano Calenzani Simões - Mensagem original De: Evandro . [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quinta-feira, 24 de Abril de 2008 8:50:08 Assunto: [delphi-br] Abrir vários Data Modules Olá, tenho um Data Module e queria poder utilizar o mesmo em toda minha aplicação, porém uso a mesma Query ( e todos os outros componentes )em vários formulários ao mesmo tempo! Como eu consigo Estanciar na memória um DM pra cada formulário que eu abrir ?? _ _ _ _ _ _ Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o Messenger! É GRÁTIS! http://www.msn. com.br/emoticonp ack [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.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Abrir vários Data Modules
implementation
uses Unit2;
var
MeuDM : TDmDados;
{$R *.dfm}
procedure TForm3.FormCreate(Sender: TObject);
begin
MeuDM := TDmDados.Create(Self);
DataSource1.DataSet := MeuDM.cds;
DataSource1.DataSet.Open;
end;
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Tecla TAB
Faça o seguinte: - Coloque um ApplicationEvents no form principal do seu programa; - Coloque o seguinte código dentro do evento OnMessage dele: if (Msg.Message = WM_KEYDOWN) AND (Msg.wParam = VK_TAB) then begin Msg.wParam := 0; Handled:= True; end; Flw - Original Message - From: Adauri Antonio Camacho Junior To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 24, 2008 9:45 AM Subject: Re: [delphi-br] Tecla TAB Bom Dia.. O problema é esse, quando eu teclo a tecla TAB, nao passa pelo keydown do form. Nao sei aonde detectar se a tecla foi teclada. Jr. - Original Message - From: Paulo Casagrande To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 24, 2008 7:35 AM Subject: Re: [delphi-br] Tecla TAB Bom dia a todos... Onde você quer fazer isso: A) Toda a aplicação. B) Apenas uns forms. C) Apenas em alguns componentes. Sugestão: A maneira mais simples seria através do keyDown identifique se foi teclado um TAB e retorne um 0 no lugar. [] Boa noite a todos. Eu gostaria de bloquear a tecla TAB, eu queria que esta tecla não faça nada. Deltalhe, sem passar para false os TabStops dos componentes. Obrigado -- No virus found in this incoming message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.4/1395 - Release Date: 24/4/2008 07:24 [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Discador PPOE tem como fazer um em delphi ?
Não sou especialista no assunto, mas com a minha experiência em implementar protocólos de comunicação, creio que seja possível sim, pois as próprias operadoras de banda larga disponibilizam discadores que implementam esse protocólo. Mas já digo que isso é uma tarefa ingrata, você terá que partir do zero, esqueça ajuda, esqueça componentes prontos. A primeira coisa que vc deve fazer é conhecer tudo a respeito do protocólo, uma rápida busca na internet e obtive muitas informaçãoes, claro que tudo em inglês, se você não sabe inglês esqueça de cara. Encontrando a documentação do protocolo é meio caminho andado, ai é ler e implementar o dito cujo. marcosdiirr escreveu: Tem como fazer um discador PPOE ou mesmo mandar o delphi discar um ? Atenciosamente Marcos Diirr [As partes desta mensagem que não continham texto foram removidas] __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/
Re: [delphi-br] Discador PPOE tem como fazer um em delphi ?
Bom dia srs. Não dá pra gente iniciar um projeto e implementar isso from scratch ( do zero ) ? E ter uma implementação de PPPOE em Delphi? Atte, Ricardo. Alexandre Rodrigues [EMAIL PROTECTED] escreveu: Não sou especialista no assunto, mas com a minha experiência em implementar protocólos de comunicação, creio que seja possível sim, pois as próprias operadoras de banda larga disponibilizam discadores que implementam esse protocólo. Mas já digo que isso é uma tarefa ingrata, você terá que partir do zero, esqueça ajuda, esqueça componentes prontos. A primeira coisa que vc deve fazer é conhecer tudo a respeito do protocólo, uma rápida busca na internet e obtive muitas informaçãoes, claro que tudo em inglês, se você não sabe inglês esqueça de cara. Encontrando a documentação do protocolo é meio caminho andado, ai é ler e implementar o dito cujo. marcosdiirr escreveu: Tem como fazer um discador PPOE ou mesmo mandar o delphi discar um ? Atenciosamente Marcos Diirr [As partes desta mensagem que não continham texto foram removidas] __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/ _ - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Discador PPOE tem como fazer um em delphi ?
Cara, to totalmente sem tempo pra isso no momento. Ricardo César Cardoso escreveu: Bom dia srs. Não dá pra gente iniciar um projeto e implementar isso from scratch ( do zero ) ? E ter uma implementação de PPPOE em Delphi? Atte, Ricardo. Alexandre Rodrigues [EMAIL PROTECTED] mailto:alexandre_rodrigues_poa%40yahoo.com.br escreveu: Não sou especialista no assunto, mas com a minha experiência em implementar protocólos de comunicação, creio que seja possível sim, pois as próprias operadoras de banda larga disponibilizam discadores que implementam esse protocólo. Mas já digo que isso é uma tarefa ingrata, você terá que partir do zero, esqueça ajuda, esqueça componentes prontos. A primeira coisa que vc deve fazer é conhecer tudo a respeito do protocólo, uma rápida busca na internet e obtive muitas informaçãoes, claro que tudo em inglês, se você não sabe inglês esqueça de cara. Encontrando a documentação do protocolo é meio caminho andado, ai é ler e implementar o dito cujo. marcosdiirr escreveu: Tem como fazer um discador PPOE ou mesmo mandar o delphi discar um ? Atenciosamente Marcos Diirr [As partes desta mensagem que não continham texto foram removidas] __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/ http://br.beta.messenger.yahoo.com/ _ - 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] __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/
[delphi-br] D2007 + FB 2 + DBX4 com Drive da CoreLab.
Bom dia. Gostaria de informações se alguem usa o drive da corelab para acessar o FB 2 utilizando o D2007+DBX4 . Quero saber se vale a pena comprar o drive da corelab e qual deles deve ser comprado. Na visita que fiz ao site existem licensas do tipo single-team-site. Alguem do grupo que comprou sabe me informar a diferença ? Se posso distribuir a dll para o cliente ou devo pagar ? Se algumas delas tem limite de conexões ou outro tipo de limitador ? Grato pela atenção. João Paulo. [As partes desta mensagem que não continham texto foram removidas]
RE: Res: [delphi-br] Abrir vários Data Modules
Então, mais aqui no meu da erro justamente quando vou declarar essa variavel (
MeuDM : TDmDados;)..
quando declaro a Unit do DM no Usesnão dá erro, porém não reconhece o
comando ( MeuDM.Query ) por exemplo...
To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Thu, 24 Apr 2008 10:01:51 -0300
Subject: Res: [delphi-br] Abrir vários Data Modules
implementation
uses Unit2;
var
MeuDM : TDmDados;
{$R *.dfm}
procedure TForm3.FormCreate(Sender: TObject);
begin
MeuDM := TDmDados.Create(Self);
DataSource1.DataSet := MeuDM.cds;
DataSource1.DataSet.Open;
end;
[As partes desta mensagem que não continham texto foram removidas]
_
Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver
offline. Conheça o MSN Mobile!
http://mobile.live.com/signup/signup2.aspx?lc=pt-br
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] D2007 + FB 2 + DBX4 com Drive da CoreLab.
Jota Pyl, o melhro lugar pra vc obter essa informação de forma correta e precisa é junto à CoreLab, posta lá no Forum, e se assim como o meu seu ingles não for bom, usa um tradutor, to me comunicando assim que eles a anos :) 2008/4/24 Jota Pyl Gmail [EMAIL PROTECTED]: Bom dia. Gostaria de informações se alguem usa o drive da corelab para acessar o FB 2 utilizando o D2007+DBX4 . Quero saber se vale a pena comprar o drive da corelab e qual deles deve ser comprado. Na visita que fiz ao site existem licensas do tipo single-team-site. Alguem do grupo que comprou sabe me informar a diferença ? Se posso distribuir a dll para o cliente ou devo pagar ? Se algumas delas tem limite de conexões ou outro tipo de limitador ? Grato pela atenção. João Paulo. [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] 3 camadas - dephi
Alô amigos da lista ! Jà andei pela internet pesquisando sobre 3 camadas e encontrei bastante coisa. Só que cada um fala uma coisa e textos enrrrmmmeees sobre o assunto. Alguém sabe onde posso encontrar alguma coisa sobre o assunto e exemplo de programação 3 camadas em delphi ? Desde de já agradeço, Ricardo Cabral - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] 3 camadas - dephi
[EMAIL PROTECTED] Otimo grupo sobre Multicamadas com o Pai Bruno Lichot [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Tecla TAB
Se for no Form, não se esqueça de colocar a propriedade 'KeyPreview' como True... -- TFA, Leslyn Fernandes 55-11-9159-3837 Computer Engineer Integra Solutions Imagination is more important than knowledge. - Albert Einstein 2008/4/24 Adauri Antonio Camacho Junior [EMAIL PROTECTED]: Bom Dia.. O problema é esse, quando eu teclo a tecla TAB, nao passa pelo keydown do form. Nao sei aonde detectar se a tecla foi teclada. Jr. - Original Message - From: Paulo Casagrande To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Thursday, April 24, 2008 7:35 AM Subject: Re: [delphi-br] Tecla TAB Bom dia a todos... Onde você quer fazer isso: A) Toda a aplicação. B) Apenas uns forms. C) Apenas em alguns componentes. Sugestão: A maneira mais simples seria através do keyDown identifique se foi teclado um TAB e retorne um 0 no lugar. [] Boa noite a todos. Eu gostaria de bloquear a tecla TAB, eu queria que esta tecla não faça nada. Deltalhe, sem passar para false os TabStops dos componentes. Obrigado -- No virus found in this incoming message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.4/1395 - Release Date: 24/4/2008 07:24 [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Dic. de Dados e Form Automático, alguém conhece alguma coisa em delphi?
Aliás, tenho muito interesse neste assunto também... -- TFA, Leslyn Fernandes 55-11-9159-3837 Computer Engineer Integra Solutions Imagination is more important than knowledge. - Albert Einstein 2008/4/23 Fellipe Henrique [EMAIL PROTECTED]: Olá Davi, agradeço sua atenção, você pode nos ajudar dando dicas de como você está procedendo, não precisa enviar o fonte - você trabalhou duro por ele, nos temos que trabalhar para o nosso, não é?! Mas idéias são sempre bem vindas.. []s Em 23/04/08, Davi Eduardo Borges Wall [EMAIL PROTECTED]davi.wall%40mult.com.br escreveu: Olha eu criei um framework com este conceito após trabalhar em uma empresa que também utiliza este conceito. Foi uma das coisas mais práticas e úteis que já fiz. Ainda não terminei. Na verdade o projeto está um pouco parado. A geração de tela, controle de fluxo de dados, definições de tela estão ok. (alguns bugs que vou arrumando no decorrer da coisa) Ainda falta geração de relatórios, inclusão de macros para controle de tela, segurança e controle de usuários e suporte a dll's, entre outros... Bom falta muito ainda, mas olha, vendo isso rodando é muito legal. Eu crio uma tela de cadastro em 5 minutos! E vale muito a pensa investir nesse tipo de projeto. Se eu arrumar um tempinho eu vou disponibilizar o projeto para vocês apreciarem. (sem código fonte =) ) []'s De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.br [mailto: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.br] Em nome de Fellipe Henrique Enviada em: quarta-feira, 23 de abril de 2008 14:31 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.br Assunto: Re: [delphi-br] Dic. de Dados e Form Automático, alguém conhece alguma coisa em delphi? Olá Rubem, Sim, saiu sim sobre isso na revista, porém lá dá só uma palinha, dá pra se ter uma idéia, porém queria algo mais avançado, como por exemplo, criar cadastros mestre-detalhes e por aí vai. Ah um bom tempo venho procurando esta tecnologia, porém sem êxito.. a parte de criar os formulários, não é uma das mais difíceis, o problema está na programação em si do formulário. Pois além da interface, eu poderia escrever os codigos para ele, contudo, não é possível fazer isso usando o delphi normal (object-pascal), até o momento somente vi, alguns interpretadores de script, que o proprio nome já diz, interpretador, ou seja, o que deveria ser para ficar mais rápido, acaba ficando mais lento, por causa da interpretação do script, e um script, não é uma linguagem de programação, então, não teria muitos poderes de se fazer alguma coisa.. []s Em 23/04/08, Rubem Nascimento da Rocha [EMAIL PROTECTED]djpardalrocha%40hotmail.com djpardalrocha%40hotmail.commailto: djpardalrocha%40hotmail.com djpardalrocha%2540hotmail.com escreveu: 1) Na época do BDE, este permitia a criação de um dicionário de dados que, em tempo de design, permitia a criação dos componentes data-aware a serem arrastados para um formulário. Era uma idéia boa, pena que foi uma prática pouquíssima difundida e que outros engines(mecanismos) para acesso a bancos de dados não tiveram essa idéia. 2) Saiu há alguns meses atrás na (discriminada, mas) excelente revista ClubeDelphi, um artigo interessante sobre criação de formulários de forma automática com base em definições guardadas em bancos de dados. Não me recordo do número da revista. Sugiro que vc entre em contato com alguém da redação da DevMedia pra saber qual foi a edição. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.brmailto: delphi-br%40yahoogrupos.com.br delphi-br%2540yahoogrupos.com.br delphi-br%40yahoogrupos.com.br From: [EMAIL PROTECTED] fellipeh%40gmail.com fellipeh%40gmail.com mailto: fellipeh%40gmail.com fellipeh%2540gmail.com fellipeh%40gmail.com Date: Wed, 23 Apr 2008 14:17:45 -0300 Subject: [delphi-br] Dic. de Dados e Form Automático, alguém conhece alguma coisa em delphi? Olá amigos, alguém conhece algum componente, framework, que se cria um dicionário de dados, e com base nele, o framework cria uma tela de cadastro e/ou movimento, sem precisar ficar criar o form no próprio delphi? Deixando tudo automático? []s -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com fellipeh%40gmail.com mailto:fellipeh%40gmail.com fellipeh%2540gmail.comfellipeh% 2540gmail.com fellipeh%40gmail.com Cansou do MercadoLivre como eu? Tente o www.uaileilão.com.brhttp://www.uaileil%C3%A3o.com.br http://www.uaileil%C3%A3o.com.br http://www.uaileil%C3%A3o.com.br . [As partes desta
[delphi-br] ArrayList
Pessoal Existe alguma estrutura no delphi semelhante ao ArrayList do Java? A ideia seria um vetor sem limite de tamanho e que armazenasse um objeto. []´s -- Hélton R. Nunes [EMAIL PROTECTED]
Re: [delphi-br] Tecla TAB
Funcionou perfeitamente. Muito obrigado. - Original Message - From: Leandro To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 24, 2008 10:33 AM Subject: Re: [delphi-br] Tecla TAB Faça o seguinte: - Coloque um ApplicationEvents no form principal do seu programa; - Coloque o seguinte código dentro do evento OnMessage dele: if (Msg.Message = WM_KEYDOWN) AND (Msg.wParam = VK_TAB) then begin Msg.wParam := 0; Handled := True; end; Flw - Original Message - From: Adauri Antonio Camacho Junior To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 24, 2008 9:45 AM Subject: Re: [delphi-br] Tecla TAB Bom Dia.. O problema é esse, quando eu teclo a tecla TAB, nao passa pelo keydown do form. Nao sei aonde detectar se a tecla foi teclada. Jr. - Original Message - From: Paulo Casagrande To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 24, 2008 7:35 AM Subject: Re: [delphi-br] Tecla TAB Bom dia a todos... Onde você quer fazer isso: A) Toda a aplicação. B) Apenas uns forms. C) Apenas em alguns componentes. Sugestão: A maneira mais simples seria através do keyDown identifique se foi teclado um TAB e retorne um 0 no lugar. [] Boa noite a todos. Eu gostaria de bloquear a tecla TAB, eu queria que esta tecla não faça nada. Deltalhe, sem passar para false os TabStops dos componentes. Obrigado -- No virus found in this incoming message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.4/1395 - Release Date: 24/4/2008 07:24 [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. Version: 7.5.524 / Virus Database: 269.23.4/1395 - Release Date: 24/4/2008 07:24 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] 3 camadas - dephi
http://cc.codegear.com/author/795118 []s Ricardo Cabral escreveu: Alô amigos da lista ! Jà andei pela internet pesquisando sobre 3 camadas e encontrei bastante coisa. Só que cada um fala uma coisa e textos enrrrmmmeees sobre o assunto. Alguém sabe onde posso encontrar alguma coisa sobre o assunto e exemplo de programação 3 camadas em delphi ? Desde de já agradeço, Ricardo Cabral - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] ArrayList
Em delphi, algo semelhante ao ArrayList seria um array dinâmico: var arr = array of TObject; // escolha a classe para determinar o tamanho: SetLength(arr, tamanho) para percorrer : for i := Low(arr) to High(arr) do 2008/4/24 Helton [EMAIL PROTECTED]: Pessoal Existe alguma estrutura no delphi semelhante ao ArrayList do Java? A ideia seria um vetor sem limite de tamanho e que armazenasse um objeto. []´s -- Hélton R. Nunes [EMAIL PROTECTED] heltonrn%40gmail.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] ArrayList
Não conheço ArrayList do Java, mas em Delphi você pode declarar um array dinâmico e mexer no seu tamanho em tempo de execução. Exemplo: var meuArray: array of TEdit; begin SetLength(meuArray,10); //Cria espaço para 10 elementos ... end; Combinando com as funções High, Lower, Pos, Pred e Pos consegue-se fazer bastante coisa interessante. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] ArrayList
Era isso mesmo que precisava, valeu pessoal. []´s 2008/4/24 José Mário Silva Guedes [EMAIL PROTECTED]: Não conheço ArrayList do Java, mas em Delphi você pode declarar um array dinâmico e mexer no seu tamanho em tempo de execução. Exemplo: var meuArray: array of TEdit; begin SetLength(meuArray,10); //Cria espaço para 10 elementos ... end; Combinando com as funções High, Lower, Pos, Pred e Pos consegue-se fazer bastante coisa interessante. [As partes desta mensagem que não continham texto foram removidas] -- Hélton R. Nunes [EMAIL PROTECTED]
RES: [delphi-br] Dic. de Dados e Form Automáti co, alguém conhece alguma coisa em delphi?
Estamos a disposição. De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Fellipe Henrique Enviada em: quarta-feira, 23 de abril de 2008 17:54 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Dic. de Dados e Form Automático, alguém conhece alguma coisa em delphi? Olá Davi, agradeço sua atenção, você pode nos ajudar dando dicas de como você está procedendo, não precisa enviar o fonte - você trabalhou duro por ele, nos temos que trabalhar para o nosso, não é?! Mas idéias são sempre bem vindas.. []s Em 23/04/08, Davi Eduardo Borges Wall [EMAIL PROTECTED] mailto:davi.wall%40mult.com.br escreveu: Olha eu criei um framework com este conceito após trabalhar em uma empresa que também utiliza este conceito. Foi uma das coisas mais práticas e úteis que já fiz. Ainda não terminei. Na verdade o projeto está um pouco parado. A geração de tela, controle de fluxo de dados, definições de tela estão ok. (alguns bugs que vou arrumando no decorrer da coisa) Ainda falta geração de relatórios, inclusão de macros para controle de tela, segurança e controle de usuários e suporte a dll's, entre outros... Bom falta muito ainda, mas olha, vendo isso rodando é muito legal. Eu crio uma tela de cadastro em 5 minutos! E vale muito a pensa investir nesse tipo de projeto. Se eu arrumar um tempinho eu vou disponibilizar o projeto para vocês apreciarem. (sem código fonte =) ) []'s De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em nome de Fellipe Henrique Enviada em: quarta-feira, 23 de abril de 2008 14:31 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Dic. de Dados e Form Automático, alguém conhece alguma coisa em delphi? Olá Rubem, Sim, saiu sim sobre isso na revista, porém lá dá só uma palinha, dá pra se ter uma idéia, porém queria algo mais avançado, como por exemplo, criar cadastros mestre-detalhes e por aí vai. Ah um bom tempo venho procurando esta tecnologia, porém sem êxito.. a parte de criar os formulários, não é uma das mais difíceis, o problema está na programação em si do formulário. Pois além da interface, eu poderia escrever os codigos para ele, contudo, não é possível fazer isso usando o delphi normal (object-pascal), até o momento somente vi, alguns interpretadores de script, que o proprio nome já diz, interpretador, ou seja, o que deveria ser para ficar mais rápido, acaba ficando mais lento, por causa da interpretação do script, e um script, não é uma linguagem de programação, então, não teria muitos poderes de se fazer alguma coisa.. []s Em 23/04/08, Rubem Nascimento da Rocha [EMAIL PROTECTED] mailto:djpardalrocha%40hotmail.com djpardalrocha%40hotmail.commailto: djpardalrocha%40hotmail.com djpardalrocha%2540hotmail.com escreveu: 1) Na época do BDE, este permitia a criação de um dicionário de dados que, em tempo de design, permitia a criação dos componentes data-aware a serem arrastados para um formulário. Era uma idéia boa, pena que foi uma prática pouquíssima difundida e que outros engines(mecanismos) para acesso a bancos de dados não tiveram essa idéia. 2) Saiu há alguns meses atrás na (discriminada, mas) excelente revista ClubeDelphi, um artigo interessante sobre criação de formulários de forma automática com base em definições guardadas em bancos de dados. Não me recordo do número da revista. Sugiro que vc entre em contato com alguém da redação da DevMedia pra saber qual foi a edição. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.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 fellipeh%40gmail.com mailto: fellipeh%40gmail.com fellipeh%2540gmail.com fellipeh%40gmail.com Date: Wed, 23 Apr 2008 14:17:45 -0300 Subject: [delphi-br] Dic. de Dados e Form Automático, alguém conhece alguma coisa em delphi? Olá amigos, alguém conhece algum componente, framework, que se cria um dicionário de dados, e com base nele, o framework cria uma tela de cadastro e/ou movimento, sem precisar ficar criar o form no próprio delphi? Deixando tudo automático? []s -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] mailto:fellipeh%40gmail.com fellipeh%40gmail.com mailto:fellipeh%40gmail.comfellipeh%2540gmail.com fellipeh%40gmail.com Cansou do MercadoLivre como eu? Tente o www.uaileilão.com.brhttp://www.uaileil%C3%A3o.com.br http://www.uaileil%C3%A3o.com.br . [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Intraweb
Alguem sabe como eu consigo fazer o componente IWMPEG fazer reproduzir audio?
[delphi-br] Re: Frames do Delphi 6
Bom dia a todos, Em primeiro lugar, obrigado a todos pela boa vontade. Na verdade o que eu quero é ter os Frames já criados (todos eles), e a medida que os usuários clicassem nas opções do menu, os respectivos frames seriam exibidos no Form Principal (que será o parent dos frames). Esse form Principal pode conterá um Frame vazio (ou com uma imagem). Isso eu já consegui, dessa maneira: procedure TForm1.este21Click(Sender: TObject); var Frame11: TFrame1; begin VLeft := VLeft + 100; // Variavel Global Try Frame11 := TFrame1.Create(nil); Frame11.Parent := Form1; except Frame11.Free; Frame11 := TFrame1.Create(nil); Frame11.Parent := Form1; end; Frame11.Left := VLeft; Frame11.Top := 200; end; O problema agora é outro. O problema é destruir os frames. O que eu quero: Quando o usuário clicar numa opção do menu, o sistema deve destruir o frame anterior e instanciar o novo frame. Como o exemplo acima mostra, eu utilizo o método .free mas ele não funciona, o frame continua instanciado, na tela e funcionando, eu continuo acessando todos os seus componentes. Para poder visualizar melhor, criei uma variável Vleft apenas para descolar as novas instancias do frame. As novas instancias são postas uma ao lodo da outra e nenhuma é destruida mesmo após ao .Free. O caso qui não é organização da tela pois eu posso obrigar o Frame a utilizar todo a área útil, podem a memória, imaginem se o usuário clicar 10 vezes numa opção do menu, serão criados 10 instancias do mesmo frame. Obrigado, Giovanny Carvalho --- Em delphi-br@yahoogrupos.com.br, Alexandre Rodrigues [EMAIL PROTECTED] escreveu Bom, eu não criei o Frame do Zero para depois colocar os componentes nele, o que fiz foi Montar o Frame e depois instância-lo em tempo de execução, o que funciona perfeitamente. Rubem Nascimento da Rocha escreveu: 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: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br From: [EMAIL PROTECTED] mailto:alexandre_rodrigues_poa%40yahoo.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: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br From: [EMAIL PROTECTED] mailto:giovannycarvalho%40yahoo.com.br 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! http://www.amigosdomessenger.com.br http://www.amigosdomessenger.com.br ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ http://br.yahoo.com/mailbeta/tudonovo/ __ Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas e muito mais no MSN Video! http://video.msn.com/?mkt=pt-br http://video.msn.com/?mkt=pt-br ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/
Re: [delphi-br] ArrayList
Só puxando o gancho, num daria pra fazer nada como uma lista não-tipada em delphi, né? tipo... temos que declarar array of Integer ou array of String, mas não existe um tipo lista, tal qual em C, não é? -- TFA, Leslyn Fernandes 55-11-9159-3837 Computer Engineer Integra Solutions Imagination is more important than knowledge. - Albert Einstein 2008/4/24 Helton [EMAIL PROTECTED]: Era isso mesmo que precisava, valeu pessoal. []´s 2008/4/24 José Mário Silva Guedes [EMAIL PROTECTED]jmarioguedes%40gmail.com : Não conheço ArrayList do Java, mas em Delphi você pode declarar um array dinâmico e mexer no seu tamanho em tempo de execução. Exemplo: var meuArray: array of TEdit; begin SetLength(meuArray,10); //Cria espaço para 10 elementos ... end; Combinando com as funções High, Lower, Pos, Pred e Pos consegue-se fazer bastante coisa interessante. [As partes desta mensagem que não continham texto foram removidas] -- Hélton R. Nunes [EMAIL PROTECTED] heltonrn%40gmail.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Dic. de Dados e Form Automático, alguém conhece alguma coisa em delphi?
Ola Davi tudo bom?! Voce tem alguma literatura sobre esse assunto? [] -- Ismair C. Alves msn: [EMAIL PROTECTED] ByteConf Soluções em Software Livre. Linux User: #447538 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] ArrayList
Leslyn Fernandes wrote: Só puxando o gancho, num daria pra fazer nada como uma lista não-tipada em delphi, né? tipo... temos que declarar array of Integer ou array of String, mas não existe um tipo lista, tal qual em C, não é? Qual a vantagem? -- Joao Morais
Re: [delphi-br] Re: Frames do Delphi 6
Estou sem o Delphi e posso estar sugerindo uma enorme besteira, mas de qualquer forma não custa tentar... Porque vc não usa FreeAndNil( nome_do_objeto ) para liberar, ou mesmo assim não tem o resultado esperado? Atte, Ricardo. Giovanny Carvalho [EMAIL PROTECTED] escreveu: Bom dia a todos, Em primeiro lugar, obrigado a todos pela boa vontade. Na verdade o que eu quero é ter os Frames já criados (todos eles), e a medida que os usuários clicassem nas opções do menu, os respectivos frames seriam exibidos no Form Principal (que será o parent dos frames). Esse form Principal pode conterá um Frame vazio (ou com uma imagem). Isso eu já consegui, dessa maneira: procedure TForm1.este21Click(Sender: TObject); var Frame11: TFrame1; begin VLeft := VLeft + 100; // Variavel Global Try Frame11 := TFrame1.Create(nil); Frame11.Parent := Form1; except Frame11.Free; Frame11 := TFrame1.Create(nil); Frame11.Parent := Form1; end; Frame11.Left := VLeft; Frame11.Top := 200; end; O problema agora é outro. O problema é destruir os frames. O que eu quero: Quando o usuário clicar numa opção do menu, o sistema deve destruir o frame anterior e instanciar o novo frame. Como o exemplo acima mostra, eu utilizo o método .free mas ele não funciona, o frame continua instanciado, na tela e funcionando, eu continuo acessando todos os seus componentes. Para poder visualizar melhor, criei uma variável Vleft apenas para descolar as novas instancias do frame. As novas instancias são postas uma ao lodo da outra e nenhuma é destruida mesmo após ao .Free. O caso qui não é organização da tela pois eu posso obrigar o Frame a utilizar todo a área útil, podem a memória, imaginem se o usuário clicar 10 vezes numa opção do menu, serão criados 10 instancias do mesmo frame. Obrigado, Giovanny Carvalho --- Em delphi-br@yahoogrupos.com.br, Alexandre Rodrigues [EMAIL PROTECTED] escreveu Bom, eu não criei o Frame do Zero para depois colocar os componentes nele, o que fiz foi Montar o Frame e depois instância-lo em tempo de execução, o que funciona perfeitamente. Rubem Nascimento da Rocha escreveu: 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: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br From: [EMAIL PROTECTED] mailto:alexandre_rodrigues_poa%40yahoo.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: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br From: [EMAIL PROTECTED] mailto:giovannycarvalho%40yahoo.com.br 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! http://www.amigosdomessenger.com.br http://www.amigosdomessenger.com.br ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ http://br.yahoo.com/mailbeta/tudonovo/ __ Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas e muito mais no MSN Video! http://video.msn.com/?mkt=pt-br http://video.msn.com/?mkt=pt-br ___ Yahoo! Mail - Sempre a melhor opção para você!
Re: [delphi-br] Dic. de Dados e Form Automático, alguém conhece alguma coisa em delphi?
Olá amigos, com o propósito de se criar um framework para este fim, criei um grupo para discutirmos, achei melhor pois assim, não atolamos a lista com as mensagens, e as mensagens sobre este tema, ficam mais fáceis de ser localizadas depois. http://groups.google.com.br/group/dynforms A quem se interessar, por favor, cadastre-se no grupo, Mãos a obra! :o) []s Em 24/04/08, Davi Eduardo Borges Wall [EMAIL PROTECTED] escreveu: Estamos a disposição. De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em nome de Fellipe Henrique Enviada em: quarta-feira, 23 de abril de 2008 17:54 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Dic. de Dados e Form Automático, alguém conhece alguma coisa em delphi? Olá Davi, agradeço sua atenção, você pode nos ajudar dando dicas de como você está procedendo, não precisa enviar o fonte - você trabalhou duro por ele, nos temos que trabalhar para o nosso, não é?! Mas idéias são sempre bem vindas.. []s Em 23/04/08, Davi Eduardo Borges Wall [EMAIL PROTECTED]davi.wall%40mult.com.brmailto: davi.wall%40mult.com.br davi.wall%2540mult.com.br escreveu: Olha eu criei um framework com este conceito após trabalhar em uma empresa que também utiliza este conceito. Foi uma das coisas mais práticas e úteis que já fiz. Ainda não terminei. Na verdade o projeto está um pouco parado. A geração de tela, controle de fluxo de dados, definições de tela estão ok. (alguns bugs que vou arrumando no decorrer da coisa) Ainda falta geração de relatórios, inclusão de macros para controle de tela, segurança e controle de usuários e suporte a dll's, entre outros... Bom falta muito ainda, mas olha, vendo isso rodando é muito legal. Eu crio uma tela de cadastro em 5 minutos! E vale muito a pensa investir nesse tipo de projeto. Se eu arrumar um tempinho eu vou disponibilizar o projeto para vocês apreciarem. (sem código fonte =) ) []'s De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brmailto: delphi-br%40yahoogrupos.com.br delphi-br%2540yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br mailto: delphi-br%40yahoogrupos.com.br delphi-br%2540yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em nome de Fellipe Henrique Enviada em: quarta-feira, 23 de abril de 2008 14:31 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brmailto: delphi-br%40yahoogrupos.com.br delphi-br%2540yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Dic. de Dados e Form Automático, alguém conhece alguma coisa em delphi? Olá Rubem, Sim, saiu sim sobre isso na revista, porém lá dá só uma palinha, dá pra se ter uma idéia, porém queria algo mais avançado, como por exemplo, criar cadastros mestre-detalhes e por aí vai. Ah um bom tempo venho procurando esta tecnologia, porém sem êxito.. a parte de criar os formulários, não é uma das mais difíceis, o problema está na programação em si do formulário. Pois além da interface, eu poderia escrever os codigos para ele, contudo, não é possível fazer isso usando o delphi normal (object-pascal), até o momento somente vi, alguns interpretadores de script, que o proprio nome já diz, interpretador, ou seja, o que deveria ser para ficar mais rápido, acaba ficando mais lento, por causa da interpretação do script, e um script, não é uma linguagem de programação, então, não teria muitos poderes de se fazer alguma coisa.. []s Em 23/04/08, Rubem Nascimento da Rocha [EMAIL PROTECTED]djpardalrocha%40hotmail.commailto: djpardalrocha%40hotmail.com djpardalrocha%2540hotmail.com djpardalrocha%40hotmail.commailto: djpardalrocha%40hotmail.com djpardalrocha%2540hotmail.com escreveu: 1) Na época do BDE, este permitia a criação de um dicionário de dados que, em tempo de design, permitia a criação dos componentes data-aware a serem arrastados para um formulário. Era uma idéia boa, pena que foi uma prática pouquíssima difundida e que outros engines(mecanismos) para acesso a bancos de dados não tiveram essa idéia. 2) Saiu há alguns meses atrás na (discriminada, mas) excelente revista ClubeDelphi, um artigo interessante sobre criação de formulários de forma automática com base em definições guardadas em bancos de dados. Não me recordo do número da revista. Sugiro que vc entre em contato com alguém da redação da DevMedia pra saber qual foi a edição. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brmailto: delphi-br%40yahoogrupos.com.br delphi-br%2540yahoogrupos.com.br delphi-br%40yahoogrupos.com.brmailto: delphi-br%40yahoogrupos.com.br delphi-br%2540yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
Re: [delphi-br] Re: Frames do Delphi 6
Giovanny Carvalho wrote: procedure TForm1.este21Click(Sender: TObject); var Frame11: TFrame1; begin VLeft := VLeft + 100; // Variavel Global Try Frame11 := TFrame1.Create(nil); Frame11.Parent := Form1; except Frame11.Free; Frame11 := TFrame1.Create(nil); Frame11.Parent := Form1; end; Frame11.Left := VLeft; Frame11.Top := 200; end; O problema agora é outro. O problema é destruir os frames. O que eu quero: Quando o usuário clicar numa opção do menu, o sistema deve destruir o frame anterior e instanciar o novo frame. Como o exemplo acima mostra, eu utilizo o método .free mas ele não funciona, O seu código não faz muito sentido. Primeiro você não precisa do try/except, e segundo o free deve estar em outro evento, algo do tipo quando o usuário clicar fora do frame. -- Joao Morais
Res: [delphi-br] ArrayList
Vc pode usar o tipo Variant, mas ocupa mais memória e merece mais atenção em seu uso. Luciano Calenzani Simões - Mensagem original De: Leslyn Fernandes [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quinta-feira, 24 de Abril de 2008 13:55:11 Assunto: Re: [delphi-br] ArrayList Só puxando o gancho, num daria pra fazer nada como uma lista não-tipada em delphi, né? tipo... temos que declarar array of Integer ou array of String, mas não existe um tipo lista, tal qual em C, não é? -- TFA, Leslyn Fernandes 55-11-9159-3837 Computer Engineer Integra Solutions Imagination is more important than knowledge. - Albert Einstein 2008/4/24 Helton [EMAIL PROTECTED] com: Era isso mesmo que precisava, valeu pessoal. []´s 2008/4/24 José Mário Silva Guedes jmarioguedes@ gmail.comjmarioguedes% 40gmail.com : Não conheço ArrayList do Java, mas em Delphi você pode declarar um array dinâmico e mexer no seu tamanho em tempo de execução. Exemplo: var meuArray: array of TEdit; begin SetLength(meuArray, 10); //Cria espaço para 10 elementos ... end; Combinando com as funções High, Lower, Pos, Pred e Pos consegue-se fazer bastante coisa interessante. [As partes desta mensagem que não continham texto foram removidas] -- Hélton R. Nunes [EMAIL PROTECTED] com heltonrn%40gmail. 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.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] ArrayList
Nem sei realmente se há muita vantagem... só quis mesmo matar uma curiosidade... 2008/4/24 Joao Morais [EMAIL PROTECTED]: Leslyn Fernandes wrote: Só puxando o gancho, num daria pra fazer nada como uma lista não-tipada em delphi, né? tipo... temos que declarar array of Integer ou array of String, mas não existe um tipo lista, tal qual em C, não é? Qual a vantagem? -- Joao Morais -- TFA, Leslyn Fernandes 55-11-9159-3837 Computer Engineer Integra Solutions Imagination is more important than knowledge. - Albert Einstein [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Agregando StringLists num só arquivo
Trabalhando com StringList gero dois arquivos assim (usando SaveToFile para cada stringlist) ARQUIVO: NOTA.TXT Número;dt_emissao;valor 01;01/04/2008;500,00 02;01/04/2008;300,00 03;01/04/2008;800,00 ARQUIVO: ITEMNOTA.TXT NúmeroNF;Produto;quantidade;valor 01;CAB04567;1,00;100,00 01;CAB99456,1,00;300,00 01;CAB03456,2,00;050,00 02;CAB99243;6,00;050,00 03;CAB42332,1,00;500,00 03;CAB99236;3,00;100,00 PORÉM AGORA PRECISO GERAR UM ÚNICO ARQUIVO ASSIM: 01;01/04/2008;500,00 //nota 1 01;CAB04567;1,00;100,00 //produtos nota 1 01;CAB99456,1,00;300,00 01;CAB03456,2,00;050,00 02;01/04/2008;300,00 //nota 2 02;CAB99243;6,00;050,00 //produtos nota 2 03;01/04/2008;800,00 //nota 3 03;CAB42332,1,00;500,00 //produtos nota 3 03;CAB99236;3,00;100,00 Portanto pergunto: Existe alguma forma, via StringList mesmo, de gerar um arquivo único desse jeito ? O objetivo do questionamento é para poder utilizar a estrutura do programa já existente. Obrigado Dival Zambon Junior Quirius Sistemas de Informática Ltda [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] ArrayList
Leslyn Fernandes wrote: Nem sei realmente se há muita vantagem... só quis mesmo matar uma curiosidade... Como o colega falou, você até pode usar um array de variant, mas perde em desempenho e tem tipagem fraca (muito embora tenha quem ache a tipagem fraca uma vantagem). Por outro lado, dependendo do que você quiser fazer, pode usar um open array e declarar como array of const. É muito útil para mandar todo tipo de tralha como parâmetro (tal qual acontece com a função Format). -- Joao Morais 2008/4/24 Joao Morais [EMAIL PROTECTED]: Leslyn Fernandes wrote: Só puxando o gancho, num daria pra fazer nada como uma lista não-tipada em delphi, né? tipo... temos que declarar array of Integer ou array of String, mas não existe um tipo lista, tal qual em C, não é? Qual a vantagem? -- Joao Morais
Re: [delphi-br] ArrayList
Desculpa alongar ainda mais o assunto, mas como funciona esse array of const? como é a declaração, e onde eu obtenho mais informações sobre o uso? -- TFA, Leslyn Fernandes 55-11-9159-3837 Computer Engineer Integra Solutions Imagination is more important than knowledge. - Albert Einstein 2008/4/24 Joao Morais [EMAIL PROTECTED]: Leslyn Fernandes wrote: Nem sei realmente se há muita vantagem... só quis mesmo matar uma curiosidade... Como o colega falou, você até pode usar um array de variant, mas perde em desempenho e tem tipagem fraca (muito embora tenha quem ache a tipagem fraca uma vantagem). Por outro lado, dependendo do que você quiser fazer, pode usar um open array e declarar como array of const. É muito útil para mandar todo tipo de tralha como parâmetro (tal qual acontece com a função Format). -- Joao Morais 2008/4/24 Joao Morais [EMAIL PROTECTED] post%40joaomorais.com.br : Leslyn Fernandes wrote: Só puxando o gancho, num daria pra fazer nada como uma lista não-tipada em delphi, né? tipo... temos que declarar array of Integer ou array of String, mas não existe um tipo lista, tal qual em C, não é? Qual a vantagem? -- Joao Morais [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Agregando StringLis ts num só arquivo
Dival @ QS wrote: Trabalhando com StringList gero dois arquivos assim (usando “SaveToFile” para cada stringlist) ARQUIVO: NOTA.TXT Número;dt_emissao;valor 01;01/04/2008;500,00 02;01/04/2008;300,00 03;01/04/2008;800,00 ARQUIVO: ITEMNOTA.TXT NúmeroNF;Produto;quantidade;valor 01;CAB04567;1,00;100,00 01;CAB99456,1,00;300,00 01;CAB03456,2,00;050,00 02;CAB99243;6,00;050,00 03;CAB42332,1,00;500,00 03;CAB99236;3,00;100,00 PORÉM AGORA PRECISO GERAR UM ÚNICO ARQUIVO ASSIM: 01;01/04/2008;500,00 //nota 1 01;CAB04567;1,00;100,00 //produtos nota 1 01;CAB99456,1,00;300,00 01;CAB03456,2,00;050,00 02;01/04/2008;300,00 //nota 2 02;CAB99243;6,00;050,00 //produtos nota 2 03;01/04/2008;800,00 //nota 3 03;CAB42332,1,00;500,00 //produtos nota 3 03;CAB99236;3,00;100,00 Portanto pergunto: Existe alguma forma, via StringList mesmo, de gerar um arquivo único desse jeito ? Não, você tem que fazer a intercalação no braço. -- Joao Morais -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Dic. de Dados e Form Automático , alguém conhece alguma coisa em delphi?
Fellipe Henrique wrote: Olá Davi, agradeço sua atenção, você pode nos ajudar dando dicas de como você está procedendo, não precisa enviar o fonte - você trabalhou duro por ele, nos temos que trabalhar para o nosso, não é?! Mas idéias são sempre bem vindas.. Estou usando um negócio parecido no PressObjects. Você declara a classe de negócio e diz que, por exemplo, um TVenda tem itens da classe TVendaItem. Noutro canto você cria um form e diz que ele atende a classe TVenda. Mesma coisa para TVendaItem. Por fim você coloca um grid no form TVenda e diz que aquele grid atende os itens da venda. Pronto, o framework pega essa sopa e entende que é para abrir o form 'tal' quando eu precisar incluir ou alterar um item de venda, sem configurar mestre-detalhe, datasource, dataset, nada. -- Joao Morais
Re: [delphi-br] O que seria este código ?? : ['{E085C101-C691-4E6F-A85C-DA09FB5E8405}' ]
Leonardo Gonçalves wrote: Se eu nao me engano o IInterface é a interface base de todas as interfaces isso a partir do Delphi 7 eu acho. No caso do Delphi 5 seria a IUnknown. A partir do D6 IUnknown passa a se chamar IInterface. IUnknown está declarada na unit System no D5. -- Joao Morais
Re: [delphi-br] O que seria este código ?? : ['{E085C101-C691-4E6F-A85C-DA09FB5E8405 }']
Bollasette wrote: O SINTEGRA.PAS foi desenvolvido para o D7, entretanto estou tentando compilar junto com um pequeno exemplo em D5, adicionei algumas funções de outras UNITS e consegui compilar retirando (IINTERFACE). Não sei se terei problemas lá na frente. Não. Como posso substituir no D5: IEmpresa = interface(IInterface)? Troque para IUnknown, por sinal é o que o compilador fará se você não colocar nada (tal qual acontece com classe e TObject) -- Joao Morais
Re: [delphi-br] Agregando StringLists num só arquivo
Vc deverá usar o método AddStrings. Vamos supor que o objeto que tem as notas se chame slNotas e o que tem os itens se chame slItens. Bastaria fazer slNotas.AddStrings( slItens ) para adicionar as linhas ao final. Agora se o que vc precisa é mesclar ou seja, listar uma nota e na sequencia todos os seus itens, aí vc teria que percorrer todo o slItens para adicionar as linahs referentes aquela nota. Atte, Ricardo. Dival @ QS [EMAIL PROTECTED] escreveu: Trabalhando com StringList gero dois arquivos assim (usando SaveToFile para cada stringlist) ARQUIVO: NOTA.TXT Número;dt_emissao;valor 01;01/04/2008;500,00 02;01/04/2008;300,00 03;01/04/2008;800,00 ARQUIVO: ITEMNOTA.TXT NúmeroNF;Produto;quantidade;valor 01;CAB04567;1,00;100,00 01;CAB99456,1,00;300,00 01;CAB03456,2,00;050,00 02;CAB99243;6,00;050,00 03;CAB42332,1,00;500,00 03;CAB99236;3,00;100,00 PORÉM AGORA PRECISO GERAR UM ÚNICO ARQUIVO ASSIM: 01;01/04/2008;500,00 //nota 1 01;CAB04567;1,00;100,00 //produtos nota 1 01;CAB99456,1,00;300,00 01;CAB03456,2,00;050,00 02;01/04/2008;300,00 //nota 2 02;CAB99243;6,00;050,00 //produtos nota 2 03;01/04/2008;800,00 //nota 3 03;CAB42332,1,00;500,00 //produtos nota 3 03;CAB99236;3,00;100,00 Portanto pergunto: Existe alguma forma, via StringList mesmo, de gerar um arquivo único desse jeito ? O objetivo do questionamento é para poder utilizar a estrutura do programa já existente. Obrigado Dival Zambon Junior Quirius Sistemas de Informática Ltda [As partes desta mensagem que não continham texto foram removidas] - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] ArrayList
Leslyn Fernandes wrote:
Desculpa alongar ainda mais o assunto,
Lista é pra isso mesmo.
mas como funciona esse array of
const? como é a declaração, e onde eu obtenho mais informações sobre o uso?
Veja a declaração da função Format (como um exemplo) e veja o tipo
TVarRec (no qual um array of const é convertido em tempo de compilação).
Abaixo vai uma função que criei para passar um array of variant para a
função Format:
function VarFormat(
const AFormat: string; const AArgs: array of Variant): string;
var
VConsts: array of TVarRec;
VExtended: Extended;
{$ifdef fpc}
VInt64: Int64;
{$endif}
I: Integer;
begin
SetLength(VConsts, Length(AArgs));
for I := 0 to Pred(Length(AArgs)) do
case TVarData(AArgs[I]).VType of
varSmallint: begin
VConsts[I].VType := vtInteger;
VConsts[I].VInteger := TVarData(AArgs[I]).VSmallint;
end;
varInteger: begin
VConsts[I].VType := vtInteger;
VConsts[I].VInteger := TVarData(AArgs[I]).VInteger;
end;
varSingle: begin
VExtended := TVarData(AArgs[I]).VSingle;
VConsts[I].VType := vtExtended;
VConsts[I].VExtended := @VExtended;
end;
varDouble: begin
VExtended := TVarData(AArgs[I]).VDouble;
VConsts[I].VType := vtExtended;
VConsts[I].VExtended := @VExtended;
end;
varCurrency: begin
VConsts[I].VType := vtCurrency;
VConsts[I].VCurrency := @TVarData(AArgs[I]).VCurrency;
end;
varDate: begin
VExtended := TVarData(AArgs[I]).VDate;
VConsts[I].VType := vtExtended;
VConsts[I].VExtended := @VExtended;
end;
varBoolean: begin
VConsts[I].VType := vtBoolean;
VConsts[I].VBoolean := TVarData(AArgs[I]).VBoolean;
end;
varByte: begin
VConsts[I].VType := vtInteger;
VConsts[I].VInteger := TVarData(AArgs[I]).VByte;
end;
varString: begin
VConsts[I].VType := vtAnsiString;
VConsts[I].VAnsiString := TVarData(AArgs[I]).VString;
end;
{$ifndef d5down}
varShortInt: begin
VConsts[I].VType := vtInteger;
VConsts[I].VInteger := TVarData(AArgs[I]).VShortInt;
end;
varWord: begin
VConsts[I].VType := vtInteger;
VConsts[I].VInteger := TVarData(AArgs[I]).VWord;
end;
varLongWord: begin
VConsts[I].VType := vtInteger;
VConsts[I].VInteger := TVarData(AArgs[I]).VLongWord;
end;
varInt64: begin
VConsts[I].VType := vtInt64;
VConsts[I].VInt64 := @TVarData(AArgs[I]).VInt64;
end;
{$endif}
{$ifdef fpc}
varQWord: begin
VInt64 := TVarData(AArgs[I]).VQWord;
VConsts[I].VType := vtInt64;
VConsts[I].VInt64 := @VInt64;
end;
{$endif}
else raise EPressError.Create(SUnsupportedVariantType);
end;
Result := Format(AFormat, VConsts);
end;
[delphi-br] Dic. de Dados e Form Automático, alg uém conhece alguma coisa em delphi?
Pessoal isso nao tem misterio nao. so verificar em um banco e criar os componentes de acordo com o banco. o meu sistema comercial que eu venho é mais ou menos assim. Tem um execultavel do sistema. Tem um execultavel do Dicionario de Dados Pronto. quando eu crio uma tabela no dicionario com os campos, no dicionario mesmo eu faco um menu para essa tabela. Nesse caso o meu sistema verifica o banco e cria o menu, os cadastro, tudo em tempo de execursao no momento que eu vou usar. por exemplo. vou vender o sistema, ai o cliente fala que quer somente o cadastro de clientes, vou no meu dicionario, crio a tabela cliente com os campos e validacoes que eu quero, crio o menu e pronto. Quando eu abrir o sistema, ja tera o menu com o cadastro de clientes, ai clico em cadastro de clientes aparece a listagem e em novo o sistema cria o form para novo, para alterar para excluir, e um relatoriozinho de dados cadastrais basico. Isso é simples, para fazer basta conhecer os componentes e usar a imaginação. Eu nao ensino nem mando os meus fontes mais ajudo a tirar duvidas. Quem quiser so falar. Em 24/04/08, Joao Morais [EMAIL PROTECTED] escreveu: Fellipe Henrique wrote: Olá Davi, agradeço sua atenção, você pode nos ajudar dando dicas de como você está procedendo, não precisa enviar o fonte - você trabalhou duro por ele, nos temos que trabalhar para o nosso, não é?! Mas idéias são sempre bem vindas.. Estou usando um negócio parecido no PressObjects. Você declara a classe de negócio e diz que, por exemplo, um TVenda tem itens da classe TVendaItem. Noutro canto você cria um form e diz que ele atende a classe TVenda. Mesma coisa para TVendaItem. Por fim você coloca um grid no form TVenda e diz que aquele grid atende os itens da venda. Pronto, o framework pega essa sopa e entende que é para abrir o form 'tal' quando eu precisar incluir ou alterar um item de venda, sem configurar mestre-detalhe, datasource, dataset, nada. -- Joao Morais -- Segundo Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Agregando StringLists num só arquivo
Gera uma terceira StringList intercalando as duas anteriores. for x := 1 to SL_notas.count do begin nota := SL_notas.itens[x]; for y := 1 to SL_itens count do begin item := SL_itens.indes[x]; if nota = SL_itens.itens[y] then SL_tudo.add( nota + item ); end; end; SL_tudo.Save( 'tudo.txt') []s 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 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: Ricardo César Cardoso Sent: Thursday, April 24, 2008 4:06 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Agregando StringLists num só arquivo Vc deverá usar o método AddStrings. Vamos supor que o objeto que tem as notas se chame slNotas e o que tem os itens se chame slItens. Bastaria fazer slNotas.AddStrings( slItens ) para adicionar as linhas ao final. Agora se o que vc precisa é mesclar ou seja, listar uma nota e na sequencia todos os seus itens, aí vc teria que percorrer todo o slItens para adicionar as linahs referentes aquela nota. Atte, Ricardo. Dival @ QS [EMAIL PROTECTED] escreveu: Trabalhando com StringList gero dois arquivos assim (usando SaveToFile para cada stringlist) ARQUIVO: NOTA.TXT Número;dt_emissao;valor 01;01/04/2008;500,00 02;01/04/2008;300,00 03;01/04/2008;800,00 ARQUIVO: ITEMNOTA.TXT NúmeroNF;Produto;quantidade;valor 01;CAB04567;1,00;100,00 01;CAB99456,1,00;300,00 01;CAB03456,2,00;050,00 02;CAB99243;6,00;050,00 03;CAB42332,1,00;500,00 03;CAB99236;3,00;100,00 PORÉM AGORA PRECISO GERAR UM ÚNICO ARQUIVO ASSIM: 01;01/04/2008;500,00 //nota 1 01;CAB04567;1,00;100,00 //produtos nota 1 01;CAB99456,1,00;300,00 01;CAB03456,2,00;050,00 02;01/04/2008;300,00 //nota 2 02;CAB99243;6,00;050,00 //produtos nota 2 03;01/04/2008;800,00 //nota 3 03;CAB42332,1,00;500,00 //produtos nota 3 03;CAB99236;3,00;100,00 Portanto pergunto: Existe alguma forma, via StringList mesmo, de gerar um arquivo único desse jeito ? O objetivo do questionamento é para poder utilizar a estrutura do programa já existente. Obrigado Dival Zambon Junior Quirius Sistemas de Informática Ltda [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]
Re: [delphi-br] Dic. de Dados e Form Automático, alguém conhece alguma coisa em delphi?
Olá Raimundo, realmente, pegar os dados no banco e criar o componente é facílimo...o problema está além.. vamos, imaginar o seguinte: Num Cadastro de cliente, que ao cadastrar tem que verificar se um CPF é válido por exemplo. Como seria feito isso? Ou ainda, ao se cadastrar uma venda, e for emitir nota, verificar se o produto em questão tem os campos preenchidos e tals. Aí na verdade não seria mais um DD, usaria o DD pra criar os campos na tela, e teria que ter algo, para que se pudesse programar na tela, ou seja, que antes de clicar no botao gravar, chamar um script gravado no banco de dados, e verificar os dados preenchidos e assim por diante... Aí sim, nós teríamos um sistema totalmente livre para mudança de clientes, onde só se tem a base, e pra modificar algo, é rápido e simples.. []s Em 24/04/08, Raimundo Nonato Nogueira do Couto Segundo [EMAIL PROTECTED] escreveu: Pessoal isso nao tem misterio nao. so verificar em um banco e criar os componentes de acordo com o banco. o meu sistema comercial que eu venho é mais ou menos assim. Tem um execultavel do sistema. Tem um execultavel do Dicionario de Dados Pronto. quando eu crio uma tabela no dicionario com os campos, no dicionario mesmo eu faco um menu para essa tabela. Nesse caso o meu sistema verifica o banco e cria o menu, os cadastro, tudo em tempo de execursao no momento que eu vou usar. por exemplo. vou vender o sistema, ai o cliente fala que quer somente o cadastro de clientes, vou no meu dicionario, crio a tabela cliente com os campos e validacoes que eu quero, crio o menu e pronto. Quando eu abrir o sistema, ja tera o menu com o cadastro de clientes, ai clico em cadastro de clientes aparece a listagem e em novo o sistema cria o form para novo, para alterar para excluir, e um relatoriozinho de dados cadastrais basico. Isso é simples, para fazer basta conhecer os componentes e usar a imaginação. Eu nao ensino nem mando os meus fontes mais ajudo a tirar duvidas. Quem quiser so falar. Em 24/04/08, Joao Morais [EMAIL PROTECTED]post%40joaomorais.com.br escreveu: Fellipe Henrique wrote: Olá Davi, agradeço sua atenção, você pode nos ajudar dando dicas de como você está procedendo, não precisa enviar o fonte - você trabalhou duro por ele, nos temos que trabalhar para o nosso, não é?! Mas idéias são sempre bem vindas.. Estou usando um negócio parecido no PressObjects. Você declara a classe de negócio e diz que, por exemplo, um TVenda tem itens da classe TVendaItem. Noutro canto você cria um form e diz que ele atende a classe TVenda. Mesma coisa para TVendaItem. Por fim você coloca um grid no form TVenda e diz que aquele grid atende os itens da venda. Pronto, o framework pega essa sopa e entende que é para abrir o form 'tal' quando eu precisar incluir ou alterar um item de venda, sem configurar mestre-detalhe, datasource, dataset, nada. -- Joao Morais -- Segundo 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] -- _ T.·.F.·.A.·. Fellipe Henrique [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]
RES: [delphi-br] Agregando StringLists num só arquivo
FOI EXATAMENTE ISTO QUE EU FIZ !!! Mesmo assim agradeço a todos pelas respostas Abraços Dival _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de [EMAIL PROTECTED] Enviada em: quinta-feira, 24 de abril de 2008 16:13 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Agregando StringLists num só arquivo Gera uma terceira StringList intercalando as duas anteriores. for x := 1 to SL_notas.count do begin nota := SL_notas.itens[x]; for y := 1 to SL_itens count do begin item := SL_itens.indes[x]; if nota = SL_itens.itens[y] then SL_tudo.add( nota + item ); end; end; SL_tudo.Save( 'tudo.txt') []s 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 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: Ricardo César Cardoso Sent: Thursday, April 24, 2008 4:06 PM To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Subject: Re: [delphi-br] Agregando StringLists num só arquivo Vc deverá usar o método AddStrings. Vamos supor que o objeto que tem as notas se chame slNotas e o que tem os itens se chame slItens. Bastaria fazer slNotas.AddStrings( slItens ) para adicionar as linhas ao final. Agora se o que vc precisa é mesclar ou seja, listar uma nota e na sequencia todos os seus itens, aí vc teria que percorrer todo o slItens para adicionar as linahs referentes aquela nota. Atte, Ricardo. Dival @ QS red.mosquito@ mailto:red.mosquito%40uol.com.br uol.com.br escreveu: Trabalhando com StringList gero dois arquivos assim (usando SaveToFile para cada stringlist) ARQUIVO: NOTA.TXT Número;dt_emissao;valor 01;01/04/2008;500,00 02;01/04/2008;300,00 03;01/04/2008;800,00 ARQUIVO: ITEMNOTA.TXT NúmeroNF;Produto;quantidade;valor 01;CAB04567;1,00;100,00 01;CAB99456,1,00;300,00 01;CAB03456,2,00;050,00 02;CAB99243;6,00;050,00 03;CAB42332,1,00;500,00 03;CAB99236;3,00;100,00 PORÉM AGORA PRECISO GERAR UM ÚNICO ARQUIVO ASSIM: 01;01/04/2008;500,00 //nota 1 01;CAB04567;1,00;100,00 //produtos nota 1 01;CAB99456,1,00;300,00 01;CAB03456,2,00;050,00 02;01/04/2008;300,00 //nota 2 02;CAB99243;6,00;050,00 //produtos nota 2 03;01/04/2008;800,00 //nota 3 03;CAB42332,1,00;500,00 //produtos nota 3 03;CAB99236;3,00;100,00 Portanto pergunto: Existe alguma forma, via StringList mesmo, de gerar um arquivo único desse jeito ? O objetivo do questionamento é para poder utilizar a estrutura do programa já existente. Obrigado Dival Zambon Junior Quirius Sistemas de Informática Ltda [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] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] ArrayList
Pra que serve esses @ nesta function?
VConsts[I].VExtended := @VExtended; =
...
VConsts[I].VCurrency := @TVarData(AArgs[I]).VCurrency; ==
end;
VConsts[I].VInt64 := @TVarData(AArgs[I]).VInt64; ==
end;
{$endif}
{$ifdef fpc}
VConsts[I].VInt64 := @VInt64; ==
- Original Message -
From: Joao Morais [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 24, 2008 3:42 PM
Subject: Re: [delphi-br] ArrayList
Leslyn Fernandes wrote:
Desculpa alongar ainda mais o assunto,
Lista é pra isso mesmo.
mas como funciona esse array of
const? como é a declaração, e onde eu obtenho mais informações sobre o uso?
Veja a declaração da função Format (como um exemplo) e veja o tipo
TVarRec (no qual um array of const é convertido em tempo de compilação).
Abaixo vai uma função que criei para passar um array of variant para a
função Format:
function VarFormat(
const AFormat: string; const AArgs: array of Variant): string;
var
VConsts: array of TVarRec;
VExtended: Extended;
{$ifdef fpc}
VInt64: Int64;
{$endif}
I: Integer;
begin
SetLength(VConsts, Length(AArgs));
for I := 0 to Pred(Length(AArgs)) do
case TVarData(AArgs[I]).VType of
varSmallint: begin
VConsts[I].VType := vtInteger;
VConsts[I].VInteger := TVarData(AArgs[I]).VSmallint;
end;
varInteger: begin
VConsts[I].VType := vtInteger;
VConsts[I].VInteger := TVarData(AArgs[I]).VInteger;
end;
varSingle: begin
VExtended := TVarData(AArgs[I]).VSingle;
VConsts[I].VType := vtExtended;
VConsts[I].VExtended := @VExtended;
end;
varDouble: begin
VExtended := TVarData(AArgs[I]).VDouble;
VConsts[I].VType := vtExtended;
VConsts[I].VExtended := @VExtended;
end;
varCurrency: begin
VConsts[I].VType := vtCurrency;
VConsts[I].VCurrency := @TVarData(AArgs[I]).VCurrency;
end;
varDate: begin
VExtended := TVarData(AArgs[I]).VDate;
VConsts[I].VType := vtExtended;
VConsts[I].VExtended := @VExtended;
end;
varBoolean: begin
VConsts[I].VType := vtBoolean;
VConsts[I].VBoolean := TVarData(AArgs[I]).VBoolean;
end;
varByte: begin
VConsts[I].VType := vtInteger;
VConsts[I].VInteger := TVarData(AArgs[I]).VByte;
end;
varString: begin
VConsts[I].VType := vtAnsiString;
VConsts[I].VAnsiString := TVarData(AArgs[I]).VString;
end;
{$ifndef d5down}
varShortInt: begin
VConsts[I].VType := vtInteger;
VConsts[I].VInteger := TVarData(AArgs[I]).VShortInt;
end;
varWord: begin
VConsts[I].VType := vtInteger;
VConsts[I].VInteger := TVarData(AArgs[I]).VWord;
end;
varLongWord: begin
VConsts[I].VType := vtInteger;
VConsts[I].VInteger := TVarData(AArgs[I]).VLongWord;
end;
varInt64: begin
VConsts[I].VType := vtInt64;
VConsts[I].VInt64 := @TVarData(AArgs[I]).VInt64;
end;
{$endif}
{$ifdef fpc}
varQWord: begin
VInt64 := TVarData(AArgs[I]).VQWord;
VConsts[I].VType := vtInt64;
VConsts[I].VInt64 := @VInt64;
end;
{$endif}
else raise EPressError.Create(SUnsupportedVariantType);
end;
Result := Format(AFormat, VConsts);
end;
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento!
http://br.mail.yahoo.com/
[As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] D2007 + FB 2 + DBX4 com Drive da CoreLab.
Meu ingles não é lá que se diga, gostaria de opinião de algum usuario que fale portuga e de preferencia daqui da lista, pois sei que aqui posso confiar nas opiniões em função ao nivel dos mebros. há aqui algum usuario deste componente? - Mensagem original De: Eduardo Silva dos Santos [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quinta-feira, 24 de Abril de 2008 11:38:48 Assunto: Re: [delphi-br] D2007 + FB 2 + DBX4 com Drive da CoreLab. Jota Pyl, o melhro lugar pra vc obter essa informação de forma correta e precisa é junto à CoreLab, posta lá no Forum, e se assim como o meu seu ingles não for bom, usa um tradutor, to me comunicando assim que eles a anos :) 2008/4/24 Jota Pyl Gmail [EMAIL PROTECTED] com: Bom dia. Gostaria de informações se alguem usa o drive da corelab para acessar o FB 2 utilizando o D2007+DBX4 . Quero saber se vale a pena comprar o drive da corelab e qual deles deve ser comprado. Na visita que fiz ao site existem licensas do tipo single-team- site. Alguem do grupo que comprou sabe me informar a diferença ? Se posso distribuir a dll para o cliente ou devo pagar ? Se algumas delas tem limite de conexões ou outro tipo de limitador ? Grato pela atenção. João Paulo. [As partes desta mensagem que não continham texto foram removidas] -- . . . . ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: eduardo.drd@ gmail.com Site: http://www.drdsiste mas.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.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Frames do Delphi 6
Mais uma vez obrigado a todos... Já consegui a solução... O Ricardo tá certo, o caminho é com FreeAndNil... A solução ficou muito legal... Amanhã vou postar um arquivo com o código dos testes que fizemos... Giovanny Carvalho www.acmeinformatica.com.br --- Em delphi-br@yahoogrupos.com.br, Joao Morais [EMAIL PROTECTED] escreveu Giovanny Carvalho wrote: procedure TForm1.este21Click(Sender: TObject); var Frame11: TFrame1; begin VLeft := VLeft + 100; // Variavel Global Try Frame11 := TFrame1.Create(nil); Frame11.Parent := Form1; except Frame11.Free; Frame11 := TFrame1.Create(nil); Frame11.Parent := Form1; end; Frame11.Left := VLeft; Frame11.Top := 200; end; O problema agora é outro. O problema é destruir os frames. O que eu quero: Quando o usuário clicar numa opção do menu, o sistema deve destruir o frame anterior e instanciar o novo frame. Como o exemplo acima mostra, eu utilizo o método .free mas ele não funciona, O seu código não faz muito sentido. Primeiro você não precisa do try/except, e segundo o free deve estar em outro evento, algo do tipo quando o usuário clicar fora do frame. -- Joao Morais
Re: [delphi-br] ArrayList
Carlos Alberto Camargo wrote:
Pra que serve esses @ nesta function?
VConsts[I].VExtended := @VExtended; =
...
VConsts[I].VCurrency := @TVarData(AArgs[I]).VCurrency; ==
end;
VConsts[I].VInt64 := @TVarData(AArgs[I]).VInt64; ==
end;
{$endif}
{$ifdef fpc}
VConsts[I].VInt64 := @VInt64; ==
Passar o endereço de memória daonde está a variável, que é o que o
parâmetro espera.
[delphi-br] OFF TOPIC - Programa gerador de numeracao de Rifas...
Boa noite. Estou precisando de um programa que gera automaticamente a numeracao de rifas. A rifas deverao correr pela loteria federal. Preciso fazer umas 500 rifas. Alguem sabe de algum programa ou tem algum programa desse genero : Obrigado. João Paulo [As partes desta mensagem que não continham texto foram removidas]
