[delphi-br] Freelance
Colegas, Estou disponível para trabalhos *freelance*. Sou desenvolvedor Delphi e Java, moro em Belo Horizonte. Se souberem de alguma coisa favor indicar-me. Desde já agradeço, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Analista desenvolvedor Delphi - Belo Horizonte
Colegas, A Squadra Tecnologia em Software está procurando profissionais para várias vagas (www.squadra.com.br). Existe vaga para programador Delphi Senior. Os currículos devem ser enviados para curricu...@squadra.com.br em formato .DOC. IMPORTANTE: Destacar no item ASSUNTO o nome da vaga que deseja se candidatar [Analista desenvolvedor Delphi] Obs: Não sei nada sobre a vaga. Obs2: Não envie currículo para mim [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Configuração de ambiente delphi
Colegas, bom dia. Na empresa onde trabalho temos a seguinte setuação: Precisamos manter ambientes de desenvolvimento para manutenção de sete aplicações e que estes ambientes podem ser usados por vávios desenvolvedores. As aplicações estão em Delphi 5, 6 ou 7, com banco SQL Server ou Oracle. Além disso cada uma das aplicações podem ter ou não componentes próprios ou de terceiros. A solução encontrada foi: Criar para cada aplicação uma máquina virtual e configurar de acordo com as necessidades de cada uma, com os fontes no cvs e copiar para cada desenvolvedor. Depois de tudo configurado e funcionando, percebemos que cada vez que máquina virtual é copiada ela deve ser configuarada na rede (ip, mac, domínio, usuário, etc). Isso é meio chato, mas dá para contornar. Alguém conhece uma solução melhor? O pior é que a configuração feita no Delphi (componentes, Environment Options, etc) é a nível de usuário. Como configurar o delphi e que esta configuração seja compartilhada por todos os usuários da máquina? Desde já agradeço qualquer manifestação, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Conectar Oracle com Delphi 5
--- Em delphi-br@yahoogrupos.com.br, Joao Morais jcmorai...@... escreveu 2009/2/6 Josir Gomes jo...@...: Olá Edmilson, se ele não está usando BDE, ele deve estar usando: 1. ADO - não recomendo - é muito lento e pode dar problemas de incompatibilidade com a versão específica do ADO (2.1, 2.2, etc) que estiver instalada na máquina. Mas roda com Delphi 5 apesar do suporte no Delphi 7 ser bem melhor. 2. ODAC - é a melhor solução mas é paga - uso ODAC a 7 anos e nunca tive problemas com ele. Não precisa nem do Oracle Client e do TNSNAMES. 3. TOra - grátis mas bem limitado - se vc não tem orçamento para usar o ODAC, então cai dentro desse. Além destes: Zeos (free) e DOA (pago) Joao Morais Colegas, Agradeço a todos pelas respostas. Descubri que a versão que está em produção usa BDE sim, apenas não precisa configurar o Alias, a configuração é feita diretamente no componente TDataBase. abraços, Edmilson Pontes
[delphi-br] Conectar Oracle com Delphi 5
Colegas, Peguei uma aplicação em Delphi 5 e Oracle para dar manutenção e estou passando por um certo problema. Nos fontes que estão comigo a aplicação faz conexão com o banco Oracle através do BDE e componentes da paleta DataAccess. O usuário da aplicação tem um executável que não precisa do BDE configurado, ele necessita apenas da configuração no arquivo tnsnames. Minha pergunta é: Como faço a conexão com um banco oracle através do Delphi 5 usando os componentes da paleta DataAccess sem usar BDE. Agradeço qualquer ajuda e/ou observações, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Executar método pelo nome
--- Em delphi-br@yahoogrupos.com.br, Joao Morais [EMAIL PROTECTED] escreveu Edmilson Pontes wrote: Colegas, Insisto com um assunto. Preciso implementar uma arquitetura para que quando um programador precise executar uma ação ele apenas solicite a execução do método. Algo tipo assim: procedure ExecutaAcao(obj : TObject; metodo : String). No site da DevMedia ( http://www.devmedia.com.br/articles/viewcomp.asp?comp=1127 ) tem um exemplo. MAS... O problema é que o MethodAddress não recebe como parâmetro a lista de parâmetros do método desejado, Justamente, rtti não grava esse tipo de informação. Você precisa conhecer a sintaxe do método em tempo de compilação. ou seja, se eu tiver um método sobrecarregado? Qual executará? O sobrecarregado, polimorfismo irá funcionar perfeitamente. Mas isto nada tem a ver com a primeira metade da sua sentença (os parâmetros). -- Joao Morais Caro João e de+ colegas, - O que eu quiz dizer com questão da sobrecarga e porque o método MethodAddress atende quando não tem método sobrecarregado. - O que você quiz dizer com conhecer a sintaxe do método em tempo de compilação? Edmilson Pontes
[delphi-br] Re: Executar método pelo nome
--- Em delphi-br@yahoogrupos.com.br, Joao Morais [EMAIL PROTECTED] escreveu Edmilson Pontes wrote: - O que eu quiz dizer com questão da sobrecarga e porque o método MethodAddress atende quando não tem método sobrecarregado. E quando houver método sobrecarregado ele vai retornar o endereço deste método. Por sinal, eu acho que nem precisa sobrecarregar o método, é capaz de funcionar com métodos estáticos também (sempre retornar o endereço do método mais especializado), tem que testar. - O que você quiz dizer com conhecer a sintaxe do método em tempo de compilação? Que se você tem: TMeuObj = class(TObject) procedure UmMetodo(const Arg1: string; Arg2: Integer); end; o compilador não vai guardar tais argumentos para você. Isto você só conseguiria com reflexão, que o Delphi win32 não tem. Para chamar este método você terá que declarar um tipo ponteiro para método com a mesma sintaxe: type TMeuMetodo = procedure(const Arg1: string; Arg2: Integer) of object; e fazer a chamada ao método atravéz de uma variável desse tipo. Joao Morais Então a solução seria ponteiro para método? Onde encontro exemplos de uso? abraços, Edmilson Pontes
[delphi-br] Executar método pelo nome
Colegas, Insisto com um assunto. Preciso implementar uma arquitetura para que quando um programador precise executar uma ação ele apenas solicite a execução do método. Algo tipo assim: procedure ExecutaAcao(obj : TObject; metodo : String). No site da DevMedia ( http://www.devmedia.com.br/articles/viewcomp.asp?comp=1127 ) tem um exemplo. MAS... O problema é que o MethodAddress não recebe como parâmetro a lista de parâmetros do método desejado, ou seja, se eu tiver um método sobrecarregado? Qual executará? Se alguem saber uma outra solução, senão por este, agradeço a dica. Desde já agradeço qualquer pronunciamento. Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Reflexão em Delphi
Colegas, Estou tentando usar reflexão (reflection) com Delphi, mas deparei em dois obstaculos: 1º - Só pode usar um método por reflexão se o mesmo estiver na parte published da classe; 2º - Em published não posso ter métodos com overload; 3º - Mesmo se pudesse como fazer reflexão como fazer a reflexão passando os parâmetros; Estou tentando usar reflexão da seguinte forma: procedure TfrmCadastro.ExecMethod(OnObject: TObject; MethodName: string); var Routine: TMethod; Exec: TExec; begin Routine.Data := Pointer(OnObject); Routine.Code := OnObject.MethodAddress(MethodName); if NOT Assigned(Routine.Code) then Exit; Exec := TExec(Routine); Exec; end; A pergunta: Como fazer reflexão em Delphi? abraços, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] DePO
Ricardo, Agradeço antecipadamente o envio dos exemplos. Edmilson Pontes Em 10/04/08, Ricardo César Cardoso [EMAIL PROTECTED] escreveu: Bom dia! Quando me interessei por Frameworks de persistência, por coincidência saiu uma série de artigos na Active Delphi. E o primeiro framework abordado foi o DePO. Acho que digitei os exemplos em algum lugar e posso passar. Atte, Ricardo. Edmilson Pontes [EMAIL PROTECTED] espdeveloper%40gmail.com escreveu: Colegas, Alguem aqui utiliza a framework DePO? Tem um exemplo básico implementado que pode compartilhar? agradeço, Edmilson Pontes [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]
[delphi-br] Dúvidas com ClientDataSet
Colegas, Bom Dia! Estou implementanado uma classe TDAO e me veio algumas dúvidas em relação ao ClientDataSet. TDAO var cds : TClientDataSet; begin function Busca(pid): boolean; end; SQL = SELECT cli.id, cli.nome, setor.nome FROM TBCliente cli, TBSetor setor WHERE setor.id = cli.idsetor 1º - Quando faço uma busca procuro primeiro no cds, se o registro não exite no cds (cache) preciso procurar no banco. Mas como procurar no banco se o método Busca não sabe qual tabela buscar? Mas não quero definir o nome da tabela na classe TDAO. Tem como definir no cds a tabela mestre?. 2º - O cds esta populado através da SQL acima. Agora se eu quiser adicionar outro registro no cds? Tenho que refazer a consulta ao banco passando o outro parâmetro também? Retornando assim novamente os dados que já estão no cds? abraços, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Dúvidas com ClientDataSet
Vou dar uma olhada. obrigado, Edmilson Pontes Em 04/04/08, Bruno Lichot [EMAIL PROTECTED] escreveu: No meu link de downloads gratuitos(http://cc.codegear.com/author/795118) o primeiro exemplo está todo implementado com ClientDataSet, está bem simples, mas bem completo no que diz respeito a recursos, funcionalidades e situações do dia a dia. No mesmo link tem uma apostila básica de DBExpress com ClientDataSet Client/Server que pode ajudar também como base, está bem passo a passo mas bem básica, ela apenas mostra os fundamentos mais simples, não entra em questões de performanc e configuracões avançadas como está implementado no exemplo e na edição corrente da Active Delphi e se seguirá por mais duas edições em continuação do primeiro artigo mostrando os recursos do ClientDataSet, DataSetProvider e DBExpress 4. Abs BL From: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br[mailto: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] On Behalf Of Edmilson Pontes Sent: sexta-feira, 4 de abril de 2008 09:41 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Subject: [delphi-br] Dúvidas com ClientDataSet Colegas, Bom Dia! Estou implementanado uma classe TDAO e me veio algumas dúvidas em relação ao ClientDataSet. TDAO var cds : TClientDataSet; begin function Busca(pid) : boolean; end; SQL = SELECT cli.id, cli.nome, setor.nome FROM TBCliente cli, TBSetor setor WHERE setor.id = cli.idsetor 1º - Quando faço uma busca procuro primeiro no cds, se o registro não exite no cds (cache) preciso procurar no banco. Mas como procurar no banco se o método Busca não sabe qual tabela buscar? Mas não quero definir o nome da tabela na classe TDAO. Tem como definir no cds a tabela mestre?. 2º - O cds esta populado através da SQL acima. Agora se eu quiser adicionar outro registro no cds? Tenho que refazer a consulta ao banco passando o outro parâmetro também? Retornando assim novamente os dados que já estão no cds? abraços, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Implementar MVCp
Colegas, Estou tentando colocar em prática o modelo mvc usando o Delphi, mas tenho algumas dúvidas. O que estou fazendo: Interface DAO; Interface BO; Interface VO; Interface View; Onde cada um tem a função, respectivante, de manter um padrão para persistencia, regras de negócio, dados da entidade e ligação com os forms. A dificuldade de estou tendo é em relação aos componentes do Form e sua ligação com a view. Como faço para mater as camadas desacopladas se no meu form tenho componentes ligados a um datamodule através de datasorce? Assim estou pulando as camadas. A intenção e deixar o form independente das outras camadas, e que a view faça o tratamento dos dados e faça a ligação com as outras camadas. Como faço para melhorar isso? Desde já agradeço qualquer pronunciamento. Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Implementar MVCp
Entendi a sua sugestão e até pensei nisso também. Mas o que eu não sei e como tratar o DataModule. Como faço? Matenho? Como? Edmilson Pontes Em 02/04/08, Consultores Software [EMAIL PROTECTED] escreveu: Sugiro que você crie mecanismos para registrar os controles do form dentro da classe que será a controladora ( armazenando num array de TWincontrol, por exemplo) e assim usar os métodos dessa controladora, para ler e escrever nos controles. Da mesma forma, a controladora terá que passar os valores para a classe Model (pode ser os DAOs) que deverá ter métodos para gravá-los no BD. Além disso,a controladora deverá também, saber obter os valores dos DAOs. Sei que está genérico, mas essa dica de registrar os controles eu vi uma vez num exemplo. Em 02/04/08, Edmilson Pontes [EMAIL PROTECTED]espdeveloper%40gmail.com escreveu: Colegas, Estou tentando colocar em prática o modelo mvc usando o Delphi, mas tenho algumas dúvidas. O que estou fazendo: Interface DAO; Interface BO; Interface VO; Interface View; Onde cada um tem a função, respectivante, de manter um padrão para persistencia, regras de negócio, dados da entidade e ligação com os forms. A dificuldade de estou tendo é em relação aos componentes do Form e sua ligação com a view. Como faço para mater as camadas desacopladas se no meu form tenho componentes ligados a um datamodule através de datasorce? Assim estou pulando as camadas. A intenção e deixar o form independente das outras camadas, e que a view faça o tratamento dos dados e faça a ligação com as outras camadas. Como faço para melhorar isso? Desde já agradeço qualquer pronunciamento. Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Implementar MVCp
Acho que seria interessante algo alternativo ao DataModule. Mas não sei. Edmilson Pontes Em 02/04/08, Consultores Software [EMAIL PROTECTED] escreveu: Você poderia, por exemplo, manter o DataModule com o componente de conexão e dentro dele, instanciar os DAOs, já apontando para essa conexão. O DataModule seria o Model, que iria encapsular o acesso aos dados. Em 02/04/08, Edmilson Pontes [EMAIL PROTECTED]espdeveloper%40gmail.com escreveu: Entendi a sua sugestão e até pensei nisso também. Mas o que eu não sei e como tratar o DataModule. Como faço? Matenho? Como? Edmilson Pontes Em 02/04/08, Consultores Software [EMAIL PROTECTED]consultoressoftware%40gmail.com consultoressoftware%40gmail.com escreveu: Sugiro que você crie mecanismos para registrar os controles do form dentro da classe que será a controladora ( armazenando num array de TWincontrol, por exemplo) e assim usar os métodos dessa controladora, para ler e escrever nos controles. Da mesma forma, a controladora terá que passar os valores para a classe Model (pode ser os DAOs) que deverá ter métodos para gravá-los no BD. Além disso,a controladora deverá também, saber obter os valores dos DAOs. Sei que está genérico, mas essa dica de registrar os controles eu vi uma vez num exemplo. Em 02/04/08, Edmilson Pontes [EMAIL PROTECTED]espdeveloper%40gmail.com espdeveloper%40gmail.com espdeveloper%40gmail.com escreveu: Colegas, Estou tentando colocar em prática o modelo mvc usando o Delphi, mas tenho algumas dúvidas. O que estou fazendo: Interface DAO; Interface BO; Interface VO; Interface View; Onde cada um tem a função, respectivante, de manter um padrão para persistencia, regras de negócio, dados da entidade e ligação com os forms. A dificuldade de estou tendo é em relação aos componentes do Form e sua ligação com a view. Como faço para mater as camadas desacopladas se no meu form tenho componentes ligados a um datamodule através de datasorce? Assim estou pulando as camadas. A intenção e deixar o form independente das outras camadas, e que a view faça o tratamento dos dados e faça a ligação com as outras camadas. Como faço para melhorar isso? Desde já agradeço qualquer pronunciamento. Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Organizar arquivos
Colegas, Então não tem como configurar para que cada tipo de arquivo fique numa pasta? Edmilson Pontes Em 27/03/08, Joao Morais [EMAIL PROTECTED] escreveu: Jackson Gomes - ToolsComps wrote: Outros .PAS e demais arquivos podem ficar em diretórios diferentes, mas tem que estar no search path do projeto ou no global. Apenas se os arquivos não fazem parte do projeto. -- Joao Morais [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Organizar arquivos
Colegas, Gostaria de organizar os arquivos do meu projeto em diretórios separados. Por exemplo C:\MeuProjeto\DCU C:\MeuProjeto\PAS C:\MeuProjeto\DFM C:\MeuProjeto\DLL C:\MeuProjeto\XML e outros Tentei em Project/Options/Diretories/condicionals mas não obtive sucesso. Como faço para configurar isso? Desde já agradeço qualquer pronunciamento. Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Organizar arquivos
Colegas, Gostaria de organizar os arquivos do meu projeto em diretórios separados. Por exemplo C:\MeuProjeto\DCU C:\MeuProjeto\PAS C:\MeuProjeto\DFM C:\MeuProjeto\DLL C:\MeuProjeto\XML e outros Tentei em Project/Options/Diretories/condicionals mas não obtive sucesso. Como faço para configurar isso? Desde já agradeço qualquer pronunciamento. Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Manual do usuário
Colegas, Estou para elaborar um manual do usuário de um sistema (em módulos), mas não queria que fosse da forma tradicional de dar printscrean na tela e colar num arquivo. Queria que fosse mais interessante para o usuário do que falar para ele que tem que preencher os campos daquela tela, etc. Alguem tem alguma sugestão, fonte de informação ou exemplo? Desde de já agradeço qualquer sugestão, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Interpolação
Colegas, Tenho que plotar gráficos com TChart, mas estou com problemas com as curvas. Por exemplo: Os comados abaixo plota retas ligando os pontos. curva.ADDXY(1, 10); curva.ADDXY(5, 15); curva.ADDXY(10, 20); Preciso que seja interpolado, ou seja que plote curvas e não retas (algo como uma parabola). Alguém tem uma sugestão? abraços, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Obter MetaDados
Colegas, Estou precisando fazer uma aplicação para obter as estruturas (metadados) de dois bancos de dados (tipo IBDBComparer). Estrutuas: views, procedures, generator, etc. A partir daí quero comparar as estruturas dois dois bancos. Alguém tem uma luz de como fazer isso? abraços, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Dúvidas com o DBExpress
Colegas, Assistir uma vídeo aula do Luciano Pimenta/Clube Delphi onde ele usava para todo o sistema apenas um componente SqlConnection, SQLDataSet e DataSetProvider (genéricos). Para fazer updates/inserts/delete ele usava Stored Procedure. Achei interessante e comecei uma aplicação fazendo desta forma, porém (depois) achei muito trabalhoso criar 2 stored procedure (exclusão/update) no banco e criar 2 componentes SQLStoredProc para cada tabela que vou manipular. Então estava pensando usar o método ApllyUpdates do ClientDataSet para fazer alterações no banco invés de usar as SPs. Ai vem a dúvida/dificuldade: Neste caso eu tenho que criar um trio (SQLDataSet, DataSetProvider e ClientDataSet) para cada tabela? Pois tenho que adicionar os filds e setar a propriedade providerflags no SqlDataSet e ClientDataSet? Não posso setar a propriedade ResolveToDataSet do DataSetProvider para true. Ou seja não tem como usar um DataSetProvider e SQLDataSet genéricos? Desculpem o testamento... Desde já agradeço qualquer posicionamento a repeito do assunto. Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] ClientDataset -- DatasetProvider --SqlDataset
Caro Luciano, Também estava com o mesmo problema. Isso é resovido com o componente SimpleDataSet que emgloba o trio ClientDataset -- DatasetProvider --SqlDataset. Veja o artigo do Guinther Pauli sobre o assunto: http://www.devmedia.com.br/articles/viewcomp.asp?comp=580 abraços, Edmilson Pontes Em 05/09/07, Luciano Topolniak [EMAIL PROTECTED] escreveu: Olá pessoal, bom dia. Há algum tempo eu uso o trio ClientDataset -- DatasetProvider --SqlDataset nas minhas aplicações. Todavia, para cada tabela no banco eu coloco três novos componentes no datamodule. Gostaria de saber se alguém na lista os usa, mas não colocando três componentes para cada tabela na base e sim acrescentando apenas um clientdataset e ligando ao provider que já está ligado ao sqldataset. []'s Topolniak. [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] ClientDataset -- DatasetProvider --SqlDataset
Caro Bruno e demais colegas, Como fazer? Usar o trio para cada tabela? Não usar ResolveToDataSet? Setar ProviderFlags no cds no dst? Como usar applyupdates? Desculpe tantas perguntas, mas é pq não estou conseguiindo resolver. abraços, Edmilson Pontes Em 05/09/07, Bruno Lichot [EMAIL PROTECTED] escreveu: Os ganhos com uso de ClientDataSet são muito superiores, não recomendo o uso de SimpleDataSet, ale do q pode ser um entrave na evolução da sua aplicação, Sem falar de recursops de atualização q vc posui e outros de performance, controle, tratamento de excessao e reconciliação. Na minha opniao, usar SimpleDataSet é um erro. Sem falar q DBX agora e um framework e esta totalmente integrado no ambiente .NET . Abs BL 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 Edmilson Pontes Enviada em: quarta-feira, 5 de setembro de 2007 12:26 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] ClientDataset -- DatasetProvider --SqlDataset Caro Luciano, Também estava com o mesmo problema. Isso é resovido com o componente SimpleDataSet que emgloba o trio ClientDataset -- DatasetProvider --SqlDataset. Veja o artigo do Guinther Pauli sobre o assunto: http://www.devmedia.com.br/articles/viewcomp.asp?comp=580 abraços, Edmilson Pontes Em 05/09/07, Luciano Topolniak [EMAIL PROTECTED]topolniak%40bol.com.br mailto:topolniak% topolniak%2540bol.com.br escreveu: Olá pessoal, bom dia. Há algum tempo eu uso o trio ClientDataset -- DatasetProvider --SqlDataset nas minhas aplicações. Todavia, para cada tabela no banco eu coloco três novos componentes no datamodule. Gostaria de saber se alguém na lista os usa, mas não colocando três componentes para cada tabela na base e sim acrescentando apenas um clientdataset e ligando ao provider que já está ligado ao sqldataset. []'s Topolniak. [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Efeito Visual
Colegas, Utilizo em alguns componentes visuais a técnica de destacar o componente em foco mudando sua cor nos eventos onEnter e onExit.O problema e se o form tiver 100 componentes tenho que mudar os eventos em cada um deles. Alguém sabe cosso resolver isso de outra forma? Desde já agradeço, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Atributos da classe
Colegas, Existe alguma forma de obter a lista de atributos de uma classe? Algo do tipo GetMembros() : TList ? abraços, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Alguém de BH que conhece de Quick Report?
Colegas, Estou precisando de ajuda para desenhar alguns formulários no QuickReport. Tem alguém de BH disposto? Contate-me via PVT. [EMAIL PROTECTED] abraços, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Escala logarítmica
Colegas, Preciso implementar um gráfico no Delphi com escala logaritmica? Alguém sabe me dizer onde encontra referências a este assunto ou pode me dar umas dicas? Desde já agradeço, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] teste
teste [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Referência a objeto copiado
Colegas, Estou precisando copiar GroupBox e seus componentes em tempo de execução. Então criei uma nova classe descendente de TGroupBox e inclui o método copy que recebe um TGroupBox e copia seus componentes. Até aí tudo bem, o problema é que não sei como fazer referência aos componentes do novo GroupBox. Alguém tem uma luz? type TGroupBoxCopy = class(TGroupBox) public procedure Copy(Older : TGroupBox); end; procedure TGroupBoxCopy.Copy(Older: TGroupBox); var i, numItens : integer; begin Clipboard.SetComponent(Older); //Copia o GroupBox para área de transferência Self := TGroupBoxCopy(Clipboard.GetComponent(Self, Form1)); Self.Left := Older.Left + Older.Width + 10; //define a posição lateral do novo GroupBox numItens := Older.ControlCount; //Obtém a quantidade de itens do GroupBox copiado //Copia os itens do GroupBox (passado) for i := 0 to numItens - 1 do begin Clipboard.SetComponent(Older.Controls[i]); Clipboard.GetComponent(Self, Self); end; end; //Usando a nova classe procedure TForm1.Button1Click(Sender: TObject); var grp2 : TGroupBoxCopy; begin grp2.Copy(grbPonto1); end; abraços, Edmilson Pontes
[delphi-br] Copia de Componente
Colegas, Tenho um formulário com um TGroupBox com alguns componentes (TLabel, TEdit, etc) e dependendo da ação do usuário este GroupBox deve ser replicado criando assim vários grupos com os mesmos componentes. Gostaria de saber como faço para copiar (em execução) o GroupBox com e seus componentes. Fiz assim e não deu certo. var novoGrupo : TGroupBox Begin g := TGroupBox.Create(GrupoExistente); g.parente := self; g.left := GrupoExistente.left + 20; end; Alguém, por favor, sabe como resolver? Tem como criar o GrupoBox e torna-lo um componente da paleta? Como? abraços, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Gerar tabelas
Colegas, Tenho minhas classes criadas no Delphi (TCliente, TSetor, etc) como faço para gerar as tabelas do banco de dados (Firebird/Interbase) através destas classes? Qual ferramenta me possibilita isso? Agradeço qualquer ajuda, Edmilson S. Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Geração de tabelas
Colegas, Tenho minhas classes criadas no Delphi (TCliente, TSetor, etc) como faço para gerar (automaticamente) as tabelas do banco de dados (Firebird/Interbase) através destas classes? Qual ferramenta me possibilita isso? Agradeço qualquer ajuda, Edmilson S. Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Classes e Tabelas de BD
Colegas, Tenho uma situação parecida com a seguinte: Um Cadastro de cliente, suas obras e os responsaveis por estas. Então as tabelas do banco de dados seriam + ou - assim: TBCliente: codCliente, nome; TBObra: codObra, codCliente, endereco; TBResponsavel: codResp,codObra; Até aí tudo bem a minha dúvida e no diagrama das classes TCliente, TObra e TResponsavel. Como ficariam os atributos e associações destas classes? Tenho que colocar um campo tipo TCliente na classe obra ou um campo codCliente? Desde já agradeço qualquer ajuda, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Componentes
Colegas, Estou criando uma paleta com alguns componentes já personalizados, por exemplo ao invez de mudar a cor dos Tlabel toda vez que adiciono no form criei um com as caracteristicas que preciso para o projeto e adicionei em uma paleta. O meu problema está com relação ao TForm, que se eu seguir o mesmo procedimentos ele fica na paleta mas consigo adiciona-lo no projeto, apenas por cima de outro form. Como faço para criar um form herdeiro de TForm, adicionar outras propriedades, outros componentes e deixa-lo no repositório? Desde já agradeço qualquer ajuda, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] VCL em C#
Colegas, É possível desenvolver uma aplicação em C# no Delphi e usar os componentes da VCL, como por exemplo o TChat o TBitBtn? Tem como usar a VCL desenvolvendo para dotNet? Desde já agradeço a tolerância, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] [OFF] Agrupar registros
Colegas, Desculpem o off mas é que não estou conseguindo resover o problema: Tenho uma sentença que retorna o valor pago ao funcionário nos 12 meses do ano. A estrutura da tabela é tb.nome, tb.mes, tb.valor. Aí verifico se o mês no campo tb.mes é janeiro se for crio na consulta um campo Jan e coloco o conteudo do campo tb.valor. O problema é que está gerando uma linha para cada registro retornado, não estou conseguindo agrupar os registros. Fica mais ou menos assim: ___ NOMEJANFEVMAR FULANO100 FULANO100 FULANO100 Como faço para agrupar? Segue abaixo a sentença usada. SELECT F.NOME, (SELECT CASE WHEN P.MESCOMP = 1) AS JAN, (SELECT CASE WHEN P.MESCOMP = 2) AS FEV, (SELECT CASE WHEN P.MESCOMP = 3) AS MAR, (SELECT CASE WHEN P.MESCOMP = 4) AS ABR, (SELECT CASE WHEN P.MESCOMP = 5) AS MAI, (SELECT CASE WHEN P.MESCOMP = 6) AS JUN, (SELECT CASE WHEN P.MESCOMP = 7) AS JUL, (SELECT CASE WHEN P.MESCOMP = 8) AS AGO, (SELECT CASE WHEN P.MESCOMP = 9) AS SETE, (SELECT CASE WHEN P.MESCOMP = 10) AS OUT, (SELECT CASE WHEN P.MESCOMP = 11) AS NOV, (SELECT CASE WHEN P.MESCOMP = 12) AS DEZ FROM PFUNC F, PFFINANC P WHERE F.CHAPA = P.CHAPA AND P.ANOCOMP = 2006 AND P.CODEVENTO = 0156 Desde já agredeço, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Tenho de mudar para Java?!
Então a solução para o problema do custo não seria Java? O Visual C# Express Edition tem suporte a MySQL e InterBase? Vou precisar trabalhar com gráfico. Tem componentes neste sentido? Agora compliccou né? A dúvida ficou mais complexa. abraços, Edmilson Pontes Em 08/04/06, Alessandro Fernandes [EMAIL PROTECTED] escreveu: Walter, perguntei sobre isso na lista codificando.net (ótima lista por sinal) e um colega respondeu o seguinte: Olá Alessandro, O registro pode ser feito sem custo algum. O uso de Express é gratuito desde que vc faça o registro antes de 07-11-2006. Quanto ao uso para fins comerciais, não existe nenhuma restrição contra esse intuito. Que era o que eu pensava. Se encontrar alguma informação contrariando isso poste aqui. Alessandro Fernandes -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Walter Alves Chagas Junior Enviada em: sexta-feira, 7 de abril de 2006 18:42 Para: 'delphi-br@yahoogrupos.com.br' Assunto: RES: [delphi-br] Tenho de mudar para Java?! Agora ce me deixou na dúvida. Vou entrar lá hoje a noite em casa e olhar, mas acho que não é isso não viu. Mas vou me reinformar da questão supra. []s Walter Alves Chagas Junior Projeto e desenvolvimento de sistemas Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Alessandro Fernandes Enviada em: sexta-feira, 7 de abril de 2006 17:43 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Tenho de mudar para Java?! Walter, você tem certeza disso? Eu achava que o prazo ate o final do ano era pra fazer o registro gratuitamente e que esse registro fosse definitivo. Não é isso não? Alessandro Fernandes -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Walter Alves Chagas Junior Enviada em: sexta-feira, 7 de abril de 2006 14:58 Para: 'delphi-br@yahoogrupos.com.br' Assunto: RES: [delphi-br] Tenho de mudar para Java?! http://msdn.microsoft.com/vstudio/express/visualcsharp/download/ Bom proveito pra vocês... lembrando que ele expira no final do ano. Portanto cês tem de hoje até 31 de Dezembro pra aprender o Csharpão! []s Walter Alves Chagas Junior Projeto e desenvolvimento de sistemas Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:delphi-br@yahoogrupos.com.br ]Em nome de Daniel Enviada em: sexta-feira, 7 de abril de 2006 14:37 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Tenho de mudar para Java?! Pega o Visual C# Express Edition que é grátis e excelente. E o .Net 2.0, na minha opinião, está muito à frente do Java. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Roger Enviada em: sexta-feira, 7 de abril de 2006 13:57 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Tenho de mudar para Java?! Cara, O Lance é que o Eclipse e o NetBeans, são ferramentas para vc desenvolver em Java. Estas ferramentas são gratuitas, mas o mais importante é que o Java é gratuito, tanto para vc, quando para seu cliente (que terá que ter a JVM). Enquanto o Delphi, vc paga. Agora por outro lado, dependendo do projeto, o custo da sua mão-de-obra, que teria que aprender Java (e não é de uma hora pra outra que vai conseguir) e o próprio tempo de desenvolvimento, podem ser muito maior que no Delphi. Então vc economiza em ferramenta, mas gasta em especialização e horas de desenvolvimento. Mas o pouco que conheço de Java, achei super interessante, ele te força à orientar à objetos - é muito rápido, tanto seu sistema quanto o acesso à dados. O esquema de atualizações é 10, roda em qualquer plataforma e facilmente vc pega um programa orginalmente para desktop e coloca para browser (web). Abraço, Rogério Ricardo Fernandes Desenvolvimento http://www.strategies.inf.br - Original Message - From: Edmilson Pontes [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Friday, April 07, 2006 8:30 AM Subject: [delphi-br] Tenho de mudar para Java?! Colegas Bom Dia!!! Após um tempo fora do ar estou de volta... Em Java posso usar ferramentas como Eclipse e/ou NetBeans. Existe uma alternativa grátis ao Delphi? Existe plugin Delphi para o Eclipse? Tenho um projeto para desenvolver mas o seu custo pode inviabilizá-lo. Ainda não dei uma vasculhada nas duas ferramentas acima, mas muita gente diz que elas
[delphi-br] Tenho de mudar para Java?!
Colegas Bom Dia!!! Após um tempo fora do ar estou de volta... Em Java posso usar ferramentas como Eclipse e/ou NetBeans. Existe uma alternativa grátis ao Delphi? Existe plugin Delphi para o Eclipse? Tenho um projeto para desenvolver mas o seu custo pode inviabilizá-lo. Ainda não dei uma vasculhada nas duas ferramentas acima, mas muita gente diz que elas atendem bem dependendo do projeto. Até o momento não estou vendo alternativa a não ser estudar Java. O que vocês acham? Me passem umas diacas aê... Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Diagramas[OFF]
Colegas, Estava precisando estudar um banco de dados SQL Server, mais especificamente o CorporeRM da RM Sistemas. Pensei numa ferramenta que gerasse os diagramas e os relacionamentos deste banco. Vocês conhece algo parecido? Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] ClientDataSet e SQLServer
Colegas, Quero iniciar um projeto desenvolvendo com ClientDataSet, DataSet, SQLServer, TEdits, TMemo, etc. Mas nunca desenvolvir com ClientDataSet. Alguem sabe onde encontro um bom tutorial ou apostila sobre o assunto. Consegui alguns artigos mas não são suficientes. Desde já agradeço, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] [OFF] Sistema com web (DECISÃO)
Colegas, Já que nuam me aventurei em dotNet, não manjo jsp, não tenho muito tempo e não sei qual será a plataforma, decidi: FICO COM PHP. Obrigado a todos pelas opniões, Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Sistema com Web
Colegas, Tenho um projeto para desenvolver e estou na fase de sua definição. Provavelmente desenvolverei em dotNet com Delphi 2005 com MySQL ou o banco que o cliente já possuir. O cliente poderá fazer requisições num servidor web, aí que entra meu problema, ainda não tenho conhecimento para desenvolvimento web, preciso estudar, aprender e desenvolver. Estou em dúvida em relação a PHP ou ASP.net. Quais as vantagens e desvantagens das linguagens? Qual é mais fácil de aprender? E se fosse desenvolver para multiplataforma (Java)? O DreamWaever é uma boa ferramenta para desenvolvimento web? Qual vocês usam? Colegas aguardo ancioso a resposta de vocês. Desde já agradeço, Edmilson Pontes - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Delphi + BDE + Linux (Wine)
Colegas, Tenho uma aplicação que roda em Linux através do Wine (emulador de Windows). O problema é que esta aplicação em algum momento tem que acessar um banco de dados SQLServer através do BDE. Não sei como resolver isso. Alguém já teve esta experiência? Qual sugestão dos colegas? Desde já agradeço qualquer pronunciamento, Edmilson Pontes - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Delphi 2005 e dotNet 2.0
Colegas, Baixei o dotNet framework 2.0, o SDK 2.0 e os instalei depois tentei instalar Delphi 2005 do site da Borland, mas ele diz que o dotNet framework 1.1 não está instalado. O Delphi 2005 não funciona com .net 2.0? Como faço para ele suportar? Desde já agradeço a ajuda, Edmilson Pontes - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] [OFF] dotNet
Colegas, Quero iniciar em .net e a linguagem que escolhi é o C#. Como faço para migrar meus programas para C# e .NET? O Delphi2005 e suficiente para trabalhar com esta tecnologia? Alguém pode me indicar sites realacionados ao assunto? Desde já agradeço, Edmilson Pontes - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Alteração do relógio
Colegas, Obrigado pelas várias sugestões. Mas vou clarear mais o meu objetivo: O sistema coletor de ponto ficará numa máquina com windows, onde várias pessoas podem ter acesso. O banco de dados que usarei será access ou arquivo txt mesmo que ficará na máquina local. Minha preocupação é o usuário mudar a hora do relógio do Windows para bater o ponto. O que gostaria e de saber se posso saber se e quando a hora relógio da máquina local foi alterada. Se possui algum arquivo de log que quanda estas informações. Ou outra ideia que posso implementar para resolver isso. Acho que agora fica mais claro. Diante deste cenário a solução do nosso colega Felippe Nagato é a mellhor? abraços, Edmilson Pontes --- Felippe Nagato [EMAIL PROTECTED] escreveu: Oi, Eu faria assim: Imagine que seu programa possa rodar junto na inicialização do Windows. Neste instante, seu programa poderia gravar em algum lugar do PC, a data-hora atual e o valor de quanto tempo o Windows está ligado (função GetTickCount). A partir daí, você tem como saber, independente da hora do sistema real, o horário verdadeiro. Seria apenas somar a data-hora que você capturou no início com a diferença entre o tempo que Windows já está ligado neste instante com o tempo ligado capturado inicialmente. Daí, você poderia inclusive usar alguma função para acertar a data-hora atual no sistema pra ficar certinho. Agora, precisa analisar bem sobre salvar aquelas informações na inicialização do programa. Deveria também inserir informações se naquele dia o programa já foi aberto, etc etc etc. Pois, por algum motivo, alguém poderia fechá-lo, ou coisa do tipo, sendo necessário abrí-lo novamente. Até mesmo dado um Reset no PC. Isso pode ser implementado de acordo com as necessidades e criar a melhor configuração para evitar ao máximo fraudes neste método de alterar o horário do sistema. Imagino que não existe algo infalível quanto a isso... apenas você pode dificultar as coisas pro usuário que não esperaria que o programador tivesse dado muita atenção a alguns detalhes. Não sei se fui claro ou que essa fosse uma solução razoável pra se implementar. Qualquer coisa, é só falar. Atenciosamente, Felippe. ___ Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Alteração do relógio
Colegas, Tenho que desenvolver um sistema de ponto. Mas preciso de alguma forma saber se alguem alterou o relógio do sistema. Como faço isso pelo Delphi. Se não posso fazer pelo Delphi como faço no Windows? Tem algum arquivo de log no Windows onde fica guardado estas alterações? Agradeço qualquer ajuda, Edmilson Pontes ___ Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] [OFF] Curso dotNet em BH
Colegas, Estou querendo iniciar na plataforma .net. Alguem sabe onde ofecere curso em Belo Horizonte? Quais sites tem conteúdo para iniciante? Agradeço qualquer sugestão, Edmilson Pontes ___ Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- 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] Off-topic - Listas de C++ e Java
[EMAIL PROTECTED] [EMAIL PROTECTED] [EMAIL PROTECTED] --- Valdir Marcos [EMAIL PROTECTED] escreveu: - Alguém poderia me indicar uma lista de C++ e outra de Java nos moldes desta nossa lista? Um abraço, Valdir Marcos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM http://br.groups.yahoo.com/group/delphi-br/messages Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE var lrec_target=_blank;var lrec_URL=new Array();lrec_URL[1]=http://br.rd.yahoo.com/SIG=12f6e07dj/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1130687647/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/;var lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1);var lrec_altURL=http://br.rd.yahoo.com/SIG=12f6e07dj/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1130687647/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/;var lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif;var lrec_width=300;var lrec_height=250; - 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 Termos do Serviço do Yahoo!. ___ Promoção Yahoo! Acesso Grátis: a cada hora navegada você acumula cupons e concorre a mais de 500 prêmios! Participe! http://yahoo.fbiz.com.br/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Erro em Thread
Colegas, Estou com um problema 'antigo' é o seguinte: Tenho uma unit e nela algumas threads. Quando peço para executar uma ShowMessage ou MessageDlg dentro de algum procedimento da thread sempre ocorre o erro: EOSERROR with message System Error code: 1400. O identificador da janela é inválido. O erro ocorre mesmo se for um procedimento externo da Thread que está executando a message. Sabem como resolvo isso? Agradeço a todos, Edmilson Pontes ___ Promoção Yahoo! Acesso Grátis: a cada hora navegada você acumula cupons e concorre a mais de 500 prêmios! Participe! http://yahoo.fbiz.com.br/ -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Ferramentas
Colegas, Estou precisando de ferramentas para desenvolvimento de sistemas. Seria algo para fazer os diagramas, testes, documentação, etc. Quais vocês indicam? Onde encontro? Desde já agradeço as sugestões, Edmilson Pontes - Promoção Yahoo! Acesso Grátis: a cada hora navegada você acumula cupons e concorre a mais de 500 prêmios! Participe! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Erro estranho - Continua !!!
Colegas, Enviei para lista na semana passada um problema que está ocorrendo na execução de uma rotian de um projeto. Recebi várias dicas de possíveis soluções mas até agora não resolvi o problema. A rotina abaixo é executada até o final quando uso trace Into o F7 mas quando é executada pelo EXE ou pelo F9 o resultado não é o mesmo. Ocorre os erros abaixo: Erro ...class EInvalidOperation with message 'Canvas does not allow drawing'... ocorre quando executo o programa pelo Delphi. E erro Exception EOSError in module...System Error. Code: 1400. O identificador da janela é inválido ocorre quando programa é executado fora do Delphi (ocorre ao encerrar o programa). O que está acontecendo? Não achei nenhuma lógica para os erros. Segue abaixo o código. OBS: O erro só ocorre quando executa o 1º if. Reforçando: USANDO F7 O ERRO NÃO OCORRE. procedure TFrmGerarContrato.bbtImprimirClick(Sender: TObject); begin //IMPRIMIR ARQUIVO if (objetivo = 'imprimir') then begin if (FileExists(caminhoArq + '\' + nomeDoc) = False) then ShowMessage('Arquivo não existe') else begin Doc := Docs.Open(caminhoArq + '\' + nomeDoc); Doc.PrintOut(False); Doc.Close; end; end; //GERAR ARQUIVO e imprimir if (objetivo = 'gerar') then begin Doc := Docs.Open(caminhoArq + '\' + nomeDoc); Doc.SaveAs(caminhoArq + '\' + nomeDoc); SubstituiCampos; //faz alterações Doc.PrintOut(False); Doc.Save; Doc.Close; end; end; Agradeço qualquer ajuda, Edmilson Pontes ___ Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e muito mais. Instale agora! www.yahoo.com.br/messenger/ -- 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] ou [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: RES: RES: [delphi-br] Erro estranho
WinWor, Docs e Doc são variáveis do tipo OleVariant. Observe que o código funciona no trecho para GERAR e não em IMPRIMIR que são bem parecidos. Tentei todas as sugestões surgidas e nada de solução Edmilson Pontes Elazar [EMAIL PROTECTED] escreveu: esta variavel Doc e de que tipo? esta inicializada? - Original Message - From: Edmilson Pontes [EMAIL PROTECTED] To: Delphi-BR delphi-br@yahoogrupos.com.br Sent: Thursday, September 29, 2005 3:21 PM Subject: [delphi-br] Erro estranho Colegas, Tô garrado com um probleminha. Já testei de várias formas mas não funcionou. Quando a variável objetivo é 'gerar' não ocorre erro mas quando é 'imprimir' ocorre os erros abaixo. Erro ...class EInvalidOperation with message 'Canvas does not allow drawing'... ocorre quando executo o programa pelo Delphi. E erro Exception EOSError in module...System Error. Code: 1400. O identificador da janela é inválido ocorre quando programa é executado fora do Delphi (ocorre ao encerrar o programa). O que está acontecendo? Não achei nenhuma lógica para os erros. Segue abaixo o código. procedure TFrmGerarContrato.bbtImprimirClick(Sender: TObject); begin //IMPRIMIR ARQUIVO if (objetivo = 'imprimir') then begin if (FileExists(caminhoArq + '\' + nomeDoc) = False) then ShowMessage('Arquivo não existe') else begin ShowMessage('Existe'); Doc := Docs.Open(caminhoArq + '\' + nomeDoc); Imprimir; Doc.Close; end; end; //GERAR ARQUIVO if (objetivo = 'gerar') then begin Doc := Docs.Open(caminhoArq + '\' + nomeDoc); Doc.SaveAs(caminhoArq + '\' + nomeDoc); SubstituiCampos; //faz alterações Doc.Save; Doc.Close; end; end; - Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e muito mais. Instale agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [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: RES: [delphi-br] Erro estranho
Já testei muito e até agora nada... Comigo acontece somente num projeto e só ocorre o erro na execução de uma rotina específica. Edmilson Pontes --- Wilton Moreira [EMAIL PROTECTED] escreveu: - Não era o tamanho do projeto. Era um projeto muito pequeno com poucos módulos. E acontecia com qualquer um de nossos sistemas. Não era a quantidade de programas abertos. Podia ficar aberto qualquer um, menos o MSN e IncredMail. Se não estivesse rodando só um dos dois, dava o erro da mesma forma. Testamos muito para ver que eram estes dois que causavam este tipo de problema pra gente em qualquer máquina da empresa. Wilton Elazar wrote: bem nao necessariamente por ter o msn ...ou outros, mas pela quantidade de programas sendo excutado, ou de telas criadas do projeto -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Wilton Moreira Enviada em: quinta-feira, 29 de setembro de 2005 16:53 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Erro estranho Olha, já passei por este erro também. E não tinha nenhuma lógica, realmente. Bom, pelo menos eu não encontrei. Fazendo testes, eu descobri o seguinte: quando eu executava o projeto dentro do Delphi, se o MSN Messenger ou o IncredMail estivessem abertos ou só rodando como um serviço perto do relógio, ele dava este erro. Mas quando eu entrava pelo EXE funcionava normal. Encerre os programas que você tem rodando assim e vá testando para ver se não é o seu caso também. Wilton - Original Message - From: Edmilson Pontes [EMAIL PROTECTED] To: Delphi-BR delphi-br@yahoogrupos.com.br Sent: Thursday, September 29, 2005 3:21 PM Subject: [delphi-br] Erro estranho Colegas, Tô garrado com um probleminha. Já testei de várias formas mas não funcionou. Quando a variável objetivo é 'gerar' não ocorre erro mas quando é 'imprimir' ocorre os erros abaixo. Erro ...class EInvalidOperation with message 'Canvas does not allow drawing'... ocorre quando executo o programa pelo Delphi. E erro Exception EOSError in module...System Error. Code: 1400. O identificador da janela é inválido ocorre quando programa é executado fora do Delphi (ocorre ao encerrar o programa). O que está acontecendo? Não achei nenhuma lógica para os erros. Segue abaixo o código. procedure TFrmGerarContrato.bbtImprimirClick(Sender: TObject); begin //IMPRIMIR ARQUIVO if (objetivo = 'imprimir') then begin if (FileExists(caminhoArq + '\' + nomeDoc) = False) then ShowMessage('Arquivo não existe') else begin ShowMessage('Existe'); Doc := Docs.Open(caminhoArq + '\' + nomeDoc); Imprimir; Doc.Close; end; end; //GERAR ARQUIVO if (objetivo = 'gerar') then begin Doc := Docs.Open(caminhoArq + '\' + nomeDoc); Doc.SaveAs(caminhoArq + '\' + nomeDoc); SubstituiCampos; //faz alterações Doc.Save; Doc.Close; end; end; ___ Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e muito mais. Instale agora! www.yahoo.com.br/messenger/ -- 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] ou [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] Erro estranho
mesmo reiniciando a máquina e executando somente o Delphi o erro persiste. Edmilson --- Leandro [EMAIL PROTECTED] escreveu: - Isso é geralmente erro de memoria... Feche alguns programas e tente novamente... Leandro - Original Message - From: Edmilson Pontes [EMAIL PROTECTED] To: Delphi-BR delphi-br@yahoogrupos.com.br Sent: Thursday, September 29, 2005 3:21 PM Subject: [delphi-br] Erro estranho Colegas, Tô garrado com um probleminha. Já testei de várias formas mas não funcionou. Quando a variável objetivo é 'gerar' não ocorre erro mas quando é 'imprimir' ocorre os erros abaixo. Erro ...class EInvalidOperation with message 'Canvas does not allow drawing'... ocorre quando executo o programa pelo Delphi. E erro Exception EOSError in module...System Error. Code: 1400. O identificador da janela é inválido ocorre quando programa é executado fora do Delphi (ocorre ao encerrar o programa). O que está acontecendo? Não achei nenhuma lógica para os erros. Segue abaixo o código. procedure TFrmGerarContrato.bbtImprimirClick(Sender: TObject); begin //IMPRIMIR ARQUIVO if (objetivo = 'imprimir') then begin if (FileExists(caminhoArq + '\' + nomeDoc) = False) then ShowMessage('Arquivo não existe') else begin ShowMessage('Existe'); Doc := Docs.Open(caminhoArq + '\' + nomeDoc); Imprimir; Doc.Close; end; end; //GERAR ARQUIVO if (objetivo = 'gerar') then begin Doc := Docs.Open(caminhoArq + '\' + nomeDoc); Doc.SaveAs(caminhoArq + '\' + nomeDoc); SubstituiCampos; //faz alterações Doc.Save; Doc.Close; end; end; ___ Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e muito mais. Instale agora! www.yahoo.com.br/messenger/ -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: - 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 Termos do Serviço do Yahoo!. ___ Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e muito mais. Instale agora! www.yahoo.com.br/messenger/ -- 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] ou [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] Re: Doc Word - Ainda não consegui
Tentei if not Assigned (WinWord) then WinWord := CreateOleObject('Word.Application'); Mas não compila. Ocorre o erro: [Error] UGerarContrato.pas(809): Incompatible types. --- ricknetbr [EMAIL PROTECTED] escreveu: - Antes de chamar o CreateOleObject, verifique se o mesmo ja nao esta carregado. if not Assigned (WinWord) then WinWord := CreateOleObject('Word.Application'); . . . --- Em delphi-br@yahoogrupos.com.br, Edmilson Pontes [EMAIL PROTECTED] escreveu Colegas, Tô com este problema pendente. Me ajudem pro favor. Tenho um programa gerador de contratos, que gravar texto num arquivo (modelo de carta) do word. Para cada novo contrato executa o código abaixo para criar o arquivo e salvar as alterações. var WinWord, Docs, Doc : Variant; //objetos do tipo Variant WinWord := CreateOleObject('Word.Application'); Docs := WinWord.Documents; Doc := Docs.Open(c:\modelo.doc'); {Rotinas internas do programa} Doc.SaveAs('c:\novo.doc'); Doc.Close(); O programa tá funcionando beleza mas o problema é que está consumindo muita memória, pois para cada arquivo é criado um processo WINWORD (no gerenciador de tarefas). É impressionante a disproporção de memória usada em relação aos outros processos do windows. Como faço para resolver isso? Para cada processo é necessário criar os três objetos. OBS.: Utilizo thread para criar os objetos, pois consome muito processamento também. Desde já agradeço qualquer ajuda, Edmison Pontes ___ Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e muito mais. Instale agora! www.yahoo.com.br/messenger/ -- 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] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: - 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 Termos do Serviço do Yahoo!. __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/ -- 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] ou [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] Re: Doc Word - AGORA CONSEGUI
Graças a ajuda de um colega comsegui resolver o problema dos processos não encerrados. Eu estava dando quit no Doc.quit então dava erro, mas era lógico eu tinha que dar o quit era na aplicação. WinWord.quit; Estou fazendo um aplicativo que para iniciante é muito interessante, pois uso classes, thread e Word. Quando estiver pronto vou disponibilizar pra galera. Obrigado a todos que ajudaram, Edmilson Pontes --- ricknetbr [EMAIL PROTECTED] escreveu: - Antes de chamar o CreateOleObject, verifique se o mesmo ja nao esta carregado. if not Assigned (WinWord) then WinWord := CreateOleObject('Word.Application'); . . . --- Em delphi-br@yahoogrupos.com.br, Edmilson Pontes [EMAIL PROTECTED] escreveu Colegas, Tô com este problema pendente. Me ajudem pro favor. Tenho um programa gerador de contratos, que gravar texto num arquivo (modelo de carta) do word. Para cada novo contrato executa o código abaixo para criar o arquivo e salvar as alterações. var WinWord, Docs, Doc : Variant; //objetos do tipo Variant WinWord := CreateOleObject('Word.Application'); Docs := WinWord.Documents; Doc := Docs.Open(c:\modelo.doc'); {Rotinas internas do programa} Doc.SaveAs('c:\novo.doc'); Doc.Close(); O programa tá funcionando beleza mas o problema é que está consumindo muita memória, pois para cada arquivo é criado um processo WINWORD (no gerenciador de tarefas). É impressionante a disproporção de memória usada em relação aos outros processos do windows. Como faço para resolver isso? Para cada processo é necessário criar os três objetos. OBS.: Utilizo thread para criar os objetos, pois consome muito processamento também. Desde já agradeço qualquer ajuda, Edmison Pontes ___ Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e muito mais. Instale agora! www.yahoo.com.br/messenger/ -- 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] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: - 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 Termos do Serviço do Yahoo!. ___ Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e muito mais. Instale agora! www.yahoo.com.br/messenger/ -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Thred
Colegas, O PROGRAMA: Utilizo o word para geração de relatórios, pois acho que fica mais fácil para o usuário alterar, se trata vários modelos de contratos que são abertos, alterados algumas palavras, impresso e salvado como. Para fazer isso utilizo uma thred pois este processo é demorado e se não fosse assim trava o sistema até o processo ser finalizado. Segue abaixo assinatura da minha thred: unit UTGerarArquivo; interface uses SysUtils, Variants, Classes, Forms, Dialogs, ComObj, ESPFuncoes; type TGeraArquivo = class(TThread) constructor Create; procedure Execute; override; procedure CriarContrato(); procedure AbrirModeloWord(tipoBolsa : string); procedure CriarDocWord(); procedure SubstituiCampos(Arquivo : Variant); procedure Salvar(); procedure Imprimir(); end; implementation Uses UGerarContrato; var //Variáveis relacionadas ao documento Word WinWord, Docs, Doc: Variant; objWordCriados : Boolean; caminhoArq, nomeArq: string; { TGeraArquivo } Utilizo minha thred assim: procedure TFrmGerarContrato.bbtGeraClick(Sender: Object); var ListaArqWord : Array of TGeraArquivo; begin //imprimir contrato corrente SetLength(ListaArqWord, nArqWord); ListaArqWord[nArqWord-1] := TGeraArquivo.Create; Inc(nArqWord); end; O PROBLEMA: Desta forma achei que poderia criar e imprimir vários contratos sem esperar um fim do processamento de cada um. Mas quando mando imprimir um arquivo e logo em seguida mando outro só é impresso o último ou seja antes do primeiro ser impresso o processo seguinte já alterou o modelo e ai saí repetido alem disso consome muita memória pois para cada chamada da thred fica é criado um processo WINWORD. Alguem tem uma idéia como posso alterar/melhorar o procedimento acima? OBS: Desculpem o destamento, só queria que fosse entendido. Desde já agradeço, Edmilson Pontes ___ Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e muito mais. Instale agora! www.yahoo.com.br/messenger/ -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Versões do Delphi
O que podemos fazer com o Delphi 5 ou superior que não dá para fazer com o Delphi 4? Tem 'suporte' a Access, Interbase, SQLServer, QuickRep, etc? Qual sua desvantagem? abraços, Edmilson Pontes ___ Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] OFF - Salário
Colegas, Desculpem o off topic mas é que estou precisando de decidir um certo projeto vale a pena. Tenho um sistema para desenvolver e necessito saber quanto cobrar. Não quero qual será o custo e sim qual é o preço da mão de obra para o seu desenvolvimento. O mercado é Belo Horizonte. O sistema será desenvolvido do início ao fim, ou seja, análise, programação e documentação. Quanto estão pagando para desenvolvedor? desde já agradeço a atenção, Edmilson Pontes __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Alguem pode ajudar?
Colegas, Desculpem o off topic mas é que estou precisando de decidir um certo projeto vale a pena. Tenho um sistema para desenvolver e necessito saber quanto cobrar. Não quero qual será o custo e sim qual é o preço da mão de obra para o seu desenvolvimento. O mercado é Belo Horizonte. O sistema será desenvolvido do início ao fim, ou seja, análise, programação e documentação. Quanto estão pagando para desenvolvedor? desde já agradeço a atenção, Edmilson Pontes __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Será tão simples...
Colegas, Desculpem se a questão parece simples, mas não estou conseguindo... É a primeira vez que preciso criar etiquetas no Quick Report e estou apanhado. Será que podem me ajudar? As etiquetas (Avery) estão num formulário contínuo em duas colunas com 12 etiquetas cada. As medidads (em mm) são: - Folha * Tamanho: 305 x 180 * Margens esq/dir: 17 - Etiquetas * Tamanho: 70 x 23 * Margens sup/inf: 1 * Espaço entre colunas: 5 O relatório configurei assim: - Quick Rep (page) * Bottom e Top Margim : 1 * ColumnSpace: 5 * Left e Right Margim: 17 * Length: 305 * PaperSize: Custom * Width: 180 - DetailBand (Size) * Height: 23 * Width: 70,4 Mas com estas configurações o relatório imprime 13 etiquetas por coluna em vez de 12. Mudei as configurações de Bottom e Top Margim para 3,05 aí imprime somente 12 etiquetas por coluna, mas a cada etiqueta a próxima imprime um pouco acima ou seja tá com problema na configuração das margens superiores e/ou inferiores. OBS.1: Criei um formulário lá nas configurações da impressora com as medidas da folha. Como faço para resolver isso? OBS.2: Uso um QRExprMemo para mostrar os dados. agradeço a paciência e qualquer contribuição, Edmilson Pontes __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Borland abre filial em Belo Horizonte
Borland abre filial em Belo Horizonte Quinta-feira, 21 de julho de 2005 - 17h44 SÃO PAULO A Borland Latin América está expandindo a operação no Brasil com a abertura de mais uma filial. A nova unidade vai funcionar na cidade de Belo Horizonte, em Minas Gerais. Agora a sede instalada em São Paulo passa a contar com apoio de três filiais. A companhia já tinha escritório no Rio de Janeiro e em Brasília. A nova unidade será comandada pelo executivo André Guimarães Pereira. José Rubens Tocci, diretor geral da Borland Latin América, justifica que a companhia está investindo em Minas por se tratar de um dos maiores mercados do Delphi. Ele informa que com equipe local, a Borland estará mais próxima da clientela e vai reforçar o atendimento na região. Edileuza Soares, do Plantão INFO __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Imprimir arquivo do Word
Colegas, Fiz uma rotina para alterar o texto de um arquivo do word e salvar como. Até aí tudo bem. Agora preciso imprimir o arquivo mas sem abri-lo. Apena mandar para a impressora. Alguem sabe como faço? Gostaria de deixar o usuário escolher a impressora. É possível? Desde já agradeço qualquer ajuda, Edmilson Pontes __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Otimizar Processo
Colegas, Uma rotina que cria um objeto word está demorando muito para ser executa, além disso durante a execusão o formulário que a executa fica travado, fica com aquela aparência quando uma aplicação não responde. No formulário tenho uma label que mostra o status do processo, que não funciona durante este tempo. Como faço para otimizar a rotina e resolver o problema do formulário? var Docs, WinWord : variant lblStatus := 'Criando arquivo...' WinWord := CreateOleObject('Word.Application'); Docs := WinWord.Documents; ... Edmilson Pontes __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ -- 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] ou [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