Re: [delphi-br] Problema ao salvar JPG que está no TImage
Use o pacote Jedi lá tem JvImage que suporta vários formatos. Espero que a dica ajude. Abraços Em 21 de agosto de 2010 20:56, Marcelo leite_rom...@yahoo.com.br escreveu: se eu não me engano o TImage não da suporte a JPG somente bmp. acho que vc vai ter que converter, no serviço tenho a rotina de conversão mais na net deve ter um monte , ateh no historico da lista tambem deve haver. abs De: Leandro softma...@hotmail.com softmaxbr%40hotmail.com Para: Delphi-br delphi-br@yahoogrupos.com.brdelphi-br%40yahoogrupos.com.br Enviadas: Sexta-feira, 20 de Agosto de 2010 17:16:44 Assunto: [delphi-br] Problema ao salvar JPG que está no TImage Pessoal, Estou com um problema ao salvar em arquivo .JPG uma imagem qualquer que foi colada do clipboard num TImage. Parece que se o TImage não estiver visível na tela, ele não carrega a imagem do disco para o objeto corretamente. Criei um projeto de teste para quem quiser me ajudar a descobrir esse enigma. Está no link e as instruções estão na tela. http://www.criosistemas.com.br/temp/testesalvarjpg.rar Fiz em Delphi 2007, mas imagino que abra nos antigos também. Só para situar para que eu preciso disso, é que está acontecendo no cadastro de produtos do meu sistema, onde as fotos dos produtos estão sumindo. Desde já agradeço a ajuda, Leandro [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] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Componente ou Solução para Control e de Usuário.
Amigos, Vocês que trabalham com o User Control poderia me ajudar em dois problemas ? 1ª Eu preciso migrar o controle de usuário para UserControl de uma aplicação que trabalho com JvOutlookBar, mas não estou conseguindo associar o controle de menu ao de botões do JvOutlookBar. 2ª Eu gostaria de saber como resolver o problema de envio de e-mail do UserControl, pois mesmo usando as dll informadas no suporte, não funciona. Abraços. Em 20 de agosto de 2010 18:19, Mauri Lima ma...@uze.com.br escreveu: Boa Tarde, A ultima versão e a UserControl2.30RC3, tenho aki se vc quiser posso enviar para seu e-mail ou se alguém quiser e disponibilizar, não sei se posso por na área de arquivos do grupo. Mauri Lima Boa Vista - Roraima O Ponto mais setentrional ao norte do Brasil e aqui!!.. Monte Caburaí homologado em 1999. Como extremo norte do Brasil. -Mensagem original- 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 Ralp Alves Bezerra Enviada em: sexta-feira, 20 de agosto de 2010 07:49 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: RES: [delphi-br] Componente ou Solução para Controle de Usuário. Disponibilizei a versão 2.18A do UserControl no endereço abaixo: http://www.upshare.me/files/hQRQel1282304804/UserControl2.18a.rar.html Não sei ainda se existe uma versão mais nova. Mas veja se esta lhe ajuda. Trabalho com UserControl a muito tempo e não tenho o que me queixar dele. Abraç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 Marciano Venter Enviada em: quinta-feira, 19 de agosto de 2010 17:04 Para: lista-del...@yahoogrupos.com.br lista-delphi%40yahoogrupos.com.br; delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: [delphi-br] Componente ou Solução para Controle de Usuário. Boa tarde pessoal, estou procurando um componente bom pra controle de acesso dos usuarios, eu utilizada o UserControl, mas o site está fora do ar a um tempinho e não tenho o arquivo, estou procurando pelos arquivos dele ou por outra opção. Alguma sugestão ? Atenciosamente, -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [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: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Componente ou Solução para Control e de Usuário.
Valew Rubem mas já tentei dessa forma, mas não deu certo, as vezes quando o usuário que está logado, sai e tenta logar com outro dá vários erros de exception.. Mas vou continuar tentando, infelizmente o suporte ao UserControl não tem solução para isso, já uso ele em outras aplicações com sucesso a anos. Abraços. Em 20 de agosto de 2010 19:37, Rubem Rocha rubem.ro...@dtmanaus.com.brescreveu: Essa primeira acredito que seja fácil de resolver. Coloca um MainMenu no formulário principal e associa ele ao componente UserControl. Depois cria uma rotina que lê o MainMenu e cria os grupos/botões/etc. no JvOutlookBar, já verificando se alguma opção do menu ficou habilitada ou escondida depois que foram aplicadas as políticas de controle de acesso do UserControl após o login do usuário. Ah, e antes que você pergunte... não fiz nada sobre isso e, acredito eu, não tenha exemplo pronto (peixe pescado, tratado e frito, pronto pra comer!) disso rolando por aí na net. Se eu tivesse uma necessidade de implementação igual a sua, partiria para essa abordagem! :D Boa sorte. Sds. -Mensagem original- 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 Jorge Ericsson Enviada em: sexta-feira, 20 de agosto de 2010 18:23 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Componente ou Solução para Controle de Usuário. Amigos, Vocês que trabalham com o User Control poderia me ajudar em dois problemas ? 1ª Eu preciso migrar o controle de usuário para UserControl de uma aplicação que trabalho com JvOutlookBar, mas não estou conseguindo associar o controle de menu ao de botões do JvOutlookBar. 2ª Eu gostaria de saber como resolver o problema de envio de e-mail do UserControl, pois mesmo usando as dll informadas no suporte, não funciona. Abraços. Em 20 de agosto de 2010 18:19, Mauri Lima ma...@uze.com.brmauri%40uze.com.br escreveu: Boa Tarde, A ultima versão e a UserControl2.30RC3, tenho aki se vc quiser posso enviar para seu e-mail ou se alguém quiser e disponibilizar, não sei se posso por na área de arquivos do grupo. Mauri Lima Boa Vista - Roraima O Ponto mais setentrional ao norte do Brasil e aqui!!.. Monte Caburaí homologado em 1999. Como extremo norte do Brasil. -Mensagem original- 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 Ralp Alves Bezerra Enviada em: sexta-feira, 20 de agosto de 2010 07:49 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.br Assunto: RES: [delphi-br] Componente ou Solução para Controle de Usuário. Disponibilizei a versão 2.18A do UserControl no endereço abaixo: http://www.upshare.me/files/hQRQel1282304804/UserControl2.18a.rar.html Não sei ainda se existe uma versão mais nova. Mas veja se esta lhe ajuda. Trabalho com UserControl a muito tempo e não tenho o que me queixar dele. Abraço. 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 Marciano Venter Enviada em: quinta-feira, 19 de agosto de 2010 17:04 Para: lista-del...@yahoogrupos.com.brlista-delphi%40yahoogrupos.com.brlista-delphi% 40yahoogrupos.com.br; delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.br Assunto: [delphi-br] Componente ou Solução para Controle de Usuário. Boa tarde pessoal, estou procurando um componente bom pra controle de acesso dos usuarios, eu utilizada o UserControl, mas o site está fora do ar a um tempinho e não tenho o arquivo, estou procurando pelos arquivos dele ou por outra opção. Alguma sugestão ? Atenciosamente, -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericssonsup%40gmail.com jericsson...@jericsson.com.br jericssonsup%40jericsson.com.br skype:jericsson Brasília - DF -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [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: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do
Re: [delphi-br] OFF TOPIC: Qualidade de Vida na Áre a de TI
De qq forma te agradeço pelo menos a tentativa Marcelo, tbém achei grande demais essa pesquisa. Obrigado. Em 16 de agosto de 2010 11:59, Marcelo leite_rom...@yahoo.com.br escreveu: Na boa muito longa essa pesquisa, começei responder na ultima parte. respondi a olho 60 e poucas questões. acho demais De: Jorge Ericsson jericsson...@gmail.com jericssonsup%40gmail.com Enviadas: Segunda-feira, 16 de Agosto de 2010 11:36:05 Assunto: [delphi-br] OFF TOPIC: Qualidade de Vida na Área de TI *Olá amigos, Tenho um amigo que está defendendo uma dissertação e gostaria da colaboração se possível de todos que trabalham na área de TI. Segue o link abaixo: * * *Prezado Caso ao clicar no link, ao inves de abrir a pesquisa, tenha sido solicitado um login e senha. cancele. Por favor, copie o link abaixo: http://www.surveymonkey.com/s/profissionalti e cole na URL do bronwser para iniciar a pesquisa. Obrigado sandro Ola Jorge, tudo bem? Preciso de um grande favor. Estou iniciando uma pesquisa sobre profissionais e ambiente de TI. Poderia responder, enviar para seus colaboradores de TI, colegas de trabalho, parceiros TI, fornecedores TI. grato sandro Prezado(a) Colega(a) Estou realizando uma pesquisa para ser apresentada na minha defesa (dissertação) da Universidade Católica de Brasilia, no programa Mestrado em Gestão do Conhecimento e TI. Esta pesquisa tem por objetivo levantar dados sobre o ambiente de trabalho das TI´s nas organizações e como o profissional de TI(tecnologia da informação) se sente dentro deste ambiente. Ao mesmo tempo, a corrente pesquisa também procura identificar como os profissionais de TI lidam com um determinado problema relacionado ao seu ambiente de trabalho. Serão 31 questões referentes ao ambiente de trabalho das TI´s e como o profissional de TI se sente e 66 questões referentes a como os profissionais de TI lidam com um determinado problema dentro do seu ambiente de trabalho. O tempo médio para preencher a pesquisa é de 15 minutos. Ao responde-la estará concordando com a divulgação dos resultados lembrando que não existe nenhuma informação que possa identificá-lo. Os resultados serão apenas estatísticos. Minha expectativa é que a pesquisa traga como *resultado informações úteis para melhoria de qualidade de vida do profissional de TI dentro das organizações e neste sentido que os mesmos possam contribuir ainda mais para os resultados corporativos.* * * Clique aqui, para iniciar pesquisa: http://www.surveymonkey.com/s/profissionalti https://correio.sebrae.com.br/exchweb/bin/redir.asp?URL=https://correio.sebrae.com.br/exchweb/bin/redir.asp?URL=http://www.surveymonkey.com/s/profissionalti Obrigado Sandro Servino sandro.serv...@gmail.com sandro.servino%40gmail.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [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: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] URGENTE: UserControl Decriptar senha para teste
Olá pessoal, Alguém pode me ajudar com o problema de como decriptar a senha do usuário usando o compoente UserControl ? Preciso criar uma rotina onde ao excluir um registro do cadastro de membros ele teste a senha do usuário e caso não seja o ADMINISTRADOR não poderá excluir. Tentei o procedimento abaixo, mas não deu certo, alguém pode me ajudar. procedure TfrmMembros.btnExcluirClick(Sender: TObject); *var vPermissaoSenha: string; begin if SolicitarPermissao('Solicitar Permissão', 'Informe a senha do Administrador:', vPermissaoSenha) = True then begin frmPrincipal.vSenha := Decrypt(frmPrincipal.vSenha, frmPrincipal.UCPrincipal.EncryptKey); if (UpperCase(vPermissaoSenha) = frmPrincipal.vSenha) and (frmPrincipal.vUsuario = 'ADMIN') then begin activecontrol := nil; dm.membros.Delete; end; end; end;* Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: UserControl Decriptar senha para teste
Eu percebi isso Murilo, então criei um usário mestre que não aparece na lista de usuários onde solicito a senha desse usuário. Só assim consegui resolver o problema. De qq forma valew pelas dicas pessoal. Abraços. Em 16 de agosto de 2010 17:31, Murilo Cunha mcscu...@yahoo.com.brescreveu: Jorge, Se nao me engano nao tem como desencriptar. O codigo usado eh o MD5. Nao ha como reverter. O que pode ser feito eh atribuir um usuario e senha ja conhecidos e exibi-los para o usuario. Ou seja, cancelar o registro e inserir um outro (bem conhecido) feito pelo sistema. Obrigado MuriloCunha On 16/08/2010 15:49, Jorge Ericsson wrote: Olá pessoal, Alguém pode me ajudar com o problema de como decriptar a senha do usuário usando o compoente UserControl ? Preciso criar uma rotina onde ao excluir um registro do cadastro de membros ele teste a senha do usuário e caso não seja o ADMINISTRADOR não poderá excluir. Tentei o procedimento abaixo, mas não deu certo, alguém pode me ajudar. procedure TfrmMembros.btnExcluirClick(Sender: TObject); *var vPermissaoSenha: string; begin if SolicitarPermissao('Solicitar Permissão', 'Informe a senha do Administrador:', vPermissaoSenha) = True then begin frmPrincipal.vSenha := Decrypt(frmPrincipal.vSenha, frmPrincipal.UCPrincipal.EncryptKey); if (UpperCase(vPermissaoSenha) = frmPrincipal.vSenha) and (frmPrincipal.vUsuario = 'ADMIN') then begin activecontrol := nil; dm.membros.Delete; end; end; end;* Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericssonsup%40gmail.com jericsson...@jericsson.com.br jericssonsup%40jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [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: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Dicas bacanas de restaurantes, bares e etc...
Olá Amigos(as), Esse site é muito maneiro, tem várias promoções (mais em conta até que as que aconteciam do Visa) aqui em Brasília. E se vc viaja pelo país, tb pode encontrar em outras cidades. Vale a pena conferir. O link é: http://www.peixeurbano.com.br/convite/5TPAhttp://www.peixeurbano.com.br/convite/5TEH Com tempo, façam o cadastro que você tmbém ganha descontos. Abraços Jorge Ericsson [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Urgente: Pedendo estado de inserção após tela de confirmação
Olá amigos Estou com um sério problema na minha aplicação delphi 7 + mysql + ADO. Estava funcionando tudo perfeitinho numa rotina de registro de entrada a anos, após uma alteração solicitada pelo meu usuário, eu coloquei apenas uma mensagem de confirmação e após a confirmação o mesmo mudou o estado de dsInset para dsInactive. Estou tentando encontrar o problema e não consigo será que alguém já passou por isso ? Segue abaixo um trecho do código que parou de funcionar logo após a mensagem de confirmação. *procedure TFormEntradas.GravarEntradaContribuicao(vContaContabil : String); begin try //Iniciar a inserção de dados na tabela de contribuição if (DBLookupFormaPagto.KeyValue = Null) or (DBLookupFormaPagto.KeyValue = 0) Then begin DBLookupFormaPagto.SetFocus; Application.MessageBox('O campo Forma de Pagamento é de preenchimento OBRIGATÓRIO.','Aviso do Sistema',MB_OK + MB_ICONWARNING); Exit; end; vVlrEntrada := StrToFloat(BuscaTroca(dbevlrEntrada.Text,'.','')); if (Trim(dbevlrEntrada.Text) = '') or (vVlrEntrada = 0) Then dbevlrEntrada.SelectAll; //Até aqui o DataSet está com Inserção if (Application.MessageBox(Pchar('Confirma a CONTRIBUIÇÃO no valor de R$ '+FormatFloat('#,##0.00', vVlrEntrada)+' ?'), 'Entrada de Contribuição', MB_ICONQUESTION + MB_YESNO) = IDYES) then begin //Após a confirmação do valor o mesmo muda para dsInactive e não entra na rotina abaixo //Gostaria de entender o motivo dessa mudança.. Screen.Cursor := crSQLWait; //Aqui if (dtsEntradas.DataSet.State in [dsInsert, dsEdit]) and (dtsContaContabil.DataSet.FieldByName('cta_contabilred').Value 0) and (dtsFormaPgto.DataSet.FieldByName('cod_formapgto').Value 0) Then begin vVlrEntrada := StrToFloat(BuscaTroca(dbevlrEntrada.Text,'.','')); vDtaEntrada := FormatDateTime('/mm/dd',Now); vHraEntrada := FormatDateTime('HH:mm',Now); btnImprimir.Enabled := True; * Obrigado, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Dicas bacanas de restaurantes, bares e etc...
Pessoal desconsidere esse e-mail, foi enviado de forma automática para todos da minha lista sem minha autorização. Desculpem.. 2010/7/14 Marcos Bernardo xmarcos@gmail.com kakakakakakaka tcs tcs tcs Em 14 de julho de 2010 11:00, Jorge Ericsson jericsson...@gmail.com escreveu: Olá Amigos(as), Esse site é muito maneiro, tem várias promoções (mais em conta até que as que aconteciam do Visa) aqui em Brasília. E se vc viaja pelo país, tb pode encontrar em outras cidades. Vale a pena conferir. O link é: http://www.peixeurbano.com.br/convite/5TPA http://www.peixeurbano.com.br/convite/5TEH Com tempo, façam o cadastro que você tmbém ganha descontos. Abraços Jorge Ericsson [As partes desta mensagem que não continham texto foram removidas] -- Marcos A. de A. Bernardo xmarcos@gmail.com 11 - 9462-2657 / 11- 3205-1499 http://bagusconsultoria.wordpress.com/ [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] OFF Topic - MySQL Guia do Programador em PDF
*MySQL* - *Guia do Programador*http://www.google.com.br/url?sa=tsource=webcd=1ved=0CBYQFjAAurl=http%3A%2F%2Fnovatec.com.br%2Flivros%2Fmysqlcompleto%2Frct=jq=MySql+Guia+do+Programadorei=7IwRTKzCCYGClAep-NXLBwusg=AFQjCNHOgao_EtCleouZyKMT6xc0EgAWFwsig2=4BSERhv2Lt_BkvOBNxsMYgOlá amigos,Gostaria de saber se alguém me indica um link para baixar o livro MySQL - Guia do Programador ou até mesmo comprar a versão eletrônica do mesmo.Se alguém puder me ajudar, por favor eu agradeço desde já.Abraços a todos.*Jorge Ericsson Brasília - DF * [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Pasta scanner
Ralp, se estiver usando o OpenDialog faça como abaixo: var dlg: TOpenDialog; ... dlg := TOpenDialog.Create(Self); // podia ser dlg := TOpenDialog.Create(nil); try dlg.DefaultExt := 'jpeg'; dlg.Filter := ' Arquivo http://www.forumweb.com.br/foruns/index.php?/topic/31985-criar-opendialog/# de Imagem (*.jpeg)|*.jpeg|Todos os arquivos (*.*)|*.*'; dlg.Options := [ofHideReadOnly, ofPathMustExist, ofFileMustExist]; dlg.Title := 'Diretório das Imagens'; dlg.InitialDir := ExtractFilePath(Application.ExeName); if dlg.Execute then begin // dlg.FileName tem o nome do arquivo end; finally dlg.Free; end; Espero ter ajudado. Em 22 de fevereiro de 2010 07:54, Ralp Alves Bezerra ral...@gmail.comescreveu: Bom dia nobre colegas, estou com uma dúvida e mais uma vez recorro a lista. Teria uma maneira via Delphi de configurar a pasta em que as imagens serão digitalizadas. Ex.: Ao abrir meu sistema o mesmo já configurar a pasta que desejo salvar as imagens. As imagens serão digitalizadas em um scanner de alta velocidade e após a digitalização serão importadas para o meu sistema pegando as imagens na pasta que configurei. Estou utilizando Delphi 7 e Firebird 2.1. Agradeço desde já e abraço a todos. Ralp Alves [As partes desta mensagem que não continham texto foram removidas] -- Grato, Jorge Ericsson S. Pinheiros Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [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: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Pasta scanner
Ralp, Você está usando algum componente para scannear a imagem ? Como você está abrindo o aplicativo ? Pelo Delphi, se estiver usando um componente, basta informar o caminho que deseja. Informe mais a sua situação para que possamos ajuda-lo. Abraços. Em 22 de fevereiro de 2010 13:28, Ralp Alves Bezerra ral...@gmail.comescreveu: Está rotina irei utilizar para fazer a carga dos arquivos. O que eu queria saber é como configurar a pasta na qual o scanner vai digitalizar as imagens. Ex. Assim que iniciar minha aplicação, automaticamente seria informado ao scanner a pasta que o mesmo deverá digitalizar as imagens. Abraço -Mensagem original- 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 Jorge Ericsson Enviada em: segunda-feira, 22 de fevereiro de 2010 13:12 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Pasta scanner Ralp, se estiver usando o OpenDialog faça como abaixo: var dlg: TOpenDialog; ... dlg := TOpenDialog.Create(Self); // podia ser dlg := TOpenDialog.Create(nil); try dlg.DefaultExt := 'jpeg'; dlg.Filter := ' Arquivo http://www.forumweb.com.br/foruns/index.php?/topic/31985-criar-opendialog/# de Imagem (*.jpeg)|*.jpeg|Todos os arquivos (*.*)|*.*'; dlg.Options := [ofHideReadOnly, ofPathMustExist, ofFileMustExist]; dlg.Title := 'Diretório das Imagens'; dlg.InitialDir := ExtractFilePath(Application.ExeName); if dlg.Execute then begin // dlg.FileName tem o nome do arquivo end; finally dlg.Free; end; Espero ter ajudado. Em 22 de fevereiro de 2010 07:54, Ralp Alves Bezerra ral...@gmail.com ralprd%40gmail.comescreveu: Bom dia nobre colegas, estou com uma dúvida e mais uma vez recorro a lista. Teria uma maneira via Delphi de configurar a pasta em que as imagens serão digitalizadas. Ex.: Ao abrir meu sistema o mesmo já configurar a pasta que desejo salvar as imagens. As imagens serão digitalizadas em um scanner de alta velocidade e após a digitalização serão importadas para o meu sistema pegando as imagens na pasta que configurei. Estou utilizando Delphi 7 e Firebird 2.1. Agradeço desde já e abraço a todos. Ralp Alves [As partes desta mensagem que não continham texto foram removidas] -- Grato, Jorge Ericsson S. Pinheiros Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericssonsup%40gmail.com jericsson...@jericsson.com.br jericssonsup%40jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM __ Information from ESET NOD32 Antivirus, version of virus signature database 4887 (20100222) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com __ Information from ESET NOD32 Antivirus, version of virus signature database 4887 (20100222) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com -- Grato, Jorge Ericsson S. Pinheiros Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [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: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Pasta scanner
Ralp, Então a solução que eu te dou é verificar na Registry do Windows em qual chave está a pasta setada pela última abertura do Scanner. Assim vou poderá através do delphi controlar essa chave de registro. Creio que assim poderá resolver o seu problema. Eu consegui fazendo isso através da minha aplicação, onde o problema do scanner poderia também ser executado, então pela chamada do executável eu forçava a gravação do caminho na chave de registro do scanner que na época era o Logitech. Uma dica é entrar através do aplicativo do scanner e verificar o caminho que ele grava e qual a chave utilizada. Espero que resolva, Em 22 de fevereiro de 2010 13:59, Ralp Alves Bezerra ral...@gmail.comescreveu: E o seguinte, minha aplicação já executa a digitalização normalmente salvando em banco ok através do TAcquireImage. A questão e que foi comprado um scanner que faz a digitalização em alta velocidade (Avision). O que eu preciso fazer é informar ao scanner em que pasta o mesmo deve digitalizar as imagens e após a digitalização, farei a importação destas imagens para o sistema e gravarei no firebird 2.1. Será que isso é possível? Devido ao custo elevado do equipamento, o mesmo será utilizado em 2 setores distintos, por isso preciso configurar antes da digitalização qual seria a pasta de digitalização das imagens. Abraços. Ralp Alves -Mensagem original- 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 Jorge Ericsson Enviada em: segunda-feira, 22 de fevereiro de 2010 13:33 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Pasta scanner Ralp, Você está usando algum componente para scannear a imagem ? Como você está abrindo o aplicativo ? Pelo Delphi, se estiver usando um componente, basta informar o caminho que deseja. Informe mais a sua situação para que possamos ajuda-lo. Abraços. Em 22 de fevereiro de 2010 13:28, Ralp Alves Bezerra ral...@gmail.com ralprd%40gmail.comescreveu: Está rotina irei utilizar para fazer a carga dos arquivos. O que eu queria saber é como configurar a pasta na qual o scanner vai digitalizar as imagens. Ex. Assim que iniciar minha aplicação, automaticamente seria informado ao scanner a pasta que o mesmo deverá digitalizar as imagens. Abraço -Mensagem original- 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 Jorge Ericsson Enviada em: segunda-feira, 22 de fevereiro de 2010 13:12 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.br Assunto: Re: [delphi-br] Pasta scanner Ralp, se estiver usando o OpenDialog faça como abaixo: var dlg: TOpenDialog; ... dlg := TOpenDialog.Create(Self); // podia ser dlg := TOpenDialog.Create(nil); try dlg.DefaultExt := 'jpeg'; dlg.Filter := ' Arquivo http://www.forumweb.com.br/foruns/index.php?/topic/31985-criar-opendialog/# de Imagem (*.jpeg)|*.jpeg|Todos os arquivos (*.*)|*.*'; dlg.Options := [ofHideReadOnly, ofPathMustExist, ofFileMustExist]; dlg.Title := 'Diretório das Imagens'; dlg.InitialDir := ExtractFilePath(Application.ExeName); if dlg.Execute then begin // dlg.FileName tem o nome do arquivo end; finally dlg.Free; end; Espero ter ajudado. Em 22 de fevereiro de 2010 07:54, Ralp Alves Bezerra ral...@gmail.com ralprd%40gmail.com ralprd%40gmail.comescreveu: Bom dia nobre colegas, estou com uma dúvida e mais uma vez recorro a lista. Teria uma maneira via Delphi de configurar a pasta em que as imagens serão digitalizadas. Ex.: Ao abrir meu sistema o mesmo já configurar a pasta que desejo salvar as imagens. As imagens serão digitalizadas em um scanner de alta velocidade e após a digitalização serão importadas para o meu sistema pegando as imagens na pasta que configurei. Estou utilizando Delphi 7 e Firebird 2.1. Agradeço desde já e abraço a todos. Ralp Alves [As partes desta mensagem que não continham texto foram removidas] -- Grato, Jorge Ericsson S. Pinheiros Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericssonsup%40gmail.com jericssonsup% 40gmail.com jericsson...@jericsson.com.br jericssonsup%40jericsson.com.brjericssonsup% 40jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM __ Information from ESET NOD32 Antivirus, version of virus signature database 4887 (20100222
[delphi-br] Urgente: Exporta para WORD 2003
Olá amigos, Alguém conhece uma solução de exportação de relatório no *QuickReport*(apenas), para * Word 2003* (Doc). Para RTF eu já consegui mas a formatação do relatório não fica 100% usando a instrução abaixo: with SaveDialog1 do begin if Execute then begin self.RPreview.QRPrinter.ExportToFilter(TQRRTFExportFilter.Create(FileName)); { Other filters: HTML: TQRHTMLDocumentFilter ASCII: TQRAsciiExportFilter CSV: TQRCommaSeparatedFilter WMF: TQRWMFExportFilter Excel: TQRXLSFilter } end; end; Grato pela ajuda, Jorge Ericsson S. Pinheiros Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Como captura a porta de acesso ao servidores de horas aqui do Brasil
Olá amigos, Gostaria de saber como obter a porta de acesso aos servidores de hora do Brasíl. Estou usando o componente Indy *IdDayTime *e preciso configurar a porta para que o mesmo capture a Data e Hora do servidor. Se alguém puder me ajuda, desde já agradeço. Obs.: Já testei as portas 13 e 37 padrões para outros servidores de fora e não deu certo. IdDayTime.Host := Tabelas.vServidorHora; IdDayTime.Port := Tabelas.vServidorPort; Abraços, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente: Erro ao atualizar dados em uma tabela.
Olá amigos, o problema já foi resolvido. Estava acontecendo devido a tentativa de atualização da data de nascimento que estava nula no banco, ou seja, -00-00. Eu dei um update em todas as data para NULL e parou de dá o erro, não entendi tbém...rsrs A rotina da tela de cadastro é muito grande, não daria para postar aqui. De qualquer forma está funcionando bem e já tratei para uma mensagem mais amigavel. Obs.: Só aconteceu esse problema na base de dados de um cliente que sofre migração de outro sistema, e não havia reparado nessa data dessa forma. Obrigado a todos. Em 5 de fevereiro de 2010 08:59, Walter Chagas (Bol) wchag...@bol.com.brescreveu: Jorge, este erro normalmente aconteceu porque a tabela ou não tem uma chave primária ou uma chave primaria não muito consistente e a atualização que voce tentou fazer consiste em um registro que já exista no banco ou que o SGBD interpretou como um registro duplicado. Seria interessante, por exemplo, voce postar o código da rotina aque pra ver se dá pra enxergar alguma coisa. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br wchagasj%40bol.com.br http://delphitocorporerm.blogspot.com/ http://twitter.com/wchagas MSN: whitesock...@hotmail.com whitesockets%40hotmail.com SKYPE: WalterChagasJr - Original Message - From: Jorge Ericsson To: undisclosed-recipients: Sent: Thursday, February 04, 2010 5:29 PM Subject: [delphi-br] Urgente: Erro ao atualizar dados em uma tabela. Amigos Delphianos, Estou usando o Delphi 7 + ADO + MySQL e em alguns casos de atualização de dados, está aparecendo esta mensagem qdo executo o POST: * A linha não pode ser localizada para atualização. Alguns valores podem ter sido alterados desde que ela foi lida pela última vez *Obs.: Não estou usando Master/Detail, apenas estou atualizando os dados em uma tabela, depois de preencher alguns dados (DBLookUpComboBox), DBEdit * *Alguém poderia me dá uma solução para este problema ? * * Abraços, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [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: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Como captura a porta de acesso ao servidores de horas aqui do Brasil
Ricardo, Está certo a sua informação, eu que estava usando o componente Indy errado. Troquei pelo correto que já vem por default a porta 123 para acesso e funcionou. De qq forma mto obrigado pela ajuda. Em 5 de fevereiro de 2010 16:03, Ricardo César Cardoso ricardo_engs...@yahoo.com.br escreveu: Jorge, Apenas como leigo, fui procurar na internet pelo assunto e vi que a porta de acesso aos servidores é a UDP 123. Mas como sou leigo posso ter me equivocado e te passado alguma informação errada. Segue abaixo o link de onde tirei a informação: http://ntp.br/faq.html http://ntp.br/guia.html Abraço, Ricardo. 1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS. 2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor compreendida. 3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em sex, 5/2/10, Jorge Ericsson jericsson...@gmail.comjericssonsup%40gmail.com escreveu: De: Jorge Ericsson jericsson...@gmail.com jericssonsup%40gmail.com Assunto: [delphi-br] Como captura a porta de acesso ao servidores de horas aqui do Brasil Para: Data: Sexta-feira, 5 de Fevereiro de 2010, 13:09 Olá amigos, Gostaria de saber como obter a porta de acesso aos servidores de hora do Brasíl. Estou usando o componente Indy *IdDayTime *e preciso configurar a porta para que o mesmo capture a Data e Hora do servidor. Se alguém puder me ajuda, desde já agradeço. Obs.: Já testei as portas 13 e 37 padrões para outros servidores de fora e não deu certo. IdDayTime.Host := Tabelas.vServidorHo ra; IdDayTime.Port := Tabelas.vServidorPo rt; Abraços, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] __ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- Grato, Jorge Ericsson S. Pinheiros Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [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: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Alguém já trabalhou com o componente EMS QuickPDF
** http://www.softlookup.com/display.asp?ID=73754Olá Pessoal, Gostaria de saber se algum companheiro do forum utiliza ou já utilizou o EMS QuickPDF ? Preciso gerar meus relatórios PDF apartir do QuickReport. Abraços, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Alguém já trabalhou com o componen te EMS QuickPDF
*Pessoal só a título de informação, eu conheço o QuickReport, só estava querendo uma opção de Exportação Free boa que gere o PDF. Eu já encontrei a solução ideal enviada pelo Moacir.. Simples, leve e fácil utilização.. Resolvi meu problema com duas linhas de código. É disso que eu preciso.,.. Rapidez e eficiência... Valew pela dica Moacir... try Screen.Cursor := crSqlWait; ExportacaoPDF.Preview := RPreview; ExportacaoPDF.ExportQRFromPreview; Screen.Cursor := crDefault; except end; * Em 5 de fevereiro de 2010 18:11, Marcelo leite_rom...@yahoo.com.brescreveu: O proprio quick exporta para pdf, só que na versão paga. é facinho se não me engano e só chamar a classe de exportação e pronto. Com relação a esta suica nunca trabalhei, outra opção bem menos elegante seria uma impressora pdf(virtual). De: Jorge Ericsson jericsson...@gmail.com jericssonsup%40gmail.com Enviadas: Sexta-feira, 5 de Fevereiro de 2010 17:44:56 Assunto: [delphi-br] Alguém já trabalhou com o componente EMS QuickPDF ** http://www.softlook up.com/display. asp?ID=73754Olá Pessoal, Gostaria de saber se algum companheiro do forum utiliza ou já utilizou o EMS QuickPDF ? Preciso gerar meus relatórios PDF apartir do QuickReport. Abraços, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] __ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- Grato, Jorge Ericsson S. Pinheiros Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [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: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] [RESOLVIDO] Alguém já trabalhou com o componente E MS QuickPDF
*Pessoal só a título de informação, eu conheço o QuickReport, só estava querendo uma opção de Exportação Free boa que gere o PDF. Eu já encontrei a solução ideal enviada pelo Moacir.. Simples, leve e fácil utilização.. Resolvi meu problema com duas linhas de código. É disso que eu preciso.,.. Rapidez e eficiência... Valew pela dica Moacir... try Screen.Cursor := crSqlWait; ExportacaoPDF.Preview := RPreview; ExportacaoPDF.ExportQRFromPreview; Screen.Cursor := crDefault; except end; * -- Mensagem encaminhada -- De: Jorge Ericsson jericsson...@gmail.com Data: 5 de fevereiro de 2010 17:44 Assunto: Alguém já trabalhou com o componente EMS QuickPDF Para: ** http://www.softlookup.com/display.asp?ID=73754Olá Pessoal, Gostaria de saber se algum companheiro do forum utiliza ou já utilizou o EMS QuickPDF ? Preciso gerar meus relatórios PDF apartir do QuickReport. Abraços, Jorge Ericsson Brasília - DF -- Grato, Jorge Ericsson S. Pinheiros Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] [PROBLEMA RESOLVIDO] Alguém já trabalhou com o com ponente EMS QuickPDF
Agradeço a ajuda e dicas de todos... O problema já foi resolvido.. Valew pessoal. ** http://www.softlookup.com/display.asp?ID=73754Olá Pessoal, Gostaria de saber se algum companheiro do forum utiliza ou já utilizou o EMS QuickPDF ? Preciso gerar meus relatórios PDF apartir do QuickReport. Abraços, Jorge Ericsson Brasília - DF -- Grato, Jorge Ericsson S. Pinheiros Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Urgente: Erro ao atualizar dados em uma tabela.
Amigos Delphianos, Estou usando o Delphi 7 + ADO + MySQL e em alguns casos de atualização de dados, está aparecendo esta mensagem qdo executo o POST: * A linha não pode ser localizada para atualização. Alguns valores podem ter sido alterados desde que ela foi lida pela última vez *Obs.: Não estou usando Master/Detail, apenas estou atualizando os dados em uma tabela, depois de preencher alguns dados (DBLookUpComboBox), DBEdit * *Alguém poderia me dá uma solução para este problema ? * * Abraços, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Componente SuperBina
*Eu já tentei de tudo para colocar esse componente para funcionar e desisto dele. Alguém teria uma solução pronta de Identificador de Chamada em qq versão do delphi para negociar ? Eu preciso implantar uma solução urgente no meu programa de pizzaria que só falta o ID estpa funcionando. Me mandem um PVT para falarmos sobre o assunto. Obrigado.* 2010/1/25 Ricardo César Cardoso ricardo_engs...@yahoo.com.br Até onde eu me lembro (e isso fazem alguns ANOS) vc tinha que ter um modem de marca pra conseguir o SuperBina funfando legal. Indicavam até os modens da USRobotics como os que davam melhor resultado. Hj em dia nem sei mais se a informação procede. Atte, Ricardo. 1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS. 2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor compreendida. 3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em seg, 25/1/10, Jorge Ericsson jericsson...@gmail.comjericssonsup%40gmail.com escreveu: De: Jorge Ericsson jericsson...@gmail.com jericssonsup%40gmail.com Assunto: [delphi-br] Componente SuperBina Para: Data: Segunda-feira, 25 de Janeiro de 2010, 13:03 Olá amigos, Alguém conseguiu colocar para funcionar o componente SuperBina ? Estou com problemas sérios e já troquei 3 placas de fax/modem para tentar colocar para funcionar e nada. Gostaria de saber se alguém usou, abandonou ou adotou algum solução para ID Chamadas com o componente. Abraços. *Segue abaixo a consulta do meu último modem que está funcionando super bem. * ATQ0V1E0 - OK AT+GMM - +GMM: PCI Soft Voice SoftRing Modem AT+FCLASS=? - 0,1,8,80 AT#CLS=? - COMANDO SEM SUPORTE AT+GCI? - +GCI: 16 AT+GCI=? - +GCI: (00,01,02,03, 04,05,06, 07,09,0A, 0B,0C,0D, 0E,0F,10, 11,12,13, 14,15,16, 19,1A,1B, 1C,1D,1E, 1F,20,21, 22,23,24, 25,26,27, 28,29,2A, 2B,2C,2D, 2E,2F,30, 31,32,33, 34,35,36, 37,38,39, 3A,3B,3C, 3D,3E,40, 41,43,44, 45,46,47, 48,49,4B, 4C,4D,4E, 4F,50,51, 52,53,54, 55,56,57, 58,59,5A, 5B,5C,5E, 5F,60,61, 62,63,64, 65,66,67, 68,69,6A, 6B,6C,6D, 6E,6F,70, 71,72,73, 74,75,76, 77,78,79, 7A,7B,7C, 7D,7E,7F, 80,81,82, 83,84,85, 86,87,88, 89,8A,8B, 8C,8D,8E, 8F,90,92, 93,94,96, 97,98,99, 9A,9B,9C, 9D,9E,9F, A0,A1,A2, A3,A4,A5, A6,A7,A8, A9,AA,AB, AC,AD,AE, AF,B0,B1, B2,B3,B4, B5,B6,B7, B8,B9,BA, BB,BC,BD, BE,BF,C1, C2,C3,C4, C5,C7,C8, C9,CA,CB, CC,CD,CE, CF,D0,D1, D2,D3,D4, D5,D6,D7, D8,D9,DA, DB,DC,DD, DE,DF,E0, E1,E2,E3, E4,E5,E6, E7,E8,EB, EC,ED,EE, EF,F0,F1, F2,F3,F4, F5,F7,F8, F9,FA,FB, FC,FE) ATI1 - 255 ATI2 - OK ATI3 - SoftK56V_B2. 1_V7.60.00 ATI4 - PCI Soft Voice SoftRing Modem ATI5 - 022 ATI6 - SoftK56 CModem Version 12 Rksample Version 342 ATI7 - 255 Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] __ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- Grato, Jorge Ericsson S. Pinheiros Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [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: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Componente SuperBina
Olá amigos, Alguém conseguiu colocar para funcionar o componente SuperBina ? Estou com problemas sérios e já troquei 3 placas de fax/modem para tentar colocar para funcionar e nada. Gostaria de saber se alguém usou, abandonou ou adotou algum solução para ID Chamadas com o componente. Abraços. *Segue abaixo a consulta do meu último modem que está funcionando super bem. * ATQ0V1E0 - OK AT+GMM - +GMM: PCI Soft Voice SoftRing Modem AT+FCLASS=? - 0,1,8,80 AT#CLS=? - COMANDO SEM SUPORTE AT+GCI? - +GCI: 16 AT+GCI=? - +GCI: (00,01,02,03,04,05,06,07,09,0A,0B,0C,0D,0E,0F,10,11,12,13,14,15,16,19,1A,1B,1C,1D,1E,1F,20,21,22,23,24,25,26,27,28,29,2A,2B,2C,2D,2E,2F,30,31,32,33,34,35,36,37,38,39,3A,3B,3C,3D,3E,40,41,43,44,45,46,47,48,49,4B,4C,4D,4E,4F,50,51,52,53,54,55,56,57,58,59,5A,5B,5C,5E,5F,60,61,62,63,64,65,66,67,68,69,6A,6B,6C,6D,6E,6F,70,71,72,73,74,75,76,77,78,79,7A,7B,7C,7D,7E,7F,80,81,82,83,84,85,86,87,88,89,8A,8B,8C,8D,8E,8F,90,92,93,94,96,97,98,99,9A,9B,9C,9D,9E,9F,A0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,AE,AF,B0,B1,B2,B3,B4,B5,B6,B7,B8,B9,BA,BB,BC,BD,BE,BF,C1,C2,C3,C4,C5,C7,C8,C9,CA,CB,CC,CD,CE,CF,D0,D1,D2,D3,D4,D5,D6,D7,D8,D9,DA,DB,DC,DD,DE,DF,E0,E1,E2,E3,E4,E5,E6,E7,E8,EB,EC,ED,EE,EF,F0,F1,F2,F3,F4,F5,F7,F8,F9,FA,FB,FC,FE) ATI1 - 255 ATI2 - OK ATI3 - SoftK56V_B2.1_V7.60.00 ATI4 - PCI Soft Voice SoftRing Modem ATI5 - 022 ATI6 - SoftK56 CModem Version 12 Rksample Version 342 ATI7 - 255 Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Captura a Data da Internet
*Valew amigos pelas dicas, consegui resolver o problema criando a função abaixo usando o componente IdDayTime.* vServidorHora := IniArquivo.ReadString('Parametros', 'Serv_Hora', ''); if empty(vServidorHora) then vServidorHora :='time.nist.gov'; vServidorPort := StrToInt(IniArquivo.ReadString('Parametros', 'Serv_Porta', '')); if vServidorPort = 0 then vServidorPort := 37; IniArquivo.Free; function TFormAviso.Captura_Hora_Servidor_Internet: String; var i: integer; texto, data: string; begin IdDayTime.Host := Tabelas.vServidorHora; IdDayTime.Port := Tabelas.vServidorPort; data := IdDayTime.DayTimeStr; for i := 0 to length(data) do begin if data[i] = ' ' then begin texto := copy(data, i + 1, 8); Break; end; end; if texto '' Then Result := copy(texto, 7, 2) + '/' + copy(texto, 4, 2) + '/20' + copy(texto, 1, 2) else Result := FormatDateTime('dd/mm/', Now); //time.nist.gov //time-b.nist.gov //nist1-dc.ustiming.org //a.ntp.br //b.ntp.br //c.ntp.br end; try Screen.Cursor := crHourGlass; if Tabelas.ADOConnSGI.InTransaction = False Then Tabelas.ADOConnSGI.BeginTrans; with Tabelas.ADOQueryGeral do begin Close; Sql.Clear; Sql.Add('update tb_sgi_entidade set dta_servidor = '+ FormAviso.Captura_Hora_Servidor_Internet+''); ExecSql; Tabelas.ADOConnSGI.CommitTrans; Screen.Cursor := crDefault; end; except Screen.Cursor := crDefault; Tabelas.ADOConnSGI.RollbackTrans; end; Abraços a todos... 2010/1/1 Jorge Ericsson jericsson...@gmail.com Olá amigos delphianos, eu preciso criar um função para capturar a data e hora da internet, para depois gravar no banco. Para que o meu aplicativo só use está data e hora, impossibilitando que o o usuário mude a data do relógio para uma data posterior e efetue lançamentos futuros. Exemplo do meu problema: Eu tenho uma tela que registrar as entradas de pagamentos, mas não permite que a data seja informada, hoje ele captura a data pelo relógio do windows. Bom eu não gostaria que o usuário alterasse a data do windows e pudesse efetuar lançamentos para datas maiores que as atuais, sendo que pode efetuar lançamentos para datas anteriores a atual. Se alguém tiver uma solução por favor, me envie. Grato, Jorge Ericsson Brasília - DF -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Captura a Data da Internet
Olá amigos delphianos, eu preciso criar um função para capturar a data e hora da internet, para depois gravar no banco. Para que o meu aplicativo só use está data e hora, impossibilitando que o o usuário mude a data do relógio para uma data posterior e efetue lançamentos futuros. Exemplo do meu problema: Eu tenho uma tela que registrar as entradas de pagamentos, mas não permite que a data seja informada, hoje ele captura a data pelo relógio do windows. Bom eu não gostaria que o usuário alterasse a data do windows e pudesse efetuar lançamentos para datas maiores que as atuais, sendo que pode efetuar lançamentos para datas anteriores a atual. Se alguém tiver uma solução por favor, me envie. Grato, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Criando executaveis através do Camtasia
Olá amigos, Pesquisando no fórum verifiquei que muitos utilizam o CAMTASIA Studio para criar suas vídeo aulas. Eu estou preparando algumas vídeo-dicas para os meus usuários e gostaria de saber no camtasia como gerar arquivos executaveis. Preciso criar um CD de instalação dos meus sistemas onde através de vídeo o mesmo poderá sanar suas dúvidas. Se alguém souber de como efetuar essa criação, por favor, me reportem essa dica. Obs.: Eu já criei as vídeos dicas, mas preciso apenas converter os vídeo para EXE. Grato, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Criando executaveis através do Camtasia
Excelente dica Silvio, gostei muito do Wink, além de leve é rápido e limpo, faz muita coisa... O melhor de tudo é Open Source. Segue o link para quem desejar testar http://wink.mirrors.toolshape.com/wink20.zip http://wink.mirrors.toolshape.com/wink20.zipValew Silvio, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Identificador de Chamadas
Valew amigos pelas dicas, aqui em Brasília eu já testei com duas linhas os componentes que encontrei garimpando na net, mas nem um funcionou bem, só que encontrei um demo de um sistema de delivery que funciona perfeitamente com a fax/modem, só que a empresa vende a solução completa que custa o olho da cara, por isso resolvi desenvolver um. Estou testando algumas coisas com o ITAPI componente de comunicação, mas não estou tento sucesso. Abraços. 2009/12/15 Gabriel R B gbf...@gmail.com Olha, já tentei implementar uma identificação de chamadas. O que posso te adiantar é que: 1º: a maioria das placas de Fax/Modem que vendem por aí não tem suporte a DTMF, e consequentemente, não fazem a leitura do número que está ligando, mesmo que sua linha esteja habilitada para identificar chamadas. 2º: como o amigo EmbarcaDelphi disse, algumas regiões tem suas particularidades, e uma delas que conheço é que alguns lugares pro sinal DTMF chegar corretamente na sua placa, vc precisa colocar 1 peça entre a linha e a placa, comprada em lojas trabalham com telefonia. . É o que posso te adiantar. Abraço Gabriel R B 2009/12/14 Jorge Ericsson jericsson...@gmail.com Olá amigos delphianos, Estou finalizando um sistema para controle de pizzaria (delivery) e neste projeto eu gostaria de implementar um controle de identificação de chamadas. Alguém tem uma solução que gostaria de negóciar ? O detalhe importante é que eu gostaria de usar a minha placa de fax/modem. Obs.: Minha linha telefônica de teste, já possui habilitado o Identificador de Chamadas. Aguardo contato. Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericssonsup%40gmail.com jericsson...@jericsson.com.br jericssonsup%40jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] URGENTE: Identificador de Chamadas
Olá amigos delphianos, Estou finalizando um sistema para controle de pizzaria (delivery) e neste projeto eu gostaria de implementar um controle de identificação de chamadas. Alguém tem uma solução que gostaria de negóciar ? O detalhe importante é que eu gostaria de usar a minha placa de fax/modem. Obs.: Minha linha telefônica de teste, já possui habilitado o Identificador de Chamadas. Aguardo contato. Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: [NDDV] [OFF Topic] Curso para fo rmação ESPECIALISTA EM SOFTWARE
Tenho um amigo que está terminando o curso de sistema de informação e me perguntou sobre o curso de especialista em software e não soube informar ao mesmo. Eu não sei se é pós-graduação ou ligado em engenharia de software. Apenas gostaria de saber como informar a ele qual curso e em qual instituição ele poderia se forma em ESPECIALISTA EM SOFTWARE. 2009/11/27 Bruno Lichot bruno.lic...@microfocus.com www.noginfo.com.br 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 Walter Chagas (Bol) Sent: sexta-feira, 27 de novembro de 2009 09:47 To: n...@yahoogrupos.com.br NDDV%40yahoogrupos.com.br; Grupo Delphi-BR Subject: [delphi-br] Re: [NDDV] [OFF Topic] Curso para formação ESPECIALISTA EM SOFTWARE Voce quer é algo no segmento de Engenharia de Software certo? O que seria especificamente? Faculdade, pós graduação ou apenas curso técnico? []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br wchagasj%40bol.com.br mailto:wchagasj%40bol.com.brwchagasj%2540bol.com.br http://delphitocorporerm.blogspot.com/ http://twitter.com/wchagas MSN: whitesock...@hotmail.com whitesockets%40hotmail.com mailto: whitesockets%40hotmail.com whitesockets%2540hotmail.com SKYPE: WalterChagasJr - Original Message - From: Jorge Ericsson To: undisclosed-recipients: Sent: Thursday, November 26, 2009 10:08 PM Subject: [NDDV] [OFF Topic] Curso para formação ESPECIALISTA EM SOFTWARE Olá amigos, Gostaria de saber aonde posso encontrar um curso para formação em Especialista em Softwares. Tenho interesse de fazer Graduação ou Pós caso. Obrigado. Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] Click here https://www.mailcontroller.altohiway.com/sr/oZ733CC0o67TndxI!oX7UnlPSUZHzmrIAL4mYEyP7!IsMkDHiy6!V9L2QN!oc3+xSw9fV5QVhWCVy4oAFznL6w== to report this email as spam. This message has been scanned for viruses by MailController http://www.MailController.altohiway.com/ . [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [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: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] [OFF Topic] Curso para formação ESPECIALISTA EM SO FTWARE
Olá amigos, Gostaria de saber aonde posso encontrar um curso para formação em Especialista em Softwares. Tenho interesse de fazer Graduação ou Pós caso. Obrigado. Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Necessito urgente do componente Duck Barcode
Olá amigos, Alguém teria o componente Duck Barcode para Delphi 7 ? Necessito urgente para compilar uma aplicação antiga e não consigo mais encontrar um link funcional que me possibilite baixar novamente o componente. Se preferir me envie o link em PVT fico grato. Valew, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Urgente: Aplicativo gerando travamento no Windows Vista
Olá meus amigos, Estou com um problema sério com minha aplicação no Windows Vista de um usuário. De uns tempos para cá, um usuário me reclamou que o sistema está travando e aparentemente achei que era vírus, fiz todas as investigações possíveis e não encontrei nada. Analisando o log de erros do Windows eu me deparei com as informações a baixo, que são geradas assim que eu mando finalizar o processo. Alguém poderia me informar o que posso fazer para que isso acabe de uma vez ? Detalhe só acontece no windows vista, já pedi para o usuário testar seu login no windows 2000 e xp que tem na empresa. Log de erro gerado pelo windows vista. Falha no compartimento de memória 742381043, tipo 5 Nome do Evento: AppHangB1 Resposta: Nenhum ID. de arquivo CAB: 0 Assinatura do problema: P1: siger.exe P2: 2.17.9.1 P3: 2a425e19 P4: afae P5: 0 P6: P7: P8: P9: P10: Arquivos anexados: C:\Users\testesammua\AppData\Local\Temp\WER4836.tmp.version.txt C:\Users\testesammua\AppData\Local\Temp\WER5D4C.tmp.appcompat.txt Estes arquivos podem estar disponíveis em: C:\Users\testesammua\AppData\Local\Microsoft\Windows\WER\ReportArchive\Report0e6e624b Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] SHOW DE BOLA - Desafiando o Tempo
EU ACHO QUE ESSA PODE SER UMA PEQUENA AMOSTRA DE COMO SERÁ NO NOVO MUNDO... SEM TER QUE FAZER NADA NA FRENTE DA TV.. RSRS MUITO LEGAL.. SUPER FANTÁSTICO!!! [As partes desta mensagem que não continham texto foram removidas]
Fwd: [delphi-br] SHOW DE BOLA - Desafiando o Tempo
Desculpem o envio do e-mail por engano.. Ignorem Obrigado.. [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Ajuda na instalação do componente DTools
Olá pessoal, desculpe a ignorância do macaco, mas vennho apelar aos amigos sobre a instalação de um componente chamado Dtools no delphi. Aparentemente ele foi desenvolvido para o delphi 2.0 mais eu estou com os fontes de um projeto para manutenção que usa esse componente e não lembro como faz para instala-lo, pois sempre pede o caminnho dos arquivos .PAS e só tem os .DCU no projeto. http://www.programmersheaven.com/download/6024/download.aspx Se alguém consegui instalar e puder me dá as dicas eu agradeço, ou mesmo tiver os fontes pois pesquisei varios dias e nada, já será de grande ajuda. Sei que é coisa de principiante a instalação de componentes mais eu não lembro como faz. Obrigado mais uma vez Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: RES: [NDDV] Gerar Boleto Bancário através da a plicação Delphi
Amigos ouvi a abertura sobre questões bancárias e gostaria de tentar sanar algumas dúvidas. A minha idéia é dá aos clientes 3 opções de contas mas uma delas é conta empresa, ou seja, pessoa juridica. Neste caso como será o procedimento ? Pensei em gerar boletos com as minhas contas sem ter que passar pelas burocracias dos bancos pois estava pagando muito caro e tendo clientes insatisfeitos quando os boletos estavam sendo gerados pelo banco (Gerenciador Financeiro). Obs.: Posso usar contas de pessoa física e jurídica nestes boletos free ? Obrigado pelas dicas até o momento. Jorge Ericsson Brasília-DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Gerar Boleto Bancário através da aplicação Delph i
Olá pessoal, Tenho alguns clientes que estão preferindo efetuar os pagamentos através de boleto bancário, então eu gostaria de contar com a ajuda dos amigos com dicas e sugestões para que através do meu aplicativo seja gerado o boleto bancário onde informo 3 opções de conta para o cliente. Alguém já desenvolveu algo vinculado a aplicação ou conhece algum componente FREE ? Grato desde já pela ajuda. Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Gerar Boleto Bancário através da a plicação Delphi
Valew pessoal pelas dicas, estou baixando agora e vou testar. Já havia testado a muito tempo atrás o GbCobrança (GbCod) mas estava dando uns paus no Delphi 7, vou tentar baixar esta versão e testar. Obrigado. Att, Jorge Ericsson 2009/9/10 Douglas Uesato - Depto. de Informática ues...@multicoisas.com.br Jorge, Boa tarde, eu utilizo o RLBoleto, de uma pesquisada no Google que você irá encontrar muitas informações sobre este componente. Atenciosamente, Douglas Uesato Departamento de T.I Fone: (67)3041-8000 www.multicoisas.com.br 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 Jorge Ericsson Enviada em: quinta-feira, 10 de setembro de 2009 17:54 Para: undisclosed-recipients: Assunto: [delphi-br] Gerar Boleto Bancário através da aplicação Delphi Olá pessoal, Tenho alguns clientes que estão preferindo efetuar os pagamentos através de boleto bancário, então eu gostaria de contar com a ajuda dos amigos com dicas e sugestões para que através do meu aplicativo seja gerado o boleto bancário onde informo 3 opções de conta para o cliente. Alguém já desenvolveu algo vinculado a aplicação ou conhece algum componente FREE ? Grato desde já pela ajuda. Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Problemas com o DBConsts
Pessoal tó com um problema sério no meu delphi. De uma hora para outra começou a não compilar mais os projetos, apresentando um Erro na VDBConsts.pas e no pacote dcldb70.bpl Alguém já passou por isso ? Obs.: Fui contaminado com o Virus Induc.A mas já removi com o Avast. Build [Error] DBCtrls.pas(23): Undeclared identifier: 'TDataLink' [Error] DBCtrls.pas(25): Undeclared identifier: 'TField' [Error] DBCtrls.pas(41): Method 'ActiveChanged' not found in base class [Error] DBCtrls.pas(42): Undeclared identifier: 'TDataEvent' [Error] DBCtrls.pas(43): Method 'EditingChanged' not found in base class [Error] DBCtrls.pas(44): Undeclared identifier: 'TFieldRef' [Error] DBCtrls.pas(45): Method 'LayoutChanged' not found in base class [Error] DBCtrls.pas(46): Method 'RecordChanged' not found in base class [Error] DBCtrls.pas(47): Method 'UpdateData' not found in base class [Error] DBCtrls.pas(97): Undeclared identifier: 'TDataSource' [Error] DBCtrls.pas(953): Class type required [Error] DBCtrls.pas(957): Method 'EditingChanged' not found in base class [Error] DBCtrls.pas(958): Method 'DataSetChanged' not found in base class [Error] DBCtrls.pas(959): Method 'ActiveChanged' not found in base class [Error] DBCtrls.pas(969): Class type required [Error] DBCtrls.pas(973): Method 'FocusControl' not found in base class [Error] DBCtrls.pas(974): Method 'ActiveChanged' not found in base class [Error] DBCtrls.pas(975): Method 'LayoutChanged' not found in base class [Error] DBCtrls.pas(976): Method 'RecordChanged' not found in base class [Error] DBCtrls.pas(981): Class type required [Error] DBCtrls.pas(985): Method 'ActiveChanged' not found in base class [Error] DBCtrls.pas(986): Method 'DataSetChanged' not found in base class [Error] DBCtrls.pas(987): Method 'LayoutChanged' not found in base class [Fatal Error] DBLogDlg.pas(50): Could not compile used unit 'VDBConsts.pas' Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Ajuda para rodar aplicativo no wine
Valew amigos pelas soluções, todas estão sendo analisadas com carinho. Josir, eu penso em migrar a aplicação toda para Java acessando MySql, onde o usuário irá usar o próprio browser, no momento a solução que procuro é temporária por isso não estou muito querendo mexer em código. Já conseguir criar uma conexão com o banco usando Zeos, mas está dando erro na aplicação que ao debugar vi que está precisando da libmysqld50.dll ou libmysqld51.dll quando faço a conexão. Já pesquisei em todo lugar inclusive nas zeoslib e não encontro essas dlls, coloquei o NTDLL.DLL no diretório da aplicação despois descobrir que o Wine já tem ela só que em minusculo. Vou tentar agora colocar em prática a idéia de instalar o ADO no Wine. Pelo que vi muitos precisam dessa solução e caso consiga algo eu vou postar aqui. Obrigado pelas dicas de todos. Jorge Ericsson Brasília-DF 2009/7/28 Rafael Jorge rafael.jo...@gmail.com temos um cliente que tem so uma maquina windows e mais de 20 terminais linux... todas rodando um acesso remoto via terminal services. tente achar essa solução. se vc deseja realmente migrar pra linux pq vc nao migra seu soft pra lazarus? t+ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Ajuda para rodar aplicativo no wine
Evandro eu já pensei nisso, no mysql do ubunto eu não encontrei as dll apenas o código para compilação, como eu uso a versão 4.1 do mysql windows eu só tenho a libmysqld.dll e está eu testei e não deu certo. Caso alguém tenha essas dll me envie por e-mail. 2009/7/28 Evandro Siqueira vans...@gmail.com Jorge Ericsson escreveu: Já conseguir criar uma conexão com o banco usando Zeos, mas está dando erro na aplicação que ao debugar vi que está precisando da libmysqld50.dll ou libmysqld51.dll quando faço a conexão. Já pesquisei em todo lugar inclusive nas zeoslib e não encontro essas dlls, coloquei o NTDLL.DLL no diretório da aplicação despois descobrir que o Wine já tem ela só que em minusculo. Jorge, vc encontra essas dlls (libmysqld50.dll e libmysqld51.dll) na pasta do mysql, pq são nativas dele e não do zeos. -- []s. Evandro Siqueira Programador de Sistemas Lessentiel Lingerie (79) 3254-5511 Ramal 218 skype: evandro.lessentiel -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [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: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: Ajuda para rodar aplicativo no wine
Valew Silvio era isso que eu estava querendo, mas uma vez vc salvando a pátria hehehe Abrigado amigão. 2009/7/28 Silvio Clecio silviop...@yahoo.com.br Em 28/7/2009 10:38, Jorge Ericsson escreveu: ... como eu uso a versão 4.1 do mysql windows eu só tenho a libmysqld.dll e está eu testei e não deu certo. Caso alguém tenha essas dll me envie por e-mail. Nesse link [http://silvioprog.4shared.com/] (arquivo mysql.rar) disponibilizei as dlls que acompanham o Zeos 7 (libmysql41.dll, libmySQL50.dll, libmysql51.dll, libmysqld41.dll, libmysqld50.dll e libmysqld51.dll). -- []'s, Silvio Clécio --- Linux User: #481900 Gmail, GTalk: silviop...@gmail.com silvioprog%40gmail.com E-mail, Y! Messenger: silviop...@yahoo.com.br silvioprog%40yahoo.com.br BlogSite: http://silvioprog.blogspot.com/ BlogSpot: http://silvioclecio.blogspot.com/ VirtualDriver: http://silvioprog.4shared.com/ °oO| Seja livre, use Linux! |Oo° -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Ajuda para rodar aplicativo no wine
Pois é eu tentei de início usar o VMWare, mas outras fontes me informaram que eu teria que ter licença nas máquinas que usassem o vmware no windows por isso desistir. Vou tentar estudar este OpenSource VirtualBox, pra mim esse é novidade. Obrigado pela dica Leonardo. 2009/7/28 EmbarcaDelphi embarcadel...@yahoo.com.br Se eu fosse vc em vez de usar o Wine eu partiria para vmware ou para o OpenSource VirtualBox, o Wine é muito limitado e cheio de BUG. Leonardo Quinino escreveu: O meu Projeto também é migrar o aplicativo para Lazarus, ainda estamos apanhando com algumas coisas no lazarus, coisas do tipo que em Delphi temos o dominio. Mas até a versão ficar pronta, tenho que fazer essa solução meio tabajara. Aplicativo Win32 Forms, WINDOWS, rodando num server LINUX , emulado com wine . . -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Ajuda para rodar aplicativo no wine
Leonardo, Instalei o VirtualBox no meu Windows 2003, Estou emulando o Ubuntu Desktop e gostaria de saber se dessa forma eu posso instalr o banco mysql e rodar minha aplicação delphi ? Agora o que eu vou usar para rodar minha aplicação win32 sendo que seria redundante usar Wine? Só repetindo que gostaria de rodar o Delphi + Zeos +MySQL no Ubuntu (Linux) OK Gostei muito do VirtualBox é simples rápido e muito eficiente. Valew [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Ajuda para rodar aplicativo no wine
Olá amigos, Tenho uma aplicação Delphi 7 + ADO + Access e um cliente está necessitando que eu coloque essa aplicação rodando no linux devido as licenças que ele não gostaria de pagar do windows. Bom eu já decide migrar o sistema todo para Java (iniciei as modelagem), mas como preciso de uma solução rápida, resolvi prepara uma máquina com o Linux (Ubuntu + Wine) e migrei toda a base de dados Access para MySQL 5.1 e mudei a forma de conexão para Zeos (MySQL 5.1) usando claro a libmysqld.dll. Está apresentando algum problemas ao rodar o aplicativo no Wine como acesso ao NTDLL e não encontrei até agora a solução para o meu problema. Desenvolvi uma pequena aplicação, já carreguei a calculadora do windows no linux e tudo certo, mas no caso da conexão ao banco está dando errro. Bom o que eu preciso é da ajuda de alguém experiente no grupo que me informe se já tentou este processo e como resolveu os problemas. Hoje eu tenho Delphi + Zeos (libmysqld.dll) + MySql 5.1 (nativo do linux). Espero ter sido o mais claro possível. Grande abraço Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Sistema Completo para Transportadora
Olá amigos, Tenho um cliente que precisa de uma sistema para transportadora que atenda as seguintes necessidades básicas como: Cadastro de Clientes Rotas Funcionários Cadastro de Frota Controle de Combustível Controle de Troca de Óleo Contas Naturezas de Operação Plano de Contas Formas de Pagamento Cadastro de Cedentes Instruções do Boleto Fluxo de Caixa Contas à Pagar Contas à Receber Boletos à Receber Duplicatas à Receber Adiantamento dos Motoristas Comissão dos Motoristas Conta Corrente dos Motoristas Cálculo do Transporte Controle de Cotações/Cálculos Ordem de Coleta Emissão do Conhecimento de Frete (CTRC) Impressão de Manifesto Emissão de Ordem de Serviço Controle de Carregamento Controle de Entregas Status das Frota Ordens de Coleta CTRC Emitidos Ordem de Serviço Consumo de Combustível Vencimentos de Doc. da Frota Acertos de Conta Histórico de Exclusões Gerador Sintegra Gerador de Arquivos EDI Gerador de Arquivos Contábil Recebimento de Arquivos EDI Infelizmente não tenho tempo para levantar os requisitos deste sistema e desenvolve-lo, por isso gostaria de falar em PVT sobre o assunto. Obs.: Dependendo do sistema, podemos conversar a respeito do código fonte, caso não seja negociável, que tenha a possibilidade de adequar o sistema as necessidades do cliente de forma rápida. Aguardo retorno, Jorge Ericsson S. Pinheiro http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Como enviar e/ou testar o foco num botão tipo TTool Button
Olá amigos delphianos, Estou migrando algumas telas do meu sistema e resolvi usar o TToolButton, mas gostaria de testar o Foco se está no botão e também enviar como por exemplo: TBtnGravar.Focused Sei que com SpeedBottum e TButton funciona blz mas como testaria o focus num botão estilo TToolButton ? Se alguém soube me dá uma dica. Obrigado. Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Justificando texto no quickreport
Olá amigos, sei que esse assunto já está meio que batido aqui no grupo, mas eu apenas gostaria que me lembrasse de como posso justificar um texto no quickreport. Lembro-me de que usai uma vez o RichText Parente alguma coisa com o QRRichText mas não lembro como aplicar novamente. Alguém poderia me ajudar ? Agradeço desde já. Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Reparação de tabelas MyISAM com delphi
Olá pessoal, Alguém tem alguma rotina de reparação de tabela MyISAM que pode compartilhar ? T+ Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Urgente: Criando um Data Mining
Olá pessoal, Estou precisando da ajuda dos mais experientes e safos do grupo. Desenvolvi um software para gerenciamento de igrejas que está no ar a uns 6 anos, hoje um cliente me questionou sobre a possibilidade de desenvolver no produto um módulo sobre DataMining (mineração de dados). Criar uma forma onde através de cruzamentos de dados ele obtenha informações para analise e impressão como por exemplo, saber todos os membros que possui passaporte e que ganham acima de um determinando valor, para poder enviar e-mail sobre novas excursões e etc. Isto é apenas um exemplo. Andei pesquisando sobre o assunto e até agora não encontrei nada a respeito feito em delphi que eu posso analisar. Alguém que já Desenvolveu algo parecido pode me ajudar com material de pesquisa e informações ? Obrigado desde já, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Envio de E-Mail (Mailisting)
Olá amigos, Desenvolvi um sistema para gerencia meus clientes da empresa e tive a idéia de criar um módulo de mainlisting no mesmo. Preciso a ajuda dos amigos em enviar links de onde posso estudar programas de gerenciamento de e-mail para que possa embutido no meu sistema essa rotina. Lembrando que já tenho uma lista de e-mail dos meus clientes e precisaria apenas enviar informações (imagem JPEG) das novidades em cada sistema adquirido por eles. Exemplo: Cliente A adquiriu os sistemas 1, 4 e 5 e se o sistema 1 e 5 tiver uma propaganda será enviado no dia programado para o cliente A apenas a propaganda (imagem JPG) para ele e assim sucessivamente. Já tenho o banco pronto, mas gostaria de analisar alguns exemplos (fontes) de programas para melhorar a minha idéia. Quero deixar em serviço o programa para efetuar esse processo e não ter que ficar me preocupando se foi ou não, qdo disparar. Abraços, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Urgente: Desabilitar ShortCut
Pessoal eu gostaria de saber como desabilitar a tecla de atalho do menu após a entrada de um determinado usuário ? Exemplo: Eu tenho alguns usuário que acessam no menu um determinado Item com o Atalho CTRl + ALT + E (Tela do Financeiro), mas alguns novos usuários que não possuem essa permissão mesmo desabilitando o menu ou colocando Visible = False ou colocando Menu.ShortCut := 0 o atalho ainda funcionar. Gostaria de saber se tem outro jeito de desabilitar o menu e a tecla de atalho para um determinado usuário. Grato, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Visualizar Estrutura de Tabelas no FIREBIRD
Olá amigos, Com qual comando ou instrução eu posso retorna a estrutura de uma determinada tabela do FIREBIRD ? Estou criando um módulo para executar scripts de criação de tabelas e preciso que seja retornado a estrutura criada. Grato, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Visualizar Estrutura de Tabelas no FIREBIRD
Eu uso o IBExpert quero retorna essas informações no form de estou criando para rodar scripts. 2009/3/31 jAlosii jalo...@gmail.com ibexpert te ajuda um monte nisso. Jorge Ericsson escreveu: Olá amigos, Com qual comando ou instrução eu posso retorna a estrutura de uma determinada tabela do FIREBIRD ? Estou criando um módulo para executar scripts de criação de tabelas e preciso que seja retornado a estrutura criada. Grato, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Visualizar Estrutura de Tabelas no FIREBIRD
Blz Ricardo é exatamente disso que eu preciso amigão. Muito obrigado mesmo. 2009/3/31 Ricardo César Cardoso ricardo_engs...@yahoo.com.br Jorge, da uma olhada nesse link que tem exatamente o que vc precisa (eu acho...) [ http://portal.cseg.eng.br/index.php?option=com_contentview=articleid=111Itemid=12] Só achei estranho a formatação dos caracteres, mas isso é o de menos []'s Ricardo. Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em ter, 31/3/09, Jorge Ericsson jericsson...@gmail.comjericssonsup%40gmail.com escreveu: De: Jorge Ericsson jericsson...@gmail.com jericssonsup%40gmail.com Assunto: [delphi-br] Visualizar Estrutura de Tabelas no FIREBIRD Para: Data: Terça-feira, 31 de Março de 2009, 11:23 Olá amigos, Com qual comando ou instrução eu posso retorna a estrutura de uma determinada tabela do FIREBIRD ? Estou criando um módulo para executar scripts de criação de tabelas e preciso que seja retornado a estrutura criada. Grato, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Visualizar Estrutura de Tabelas no FIREBIRD
Valew pessoal, agora eu estou pesquisando sobre o como retornar os dados no banco POSTGRES As dicas já resolveram meu problema para o Firebird. Obrigadasso. Jorge Ericsson Brasília - DF 2009/3/31 Higor Granzoto higo...@yahoo.com.br se vc estiver utilizando dbExpress pode listar através de dois comandos do componente SQLConneciton: SQLConnection1.GetTableNames(List:TStrings; SystemTables:boolean); e SQLConnection1.GetFieldNames(Tablename:string; List:TStrings); se não estou enganado outros componentes de acesso a dados também, sempre, disponibilizam esse tipo de função. De: Jorge Ericsson jericsson...@gmail.com jericssonsup%40gmail.com Enviadas: Terça-feira, 31 de Março de 2009 11:23:33 Assunto: [delphi-br] Visualizar Estrutura de Tabelas no FIREBIRD Olá amigos, Com qual comando ou instrução eu posso retorna a estrutura de uma determinada tabela do FIREBIRD ? Estou criando um módulo para executar scripts de criação de tabelas e preciso que seja retornado a estrutura criada. Grato, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Configuração do EurekaLog para GMAIL
Pessoal preciso testar o componente EurekaLog antes de compra-lo e gostaria de saber se alguém que usa sabe configura-lo para enviar relatório de erro para o Gmail ? Ou se puderem me indicar alguma lista de discussão eu já agradeço. Obrigado, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Como criar usuário no windows com senha nunca expir a ?
Olá amigos Delphianos, Problema: Quando crio um usuário através da rotina abaixo o mesmo não cria com opção de SENHA NUNCA EXPIRA ResumoInstalacao('Criando permissão de Administrador para o usuário PostGres.', 'Processo de Instalação', '', 2); if IsWindowsVista then Executar_Aguarda('net.exe', 'user postgres /Active:yes', 0); Executar_Aguarda('net.exe', 'user postgres postgres /ADD /EXPIRES:NEVER', SW_SHOWMINIMIZED); Executar_Aguarda(DIR_INST_POSTGRESQL + 'ntrights.exe', '+r SeServiceLogonRight -u postgres', SW_SHOWMINIMIZED); Executar_Aguarda(DIR_INST_POSTGRESQL + 'ntrights.exe', '+r SeNetworkLogonRight -u postgres', SW_SHOWMINIMIZED); Executar_Aguarda(DIR_INST_POSTGRESQL + 'ntrights.exe', '+r SeInteractiveLogonRight -u postgres', SW_SHOWMINIMIZED); Executar_Aguarda('msiexec.exe', '/i ' + DIR_INST_POSTGRESQL + 'postgresql-8.0-int.msi BASEDIR=' + edt_diretorio_postgresql.Text + ' /qr INTERNALLAUNCH=1 ADDLOCAL=server,nls,psql,pgadmin,jdbc,npgsql,psqlodbc,pgoledb,docs,includefiles,libfiles,msvclibs,pgxs,binfiles SERVICEDOMAIN=%COMPUTERNAME%' + ' SERVICEPASSWORD=postgres SUPERPASSWORD=postgres LOCALE=PORTUGUESE,BRAZIL ENCODING=LATIN1 LISTENPORT=5432 TRANSFORMS=:lang_pt_br', SW_SHOWMINIMIZED); Solicitação: Criar um usuário no windows com a opção que a senha nunca expire se possível através da API do Windows. Alguém já passou por este problema e tem uma solução inteligente para o processo ? Obrigado, Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Urgente: Como detectar o modelo da placa mãe pelo D elphi
Olá pessoal, eu tó com um problema de lentidão em minhas aplicação que usam Interbase. Simplesmente começaram a ter uma lentidão impressionante, só que descobrir que isso só acontece nas placas com o Intel(R) HP Technology Habilitado, tanto Intel como AMD. Bom eu gostaria de desenvolver algo em delphi que detectasse o modelo da placa e desabilitasse esta opção de forma transparente para o usuário. Alguém tem um exemplo de como posso controlar isso ? Obs.: Não me interessa saber de migração de banco de dados, porque no momento eu tenho várias aplicações espalhadas pelo Brasil e não posso migrar para Firebird, MySQL e etc. Preciso de uma solução para ontem nestes aplicativos. Obrigado pela ajuda desde já. Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente: Como detectar o modelo da p laca mãe pelo Delphi
Valew Clayton mas eu já resolvi meu problema e pesquisando eu encontrei o TJvComputerInfoEx da biblioteca JEDI, já tenho o que precisava, obrigado. 2009/3/24 clayton clay...@agriness.com Um programa em delphi para determinar o tipo do processador? Você terá de apaelar para código assembly para conseguir isso. Os livros específicos de cada chipset da Intel tem este algoritmo (em assembly) pronto para você usar/adaptar para as suas necessidades. O problema é que estas soluções são específicas de cada fabricante, ou seja, um programa que detecta uma determinada família de processadores da Intel poderá não funcionar com processadores da AMD, e vice-versa. Eu te sugiro procurar algum software já pronto que possa lhe dar as informações necessárias, e você de dentro do teu programa Delphi, ativar estes outros softwares, os quais irão gerar algum tipo de relatório/arquivo. De posse deste arquivo você poderá fazer a leitura das informações desejadas. Abaixo segue um site (achei usando o google) que você poderá usar para obter informações de processadores AMD e Intel. Não sei se estes programas irão atender as tuas necessidades, mas vale você dar uma conferida neles. http://web.inter.nl.net/hcc/J.Steunebrink/chkcpu.htm Clayton. _ 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 Jorge Ericsson Enviada em: terça-feira, 24 de março de 2009 11:28 Para: undisclosed-recipients: Assunto: [delphi-br] Urgente: Como detectar o modelo da placa mãe pelo Delphi Olá pessoal, eu tó com um problema de lentidão em minhas aplicação que usam Interbase. Simplesmente começaram a ter uma lentidão impressionante, só que descobrir que isso só acontece nas placas com o Intel(R) HP Technology Habilitado, tanto Intel como AMD. Bom eu gostaria de desenvolver algo em delphi que detectasse o modelo da placa e desabilitasse esta opção de forma transparente para o usuário. Alguém tem um exemplo de como posso controlar isso ? Obs.: Não me interessa saber de migração de banco de dados, porque no momento eu tenho várias aplicações espalhadas pelo Brasil e não posso migrar para Firebird, MySQL e etc. Preciso de uma solução para ontem nestes aplicativos. Obrigado pela ajuda desde já. Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] URGENTE: Retorna informações do Banco Firebird
Saudações Delphianas, Amigos, eu preciso através do delphi retorna para uma string as informações do banco de dados como por exemplo o DIALECT. Alguém já desenvolveu algo que faça isso ? Por favor me retorne. Obs.: Sei como seta o dialeto mais antes de seta-lo eu gostaria primeiro de verificar em qual dialeto está o banco. Para seta eu já uso por exemplo a seguinte linha de comando: If blablablá for diferente do dialect 3 Then Executar_Aguarda('c:\arquivos de programas\firebird\firebird_2_1\bin\gfix.exe', ' -sql_dialect 3 ' + 'c:\banco.fdb', SW_SHOWMINIMIZED) else Application.MessageBox('Banco de Dados já está no Dialeto 3', 'Informação', MB_ICONINFORMATION + mb_OK); Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como enviar um pulso de 5 volts pela serial?
Felipe dá uma olhada no site da Saber Eletrônica que tem uns exemplos de como trabalhar Eletrônica com Delphi. Tem um exemplo que a muito tempo atrás eu usei para fazer exatamente isso que vc está querendo agora, ainda pensa que mudaram a catraca para um relógio biometrico... Mas na época foi canseira desenvolver isso, mas tem como, procure por RS-232 Segue links abaixo: *http://www.sabereletronica.com.br/paginas/index/downloads_saber_eletronica http://www.sabereletronica.com.br/secoes/leitura_evento/188 Boa sorte amigão. * Jorge Ericsson Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF * *2009/2/18 Fellipe Henrique felli...@gmail.com Vixi...bom, eu preciso enviar um pulso pela porta serial pra abrir uma catraca... o rapaz da catraca falou que teria que ser um pulso de 5 volts... agora fiquei encucado.. será que é só abrir a porta e pronto? O problema é que não tenho a catraca aqui, só mesmo um cabo, com um led... diz o cara que se acender o led vai funcionar... hehe []s 2009/2/18 Luiz Escobar esco...@megasistema.com.brescobar%40megasistema.com.br Se vc enviar um pulso de 5 volts da serial vai queimar ela O que vc realmente precisa ??? Luiz Escobar From: Fellipe Henrique Sent: Wednesday, February 18, 2009 11:30 AM To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.br Subject: [delphi-br] Como enviar um pulso de 5 volts pela serial? Amigos, preciso enviar um pulso de 5 volts para a porta serial, nunca fiz isso, alguem tem idéia de como fazer? []s -- _ T.·.F.·.A.·. Fellipe Henrique Blog: www.digitumsoft.com.br/blogs/fellipeh -- CAMPANHA POR UMA INTERNET SEGURA Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar mensagens use SEMPRE o Cco (cópia oculta). Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar um e-mail, delete todas as informações que apareçam no corpo do e-mail e que possam ser usadas por hackers. ### [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- _ T.·.F.·.A.·. Fellipe Henrique Blog: www.digitumsoft.com.br/blogs/fellipeh -- CAMPANHA POR UMA INTERNET SEGURA Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar mensagens use SEMPRE o Cco (cópia oculta). Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar um e-mail, delete todas as informações que apareçam no corpo do e-mail e que possam ser usadas por hackers. ### [As partes desta mensagem que não continham texto foram removidas] -- [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] URGENTE: Tempo decorrido
Olá amigos Delphianos. Estou precisando implementar urgente na minha rotina de atualização de banco o tempo decorrido de cada processo. Por exemplo eu tenho os processos de criação do banco, correção de banco, carga de dados no banco. Resultado seria mais ou menos assim: Criação de Banco 05:06:45 Correção de Banco03:30:20 Carga de Dados no Banco 10:03:30 18:40:35 Total em hora:minutos:segundos Eu preciso criar se possível uma threading ou 3 no caso que registre no formulário o tempo decorrido de cada processo. Alguém poderia me ajudar com uma diga boa ? Abraços Jorge Ericsson S. Pinheiro [As partes desta mensagem que não continham texto foram removidas]
Re: Re: [delphi-br] Conexao com o banco
Uses Conexão ODBC e aponto para o nome do servidor ou IP da máquina Bruno. Qual componente e o tipo de conexão que você está utilizando ? 2009/2/13 Bruno Lepesqueur brunolbra...@yahoo.com.br Ok... Eduardo, mas e se o banco estiver em outro computador! Como que ele vai saber o caminho? Obrigado! ---Mensagem original--- De: Eduardo Silva dos Santos Data: 12/02/2009 22:25:49 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Conexao com o banco Bruno, com mysql a coisa é diferente.. vc não informa o caminho do banco como no FireBird.. no Mysql basta você informar o Nome do mesmo.. com isso vai funcionar numa boa.. e graças ao Mysql ser assim, é possivel vc fazer um select em bancos distintos. qual componente de acesso você ta usando? 2009/2/12 Bruno Lepesqueur brunolbra...@yahoo.com.brbrunolbrasil%40yahoo.com.br Tenho o seguinte código: System_DB.Connected := false; System_DB.Database := edit3.Text; System_DB.Connected := true; Onde System_DB é o nome da conexão com o banco my-sql e edit3.text é onde eu informo o caminho do banco, tipo: c:\mysql\data\banco; Esse código funciona, mas qdo é digitado no edit3.text um nome de banco de dados que não existe ou que esteja com caminho errado ele dá uma mensagem de erro. Eu estava pensando em criar um IF para não ter esse problema! Coisa mais ou menso assim: se o banco existir e tiver conectado faça... Alguém pode me ajudar? Obrigado! [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: eduardo@gmail.com eduardo.drd%40gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Trabalhos sobre algoritmos
desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Transferir toda configuração do De lphi 6 e 7 para outra maquina/windows...
HKEY_LOCAL_MACHINE\SOFTWARE\Borland HKEY_LOCAL_MACHINE\SOFTWARE\Borland\Delphi 2009/2/2 Luiz Escobar esco...@megasistema.com.br PELO AMOR DE DEUS ehhehehhe onde fica esta ou estas chaves no registro []s Luiz Escobar From: Jorge Ericsson Sent: Monday, February 02, 2009 4:12 PM To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Subject: Re: [delphi-br] Transferir toda configuração do Delphi 6 e 7 para outra maquina/windows... Também utilizo a mesma técnica do Natanael e sempre funcionou até aqui no meu trabalho que preciso sempre fazer umas limpezas quando o delphi começa a travar. Mantenho tudo no meu diretório e para ter certeza de todo o funcionamento, utilizo apenas o BUIL ALL nos projetos e algumas bibliotecas como jedi. Funciona... 2009/2/2 Natanael Rodrigues nr.n...@gmail.com nr.news%40gmail.com Ola, Quando ocorre esta situação comigo, faço uma cópia dos registros que guardam as informações do Libary e packages e em seguida uma cópia fiel dos diretórios onde estão os componentes. Para facilitar este trabalho, sempre mantenho meus componentes em um caminho específico, assim fica facil quando preciso recorrer a este tipo de trabalho. Att. - Original Message - From: Alexandre Peçanha To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.br Sent: Monday, February 02, 2009 2:50 PM Subject: Re: [delphi-br] Transferir toda configuração do Delphi 6 e 7 para outra maquina/windows... Olá Luiz, Em relação a sua pergunta, realmente não faço idéia de como fazer essa migração, mas como já tive este mesmo problema algumas vezes, acabei por utilizar um artifício que tem me poupado muito trabalho. Máquinas virtuais. Tenho algumas máquinas virtuais (M$ Virtual PC) e em cada uma tenho apenas o essencial de cada ambiente instalado. Tenho uma VM com WinXP e Delphi 6 (+ componentes instalados). Mantenho a original guardada e uso uma cópia pra trabalho e a carrego pra cima e pra baixo no pendrive. Em qq lugar, tenho meus ambientes completos. Assim faço também com ambientes de servidor (Windows 2003 + BD´s) e clientes (Windows XP somente). Não posso ajudar no seu problema, mas fica ai a dica. Comigo tem funcionado 100%. 2009/2/2 Luiz Escobar esco...@megasistema.com.brescobar%40megasistema.com.br escobar%40megasistema.com.br Sequinte, estou trocando de manquina na empresa, e arrumando a minha em casa, então ja viu né... RE-INSTALL é que não vai faltar... Bom queria saber se tem como transferir toda a configuração do DELPHI 7 e 6 para a maquina/windows novos, ja instalei os mesmos e estão ativos, porem to limpim-limpim, e tem componentes pra XUXU pra instalar ALLguem sabe de algum jeito de transferir toda a configuração para a outra maquina, sem precisar ter que Instalar/Reconpilar todos os componentes ??? As versão são D6-PRO e D7-(acho que entreprise ou algo assim.. rsrsrs) Obrigado. []s Luiz Escobar [As partes desta mensagem que não continham texto foram removidas] -- Alexandre Peçanha alexpeca...@gmail.com alexpecanha%40gmail.com alexpecanha%40gmail.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericssonsup%40gmail.com jericsson...@hotmail.com jericssonsup%40hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Transferir toda configuração do De lphi 6 e 7 para outra maquina/windows...
Também utilizo a mesma técnica do Natanael e sempre funcionou até aqui no meu trabalho que preciso sempre fazer umas limpezas quando o delphi começa a travar. Mantenho tudo no meu diretório e para ter certeza de todo o funcionamento, utilizo apenas o BUIL ALL nos projetos e algumas bibliotecas como jedi. Funciona... 2009/2/2 Natanael Rodrigues nr.n...@gmail.com Ola, Quando ocorre esta situação comigo, faço uma cópia dos registros que guardam as informações do Libary e packages e em seguida uma cópia fiel dos diretórios onde estão os componentes. Para facilitar este trabalho, sempre mantenho meus componentes em um caminho específico, assim fica facil quando preciso recorrer a este tipo de trabalho. Att. - Original Message - From: Alexandre Peçanha To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Monday, February 02, 2009 2:50 PM Subject: Re: [delphi-br] Transferir toda configuração do Delphi 6 e 7 para outra maquina/windows... Olá Luiz, Em relação a sua pergunta, realmente não faço idéia de como fazer essa migração, mas como já tive este mesmo problema algumas vezes, acabei por utilizar um artifício que tem me poupado muito trabalho. Máquinas virtuais. Tenho algumas máquinas virtuais (M$ Virtual PC) e em cada uma tenho apenas o essencial de cada ambiente instalado. Tenho uma VM com WinXP e Delphi 6 (+ componentes instalados). Mantenho a original guardada e uso uma cópia pra trabalho e a carrego pra cima e pra baixo no pendrive. Em qq lugar, tenho meus ambientes completos. Assim faço também com ambientes de servidor (Windows 2003 + BD´s) e clientes (Windows XP somente). Não posso ajudar no seu problema, mas fica ai a dica. Comigo tem funcionado 100%. 2009/2/2 Luiz Escobar esco...@megasistema.com.brescobar%40megasistema.com.br Sequinte, estou trocando de manquina na empresa, e arrumando a minha em casa, então ja viu né... RE-INSTALL é que não vai faltar... Bom queria saber se tem como transferir toda a configuração do DELPHI 7 e 6 para a maquina/windows novos, ja instalei os mesmos e estão ativos, porem to limpim-limpim, e tem componentes pra XUXU pra instalar ALLguem sabe de algum jeito de transferir toda a configuração para a outra maquina, sem precisar ter que Instalar/Reconpilar todos os componentes ??? As versão são D6-PRO e D7-(acho que entreprise ou algo assim.. rsrsrs) Obrigado. []s Luiz Escobar [As partes desta mensagem que não continham texto foram removidas] -- Alexandre Peçanha alexpeca...@gmail.com alexpecanha%40gmail.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Criar caixas de sistemas
Olá pessoal, Agora que estou quase terminando o meu site, eu gostaria de criar umas caixas iguais as apresentadas no link abaixo para identificar meus sistemas. Alguém conhece uma ferramenta para criar essas caixas ? http://blogwindows.wordpress.com/2007/02/17/boxes-so/ Valew pessoal, Jorge Ericsson [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] converter .DOC para .PDF
Olá Elvis, Eu utilizo o QRPDFFilt do QuickReport para converte meus relatórios para PDF e enviar por e-mail. Não sei se te ajudaria, mas caso queira testar eu te mando o pacote em PVT para vc testar. eu uso da seguinte forma: Declaro na uses principal a unit QRPDFFilt Na unit QRPrev.pas eu acrescento um botão para dispara a procedure abaixo: procedure TQRStandardPreview.TbtnPDFClick(Sender: TObject); var PDFFilt: TQRPDFDocumentFilter; vRelatorio : String; begin try Screen.Cursor := crSqlWait; if DirectoryExists(ExtractFilePath(Application.ExeName)+'PDFTemp') then DeleteDir(ExtractFilePath(Application.ExeName)+'PDFTemp'); CreateDir(ExtractFilePath(Application.ExeName)+'PDFTemp'); vRelatorio := Self.Caption+Copy(DateToStr(Now),1,2)+Copy(DateToStr(Now),4,2)+Copy(DateToStr(Now),7,4)+Copy(TimeToStr(Now),1,2)+Copy(TimeToStr(Now),4,2); vRelatorio := UpperCase(ExtractFilePath(Application.ExeName)+vRelatorio+'.pdf'); PDFFilt := TQRPDFDocumentFilter.Create( vRelatorio ); PDFFilt.AddFontMap( 'Bookman-Old-Style:Times' ); PDFFilt.TextOnTop := true; QRPrinter.ExportToFilter( PDFFilt ); PDFFilt.Free; Screen.Cursor := crDefault; Application.MessageBox(Pchar('Relatório PDF gerado com sucesso em: '+vRelatorio+'.'),'Aviso do Sistema',MB_OK + MB_ICONINFORMATION); except PDFFilt.Free; end; end; Nunca tentei de um campo memo ou rtf, mas pode ser que funcione depois de uma boa pesquisar no código. Abraços. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Update + Quantidade de Registros
Olá Juliano, Eu já fiz um procedimento que precisa retornar todos os registros inseridos e atualizados num único procedimento. Criei uma variável contador para os dois procedimento dentro do laço de inserção e atualização, depois eu exibia uma mensagem para o usuário informando a qdte de registros atualizados e inseridos na tabela.. Talvez resolva o seu problema, qq coisa manda a instrução para melhor analise. []´s. Jorge Ericsson 2009/1/23 Juliano Silva - Yahoo smjjuli...@yahoo.com.br Pessoal Tenho um componente TQuery e um TUpdateSQL, este TQuery é carregado com uma série de registros que podem ser alterados no Grid, após as alterações realizadas, elas são aplicadas no banco, através do TQuery.ApplyUpdates, preciso do seguinte: Saber quantos registros foram alterados, antes de aplicar no banco, sei que com o TClientDataSet é possível, existe alguma forma de saber isso usando o TQuery ou o TUpdateSQL? att. Juliano Silva [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] Update + Quantidade de Registros
blz então monte um Array com o código do registro que estão sendo alterado, após o comando post. Assim vc terá um Array por exemplo: var_Atualizados = [23,1,3,4,76,98,90], de posse desse array vc poderá exibir ao usuário os respectivos registros alterados e suas informações. Se entendi bem acho que resolvi nesse caso. 2009/1/23 Juliano Silva - Yahoo smjjuli...@yahoo.com.br Hummm, neste caso não funciona para mim, pois as alterações ocorrem no Grid, a pessoa como é uma lista de lançamentos, são vários registros e a pessoa altera no grid. 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 Jorge Ericsson Enviada em: sexta-feira, 23 de janeiro de 2009 16:11 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Update + Quantidade de Registros Olá Juliano, Eu já fiz um procedimento que precisa retornar todos os registros inseridos e atualizados num único procedimento. Criei uma variável contador para os dois procedimento dentro do laço de inserção e atualização, depois eu exibia uma mensagem para o usuário informando a qdte de registros atualizados e inseridos na tabela.. Talvez resolva o seu problema, qq coisa manda a instrução para melhor analise. []´s. Jorge Ericsson 2009/1/23 Juliano Silva - Yahoo smjjuli...@yahoo.com.brsmjjuliano%40yahoo.com.br mailto:smjjuliano%40yahoo.com.br smjjuliano%2540yahoo.com.br Pessoal Tenho um componente TQuery e um TUpdateSQL, este TQuery é carregado com uma série de registros que podem ser alterados no Grid, após as alterações realizadas, elas são aplicadas no banco, através do TQuery.ApplyUpdates, preciso do seguinte: Saber quantos registros foram alterados, antes de aplicar no banco, sei que com o TClientDataSet é possível, existe alguma forma de saber isso usando o TQuery ou o TUpdateSQL? att. Juliano Silva [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] BUG do TZQuery do ZEUS
AMIGOS, OBRIGADO MAS O PROBLEMA JÁ FOI RESOLVIDO. Coloquei o Componente TZQUERY no formulário, joguei toda a instrução e passei parâmetros para abri a query e deu certo. Desculpe por não ter explicado direito o meu problema, mas não havia pensando em outras soluções. Valew pessoal... 2009/1/21 Eduardo Silva dos Santos eduardo@gmail.com Jorge é importantíssimo você informar qual a Versão do Zeos e do Delphi que vc ta usando.. e de preferência um trecho do código para reproduzir o problema, assim outro colega pode fazer o teste e te ajudar, sem informar a versão fica complicado. 2009/1/21 Jorge Ericsson jericsson...@gmail.com Olá amigos, Eu uma instrução SQL bem simples que qdo crio a query em tempo de execução a mesma acrescenta uns caracteres estranhos no final da String e ocaciona o erro qdo executo o comando OPEN. Alguém já passou por isso ou tem uma dica de como resolver este problema ?? Seque texto captura do Query.Sql.text 'select ' 1' as Faixa_Etaria,sum(qtd), co_municipio_ibge_residencia, ano '#$D#$A'from (select count(*) as qtd,co_municipio_ibge_residencia,to_char(dt_obito, '') as ano,'#$D#$A'EXTRACT(year FROM age (dt_obito, dt_nascimento)) as faixa_etaria '#$D#$A'from dbsim.tb_do where to_char(dt_obito, '') = '2007' and a.co_municipio_ibge_residencia = '330010''#$D#$A'group by co_municipio_ibge_residencia,to_char(dt_obito, ''),EXTRACT(year FROM age (dt_obito, dt_nascimento))'#$D#$A'order by faixa_etaria ) as faixa'#$D#$A'where faixa.faixa_etaria 1'#$D#$A'group by faixa.co_municipio_ibge_residencia, faixa.ano'#$D#$A'union'#$D#$A'select '1-4' as Faixa_Etaria,sum(qtd), co_municipio_ibge_residencia, ano '#$D#$A'from (select count(*) as qtd,co_municipio_ibge_residencia,to_char(dt_obito, '') as ano,'#$D#$A'EXTRACT(year FROM age (dt_obito, dt_nascimento)) as faixa_etaria '#$D#$A'from dbsim.tb_do where to_char(dt_obito, '') = '2007' and a.co_municipio_ibge_residencia = '330010''#$D#$A'group by co_municipio_ibge_residencia,to_char(dt_obito, ''),EXTRACT(year FROM age (dt_obito, dt_nascimento))'#$D#$A'order by faixa_etaria ) as faixa'#$D#$A'where faixa.faixa_etaria between 1 and 4'#$D#$A'group by faixa.co_municipio_ibge_residencia, faixa.ano'#$D#$A'union'#$D#$A'select '5-9' as Faixa_Etaria,sum(qtd), co_municipio_ibge_residencia, ano '#$D#$A'from (select count(*) as qtd,co_municipio_ibge_residencia,to_char(dt_obito, '') as ano,'#$D#$A'EXTRACT(year FROM age (dt_obito, dt_nascimento)) as faixa_etaria '#$D#$A'from dbsim.tb_do where to_char(dt_obito, '') = '2007' and a.co_municipio_ibge_residencia = '330010''#$D#$A'group by co_municipio_ibge_residencia,to_char(dt_obito, ''),EXTRACT(year FROM age (dt_obito, dt_nascimento))'#$D#$A'order by faixa_etaria ) as faixa'#$D#$A'where faixa.faixa_etaria between 5 and 9'#$D#$A'group by faixa.co_municipio_ibge_residencia, faixa.ano'#$D#$A'union'#$D#$A'select '10-14' as Faixa_Etaria,sum(qtd), co_municipio_ibge_residencia, ano '#$D#$A'from (select count(*) as qtd,co_municipio_ibge_residencia,to_char(dt_obito, '') as ano,'#$D#$A'EXTRACT(year FROM age (dt_obito, dt_nascimento)) as faixa_etaria '#$D#$A'from dbsim.tb_do where to_char(dt_obito, '') = '2007' and a.co_municipio_ibge_residencia = '330010''#$D#$A'group by co_municipio_ibge_residencia,to_char(dt_obito, ''),EXTRACT(year FROM age (dt_obito, dt_nascimento))'#$D#$A'order by faixa_etaria ) as faixa'#$D#$A'where faixa.faixa_etaria between 10 and 14'#$D#$A'group by faixa.co_municipio_ibge_residencia, faixa.ano'#$D#$A'union'#$D#$A'select '15-19' as Faixa_Etaria,sum(qtd), co_municipio_ibge_residencia, ano '#$D#$A'from (select count(*) as qtd,co_municipio_ibge_residencia,to_char(dt_obito, '') as ano,'#$D#$A'EXTRACT(year FROM age (dt_obito, dt_nascimento)) as faixa_etaria '#$D#$A'from dbsim.tb_do where to_char(dt_obito, '') = '2007' and a.co_municipio_ibge_residencia = '330010''#$D#$A'group by co_municipio_ibge_residencia,to_char(dt_obito, ''),EXTRACT(year FROM age (dt_obito, dt_nascimento))'#$D#$A'order by faixa_etaria ) as faixa'#$D#$A'where faixa.faixa_etaria between 15 and 19'#$D#$A'group by faixa.co_municipio_ibge_residencia, faixa.ano'#$D#$A'union'#$D#$A'select '20-29' as Faixa_Etaria,sum(qtd), co_municipio_ibge_residencia, ano '#$D#$A'from (select count(*) as qtd,co_municipio_ibge_residencia,to_char(dt_obito, '') as ano,'#$D#$A'EXTRACT(year FROM age (dt_obito, dt_nascimento)) as faixa_etaria '#$D#$A'from dbsim.tb_do where to_char(dt_obito, '') = '2007' and a.co_municipio_ibge_residencia = '330010''#$D#$A'group by co_municipio_ibge_residencia,to_char(dt_obito, ''),EXTRACT(year FROM age (dt_obito, dt_nascimento))'#$D#$A'order by faixa_etaria ) as faixa'#$D#$A'where faixa.faixa_etaria between 20 and 29'#$D#$A'group by faixa.co_municipio_ibge_residencia, faixa.ano'#$D#$A'union
Re: [delphi-br] URGENTE: Gravar e Ler imagem no banco MYSQL
Amigos, eu uso dessa forma para recuperar a imagem do banco e funciona perfeitamente com ADO mas com Zeus não deu certo mesmo mudando as propriedades e fazendo a chamada. Esta meio tosco mais funciona, na época eu só encontrei essa forma de trabalhar ADO e MySQL 4.0 Obs.: Hoje eu utilizo Zeos e MySQL 5.0 Espero ter sido claro. procedure TFormMembros.Carregar_Foto_Membro(DataSet: TDataSet); begin try Pic:= nil; Stream := nil; If varisnull(DataSet.fieldbyName('FOT_MEMBRO').Value) or (DataSet.fieldbyName('FOT_MEMBRO').Value = '') Then begin try Stream := TMemoryStream.Create; Pic:= TJpegImage.Create; Pic.LoadFromFile(ExtractFilePath(Application.ExeName)+'Logotipo.jpg'); FotoMembro.Picture.Assign(Pic); GraphType := gtJpeg; Stream.Write(GraphType, 1); Pic.SaveToStream(Stream); except Pic.Free; Stream.Free; raise; end; end else begin Stream := TAdoBlobStream.Create(TBlobField(DataSet.FieldbyName('FOT_MEMBRO')), bmRead); try Stream.Seek(JpegStartsInBlob(TBlobField(DataSet.FieldbyName('FOT_MEMBRO'))), soFromBeginning); Pic := TJpegImage.Create; try Pic.LoadFromStream(Stream); FotoMembro.Picture.Graphic := Pic; finally Pic.Free; end; finally Stream.Free end; end; except end; end; Para Carregar e Gravar eu faço assim: procedure TFormMembros.mnuCarregarClick(Sender: TObject); begin if OpenFotoMembro.Execute then begin mnuLimpar.Click; Jpg := nil; Stream := nil; try Stream := TMemoryStream.Create; FileExt := LowerCase(ExtractFileExt(OpenFotoMembro.FileName)); if (FileExt = '.bmp') or (FileExt = '.dib') then begin GraphType := gtBitmap; Stream.Write(GraphType, 1); with FotoMembro.Picture.Bitmap do begin LoadFromFile(OpenFotoMembro.FileName); FotoMembro.Picture.Bitmap.SaveToStream(Stream); end; end else if (FileExt = '.jpg') or (FileExt = '.jpeg') or (FileExt = '.jpe') then begin Jpg := TJpegImage.Create; Jpg.LoadFromFile(OpenFotoMembro.FileName); FotoMembro.Picture.Assign(Jpg); GraphType := gtJpeg; Stream.Write(GraphType, 1); Jpg.SaveToStream(Stream); end; QueryFoto:= Nil; QueryFoto:= TADOQuery.Create(QueryFoto); QueryFoto.Connection := Tabelas.ADOConnSGI; QueryFoto.Sql.Clear; QueryFoto.Sql.Add('update tb_sgi_membros set fot_membro = :fot_membro where cod_membro = :cod_membro'); Screen.Cursor := crHourGlass; if (Stream nil) Then begin QueryFoto.Parameters.ParamByName('cod_membro').Value := vCodMembro; QueryFoto.Parameters.ParamByName('fot_membro').LoadFromStream(Stream,ftBlob); end; QueryFoto.ExecSQL; QueryFoto.Free; end; except jpg.Free; Stream.Free; raise; end; end; end; [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] BUG do TZQuery do ZEUS
#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'u'#0'ä\Ñ'#8#0#$1C'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0' u'#0'hnÑ'#8' '#$B'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'ø'#$1E'u'#0'ÔmÑ'#8'øs'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'Ø-u'#0'oÑ'#8'`ût'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'L4u'#0'LgÑ'#8'à'#$1F'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'Ì'#$1F'u'#0'Ø[Ñ'#8#0#$B'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'6u'#0#0'KÑ'#8#0#0#0#0#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'P6u'#0'x=Ô'#8'`'#5'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'p/u'#0'ÜhÑ'#8#0#0#0#0#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#$1C'u'#0'XhÑ'#8#0#0#0#0#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'È'#$1A'u'#0'WÑ'#8#0#0#0#0#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#$14''u'#0'HNÑ'#8#0#0#0#0#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'x*u'#0'ÔNÑ'#8'@'#5'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'*u'#0#0'dÑ'#8'Àõs'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'à u'#0'¨UÑ'#8#0#0#0#0#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0' u'#0'VÑ'#8'@'#$E'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0','#$1D'u'#0'äp-'#3' ùs'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'%u'#0'Üo-'#3'Àûs'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'è-u'#0'ôm-'#3#0#0#0#0#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'Ô'#$19'u'#0'tl-'#3#0#0#0#0#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'ð+u'#0'àÁ'#$18#8'Àôs'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'à'#$1A'u'#0'ÐA«'#8#0#0#0#0#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'X-u'#0'XD«'#8' øs'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'¸'#$18'u'#0'Xµ'#8#0#0#0#0#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'Ô1u'#0'àD«'#8'à'#1'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'ø u'#0'lE«'#8' '#1'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0' 5u'#0'Äô§'#8' '#8'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'8$u'#0'8ô§'#8#0#0#0#0#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0' 'u'#0'° '#$F#8#0#0#0#0#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'`%u'#0#0''#$13#8'à'#9'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#8',u'#0''#$13#8'@'#$1F'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#$18#$19'u'#0'P¯'#$13#8#0#0#0#0#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0' %u'#0'ì¯'#$13#8''#5'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0''#$1D'u'#0'°'#$13#8'À'#0'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0' !u'#0'´(R)'#$13#8''#$E'u'#$A#8#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [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: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] URGENTE: Gravar e Ler imagem no banco MYSQL
Olá amigos delphianos, migrei um aplicação ACCESS para MySql e estou com problemas em gravar e recuperar a foto do membro. Alguém poderia me indicar uma rotina para realizar essa tarefa sem que ter que popular a Query ou a Table com os campos ?? Exemplo. Tabelas.*TabDirigenteImg_Foto_Dirigente* .SaveToStream(Tabelas.BlobMemoryStream); Tabelas.BlobMemoryStream.Position := 0; Tabelas.JPEGImage.LoadFromStream(Tabelas.BlobMemoryStream); FotoDirigente.Picture.Assign(Tabelas.JPEGImage); Gostaria de uma solução inteligente para gravar e carregar tanto BMP, JPEG, JPG e etc se possível.. Valew Amigos.. Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Gravar e Ler imagem no banco MYSQL
Eduardo, sim tó usando LongBlob, o componente de acesso aos dados que eu estava usando antes era ADO, agora eu tó usando Zeos e ainda não consegui encontra nada eficiente para resolver o meu problema. 2009/1/20 Eduardo Silva dos Santos eduardo@gmail.com Jorge, qual o componente de acesso você ta usando? o campo deve ser do tipo LongBlob ok. 2009/1/20 Jorge Ericsson jericsson...@gmail.comjericssonsup%40gmail.com Olá amigos delphianos, migrei um aplicação ACCESS para MySql e estou com problemas em gravar e recuperar a foto do membro. Alguém poderia me indicar uma rotina para realizar essa tarefa sem que ter que popular a Query ou a Table com os campos ?? Exemplo. Tabelas.*TabDirigenteImg_Foto_Dirigente* .SaveToStream(Tabelas.BlobMemoryStream); Tabelas.BlobMemoryStream.Position := 0; Tabelas.JPEGImage.LoadFromStream(Tabelas.BlobMemoryStream); FotoDirigente.Picture.Assign(Tabelas.JPEGImage); Gostaria de uma solução inteligente para gravar e carregar tanto BMP, JPEG, JPG e etc se possível.. Valew Amigos.. Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericssonsup%40gmail.com jericssonsup% 40gmail.com jericsson...@hotmail.com jericssonsup%40hotmail.com jericssonsup% 40hotmail.com skype:jericsson Brasília - DF -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: eduardo@gmail.com eduardo.drd%40gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Gravar e Ler imagem no banco MYSQL
Eduado, Eu fiz exatamente como está fazendo com ADO só que estava apresentando uns de Stream que eu terei que reproduzir novamente e postar aqui, mas por enquanto não deu certo a minha tentativa da mesma forma que usando ADO. 2009/1/20 Eduardo Silva dos Santos eduardo@gmail.com Jorge, você deve fazer da mesma forma que fazia com o ADO. Qual exatamente o seu problema? 2009/1/20 Jorge Ericsson jericsson...@gmail.comjericssonsup%40gmail.com Eduardo, sim tó usando LongBlob, o componente de acesso aos dados que eu estava usando antes era ADO, agora eu tó usando Zeos e ainda não consegui encontra nada eficiente para resolver o meu problema. 2009/1/20 Eduardo Silva dos Santos eduardo@gmail.comeduardo.drd%40gmail.com eduardo.drd%40gmail.com Jorge, qual o componente de acesso você ta usando? o campo deve ser do tipo LongBlob ok. 2009/1/20 Jorge Ericsson jericsson...@gmail.comjericssonsup%40gmail.com jericssonsup%40gmail.com jericssonsup%40gmail.com Olá amigos delphianos, migrei um aplicação ACCESS para MySql e estou com problemas em gravar e recuperar a foto do membro. Alguém poderia me indicar uma rotina para realizar essa tarefa sem que ter que popular a Query ou a Table com os campos ?? Exemplo. Tabelas.*TabDirigenteImg_Foto_Dirigente* .SaveToStream(Tabelas.BlobMemoryStream); Tabelas.BlobMemoryStream.Position := 0; Tabelas.JPEGImage.LoadFromStream(Tabelas.BlobMemoryStream); FotoDirigente.Picture.Assign(Tabelas.JPEGImage); Gostaria de uma solução inteligente para gravar e carregar tanto BMP, JPEG, JPG e etc se possível.. Valew Amigos.. Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericssonsup%40gmail.com jericssonsup% 40gmail.com jericssonsup% 40gmail.com jericssonsup% 40gmail.com jericsson...@hotmail.com jericssonsup%40hotmail.com jericssonsup% 40hotmail.com jericssonsup% 40hotmail.com jericssonsup% 40hotmail.com skype:jericsson Brasília - DF -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: eduardo@gmail.com eduardo.drd%40gmail.com eduardo.drd% 40gmail.com eduardo.drd% 40gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericssonsup%40gmail.com jericssonsup% 40gmail.com jericsson...@hotmail.com jericssonsup%40hotmail.com jericssonsup% 40hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: eduardo@gmail.com eduardo.drd%40gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] [OFF-TOPIC] - VAGA para programador Delphi em Brasília.
Olá Pessoal, A um tempo atrás um programador da lista delphi entrou em contato comigo, pois mora em salvador e queria vir para Brasília. Bom surgiu uma vaga no ministério onde trabalho e precisava entrar em contato com a pessoa que me ligou e/ou receber currículos de pessoas interessadas. Bom, se vc que entrou em contato comigo ainda estiver interessado, por favor, faz contato o mais rápido possível. E vc que está precisando de contratação por carteira e queira trabalhar 8h me mande seu currículo. Grande abraço a todos. Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] URGENTE: Configuração INTERBASE Dual Core
Olá amigos Delphianos, Procurei na lista e na NET mas não encontrei solução para o meu problema. Tenho um aplicativo (ADMINISTRATIVO) que funciona em vários estados e município usando IB 6.0. Só que algumas máquinas com dual core (múltiplo processador) o interbase fica lento do nada. Alguém sabe de alguma configuração ou atualização (patch) que resolva esse meu problema ? Obs.: Não posso mudar a arquitetura de acesso ao banco no momento para Firebird ou outro, tenho que manter por enquanto o IB 6.0. Valew pessoal, Jorge Ericsson [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Cadastro de Prefeitura e Prefeitos
Olá amigos, gostaria de saber se alguém já desenvolveu algum sistema para acompanhamento de processos de prefeituras. Estou com um projeto de desenvolvido para uma empresa de consultoria municipal e necessito levantar os requisitos para o desenvolvimento do mesmo. Se alguém já desenvolveu algo ou conhece algum demo que eu possa estudar (indicar) fico grato pela ajudar. Obs.: Não é um sistema para prefeitura e sim para uma empresa que preta consultoria para prefeituras, com recursos de agenda, pesquisar de certidões, sintegrar e etc. Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Como faço para instalar BDE de forma silenciosa.
Blz Eduardo, mas essa dica eu já tentei, não funciona. Vou continua pesquisando, pq qdo a instalação do BDE encontra qq coisa referente a mesma, a mensagem informando a instalação ou atualização aparece. Valew. 2008/12/11 Eduardo Silva dos Santos eduardo@gmail.com Espero que essa dica ajude: BDE em 1 disquete...065 - BDE em 1 disquete Depois que apanhei bastente do BDE, recorri a lista e ninguem consegui me ajudar ... consegui resolver o problema. E como acredito que outras pessoas tenham o mesmo problema, resolvi colocar essa dica na lista. Por favor, se alguem tiver algo a acresentar ou mesmo corrigir, sinta-se a vontade para compartilhar conosco. Arquivos Exenciais para o BDE: EUROPE.BLL USA.BLL IDR20009.DLL IDAPI32.DLL BLW32.DLL IDAPI32.CFG --- esse arquivo pode ter qualquer outro nome, desde que seja configurado no registro. Drivers de Banco de Dados: IDPDX32.DLL --- Driver Paradox IDASCI32.DLL --- Driver ASCII IDDBAS32.DLL --- Driver DBase IDODBC32.DLL --- Driver ODBC O BDE precisa de pelo menos um Driver de Banco de Dados para funcionar. Esses acima sao apenas alguns, existem varios outros. O BDE 4.51 + Driver Paradox compactados com o Algoritimo ZIP, ocuparam aproximadamente 650 Kb. Entradas no Registro do Win95: HKEY_LOCAL_MACHINE SOFTWARE\Borland\Database Engine DLLPATH - localizacao do BDE (Unidade+Caminho Completo) CONFIGFILE01 - localizacao do arquivo de configuracao (Unidade+Caminho Completo+Nome do Arquivo) SOFTWARE\Borland\BLW32 BLAPIPATH - localizacao do BDE (Unidade+Caminho Completo) LOCALE_LIB1 - localizacao do arquivo USA.BLL (Unidade+Caminho Completo+USA.BLL) LOCALE_LIB2 - localizacao do arquivo EUROPE.BLL (Unidade+Caminho Completo+EUROPE.BLL) Segue um pequeno exemplo de como registrar o BDE no Registro do Win95: begin Registry.RootKey := HKEY_LOCAL_MACHINE; Registry.CreateKey('SOFTWARE\Borland\Database Engine'); Registry.OpenKey('SOFTWARE\Borland\Database Engine', False); Registry.WriteString('DLLPATH', 'C:\ARQUIVOS DE PROGRAMAS\BDE\'); Registry.WriteString('CONFIGFILE1', 'C:\ARQUIVOS DE PROGRAMAS\BDE\IDAPI32.CFG'); Registry.OpenKey('\', False); Registry.CreateKey('SOFTWARE\Borland\BLW32'); Registry.OpenKey('SOFTWARE\Borland\BLW32', False); Registry.WriteString('BLAPIPATH', 'C:\ARQUIVOS DE PROGRAMAS\BDE\'); Registry.WriteString('LOCALE_LIB1', 'C:\ARQUIVOS DE PROGRAMAS\BDE\USA.BLL'); Registry.WriteString('LOCALE_LIB2', 'C:\ARQUIVOS DE PROGRAMAS\BDE\EUROPE.BLL'); end; Para compilar esse codigo, sera necessario declarar a Unit Registry. Como eu disse, esse e um exemplo bem simples. Ele nem mesmo verifica se o BDE ja esta registrado ou não. Para criar o Alias atravez do seu instalador, voce pode usar a funcão da api do BDE chamada DbiAddAlias. *Fonte: DTDelphi 2.8* 2008/12/11 Jorge Ericsson jericsson...@gmail.comjericssonsup%40gmail.com Olá amigos Delphianos, Sei que para muitos vai soar como um atraso de tecnologia, mas tenho um sistema em vários estados que necessita ainda do BDE. Bom eu desenvolvi um instalador para o meu aplicativo e todas as vezes que tento instalar a BDE atraves do comando REGSRV32 /s BDEINST.DLL, me apresenta uma tela informando que a BDE vai ser instalada/atualizada. Gostaria de instalar e registrar o BDE sem a necessidade do usuário confirma nada. Alguém já passou por isso e pode me ajudar com alguma dica ? Valew pessoal, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericssonsup%40gmail.com jericssonsup% 40gmail.com jericsson...@hotmail.com jericssonsup%40hotmail.com jericssonsup% 40hotmail.com skype:jericsson Brasília - DF -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: eduardo@gmail.com eduardo.drd%40gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] URGENTE: Como faço para instalar BDE de forma silenciosa.
Olá amigos Delphianos, Sei que para muitos vai soar como um atraso de tecnologia, mas tenho um sistema em vários estados que necessita ainda do BDE. Bom eu desenvolvi um instalador para o meu aplicativo e todas as vezes que tento instalar a BDE atraves do comando REGSRV32 /s BDEINST.DLL, me apresenta uma tela informando que a BDE vai ser instalada/atualizada. Gostaria de instalar e registrar o BDE sem a necessidade do usuário confirma nada. Alguém já passou por isso e pode me ajudar com alguma dica ? Valew pessoal, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Janelinha Pop-up
Coutinho, Desinstala tudo, segue o passo a passo que vc consegui.. Remove todos os link no Registry e começa de novo... Eu uso o Delphi 7 e tenho a versão 335 instalada funcionando 100%. O Componente estar em C:\..\..\JVCL335\examples\JvDesktopAlert Dá uma olhada com carinho, o MSN Popup apresentou uns bugs qdo eu fui utiliza-lo. Boa sorte amigão.. 2008/12/3 Coutinho - Yahoo [EMAIL PROTECTED] Procurei nos componentes da Jedi e não achei... Inslei a nova, e ainda assim, na paletinha Dialogs... não está lá... Não instala no D7... A mesma Jedi que tenho no 2006 (demo que uso para aprender certas coisinhas) instalei no D7... Instalou no 2006 e não no D7... Pode??? Sds Emanuel Coutinho... -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Delphi doado é pirataria?
Se o seu irmão pagou tudo direitinho e lhe entregou pelo menos a nota fiscal, sem problemas vc tá na legalidade do desenvolvimento delphi..kakakaka Mas pq a tua consciência pesou ? rsrsrs 2008/12/3 Coutinho - Yahoo [EMAIL PROTECTED] Ei!!! Meu Delphi 7 foi doado por meu irmão... com caixa, manual e tudo...e aí? Sou pirata? Emanuel Coutinho -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Janelinha Pop-up
O JEDI tem sim, procure por JvDesktopAlert e vai encontra o que vc procura. 2008/12/3 Coutinho - Yahoo [EMAIL PROTECTED] Pessoal Eu procurei um pouco na Jedi, e em outros, mas não consegui achar um componente que faça apresentação de mensagens tipo uma janelinha pop-up que sobre acima do reloginho da tray-icon. como o Norton Anti-virus e o MSN... Alguém me dá uma dica de onde achar isso? Sds, Emanuel Coutinho -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Delphi doado é pirataria?
Coutinho, dá uma olhada na EULA do delphi que você comprou. Pq acho tbém muito estranho esse lance de produto, serviço e etc.. E essas EULA mudando conforme o produto adquirido. Eu estava até pensando em pedi pro papai noel uma licença do Delphi 2009, mas pelo jeito ele não vai poder me dá. Boa sorte amigão... 2008/12/3 Luiz Escobar [EMAIL PROTECTED] Paguei um marcineiro pra fazer um guardaroupa, nao quiz mais e doei à minha cunhada. E ai, como fica ? []s Luiz Escobar - Original Message - From: Joel Alexandre É. Software é serviço e como todo serviço é intransferível. É o mesmo que vc contratar um eletricista na sua casa e transferir o serviço para um parente. Infelizmente essa é a realidade :( []Os Joel Ei!!! Meu Delphi 7 foi doado por meu irmão... com caixa, manual e tudo...e aÃ? Sou pirata? Emanuel Coutinho -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Texto no Banco de Dados
Olá Janise, Você entendeu as explicações dos nossos colegas de como implementar o código ? Eu passei pelo mesmo problema a tempos como vc... Uma dica seria vc começar usando o próprio exemplo do delphi de RichText e tentar gravar o conteúdo do RTF no banco, depois tente restaurar Se precisar de código me informe em PVT e trocamos experiências blz ?? []´s 2008/11/28 Janise Dantas [EMAIL PROTECTED] Ok, valeu!! Agora vou correr atrás, se bem que acho que estou correndo na frente, tipo fugindo rsrsrs... Obrigada e abraço Janise From: Adriano Silva Sent: Thursday, November 27, 2008 10:37 AM To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Subject: Re: [delphi-br] Texto no Banco de Dados Janise, Pode armazenar sem problema qualquer tamanho de texto no banco, coloca a coluna q vc vai usar para isso como tipo Char(tamanho desejado). será alocada maior memória dependendo do tamanho do texto, mais nda q impeça... Abraços... 2008/11/27 Janise Dantas [EMAIL PROTECTED]janisedantas%40yahoo.com.br Eu queria saber se a gente pode 'guardar' textos em bancos de dados. Assim... eu estou fazendo um programa para Assessoria Documental e não estou conseguindo abrir os documentos no word, só consigo abrir documento em branco. Então eu pensei que poderia colocar os modelos de documentos (são textos grandes e leis), mais importantes no banco de dados, para ter acesso fácil. Será que me fiz entender?? Janise Dantas A menina dos olhos de Deus -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM -- Adriano Silva [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] OFF +- Quero comprar o Delphi
Também quero comprar o Delphi mas a minha dúvida é quanto a versão. Hoje eu trabalho com a versão Delphi 7 e fico na dúvida em Comprar o Delphi 2009 ou Rad Studio 2007. Alguém poderia me dá uma dica em qual das versão não teria problema de migração ? Queria algo barato, investimento inicial baixo mas que atender as minhas necessidades. Abraço. Jorge Ericsson [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] OFF +- Quero comprar o Delphi
Entendi, mas não uso componentes de terceiros, minhas aplicações usam mais JEDI JVCL e skins para melhorar o visual das aplicações, eu trabalho hj com o Delphi 7 Enterprise e me atende 200%, acesso bancos FIREBIRD e MYSQL. O detalhe é que estava querendo migrar alguns programas desktop para rodar na internet, então pensei no .NET ou Delphi para PHP. Alguém tem previsão de saída do RAD 2009 ? Quero compra a licença correta para não me arrepender depois, pois pra mim ainda sai caro investir no Delphi domeu bolso. Jorge Ericsson. 2008/11/20 Claudiney Cogo [EMAIL PROTECTED] Olá Jorge. Eu acredito que em qualquer uma das versões você não terá problema de migração, se trabalha com os componentes próprios do delphi somente ou se você mesmo produz os seus ou ainda se tem o código fonte dos componentes de terceiros. Agora se você utiliza componentes de terceiros e não tem os fontes aí sim pode ter problemas, caso estes componentes não tenham versão para o delphi escolhido. Aí o caminho é solicitar ao fabricante a atualização ou parar de usar e substituir por outro componente padrão. Agora quanto a versão Delphi 2009 ou RAD 2007 depende do uso. Se você só usa delphi win32, o Delphi 2009 vai resolver tudo. Se você trabalha com outras linguagens, como C++ ou desenvolvimento pra .NET, aí tem que ser o RAD 2007. Ou aguardar um pouco mais pelo RAD 2009 e o Prism. Acredito que seja isso. Mas de qualquer maneira o pessoal da Borland que frequenta a lista pode dar mais informações. Abraço. -- Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Fone/Fax: (44) 3029-6053 - Maringá - Paraná www.n2solutions.com.br www.nfe.n2solutions.com.br www.studion2.com.br - Original Message - From: Jorge Ericsson To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Thursday, November 20, 2008 9:36 AM Subject: Re: [delphi-br] OFF +- Quero comprar o Delphi Também quero comprar o Delphi mas a minha dúvida é quanto a versão. Hoje eu trabalho com a versão Delphi 7 e fico na dúvida em Comprar o Delphi 2009 ou Rad Studio 2007. Alguém poderia me dá uma dica em qual das versão não teria problema de migração ? Queria algo barato, investimento inicial baixo mas que atender as minhas necessidades. Abraço. Jorge Ericsson [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 3625 (20081119) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] OFF +- Quero comprar o Delphi
É pelo que vejo o burraco é bem mais embaixo. Eu vou aguarda até o ano que vem o Rad Studio 2009 porque quero desenvolver para Web 2.0. Mas vou migrando alguns sistemas usando a versão trial do Delphi 2009. Até lá creio ter resolvido já alguns problemas que no D7 nunca tive. Valew pessoal pelas informações, foram de grande ajuda mesmo... 2008/11/20 Eduardo Silva dos Santos [EMAIL PROTECTED] Bruno, venhamos e convenhamos.. dizer que ele não vai ter problemas é um pouco demais.. se o sistema dele usar muita manipulação de String.. vai ser no mínimo traumática a conversão... basta olhar os forums por ai o fora.. todo mundo se descabelando e tendo que fazer um monte de acertos nos sistemas... uma prova disso pode ser encontrada aqui http://chee-yang.blogspot.com/2008/10/delphi-2009-unicode.html ainda bem que o Andreas ( http://andy.jgknet.de/blog/ ) está idealizando (e certamente vai fazer) um plugin que vai resolver esse parto. att, -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: [EMAIL PROTECTED] eduardo.drd%40gmail.com Site: http://www.drdsistemas.com.br/ ... 2008/11/20 Bruno Lichot [EMAIL PROTECTED]bruno.lichot%40borland.com A versão 2007 não está sendo mais comercializada, somente a 2009. Mas a bem da verdade você não vai ter problemas de migração em nenhuma das duas. Verifique qual o sabor do seu Delphi 7 (Professional, Enterprise ou Architect) pois esta informação é que determinará qual versão do Delphi 2009 você precisará, se Professional, Enterprise ou Architect. Abraços, BL From: 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] On Behalf Of Jorge Ericsson Sent: quinta-feira, 20 de novembro de 2008 10:37 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.br Subject: Re: [delphi-br] OFF +- Quero comprar o Delphi Também quero comprar o Delphi mas a minha dúvida é quanto a versão. Hoje eu trabalho com a versão Delphi 7 e fico na dúvida em Comprar o Delphi 2009 ou Rad Studio 2007. Alguém poderia me dá uma dica em qual das versão não teria problema de migração ? Queria algo barato, investimento inicial baixo mas que atender as minhas necessidades. Abraço. Jorge Ericsson [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] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] URGENTE: Controlar Inatividade do sistema
Olá pessoal, Talvez eu esteja fazendo uma pergunta que já houve resposta no forum, mas como não encontrei nada em minha pesquisa, vou remete-la. Bom eu preciso desenvolver uma função para controle de inatividade do meu sistema, tenho usuário que iniciam transações e não concluem me gerando alguns problemas no. Gostaria de após um determinado tempo fechar a tela aberta retornando o usuário para a tela principal do meu sistema. Alguém já fez isso ou conhece bem o componente JVC JEDI que faz isso ? Eu estou tentando usar somente a biblioteca JEDI qdo uso componente. Desde já agradeço... Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Banner no topo do formulário.
Olá amigos, Preciso de sugestões para colocar um banner (HTML) no topo do meu formulário principal apenas para as versão não registradas. Alguém poderia me dá uma dica de como resolver o problema ? Pensei em um gif animado mais como o código do banner fica no meu servidor internet não acho que seria uma boa idéia. Jorge Ericsson [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: [Delphi-Brasil] Re: Banner no topo do formulário.
Daniel, desculpe amigo mas não estava conseguindo visualizar direito o processo... Deve ser o cansaço... Bom eu criei um arquivo topo.html com o código e disponibilizei no meu servidor. Ai ficou mole direcionar o navigator do WebBrowser para o arquivo. Assim fica melhor do que eu imaginava, pq poderei criar vários arquivos e randomicamente a cada abertura do sistema, o usuário vai visualizar algo diferente. Blz... valew pela dica 2008/11/14 Daniel Bastos [EMAIL PROTECTED] 2008/11/14 Daniel Bastos [EMAIL PROTECTED] danbastos%40gmail.com exatamente isso. E vc só poe na url o endereço do seu html. 2008/11/14 Jorge Ericsson [EMAIL PROTECTED]jericssonsup%40gmail.com Daniel é o seguinte, o código que eu tenho na minha pagina é semelhante a este: object classid=clsid:D27CDB6E-AE6D-11cf-96B8-44455354 codebase= http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0 width=468 height=60 param name=movie value= http://www.banners.locaweb.com.br/Fullbanner_iDC.swf; / param name=quality value=high / param name=wmode value=Transparent / embed src= http://www.banners.locaweb.com.br/Fullbanner_iDC.swf; quality=high pluginspage= http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash type=application/x-shockwave-flash width=468 height=60 /embed /object Ok... Então eu preciso criar um arquivo HTML para conter esse código e chamar pelo WebBrowser correto ?? Essa é minha dúvida. 2008/11/14 Daniel Bastos [EMAIL PROTECTED] danbastos%40gmail.com Coloque um TWebBrowser no seu formulário. e utilize o método WebBrowser1.Navigate(Endereco); O endereco pode se referir a um endereço do seu site ou ao endereço de uma página na sua máquina local. Veja que, o TWebBrowser é apenas o Internet Explorer dentro do seu formulário. Então, vc pode utilizar qualquer página que funcione no IE como banner. 2008/11/14 Jorge Ericsson [EMAIL PROTECTED]jericssonsup%40gmail.com Bom dia Andre, Assim que for confirmado o registro, eu simplesmente vou colocar invisivel o painel que contem o banner, nada muito complicado, caso o recebimento não seja confirmado eu voltar a ser exibido, mostrando as propagandas de outros sistemas e serviços da empresa. Como implementaria essa rotina usando o TWebBrowser ?? Ou vc tem outra sugestão ?? 2008/11/14 Andre Fernando Dominguez [EMAIL PROTECTED]andrefdominguez%40gmail.com Bom dia Jorge. Este banner ocuparia uma dimensao dentro do formulario que nao podera ser ocupada por nenhum outro componente, e quando aocntecer o registro oque aparecerá no lugar deste banner??? Nao sei se entendi a sua duvida, mas voce pode trabalhar com um frame e carregar no frame o seu banner que vai estar no seu servidor. Dessa maneira podera aparecer banner diferentes cada vez que o usuario carrega o sistema, ou um outro esquema de rotatividade. -- André Fernando Dominguez Analista de Sistemas Hospiatl Regional de Colider 2008/11/14 Jorge Ericsson [EMAIL PROTECTED]jericssonsup%40gmail.com : Olá amigos, Preciso de sugestões para colocar um banner (HTML) no topo do meu formulário principal apenas para as versão não registradas. Alguém poderia me dá uma dica de como resolver o problema ? Pensei em um gif animado mais como o código do banner fica no meu servidor internet não acho que seria uma boa idéia. Jorge Ericsson -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br [EMAIL PROTECTED] jericssonsup%40gmail.com [EMAIL PROTECTED] jericssonsup%40hotmail.com skype:jericsson Brasília - DF -- Abs Daniel A. Bastos -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br [EMAIL PROTECTED] jericssonsup%40gmail.com [EMAIL PROTECTED] jericssonsup%40hotmail.com skype:jericsson Brasília - DF --~--~-~--~~~---~--~~ Você recebeu esta mensagem por que você está inscrito no grupo Delphi-Brasil Para postar uma mensagem para este grupo, envie um email para [EMAIL PROTECTED] delphi-brasil%40googlegroups.com Para sair deste grupo envie um email para [EMAIL PROTECTED]delphi-brasil-unsubscribe%40googlegroups.com Para mais opções visite a home do grupo em http://groups-beta.google.com/group/delphi-brasil -- You received this message because you are subscribed to the Google Groups Delphi-Brasil group. To post to this group, send email to [EMAIL PROTECTED]delphi-brasil%40googlegroups.com To unsubscribe from this group, send email to [EMAIL PROTECTED]delphi-brasil-unsubscribe%40googlegroups.com For more options, visit
[delphi-br] URGENTE: Instalação de Programa no Windows Vista
Olá pessoal, Alguém já instalou algum programa pelo delphi no Windows Vista ? Estou testando um instalador que criei no Windows Vista e não estou tendo sucesso. Já coloquei o usuário e o administrrador ativos Ex: Net user Administrador /Active:yes e mesmo assim quando chega na instalação do Firebird ou do PostGres, dá a mensagem dizendo que o usuário não tem previlégio. Se alguém tiver uma solução a nivél de código pelo Delphi, por favor me informe. Grato. Jorge Ericsson [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Urgentissimo: Ferramenta para Desenhar com Delphi
Olá meus amigos, Depois de tanto quebrar a cabeça e pesquisar na net, não encontrei nada que resolvesse meu problema. Talvez alguém já tenha passado por isso ou tenha algo para compartilhar. Necessidade: Eu preciso criar uma ferramenta de desenho simples, estilo Paint porém que me dê condições de inserir imagem e etc, para que o meu usuário crie um determinado modelo de (crachá), salvar a imagem no banco (isso é tranquilo) e depois imprimir o crachá com o registro do funcionário. Se alguém puder indicar algum componente, exemplo com fontes usando canvas e etc que eu possa estudar, eu agradeço Valew, Jorge Ericsson [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgentissimo: Ferramenta para Desenhar com Delphi
Onjahyr, É disso que eu preciso, gostaria de estudar o código e extrair os recursos dessa ferramenta. Eu preciso urgente estudar o código fonte para adequar as minhas necessidade, se puder me envie por e-mail o mais rápido possível. Vc lembra pelo menos o nome dela ? Pesquisarei aqui tbém... Valew amigos pelas dicas anteriores, mas continuarei pesquisando outras formas de fazer essa ferramenta. []´s Jorge Ericsson 2008/10/30 Onjahyr - GMAIL [EMAIL PROTECTED] Eu tenho os fontes de um programa gráfico completo no estilo PhotoShopp que você pode colocar figuras .bmp,jpg,etc... editar e salvar, colocar efeitos, tem linhas, pinceis, e um montão de ferramentas (seleção retangulo, redondo, quadrado, pintar atrás, e um milhão de muitas outras coisas, ou seja, faz TUDO), vou disponibilizar ao Clecio para ele colocar no 4share dele, só que não posso fazer isso hoje porque está em um dos meus CDs de estufa e tenho de procurar... Vc pode retirar somente os recursos que deseja. Eu usei num programa para fazer crachas tasmbém, a muito tempo.. Jorge Ericsson escreveu: Olá meus amigos, Depois de tanto quebrar a cabeça e pesquisar na net, não encontrei nada que resolvesse meu problema. Talvez alguém já tenha passado por isso ou tenha algo para compartilhar. Necessidade: Eu preciso criar uma ferramenta de desenho simples, estilo Paint porém que me dê condições de inserir imagem e etc, para que o meu usuário crie um determinado modelo de (crachá), salvar a imagem no banco (isso é tranquilo) e depois imprimir o crachá com o registro do funcionário. Se alguém puder indicar algum componente, exemplo com fontes usando canvas e etc que eu possa estudar, eu agradeço Valew, Jorge Ericsson [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgentissimo: Ferramenta para Desenhar com Delphi
Eu estou testando a sua dica Clécio, acho que essa ferramenta vai ajuda muitos por aqui. 2008/10/30 Silvio Clécio [EMAIL PROTECTED] Opa, agradeço antecipadamente. Um abraço! Silvio Clécio Contatos/Blog Skype: silvioprog E-mail, Yahoo! Messenger: [EMAIL PROTECTED]silvioprog%40yahoo.com.br Gmail, Google Talk: [EMAIL PROTECTED] silvioprog%40gmail.com Hotmail, MSN: [EMAIL PROTECTED] silvio_prog%40hotmail.com BlogSpot: http://silvioclecio.blogspot.com/ De: Onjahyr - GMAIL [EMAIL PROTECTED] onjahyr%40gmail.com Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Enviadas: Quinta-feira, 30 de Outubro de 2008 14:19:51 Assunto: Re: [delphi-br] Urgentissimo: Ferramenta para Desenhar com Delphi Eu tenho os fontes de um programa gráfico completo no estilo PhotoShopp que você pode colocar figuras .bmp,jpg,etc. .. editar e salvar, colocar efeitos, tem linhas, pinceis, e um montão de ferramentas (seleção retangulo, redondo, quadrado, pintar atrás, e um milhão de muitas outras coisas, ou seja, faz TUDO), vou disponibilizar ao Clecio para ele colocar no 4share dele... Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgentissimo: Ferramenta para Desenhar com Delphi
Uso o D7, já fucei nele tbém Rodinei, não me atende por completo. Conheço praticamente todos os exemplos do delphi na prática e usei este modelo para iniciar a criação do meu form de desenho. Preciso de mais recursos como Texto, fundos de imagens, criação de campos e etc... Valew pela dica... 2008/10/30 Rodinei (MSN) [EMAIL PROTECTED] Já existe exemplos no próprio delphi.. Veja em Projetcs/Demo/Doc/GraphEx Qual a versão do seu Delphi ??? Rodinei Amorim Programador Delphi [EMAIL PROTECTED] rodinei_amorim%40hotmail.com (11) 8208-9503 - (11) 2024-2723 From: Jorge Ericsson Sent: Thursday, October 30, 2008 3:30 PM Subject: [delphi-br] Urgentissimo: Ferramenta para Desenhar com Delphi Olá meus amigos, Depois de tanto quebrar a cabeça e pesquisar na net, não encontrei nada que resolvesse meu problema. Talvez alguém já tenha passado por isso ou tenha algo para compartilhar. Necessidade: Eu preciso criar uma ferramenta de desenho simples, estilo Paint porém que me dê condições de inserir imagem e etc, para que o meu usuário crie um determinado modelo de (crachá), salvar a imagem no banco (isso é tranquilo) e depois imprimir o crachá com o registro do funcionário. Se alguém puder indicar algum componente, exemplo com fontes usando canvas e etc que eu possa estudar, eu agradeço Valew, Jorge Ericsson [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]