Re: [delphi-br] URGENTE: UserControl Decriptar senha para teste
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 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
Re: [delphi-br] URGENTE: Problema com Exceções
Se uma exceção acontece dentro de um bloco try..except, por padrão ela será capturada pelo Debugger e exibida dentro da IDE. No Debugger Options do Delphi7 há um configuração Stop On Delphi Exceptions que desabilita esse comportamento. Deve haver algo equivalente no lazarus. Dirlei. Em Ter, 2010-04-27 às 19:49 -0300, Paulo César escreveu: Pessoal, Uso o Lazarus e desenvolvi o seguinte código: procedure TForm1.Button1Click(Sender: TObject); begin try Edit3.text:=floattostr(strtofloat(edit1.text)/strtofloat(edit2.text)); except on E:Exception do begin ShowMessage(E.message); end; end; end; Quando ele executa, ele dá o seguinte erro: project1.exe raised exception class 'External: SIGFPE' Porém, se eu executo ele pelo .exe, ele não causa o erro. Quem pode ajudar? É urgente pessoal!!! Abraços, Atenciosamente, Paulo César de Oliveira, [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Problema com Exceções
Se uma exceção acontece dentro de um bloco try..except, por padrão ela será capturada pelo Debugger e exibida dentro da IDE. No Debugger Options do Delphi7 há um configuração Stop On Delphi Exceptions que desabilita esse comportamento. Deve haver algo equivalente no lazarus. Dirlei. Em Ter, 2010-04-27 às 19:49 -0300, Paulo César escreveu: Pessoal, Uso o Lazarus e desenvolvi o seguinte código: procedure TForm1.Button1Click(Sender: TObject); begin try Edit3.text:=floattostr(strtofloat(edit1.text)/strtofloat(edit2.text)); except on E:Exception do begin ShowMessage(E.message); end; end; end; Quando ele executa, ele dá o seguinte erro: project1.exe raised exception class 'External: SIGFPE' Porém, se eu executo ele pelo .exe, ele não causa o erro. Quem pode ajudar? É urgente pessoal!!! Abraços, Atenciosamente, Paulo César de Oliveira,
Re: [delphi-br] URGENTE: Problema com Exceçõe s
Não uso Lazarus, mas creio que seja bem parecido com o Delphi. No Delphi, quando vc executa o sistema a partir do próprio Delphi, ele para a execução do programa e exibe a mensagem de erro, mesmo com código de captura de erro. Isso serve para o programador acompanhar detalhadamente o que ocorre. Mas quando se executa apenas o programa (.exe), os blocos de tratamento de erro funcionam normalmente, pois presumi-se que o programador ja deixou o tratamento adequado ao erro em questão, não sendo necessários outros avisos ao usuário final que normalmente é leigo Sds, Fabiano de Almeida. Em 27/04/2010 19:49, Paulo César escreveu: Pessoal, Uso o Lazarus e desenvolvi o seguinte código: procedure TForm1.Button1Click(Sender: TObject); begin try Edit3.text:=floattostr(strtofloat(edit1.text)/strtofloat(edit2.text)); except on E:Exception do begin ShowMessage(E.message); end; end; end; Quando ele executa, ele dá o seguinte erro: project1.exe raised exception class 'External: SIGFPE' Porém, se eu executo ele pelo .exe, ele não causa o erro. Quem pode ajudar? É urgente pessoal!!! Abraços, Atenciosamente, Paulo César de Oliveira, [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] Urgente: Erro ao atualizar dados em uma tabela.
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 http://delphitocorporerm.blogspot.com/ http://twitter.com/wchagas MSN: whitesock...@hotmail.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]
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] URGENTE: Identificador de Chamadas
Faça uma pesquisa na lista acessando o grupo que vai ver muita coisa. Vou adiantando algumas coisas: - Nunca vi uma solução completa sobre este assunto; - Cada estado tem uma configuração da telefonia/operadora portanto, um programa que teve exito em São Paulo, pode não funcionar em Minas Gerais...; - Existem milhares de componentes e rotinas na internet (basta fazer uma pesquisa no Google), tenho visto falar que nenhuma delas funcionaram bem, o que vc deve fazer é baixar uma-a-uma e ir testando, pois, como disse, pode funcionar numa região e não funcionar em outra. Sucesso Em 14/12/2009 20:27, Jorge Ericsson escreveu: 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 http://www.jericsson.com.br jericsson...@gmail.com mailto:jericssonsup%40gmail.com jericsson...@jericsson.com.br mailto:jericssonsup%40jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Identificador de Chamadas
Jorge, A muuiitoo tempoi atrás eu achei um componente que fazia isso, é o SpBina. Eu havia melhorado o exemplo dele e usei por um bom tempo, até trocar de micro que não veio + com modem pois já usava banda larga. Depois disso não consegui fazer funcionar com os fax-modems que passaram pela minha mão. De qualquer forma, segue o link: http://www.planetadelphi.com.br/download/443/identificador-de-chamadas---bina---delphi-3 Além do componente SpBina, o exemplo usa os botões da RXLib, mas você pode trocar para tbutton sem problema. [] Andrei 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 jericsson...@jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Identificador de Chamadas
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 * 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] 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]
Re: [delphi-br] Urgente: Criando um Data Mining
Amigo, Você vai ter que montar um cubo. Ou seja, um tabelão com todas as informações relevantes (colunas) e apartir dela vai montar as suas consultas. Se prepare para crar vários índices e views sobre esta tabela. Esta tabela poderá ser alterada/incrementada toda a noite por exemplo. 2009/6/15 Jorge Ericsson jericsson...@gmail.com 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] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente: Criando um Data Mining
Use o Decision cube, lembre se: o segredo está em gerar as visoes alguns links pra comecar http://www.planetadelphi.com.br/artigo/128/decision-cube---1a.-parte http://www.multicomp.com.br/Cont_Default.aspx?idnews=79 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente: Criando um Data Mining
ops, eu quis dizer: o segredo para gerar as visões está na clausula - group by Boa sorte! Use o Decision cube, lembre se: o segredo está em gerar as visoes alguns links pra comecar http://www.planetad elphi.com. br/artigo/ 128/decision- cube---1a. -parte http://www.multicom p.com.br/ Cont_Default. aspx?idnews= 79 [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] 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]
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]
Re: [delphi-br] URGENTE: Gravar e Ler imagem no banco MYSQL
Jorge, qual o componente de acesso você ta usando? o campo deve ser do tipo LongBlob ok. 2009/1/20 Jorge Ericsson jericsson...@gmail.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 jericsson...@hotmail.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 Site: http://www.drdsistemas.com.br/ ... [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
Jorge, você deve fazer da mesma forma que fazia com o ADO. Qual exatamente o seu problema? 2009/1/20 Jorge Ericsson jericsson...@gmail.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 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 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 jericsson...@hotmail.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 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 jericsson...@hotmail.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 Site: http://www.drdsistemas.com.br/ ... [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]
Re: [delphi-br] URGENTE: Gravar e Ler imagem no banco MYSQL
Jorge, era pra funcionar corretamente.. vamos tentar reproduzir o problema. me informe o seguinte, versão do MySQL, Qual componente de acesso vc usa e qual a versão dele. e um exemplo do código que vc usa pra eu tentar montar um test case aqui. 2009/1/20 Jorge Ericsson jericsson...@gmail.com 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.comeduardo.drd%40gmail.com Jorge, você deve fazer da mesma forma que fazia com o ADO. Qual exatamente o seu problema? -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Configuração INTERBAS E Dual Core
Amigo Ericsson, Boa noite! Amigo você tem um problema relativamente sério. Primeiro. Eu Sou um grande intusiasta de InterBase deixo isso empre claro. Segundo. InterBase 6 já algo muito antigo do ano de 2000, mês de Junho. O interBase 6 não suporta multi processamento simétrico ou seja ele não tira proveito máquinas com mais de 1 processadores. Além disso ele potencialmente lento para os novos hardwares e sistemas operacionais por vários motivos que ficaria longo eu descrever neste email. Você tem duas saídas Licenciar (Não é Free é pago mas é muito barato a licença vai variar conforme a quantidade de usuários e de processadores no servidor) uma versão do interbase que tire proveito de SMP (simetrical multi processing) e iso já foi implementado des de a versão 7 do InterBase, e já estamos na versão 2009 que tira mais proveito ainda de máquinas com mais de um processador (Coisa que o firebird está lonje muito lonje de fazer acontecer). InterBase 2007 Que internamente é o InterBase 8 é um dos melhores SGDBRS da história em minha opinião. eu licenciei e não me arrependo de nada. (Mas também uso o Firebird) Ou Segundo usar uma versão do Firebird 1.0.3 que é bem próxima do InterBase 6.0 Porém com a arquitetura ClassicServer que se dá melhor com máquinas multi processadas (Mas não é realmente SMP) e tem a vantagem de ser gratuito Firebird 2.0.4 (ClassicServer também) Melhorou muito isso e outros pontos de performance, tem uma biblioteca de retro-compatibilidade gds32 caso você ainda estiver usando BDE ou IBX funciona tudo igual. O segredo é ter cuidado nahora de fazer uma migração, faça testes antes com um banco piloto, faça backup do seu banco IB6 e em outra máquina muit processada sem IB6 instala uma versão do ClassicServer de uma das versões que te indiquei, depois um restore do banco com a estensão ao invéz de .gdb para .fdb e faça os testes acredito que vc vai se agradar. Se tiver dúvidas e problema sinta-se livre para entrar em contato comigo terei prazer em ajudar. Fraternalmente Marcelo Fortes. --- Em ter, 30/12/08, Jorge Ericsson jericsson...@gmail.com escreveu: De: Jorge Ericsson jericsson...@gmail.com Assunto: [delphi-br] URGENTE: Configuração INTERBASE Dual Core Para: Data: Terça-feira, 30 de Dezembro de 2008, 14:42 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] 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]
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]
Re: [delphi-br] URGENTE: Como faço para instalar BDE de forma silenciosa.
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.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 jericsson...@hotmail.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 Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Controlar Inatividade do sistema
Poe no seu form KeyPreview := True e um Timer, e no OnTimer dele você poe o comando pra fechar o form. Nos eventos de pressionamento de mouse/teclado do seu form, você reseta o Timer pra ele não disparar. Feito. 2008/11/18 Jorge Ericsson [EMAIL PROTECTED] 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] -- Atenciosamente, Paulo Coutinho. Site: www.prsolucoes.com Msn: [EMAIL PROTECTED] Skype: paulo.prsolucoes [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Controlar Inatividade do sistema
2008/11/18 Jorge Ericsson [EMAIL PROTECTED]: 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 O problema não está no fato do usuário segurar uma tela de alteração, mas de você ter segurado a transação aberta por causa daquela tela. Transações não podem ficar mais do que uma fração de segundos aberta. Joao Morais
RE: [delphi-br] [urgente] iw do delphi 2009 nao funciona com o iis 6.0
Passa o coninitialization do server controller para cinormal... já fez isso? From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Rafael Jorge Sent: quarta-feira, 22 de outubro de 2008 16:44 To: delphi-br Subject: [delphi-br] [urgente] iw do delphi 2009 nao funciona com o iis 6.0 desenvolvi uma aplicacao em iw agora fui publicar e simplesmente nao ta rodando.. ja setei permissao na pasta.. criei um diretorio virtual com as tres primeiras opcoes de executar, etc. e nada.. estou desenvolvendo usando ADO... obrigado.. t+ -- -- Rafael jorge alves (Analista/desenvolvedor) www.sistemafocus.com.br sistema focus de gestão comercial e serviços em informatica. -- [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [urgente] iw do delphi 2009 nao funciona com o iis 6.0
coloquei mas nao faz nada. T+ 2008/10/22 Bruno Lichot [EMAIL PROTECTED] Passa o coninitialization do server controller para cinormal... já fez isso? 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 Rafael Jorge Sent: quarta-feira, 22 de outubro de 2008 16:44 To: delphi-br Subject: [delphi-br] [urgente] iw do delphi 2009 nao funciona com o iis 6.0 desenvolvi uma aplicacao em iw agora fui publicar e simplesmente nao ta rodando.. ja setei permissao na pasta.. criei um diretorio virtual com as tres primeiras opcoes de executar, etc. e nada.. estou desenvolvendo usando ADO... obrigado.. t+ -- -- Rafael jorge alves (Analista/desenvolvedor) www.sistemafocus.com.br sistema focus de gestão comercial e serviços em informatica. -- [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- --- Rafael jorge alves (Analista/desenvolvedor) www.sistemafocus.com.br sistema focus de gestão comercial e serviços em informatica. --- [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [urgente] Intraweb delphi 2009 cheio de ?????
criei uma aplicacao em intraweb pra um cliente meu. NO MEU pc ela funciona perfeitamente... na maquina dele fica cheia de ??? Vc já tentou rodar uma aplicação simples do IW (talvez algo com um botão que faça alguma coisa) na máquina de seu cliente? Qual o browser dele? É uma ISAPI ou Stand Alone Server que vc está executando? Jackson Gomes ToolsComps - Controle de Usuários para Desenvolvedores CodeGear Web Site: http://www.toolsandcomps.com Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps e-mail: [EMAIL PROTECTED] Fone: 27 3389 1138 - 8811 0324 Devhost - Webhost para desenvolvedores Delphi http://www.devhost.com.br [EMAIL PROTECTED]
Re: [delphi-br] URGENTE: Autenticação no GMAIL para envio de e-mail
E ae Jorge, blz? vc colocou na pasta do system32 os dois arquivos de conexão? Onjahyr Jorge Ericsson escreveu: Olá amigos, Alguém já conseguiu enviar e-mail autenticado usando uma conta do GMAIL ? Eu tentei vários exemplos pesquisados na REDE com Indy 10 e não consegui´. Ao meu ver o código está correto e desconfio que a minha rede (trabalho) está bloqueando a saída. Alguém que já passou por isso, poderia dá uma Luz. Obrigado amigos procedure TForm1.Button1Click(Sender: TObject); begin with MSG do begin Body.Add(Memo1.Text); From.Address := Edit2.Text; From.Name := 'Siger Suporte'; //opcional Recipients.Add; Recipients.Items[0].Address := Edit1.Text;//'[EMAIL PROTECTED] mailto:%2F%2F%27shaokhann%40gmail.com'; Recipients.Items[0].Name := 'Atendimento On-Line'; Subject := 'Suporte Técnico'; end; try SMTP.Connect(); SMTP.Send(MSG); SMTP.Disconnect; except on E : Exception do begin ShowMessage('Falha no envio!'+E.Message); exit; end; end; ShowMessage('Mensagem enviada com sucesso!'); end; procedure TForm1.FormCreate(Sender: TObject); begin with SMTP do begin AuthType := atSASL; (já mudei para Default e deu o mesmo erro. Host := 'smtp.gmail.com'; IOHandler:= SSLSocket; Password := '123456789'; Port := StrToInt(Edit3.Text);// 995; Username := '[EMAIL PROTECTED] mailto:%27meusuporte%40gmail.com'; end; SSLSocket.SSLOptions.Method := sslvSSLv2; SSLSocket.SSLOptions.Mode := sslmClient; end; -- Att, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF
Re: [delphi-br] URGENTE: Autenticação no GMAIL para envio de e-mail
Sim, tentei na pasta system32 e tbém local onde esta o executável. 2008/9/30 Onjahyr - GMAIL [EMAIL PROTECTED]: E ae Jorge, blz? vc colocou na pasta do system32 os dois arquivos de conexão? Onjahyr Jorge Ericsson escreveu: Olá amigos, Alguém já conseguiu enviar e-mail autenticado usando uma conta do GMAIL ? Eu tentei vários exemplos pesquisados na REDE com Indy 10 e não consegui´. Ao meu ver o código está correto e desconfio que a minha rede (trabalho) está bloqueando a saída. Alguém que já passou por isso, poderia dá uma Luz. Obrigado amigos procedure TForm1.Button1Click(Sender: TObject); begin with MSG do begin Body.Add(Memo1.Text); From.Address := Edit2.Text; From.Name := 'Siger Suporte'; //opcional Recipients.Add; Recipients.Items[0].Address := Edit1.Text;//'[EMAIL PROTECTED] mailto:%2F%2F%27shaokhann%40gmail.com'; Recipients.Items[0].Name := 'Atendimento On-Line'; Subject := 'Suporte Técnico'; end; try SMTP.Connect(); SMTP.Send(MSG); SMTP.Disconnect; except on E : Exception do begin ShowMessage('Falha no envio!'+E.Message); exit; end; end; ShowMessage('Mensagem enviada com sucesso!'); end; procedure TForm1.FormCreate(Sender: TObject); begin with SMTP do begin AuthType := atSASL; (já mudei para Default e deu o mesmo erro. Host := 'smtp.gmail.com'; IOHandler:= SSLSocket; Password := '123456789'; Port := StrToInt(Edit3.Text);// 995; Username := '[EMAIL PROTECTED] mailto:%27meusuporte%40gmail.com'; end; SSLSocket.SSLOptions.Method := sslvSSLv2; SSLSocket.SSLOptions.Mode := sslmClient; end; -- Att, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF -- Att, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF
Re: [delphi-br] Urgente - Criação de Subpasta no m enu INICIAR do Windows
Meu computador se chama VINICIUS, as pastas ficam aqui dentro: C:\Documents and Settings\VINICIUS\Menu Iniciar\Programas\ basta criar uma pasta ali dentro. Vinicius dos Santos Blog: http://tuplas.blogspot.com http://www.msisolucoes.com.br - Original Message - From: Jorge Ericsson To: undisclosed-recipients: Sent: Thursday, August 14, 2008 3:45 PM Subject: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows Olá amigos, Depois de fuçar muito esses dois dias, eu não encontrei nada que resolvesse o meu problema. Talvezes seja o cansaço mais não consegui mesmo resolver o meu problema. Bom, preciso criar um atalho para o meu programa na pasta dentro da Programas e nessa pasta colocar meu atalho da seguinte forma. Programa Console - Desktop (moleza) Console (programa) Programa Exportação - Iniciar - Programas - Exportação (pasta) Export.exe (programa) Programa Importação - Iniciar - Programas - Importação (pasta) Import.exe (programa) Programa Migração - Iniciar - Programas - Migração (programa) Sei que o Inno Setup dá pra fazer isso com o pé nas costa, mas como eu criei o meu programa de instalação eu gostaria de controlar essa distribuição de aplicativos. Tentei usar a function abaixo mas não deu certo. CreateShortcut(SourceFileName ;. const SHELL_FOLDERS_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\Explorer'; QUICK_LAUNCH_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\GrpConv'; Se alguém que já passou por isso puder me ajudar, já lhe fico grato... Valew pessoal. Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 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]
Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows
Vinicius o problema é que gostaria de criar para qq usuários que logasse na máquina ou seja C:\Documents and Settings\All Users\Menu Iniciar\Programas Dessa forma qq usuário que logar na máquina terá a visualização dos programas. 2008/8/14 Vinicius Santos - MSI [EMAIL PROTECTED] Meu computador se chama VINICIUS, as pastas ficam aqui dentro: C:\Documents and Settings\VINICIUS\Menu Iniciar\Programas\ basta criar uma pasta ali dentro. Vinicius dos Santos Blog: http://tuplas.blogspot.com http://www.msisolucoes.com.br - Original Message - From: Jorge Ericsson To: undisclosed-recipients: Sent: Thursday, August 14, 2008 3:45 PM Subject: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows Olá amigos, Depois de fuçar muito esses dois dias, eu não encontrei nada que resolvesse o meu problema. Talvezes seja o cansaço mais não consegui mesmo resolver o meu problema. Bom, preciso criar um atalho para o meu programa na pasta dentro da Programas e nessa pasta colocar meu atalho da seguinte forma. Programa Console - Desktop (moleza) Console (programa) Programa Exportação - Iniciar - Programas - Exportação (pasta) Export.exe (programa) Programa Importação - Iniciar - Programas - Importação (pasta) Import.exe (programa) Programa Migração - Iniciar - Programas - Migração (programa) Sei que o Inno Setup dá pra fazer isso com o pé nas costa, mas como eu criei o meu programa de instalação eu gostaria de controlar essa distribuição de aplicativos. Tentei usar a function abaixo mas não deu certo. CreateShortcut(SourceFileName ;. const SHELL_FOLDERS_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\Explorer'; QUICK_LAUNCH_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\GrpConv'; Se alguém que já passou por isso puder me ajudar, já lhe fico grato... Valew pessoal. Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 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 Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Criação de Subpasta no m enu INICIAR do Windows
certo, mas então qual o problema de se criar dentro de All User ?? - Original Message - From: Jorge Ericsson To: delphi-br@yahoogrupos.com.br Sent: Thursday, August 14, 2008 4:11 PM Subject: Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows Vinicius o problema é que gostaria de criar para qq usuários que logasse na máquina ou seja C:\Documents and Settings\All Users\Menu Iniciar\Programas Dessa forma qq usuário que logar na máquina terá a visualização dos programas. 2008/8/14 Vinicius Santos - MSI [EMAIL PROTECTED] Meu computador se chama VINICIUS, as pastas ficam aqui dentro: C:\Documents and Settings\VINICIUS\Menu Iniciar\Programas\ basta criar uma pasta ali dentro. Vinicius dos Santos Blog: http://tuplas.blogspot.com http://www.msisolucoes.com.br - Original Message - From: Jorge Ericsson To: undisclosed-recipients: Sent: Thursday, August 14, 2008 3:45 PM Subject: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows Olá amigos, Depois de fuçar muito esses dois dias, eu não encontrei nada que resolvesse o meu problema. Talvezes seja o cansaço mais não consegui mesmo resolver o meu problema. Bom, preciso criar um atalho para o meu programa na pasta dentro da Programas e nessa pasta colocar meu atalho da seguinte forma. Programa Console - Desktop (moleza) Console (programa) Programa Exportação - Iniciar - Programas - Exportação (pasta) Export.exe (programa) Programa Importação - Iniciar - Programas - Importação (pasta) Import.exe (programa) Programa Migração - Iniciar - Programas - Migração (programa) Sei que o Inno Setup dá pra fazer isso com o pé nas costa, mas como eu criei o meu programa de instalação eu gostaria de controlar essa distribuição de aplicativos. Tentei usar a function abaixo mas não deu certo. CreateShortcut(SourceFileName ;. const SHELL_FOLDERS_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\Explorer'; QUICK_LAUNCH_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\GrpConv'; Se alguém que já passou por isso puder me ajudar, já lhe fico grato... Valew pessoal. Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 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 Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 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]
Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows
você sabe como criar via código ??? Pq eu já testei e não tive sucesso, mesmo criando na mão a pasta. 2008/8/14 Vinicius Santos - MSI [EMAIL PROTECTED] certo, mas então qual o problema de se criar dentro de All User ?? - Original Message - From: Jorge Ericsson To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Thursday, August 14, 2008 4:11 PM Subject: Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows Vinicius o problema é que gostaria de criar para qq usuários que logasse na máquina ou seja C:\Documents and Settings\All Users\Menu Iniciar\Programas Dessa forma qq usuário que logar na máquina terá a visualização dos programas. 2008/8/14 Vinicius Santos - MSI [EMAIL PROTECTED]vinicius%40msisolucoes.com.br Meu computador se chama VINICIUS, as pastas ficam aqui dentro: C:\Documents and Settings\VINICIUS\Menu Iniciar\Programas\ basta criar uma pasta ali dentro. Vinicius dos Santos Blog: http://tuplas.blogspot.com http://www.msisolucoes.com.br - Original Message - From: Jorge Ericsson To: undisclosed-recipients: Sent: Thursday, August 14, 2008 3:45 PM Subject: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows Olá amigos, Depois de fuçar muito esses dois dias, eu não encontrei nada que resolvesse o meu problema. Talvezes seja o cansaço mais não consegui mesmo resolver o meu problema. Bom, preciso criar um atalho para o meu programa na pasta dentro da Programas e nessa pasta colocar meu atalho da seguinte forma. Programa Console - Desktop (moleza) Console (programa) Programa Exportação - Iniciar - Programas - Exportação (pasta) Export.exe (programa) Programa Importação - Iniciar - Programas - Importação (pasta) Import.exe (programa) Programa Migração - Iniciar - Programas - Migração (programa) Sei que o Inno Setup dá pra fazer isso com o pé nas costa, mas como eu criei o meu programa de instalação eu gostaria de controlar essa distribuição de aplicativos. Tentei usar a function abaixo mas não deu certo. CreateShortcut(SourceFileName ;. const SHELL_FOLDERS_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\Explorer'; QUICK_LAUNCH_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\GrpConv'; Se alguém que já passou por isso puder me ajudar, já lhe fico grato... Valew pessoal. Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 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 Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 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 Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Criação de Subpasta no m enu INICIAR do Windows
Coloquei um botão no form e coloquei isso: MkDir('C:\Documents and Settings\All Users\Menu Iniciar\Programas\Teste') funcionou, normalmente ! além de MkDir, vc tem o CreateDir, para criar pastas. - Original Message - From: Jorge Ericsson To: delphi-br@yahoogrupos.com.br Sent: Thursday, August 14, 2008 4:25 PM Subject: Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows você sabe como criar via código ??? Pq eu já testei e não tive sucesso, mesmo criando na mão a pasta. 2008/8/14 Vinicius Santos - MSI [EMAIL PROTECTED] certo, mas então qual o problema de se criar dentro de All User ?? - Original Message - From: Jorge Ericsson To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Thursday, August 14, 2008 4:11 PM Subject: Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows Vinicius o problema é que gostaria de criar para qq usuários que logasse na máquina ou seja C:\Documents and Settings\All Users\Menu Iniciar\Programas Dessa forma qq usuário que logar na máquina terá a visualização dos programas. 2008/8/14 Vinicius Santos - MSI [EMAIL PROTECTED]vinicius%40msisolucoes.com.br Meu computador se chama VINICIUS, as pastas ficam aqui dentro: C:\Documents and Settings\VINICIUS\Menu Iniciar\Programas\ basta criar uma pasta ali dentro. Vinicius dos Santos Blog: http://tuplas.blogspot.com http://www.msisolucoes.com.br - Original Message - From: Jorge Ericsson To: undisclosed-recipients: Sent: Thursday, August 14, 2008 3:45 PM Subject: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows Olá amigos, Depois de fuçar muito esses dois dias, eu não encontrei nada que resolvesse o meu problema. Talvezes seja o cansaço mais não consegui mesmo resolver o meu problema. Bom, preciso criar um atalho para o meu programa na pasta dentro da Programas e nessa pasta colocar meu atalho da seguinte forma. Programa Console - Desktop (moleza) Console (programa) Programa Exportação - Iniciar - Programas - Exportação (pasta) Export.exe (programa) Programa Importação - Iniciar - Programas - Importação (pasta) Import.exe (programa) Programa Migração - Iniciar - Programas - Migração (programa) Sei que o Inno Setup dá pra fazer isso com o pé nas costa, mas como eu criei o meu programa de instalação eu gostaria de controlar essa distribuição de aplicativos. Tentei usar a function abaixo mas não deu certo. CreateShortcut(SourceFileName ;. const SHELL_FOLDERS_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\Explorer'; QUICK_LAUNCH_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\GrpConv'; Se alguém que já passou por isso puder me ajudar, já lhe fico grato... Valew pessoal. Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 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 Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 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 Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 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]
Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows
Desculpe Vinicius mas vc não entendeu meu problema.. Valew amigão.. 2008/8/14 Vinicius Santos - MSI [EMAIL PROTECTED] Coloquei um botão no form e coloquei isso: MkDir('C:\Documents and Settings\All Users\Menu Iniciar\Programas\Teste') funcionou, normalmente ! além de MkDir, vc tem o CreateDir, para criar pastas. - Original Message - From: Jorge Ericsson To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Thursday, August 14, 2008 4:25 PM Subject: Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows você sabe como criar via código ??? Pq eu já testei e não tive sucesso, mesmo criando na mão a pasta. 2008/8/14 Vinicius Santos - MSI [EMAIL PROTECTED]vinicius%40msisolucoes.com.br certo, mas então qual o problema de se criar dentro de All User ?? - Original Message - From: Jorge Ericsson To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.br Sent: Thursday, August 14, 2008 4:11 PM Subject: Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows Vinicius o problema é que gostaria de criar para qq usuários que logasse na máquina ou seja C:\Documents and Settings\All Users\Menu Iniciar\Programas Dessa forma qq usuário que logar na máquina terá a visualização dos programas. 2008/8/14 Vinicius Santos - MSI [EMAIL PROTECTED]vinicius%40msisolucoes.com.br vinicius%40msisolucoes.com.br Meu computador se chama VINICIUS, as pastas ficam aqui dentro: C:\Documents and Settings\VINICIUS\Menu Iniciar\Programas\ basta criar uma pasta ali dentro. Vinicius dos Santos Blog: http://tuplas.blogspot.com http://www.msisolucoes.com.br - Original Message - From: Jorge Ericsson To: undisclosed-recipients: Sent: Thursday, August 14, 2008 3:45 PM Subject: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows Olá amigos, Depois de fuçar muito esses dois dias, eu não encontrei nada que resolvesse o meu problema. Talvezes seja o cansaço mais não consegui mesmo resolver o meu problema. Bom, preciso criar um atalho para o meu programa na pasta dentro da Programas e nessa pasta colocar meu atalho da seguinte forma. Programa Console - Desktop (moleza) Console (programa) Programa Exportação - Iniciar - Programas - Exportação (pasta) Export.exe (programa) Programa Importação - Iniciar - Programas - Importação (pasta) Import.exe (programa) Programa Migração - Iniciar - Programas - Migração (programa) Sei que o Inno Setup dá pra fazer isso com o pé nas costa, mas como eu criei o meu programa de instalação eu gostaria de controlar essa distribuição de aplicativos. Tentei usar a function abaixo mas não deu certo. CreateShortcut(SourceFileName ;. const SHELL_FOLDERS_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\Explorer'; QUICK_LAUNCH_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\GrpConv'; Se alguém que já passou por isso puder me ajudar, já lhe fico grato... Valew pessoal. Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 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 Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 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 Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 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 Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Como bloquear um texto no TMemo ?
Antes de executar a query verifique se existem esses comandos no texto do memo. if (Pos('INSERT', UpperCase(Memo1.Text)) 0) then ShowMessage('Comando Insert não permitido!') else if (Pos('DELETE', UpperCase(Memo1.Text)) 0) then ShowMessage('Comando Delete não permitido!') else if (Pos('UPDATE', UpperCase(Memo1.Text)) 0) then ShowMessage('Comando Update não permitido!'); [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [URGENTE] erro no firebird.. The cursor identified in the update or delete statement is not positioned on a row. no current record for fetch operation.
Vc poderia mandar o SELECT... iria ajudar bastante... t+ - Original Message - From: Rafael Jorge To: delphi-br Sent: Tuesday, July 15, 2008 8:53 PM Subject: [delphi-br] [URGENTE] erro no firebird.. The cursor identified in the update or delete statement is not positioned on a row. no current record for fetch operation. migrei do 1.5 pro firebird 2 se eu fizer um select que tenho um left join e um where ele da The cursor identified in the update or delete statement is not positioned on a row. no current record for fetch operation. e nao retorna nada.. ja to agoniado.. alquem sabe como resolver isso? socorro.. se alquem souber solucionar isso por favor me ajuda.. t+ -- -- Rafael jorge alves (Analista/desenvolvedor) www.sistemafocus.com.br sistema focus de gestão comercial e serviços em informatica. -- [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] urgente - sobre componentes para gerar relatorios
Que eu saiba, por padrão não existe. Mas é relativamente fácil de implementar baseado na maioria dos geradores de relatórios disponíveis no mercado. Já fiz isso em Fortes e Report Builder. 2008/6/12 Leonardo Baldino [EMAIL PROTECTED]: por acaso alguem conhece algum componente que eu possa usar para criar um relatorio sem que eu tenha que criar o layout do relatorio, eu quero dizer que eu estou procurando um componente em que eu só precise criar o select que vai trazer as informações e campos do relatorio sem ter que criar o layout. Po acaso alguem conhece um componente que possa fazer isso. -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] -- Abs Daniel A. Bastos
RE: [delphi-br] URGENTE: Registrar DLL pelo delphi
Inclui a opção /S. Ela faz o registro de maneira silenciosa, sem pedir confirmação ou mostrar caixas de diálogo. Vi isso executando 'REGSVR32 /?' (sem as aspas simples) no aviso de comando do XP. Sds. From: [EMAIL PROTECTED] Date: Thu, 12 Jun 2008 17:01:29 -0300 Subject: [delphi-br] URGENTE: Registrar DLL pelo delphi Olá amigos, eu preciso registrar algumas DLL na instalação de meu programa, mas não gostaria de utilizar o comando WinExec(pchar('regsvr32.exe ' + drive + '\WINNT\SYSTEM32\midas.dll'), SW_NORMAL); Porque nesse caso registra mais fica a tela de confirmação pro usuário. Se não me engano tem uma utni que faz isso, mas não estou encontrando a danada... Alguém já passou por esse problema e poderia ajudar-me ??? Valew, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF _ Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas e muito mais no MSN Video! http://video.msn.com/?mkt=pt-br
Re: [delphi-br] Urgente: Join entre 4 tabelas em XML
Rubem eu sei o que é um relacionamento amigão, a minha dúvida é pq nunca utilizei de forma pesada o XML e gostaria apenas de saber se é possível (já descobrir que sim), antes de iniciar a empreitada. Apesar de ter várias opções para resolver o problema, eu optei por usar o DELPHI/XML para tratar as informações e gerar um relatório das informações que necessito. Poderia migrando os dados para Firebird, Postgre e/ou Oracle e neles eu faria misérias com os dados, mas resolvi investir no XML (Clientdataset e etc). Mas fico-lhe grato pelas informações valiosas dadas até aqui, vou pesquisar mais nos materiais que tenho sobre o assunto e resolver o problema com o XML mesmo. Valew pessoal. 2008/6/3 Rubem Nascimento da Rocha [EMAIL PROTECTED]: Meu caro, um join é o mesmo que um relacionamento, e em se tratando de datasets do Delphi, um relacionamento pode ser montado usando a propriedade DataSource do ClientDataSet, como vc faria em tempos antigos um relacionamento mestre-detalhe entre dois TTables. Não tem erro! Entendo isso, vc resolve o problema! Sds. To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br From: [EMAIL PROTECTED] jericssonsup%40gmail.com Date: Tue, 3 Jun 2008 17:59:11 -0300 Subject: Re: [delphi-br] Urgente: Join entre 4 tabelas em XML Sim eu já dei uma olhada no XML Mapper, mas ainda não encontrei a parte que fala sobre join entre os arquivo XML. Eu acho que tenho a revista da Clube Delphi que tem essa matéria do Guinther, vou dá uma olhada. 2008/6/3 Rubem Nascimento da Rocha [EMAIL PROTECTED]djpardalrocha%40hotmail.com : Se é a versão Enterprise, é tranquilo. Te informa sobre o utilitário XML Mapper, Transformações XML e o componente TXMLTransformProvider. Com esses subsídios, vc poderá acessar os arquivos XML com ClientDataSet, e depois fazer relacionamentos mestre-detalhe com a propriedade DataSource dos mesmos. Tem artigos na Internet falando sobre esses assuntos. Inclusive foi publicado na revista ClubeDelphi um artigo do Guinther Pauli falando sobre isso. Essa é a dica. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br From: [EMAIL PROTECTED] jericssonsup%40gmail.com Date: Tue, 3 Jun 2008 16:41:52 -0300 Subject: Re: [delphi-br] Urgente: Join entre 4 tabelas em XML Rubem, Eu utilizo Delphi 7 Enterprise. Para a criação dos arquivo é tranquilo, mas ao relaciona-las é que complicou. 2008/6/3 Rubem Nascimento da Rocha [EMAIL PROTECTED]djpardalrocha%40hotmail.com : Qual versão e tipo de licença de Delphi que vc tá usando? Sds. From: [EMAIL PROTECTED] jericssonsup%40gmail.com Date: Tue, 3 Jun 2008 11:07:59 -0300 Subject: [delphi-br] Urgente: Join entre 4 tabelas em XML Olá amigos, Gostaria de saber se alguém tem experiência em trabalhar com XML fazendo Inner join e Left Join entre as tabelas para gerar um relatório de analise apenas. Grato, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF __ Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o Messenger! É GRÁTIS! http://www.msn.com.br/emoticonpack -- Att, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Urgente: Join entre 4 tabelas em XML
Qual versão e tipo de licença de Delphi que vc tá usando? Sds. From: [EMAIL PROTECTED] Date: Tue, 3 Jun 2008 11:07:59 -0300 Subject: [delphi-br] Urgente: Join entre 4 tabelas em XML Olá amigos, Gostaria de saber se alguém tem experiência em trabalhar com XML fazendo Inner join e Left Join entre as tabelas para gerar um relatório de analise apenas. Grato, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF _ Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas e muito mais no MSN Video! http://video.msn.com/?mkt=pt-br
Re: [delphi-br] Urgente: Join entre 4 tabelas em XML
Rubem, Eu utilizo Delphi 7 Enterprise. Para a criação dos arquivo é tranquilo, mas ao relaciona-las é que complicou. 2008/6/3 Rubem Nascimento da Rocha [EMAIL PROTECTED]: Qual versão e tipo de licença de Delphi que vc tá usando? Sds. From: [EMAIL PROTECTED] jericssonsup%40gmail.com Date: Tue, 3 Jun 2008 11:07:59 -0300 Subject: [delphi-br] Urgente: Join entre 4 tabelas em XML Olá amigos, Gostaria de saber se alguém tem experiência em trabalhar com XML fazendo Inner join e Left Join entre as tabelas para gerar um relatório de analise apenas. Grato, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF __ Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas e muito mais no MSN Video! http://video.msn.com/?mkt=pt-br -- Att, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Urgente: Join entre 4 tabelas em XML
Se é a versão Enterprise, é tranquilo. Te informa sobre o utilitário XML Mapper, Transformações XML e o componente TXMLTransformProvider. Com esses subsídios, vc poderá acessar os arquivos XML com ClientDataSet, e depois fazer relacionamentos mestre-detalhe com a propriedade DataSource dos mesmos. Tem artigos na Internet falando sobre esses assuntos. Inclusive foi publicado na revista ClubeDelphi um artigo do Guinther Pauli falando sobre isso. Essa é a dica. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 3 Jun 2008 16:41:52 -0300 Subject: Re: [delphi-br] Urgente: Join entre 4 tabelas em XML Rubem, Eu utilizo Delphi 7 Enterprise. Para a criação dos arquivo é tranquilo, mas ao relaciona-las é que complicou. 2008/6/3 Rubem Nascimento da Rocha [EMAIL PROTECTED]: Qual versão e tipo de licença de Delphi que vc tá usando? Sds. From: [EMAIL PROTECTED] Date: Tue, 3 Jun 2008 11:07:59 -0300 Subject: [delphi-br] Urgente: Join entre 4 tabelas em XML Olá amigos, Gostaria de saber se alguém tem experiência em trabalhar com XML fazendo Inner join e Left Join entre as tabelas para gerar um relatório de analise apenas. Grato, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF _ Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o Messenger! É GRÁTIS! http://www.msn.com.br/emoticonpack
Re: [delphi-br] Urgente: Join entre 4 tabelas em XML
Sim eu já dei uma olhada no XML Mapper, mas ainda não encontrei a parte que fala sobre join entre os arquivo XML. Eu acho que tenho a revista da Clube Delphi que tem essa matéria do Guinther, vou dá uma olhada. 2008/6/3 Rubem Nascimento da Rocha [EMAIL PROTECTED]: Se é a versão Enterprise, é tranquilo. Te informa sobre o utilitário XML Mapper, Transformações XML e o componente TXMLTransformProvider. Com esses subsídios, vc poderá acessar os arquivos XML com ClientDataSet, e depois fazer relacionamentos mestre-detalhe com a propriedade DataSource dos mesmos. Tem artigos na Internet falando sobre esses assuntos. Inclusive foi publicado na revista ClubeDelphi um artigo do Guinther Pauli falando sobre isso. Essa é a dica. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br From: [EMAIL PROTECTED] jericssonsup%40gmail.com Date: Tue, 3 Jun 2008 16:41:52 -0300 Subject: Re: [delphi-br] Urgente: Join entre 4 tabelas em XML Rubem, Eu utilizo Delphi 7 Enterprise. Para a criação dos arquivo é tranquilo, mas ao relaciona-las é que complicou. 2008/6/3 Rubem Nascimento da Rocha [EMAIL PROTECTED]djpardalrocha%40hotmail.com : Qual versão e tipo de licença de Delphi que vc tá usando? Sds. From: [EMAIL PROTECTED] jericssonsup%40gmail.com Date: Tue, 3 Jun 2008 11:07:59 -0300 Subject: [delphi-br] Urgente: Join entre 4 tabelas em XML Olá amigos, Gostaria de saber se alguém tem experiência em trabalhar com XML fazendo Inner join e Left Join entre as tabelas para gerar um relatório de analise apenas. Grato, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF __ Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o Messenger! É GRÁTIS! http://www.msn.com.br/emoticonpack -- Att, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Urgente: Join entre 4 tabelas em XML
Meu caro, um join é o mesmo que um relacionamento, e em se tratando de datasets do Delphi, um relacionamento pode ser montado usando a propriedade DataSource do ClientDataSet, como vc faria em tempos antigos um relacionamento mestre-detalhe entre dois TTables. Não tem erro! Entendo isso, vc resolve o problema! Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 3 Jun 2008 17:59:11 -0300 Subject: Re: [delphi-br] Urgente: Join entre 4 tabelas em XML Sim eu já dei uma olhada no XML Mapper, mas ainda não encontrei a parte que fala sobre join entre os arquivo XML. Eu acho que tenho a revista da Clube Delphi que tem essa matéria do Guinther, vou dá uma olhada. 2008/6/3 Rubem Nascimento da Rocha [EMAIL PROTECTED]: Se é a versão Enterprise, é tranquilo. Te informa sobre o utilitário XML Mapper, Transformações XML e o componente TXMLTransformProvider. Com esses subsídios, vc poderá acessar os arquivos XML com ClientDataSet, e depois fazer relacionamentos mestre-detalhe com a propriedade DataSource dos mesmos. Tem artigos na Internet falando sobre esses assuntos. Inclusive foi publicado na revista ClubeDelphi um artigo do Guinther Pauli falando sobre isso. Essa é a dica. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Tue, 3 Jun 2008 16:41:52 -0300 Subject: Re: [delphi-br] Urgente: Join entre 4 tabelas em XML Rubem, Eu utilizo Delphi 7 Enterprise. Para a criação dos arquivo é tranquilo, mas ao relaciona-las é que complicou. 2008/6/3 Rubem Nascimento da Rocha [EMAIL PROTECTED] : Qual versão e tipo de licença de Delphi que vc tá usando? Sds. From: [EMAIL PROTECTED] Date: Tue, 3 Jun 2008 11:07:59 -0300 Subject: [delphi-br] Urgente: Join entre 4 tabelas em XML Olá amigos, Gostaria de saber se alguém tem experiência em trabalhar com XML fazendo Inner join e Left Join entre as tabelas para gerar um relatório de analise apenas. Grato, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF _ Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o Messenger! É GRÁTIS! http://www.msn.com.br/emoticonpack
Re: [delphi-br] URGENTE - Commit depois que inserir 1mil registros
Pessoal eu já resolvi o problema colocando um contador mesmo. Foi preguiça de pensar antes de postar o problema. Valew 2008/5/21 Joao Morais [EMAIL PROTECTED]: berdam wrote: ué, poe um contador ai quando der mil comita ... e quando (VContador mod 1000) = 0 commita. Jorge Ericsson escreveu: Olá amigos, Estou desenvolvendo uma rotina gigante de atualização de dados e gostaria de dá um commit após atualizar 1000 registros na tabela. O IBExpet ao gerar um script de atualização acima de uma determinada quantidade de registros já envia o COMMIT; ao texto. Tenho algo +/- da seguinte forma: query1.open; {esta query retorno uns 30mil registros} while not eof do begin query2.sql.text := 'insert into teste2 etcetcect {precisa de escrever tudo} query2.parambyname('texte1).Value := query1.fieldbyname('texte').value; query2.execsql; commit; {Preciso commita qdo tiver sido inserido 1mil registros. query1.Next; end; Alguém já desenvolveu algo nesse sentido ? Grande abraço. Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE - Commit depois que inserir 1mil registros
ué, poe um contador ai quando der mil comita Jorge Ericsson escreveu: Olá amigos, Estou desenvolvendo uma rotina gigante de atualização de dados e gostaria de dá um commit após atualizar 1000 registros na tabela. O IBExpet ao gerar um script de atualização acima de uma determinada quantidade de registros já envia o COMMIT; ao texto. Tenho algo +/- da seguinte forma: query1.open; {esta query retorno uns 30mil registros} while not eof do begin query2.sql.text := 'insert into teste2 etcetcect {precisa de escrever tudo} query2.parambyname('texte1).Value := query1.fieldbyname('texte').value; query2.execsql; commit; {Preciso commita qdo tiver sido inserido 1mil registros. query1.Next; end; Alguém já desenvolveu algo nesse sentido ? Grande abraço. Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- - Uberdam Cavaletti Formado em Tecnologia da informação - Unoesc - Xxe Pós graduando em Desenvolvimento Java - Unoesc - Xxe Acesse http://www.curricular.com.br/berdam Acesse http://passandoveneno.blogspot.com -
Re: [delphi-br] URGENTE - Commit depois que inserir 1mil registros
berdam wrote: ué, poe um contador ai quando der mil comita ... e quando (VContador mod 1000) = 0 commita. Jorge Ericsson escreveu: Olá amigos, Estou desenvolvendo uma rotina gigante de atualização de dados e gostaria de dá um commit após atualizar 1000 registros na tabela. O IBExpet ao gerar um script de atualização acima de uma determinada quantidade de registros já envia o COMMIT; ao texto. Tenho algo +/- da seguinte forma: query1.open; {esta query retorno uns 30mil registros} while not eof do begin query2.sql.text := 'insert into teste2 etcetcect {precisa de escrever tudo} query2.parambyname('texte1).Value := query1.fieldbyname('texte').value; query2.execsql; commit; {Preciso commita qdo tiver sido inserido 1mil registros. query1.Next; end; Alguém já desenvolveu algo nesse sentido ? Grande abraço. Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE - CVomo reiniciar um aplicativo.
eu gero um .bat para isto. 2008/5/19 Jorge Ericsson [EMAIL PROTECTED]: Olá pessoal, Alguém sabe como fechar um aplicativo após uma atualização e abri-lo novamente ? Eu estou usando o Application.Termined para finalizar, mas preciso abrir-lo novamente. Grato, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- /* * Edson Marco Ferrari Junior * [EMAIL PROTECTED] * [EMAIL PROTECTED](in memorium) */ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE - CVomo reiniciar um aplicativo.
Eu resolvi o problema usando a função ExecuteFileWait. Valew file:/srvdf161/nasdf04/CAIVS/EXPORTACAO%20E%20IMPORTACAO/An%C3%A1lise%20e%20Projetos/ 2008/5/19 Edson Marco [EMAIL PROTECTED]: eu gero um .bat para isto. 2008/5/19 Jorge Ericsson [EMAIL PROTECTED]jericssonsup%40gmail.com : Olá pessoal, Alguém sabe como fechar um aplicativo após uma atualização e abri-lo novamente ? Eu estou usando o Application.Termined para finalizar, mas preciso abrir-lo novamente. Grato, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- /* * Edson Marco Ferrari Junior * [EMAIL PROTECTED] edmafer%40gmail.com * [EMAIL PROTECTED] edmafer%40sicesumar.org(in memorium) */ [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Como localizar o diretório do IIS e sua versão.
Obrigado pelas dicas Ricardo, mas só a parte do IE funcionou, ainda não consegui localizar o diretório de todas as instalações do IIS caso tenha mais de uma na máquina. Estou pesquisando... Valew 2008/5/14 Ricardo César Cardoso [EMAIL PROTECTED]: Boa tarde Jorge! A parte de saber a versão do IE vc pode olhar aqui: * http://www.swissdelphicenter.ch/torry/printcode.php?id=1252 Agora quanto ao local de instalação do IIS, dá uma olhada nisso aqui que acho que é por aí: * http://www.delphi3000.com/printarticle.asp?ArticleID=2742 Atte, Ricardo. Jorge Ericsson [EMAIL PROTECTED] jericssonsup%40gmail.com escreveu: Saudações amigos Delphianos, Estou desenvolvendo um instalador em Delphi e preciso localizar na registry o local de instalação do IIS (\Inetpub\wwwroot), qual a versão e qual o IExplorer instalado. Tenho alguns usuários que possuem até duas instalações em suas máquinas e só vi solução localizando na registry essas informações. Alguém teria a solução para tal problema ? Abraços a todos. Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Como localizar o dire tório do IIS e sua versão.
Boa tarde Jorge! A parte de saber a versão do IE vc pode olhar aqui: * http://www.swissdelphicenter.ch/torry/printcode.php?id=1252 Agora quanto ao local de instalação do IIS, dá uma olhada nisso aqui que acho que é por aí: * http://www.delphi3000.com/printarticle.asp?ArticleID=2742 Atte, Ricardo. Jorge Ericsson [EMAIL PROTECTED] escreveu: Saudações amigos Delphianos, Estou desenvolvendo um instalador em Delphi e preciso localizar na registry o local de instalação do IIS (\Inetpub\wwwroot), qual a versão e qual o IExplorer instalado. Tenho alguns usuários que possuem até duas instalações em suas máquinas e só vi solução localizando na registry essas informações. Alguém teria a solução para tal problema ? Abraços a todos. Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Consulta incremental LIKE
upper(co_agrupado) like upper(E668) or upper(co_agrupado) like upper(%E668%) or Jackson Gomes ToolsComps - Controle de Usuários para Desenvolvedores Borland/CodeGear Web Site: http://www.toolsandcomps.com Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps e-mail: [EMAIL PROTECTED] Fone: 27 3389 1138 - 8811 0324 Devhost - Webhost para desenvolvedores Borland http://www.devhost.com.br [EMAIL PROTECTED]
Re: [delphi-br] URGENTE - Como retornar Campos Primário do DataSet
Valew pelas dicas, mas o André entendeu me deu a solução que precisava. Vou testar e posto aqui a solução pq estou criando um registro de log e gravando todas as ações do banco que o usuário fizer. Qdo o administrador quiser verificar quem, quando, qual valor e etc um determinado usuário gravou ou alterou no banco, ele terá em uma tela com consultas parametrizada. Se alguém já pensou e fez algo semelhante, me contate em PVT. Obs.: Por enquanto estou usando BDE e acessando Firebird. Obrigado pessoal. 2008/4/11 Andre Luis Silveria [EMAIL PROTECTED]: O que vc pode fazer é o seguinte: RCampo : TRecord Campo : String; procedure chamarLog(DS : Dataset); var Tabela : TTable; Campo : Array of RCampo; begin if (DS.State in [dsInsert, dsEdit) then begin for i := 0 to Ds.FieldsCount - 1 do begin if pfInKey in DS.Fields[i].ProviderFlags then begin SetLength(Campo, Length(Campo)+1); Campo[Length(Campo)-1].Campo := DS.Fields[0] .FieldName; //retornar o campo chave end; end; Tabela := (DS as TTable).TableName) ; //retornar o nome da tabela end; end; - Mensagem original De: Jorge Ericsson [EMAIL PROTECTED] jericssonsup%40gmail.com Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Enviadas: Quinta-feira, 10 de Abril de 2008 19:06:39 Assunto: [delphi-br] URGENTE - Como retornar Campos Primário do DataSet Olá amigos Delphianos, Preciso enviar para minha tela de pesquisa os campos chaves e o nome da tabela de Datasource. Tentei o seguinte: procedure chamarLog(DS : Dataset); var Tabela : TTable; Campo: String; begin if (DS.State in [dsInsert, dsEdit) then begin Campo := DS.Fields[0] .FieldName; //retornar o campo chave Tabela := (DS as TTable).TableName) ; //retornar o nome da tabela end; end; Só que dessa forma o o campo chave poderá ser mais de um e poderá estar em qq posição da tabela. Alguém poderia ajudar-me nesse problema ? Agradeço, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsso n.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] !-- #ygrp-mkp{ border:1px solid #d8d8d8;font-family:Arial;margin:14px 0px;padding:0px 14px;} #ygrp-mkp hr{ border:1px solid #d8d8d8;} #ygrp-mkp #hd{ color:#628c2a;font-size:85%;font-weight:bold;line-height:122%;margin:10px 0px;} #ygrp-mkp #ads{ margin-bottom:10px;} #ygrp-mkp .ad{ padding:0 0;} #ygrp-mkp .ad a{ color:#ff;text-decoration:none;} -- !-- #ygrp-sponsor #ygrp-lc{ font-family:Arial;} #ygrp-sponsor #ygrp-lc #hd{ margin:10px 0px;font-weight:bold;font-size:78%;line-height:122%;} #ygrp-sponsor #ygrp-lc .ad{ margin-bottom:10px;padding:0 0;} -- !-- #ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean, sans-serif;} #ygrp-mlmsg table {font-size:inherit;font:100%;} #ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean, sans-serif;} #ygrp-mlmsg pre, code {font:115% monospace;} #ygrp-mlmsg * {line-height:1.22em;} #ygrp-text{ font-family:Georgia; } #ygrp-text p{ margin:0 0 1em 0;} #ygrp-tpmsgs{ font-family:Arial; clear:both;} #ygrp-vitnav{ padding-top:10px;font-family:Verdana;font-size:77%;margin:0;} #ygrp-vitnav a{ padding:0 1px;} #ygrp-actbar{ clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;} #ygrp-actbar .left{ float:left;white-space:nowrap;} .bld{font-weight:bold;} #ygrp-grft{ font-family:Verdana;font-size:77%;padding:15px 0;} #ygrp-ft{ font-family:verdana;font-size:77%;border-top:1px solid #666; padding:5px 0; } #ygrp-mlmsg #logo{ padding-bottom:10px;} #ygrp-reco { margin-bottom:20px;padding:0px;} #ygrp-reco #reco-head { font-weight:bold;color:#ff7900;} #reco-grpname{ font-weight:bold;margin-top:10px;} #reco-category{ font-size:77%;} #reco-desc{ font-size:77%;} #ygrp-vital{ background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;} #ygrp-vital #vithd{ font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;} #ygrp-vital ul{ padding:0;margin:2px 0;} #ygrp-vital ul li{ list-style-type:none;clear:both;border:1px solid #e0ecee; } #ygrp-vital ul li .ct{ font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;} #ygrp-vital ul li .cat{ font-weight:bold;} #ygrp-vital a{ text-decoration:none;} #ygrp-vital a:hover{ text-decoration:underline;} #ygrp-sponsor #hd{ color:#999;font-size:77%;} #ygrp-sponsor #ov{ padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;} #ygrp-sponsor #ov ul{ padding:0 0 0 8px;margin:0;} #ygrp-sponsor #ov li{ list-style-type:square;padding:6px 0;font-size:77%;} #ygrp-sponsor #ov li a{ text-decoration:none;font-size:130%;} #ygrp-sponsor #nc{ background-color:#eee;margin-bottom:20px;padding:0 8px;} #ygrp-sponsor .ad{ padding:8px 0;} #ygrp-sponsor .ad #hd1{
RE: [delphi-br] URGENTE - Como retornar Campos Primário do DataSet
Percorra todos os campos do dataset e verifique, para cada campo, se a opção pfInKey está definida na propriedade ProviderFlags. Se estiver, é pq o campo faz parte da chave. Essa é a maneira verificando via dataset. Agora verificando via banco, vc tem que checar no SGBD que vc usa qual(is) é(são) a(s) tabela(s) do catálogo que armazena(m) essa informação pra vc consultar. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Thu, 10 Apr 2008 19:06:39 -0300 Subject: [delphi-br] URGENTE - Como retornar Campos Primário do DataSet Olá amigos Delphianos, Preciso enviar para minha tela de pesquisa os campos chaves e o nome da tabela de Datasource. Tentei o seguinte: procedure chamarLog(DS : Dataset); var Tabela : TTable; Campo: String; begin if (DS.State in [dsInsert, dsEdit) then begin Campo := DS.Fields[0].FieldName; //retornar o campo chave Tabela := (DS as TTable).TableName); //retornar o nome da tabela end; end; Só que dessa forma o o campo chave poderá ser mais de um e poderá estar em qq posição da tabela. Alguém poderia ajudar-me nesse problema ? Agradeço, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] _ Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o Messenger! É GRÁTIS! http://www.msn.com.br/emoticonpack
Re: [delphi-br] URGENTE - Como retornar Campos Primá rio do DataSet
vc quer saber quais campos são chave primária ? Use as tabelas de sistema do seu SGBD... Vinicius dos Santos Analista de Desenvolvimento Júnior MSI SOLUÇÕES Av. Dr. Altino Arantes, 131 Sala 145 - 146 Centro - Ourinhos/Sp - Brasil Fone/Fax: +55 (14) 3324-8181 www.msisolucoes.com.br - Original Message - From: Jorge Ericsson To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 10, 2008 7:06 PM Subject: [delphi-br] URGENTE - Como retornar Campos Primário do DataSet Olá amigos Delphianos, Preciso enviar para minha tela de pesquisa os campos chaves e o nome da tabela de Datasource. Tentei o seguinte: procedure chamarLog(DS : Dataset); var Tabela : TTable; Campo: String; begin if (DS.State in [dsInsert, dsEdit) then begin Campo := DS.Fields[0].FieldName; //retornar o campo chave Tabela := (DS as TTable).TableName); //retornar o nome da tabela end; end; Só que dessa forma o o campo chave poderá ser mais de um e poderá estar em qq posição da tabela. Alguém poderia ajudar-me nesse problema ? Agradeço, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 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]
Re: [delphi-br] Urgente - Tabelas com todos os sindicatos
Caro amigo Jorge, Este cadastro, nem mesmo o Ministério do Trabalho tem, infelizmente. Trabalho numa entidade sindical e há anos procuro algo do tipo. Só encontrei uma vez (cerca de 12 anos atrás) uma publicação impressa vinda do próprio ministério, mas já está desatualizada. Na Caixa Econômica Federal têm um cadastro devido às contribuições sindicais, mas não garante que a entidade está 100% legalizada com o Ministério do Trabalho. Grande abraço... Marcus Vinicius Scarpelli Informática FECESP - Original Message - From: Jorge Ericsson Sent: Thursday, January 31, 2008 7:25 PM Subject: [delphi-br] Urgente - Tabelas com todos os sindicatos Pessoal, alguém possui ou indicaria um lugar onde posso encontrar o cadastros de todos os sindicatos ? Problema: Eu estou desenvolvendo em meu sistema uma rotina de folha de pagamento e tem uma tabela de sindicatos então eu gostaria de popular essa tabela para facilitar a associação do funcionário ao sindicatos de sua área. Grato. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Tabelas com todos os sindicatos
Eu também não encontrei nada Marcus então eu estou procurando pelas siglas, acessando os sites e cadastrando na unha msmo. Valew ... Em 01/02/08, Marcus Vinicius Scarpelli [EMAIL PROTECTED] escreveu: Caro amigo Jorge, Este cadastro, nem mesmo o Ministério do Trabalho tem, infelizmente. Trabalho numa entidade sindical e há anos procuro algo do tipo. Só encontrei uma vez (cerca de 12 anos atrás) uma publicação impressa vinda do próprio ministério, mas já está desatualizada. Na Caixa Econômica Federal têm um cadastro devido às contribuições sindicais, mas não garante que a entidade está 100% legalizada com o Ministério do Trabalho. Grande abraço... Marcus Vinicius Scarpelli Informática FECESP - Original Message - From: Jorge Ericsson Sent: Thursday, January 31, 2008 7:25 PM Subject: [delphi-br] Urgente - Tabelas com todos os sindicatos Pessoal, alguém possui ou indicaria um lugar onde posso encontrar o cadastros de todos os sindicatos ? Problema: Eu estou desenvolvendo em meu sistema uma rotina de folha de pagamento e tem uma tabela de sindicatos então eu gostaria de popular essa tabela para facilitar a associação do funcionário ao sindicatos de sua área. Grato. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente!!!!!!!!! Itens da Nota - DBGRID
Boa Noite, acredito q isso possa estar acontecendo por vc não ter definido alguns pontos chaves, mas vamos rever eles agora. No cabeçalho vc está usando um um TDataSource ligado a um TIBQuery e os TEdits ou outros elemententos do cabeçalho ligados a essa DataSource, até aki tudo OK, se vc usar um DBNavigaitor ligado a esse Datasource_Cabecalho ele está trocando entre os cabeçalhos, correto? com nos itens tem que fazer o seguinte 1º no TIBQuery ou TIBDataSet vc tem a propiedade Datasource aqui vc deve coloca o DataSource do Cabeçalho. 2º no SQL vc deve ter um código tipo: SELECT CODIGO,DESCRICAO,COD_CABECALHO FROM ITN_NOTAFISCAL WHERE COD_CABECALHO=:CODIGO -- ESSE EH O CODIGO DO CABEÇALHO 3º agora eh sow vc ligar o TDatasouce_itens com um DBGrid + DBNavigaitor ativar as Query's Percebera que agora o seu Form tem 2 DBNav 1 ligado com o Datasource_cabecalho e outro ligado com Datasource_Itens. Att Rafael. Guilherme Alves [EMAIL PROTECTED] escreveu: Olá amigos, preciso de uma ajuda urgente. Estou desenvolvendo uma aplicação básica de cadastro de notas com seus determinados itens da nota. Quando eu abro o formulário já mostra o cabeçalho da nota com suas respectivas informações e logo abaixo no mesmo form tem um grid, que mostra os itens dessa nota. Não sei o que está acontecendo que eu abro o formulário ele mostra tanto o cabeçalho quanto os itens normal, mas quando eu clico no botão de navegação (próximo, anterior, primeiro e último) o grid (itens da nota) não estão acompanhando o cabeçalho da nota... No botão próximo por exemplo está assim: datamodule.sql4.Next; mostra_cabecalho; datamodule.sql5.next; mostra_itens; Em vez do mostra_itens mostrar os itens que é se refere ao cabeçalho da nota, o datamodule.sql5 está andando no grid, como se ele tivesse andando nos itens daquela nota, e não indo para o próximo registro. OBS: o mostra_itens é uma consulta sql que mostra os itens no grid conforme é o código do cabeçalho da nota ..sql.add('and'); sql.add('via.cod_via=:cod'); ParamByName('cod').Value:=edt_cod.text; Resumindo... Quando mostrar o cabeçalho da nota e seus respectivos itens, quero que cada vez que eu for utilizando os botões de navegação, o grid (os itens) acompanha o cabeçalho, e não ir de item a item. obrigado - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry
Bom dia! Vc poderia usar um arquivo XML que tivesse essas configurações. Substituiria um arquivo INI, de uma maneira um pouco mais elegante. Ou então gerar um arquivo com uma extensão aleatória (por exemplo .IP) que somente seu programa trabalhasse e nela gravaria as informações que vc precisa no seu aplicativo, como por exemplo o IP dinâmico gerado pela rede. Atenciosamente, Ricardo. Jorge Ericsson [EMAIL PROTECTED] escreveu: Olá amigos, Eu tenho um sistema instalado em um cliente a muito muito tempo que vinha funcionando corretamente, mas o administrador da empresa resolveu adotada uma politica de segurança devido a quantidade de vírus que esta infestando a rede. Uma dessas medidas foi a proibição da escrita na registry e retirando todos os usuários da rede como administrador da máquina. Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Espero ter sido claro no meu problema. Obs: Não gostaria de usar arquivo INI pois já tive sério problemas de exclusão de arquivos. Valew !!! -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] _ - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry
Olá pessoal, eu acho que o Eduardo matou a charada eu vou colocar no servidor um range 192.168.%.% que talvez resolva. Mas deixa eu explicar o pq de usar o ip completo das máquina na rede. Antes eu estava usando o nome da máquina no mysql e ao tentar uma conexão com ODBC eu recebia um retorno informando que a máquina tal não tinha permissão de acesso ao banco. Bom então depois de muito pesquisa eu resolvi colocar o IP da máquina na tabela USER e funcionou de cara, eu pensei se eu alterar o arquivo host acrescentar o IP do servidor (Ex.: 192.168.1.1) e um alias por exemplo Servidor não precisaria ficar precisando re-configurar acesso caso o servidor mudasse. Eu pensei em usar registry antes devido a mudança nesse cliente de range de IP um tempo esta 10.10.0.1 outra hora esta 192.168.1.1 e assim por diante, dessa forma eu pegaria o ip da máquina, verificaria se o mesmo estava cadastrado na tabela USER do mysql e se não adicionaria... será que entenderam o motivo... Mas creio que a minha pouco experiência com o MySql não me possibilitou pensar nessa hipotese. E agora sim não precisarei mais gravar nada da registry. Valew pessoal.. Em 24/01/08, Joao Morais [EMAIL PROTECTED] escreveu: Jorge Ericsson wrote: Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Não é todo o registro que fica bloqueado, as chaves de usuário são leitura e escrita. Mas o melhor mesmo é permitir que o banco receba conexão de toda sua rede local, tal qual foi recomendado. O que eu fiquei sem entender é em que gravar no registro vai te ajudar. -- Joao Morais -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry
Que bom Jorge que eu pude ajudar, sucesso ai com o mysql, eu uso ha mais de 3 anos e to muito satisfeito. Em 25/01/08, Jorge Ericsson [EMAIL PROTECTED] escreveu: Olá pessoal, eu acho que o Eduardo matou a charada eu vou colocar no servidor um range 192.168.%.% que talvez resolva. Mas deixa eu explicar o pq de usar o ip completo das máquina na rede. Antes eu estava usando o nome da máquina no mysql e ao tentar uma conexão com ODBC eu recebia um retorno informando que a máquina tal não tinha permissão de acesso ao banco. Bom então depois de muito pesquisa eu resolvi colocar o IP da máquina na tabela USER e funcionou de cara, eu pensei se eu alterar o arquivo host acrescentar o IP do servidor (Ex.: 192.168.1.1) e um alias por exemplo Servidor não precisaria ficar precisando re-configurar acesso caso o servidor mudasse. Eu pensei em usar registry antes devido a mudança nesse cliente de range de IP um tempo esta 10.10.0.1 outra hora esta 192.168.1.1 e assim por diante, dessa forma eu pegaria o ip da máquina, verificaria se o mesmo estava cadastrado na tabela USER do mysql e se não adicionaria... será que entenderam o motivo... Mas creio que a minha pouco experiência com o MySql não me possibilitou pensar nessa hipotese. E agora sim não precisarei mais gravar nada da registry. Valew pessoal.. Em 24/01/08, Joao Morais [EMAIL PROTECTED]post%40joaomorais.com.br escreveu: Jorge Ericsson wrote: Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Não é todo o registro que fica bloqueado, as chaves de usuário são leitura e escrita. Mas o melhor mesmo é permitir que o banco receba conexão de toda sua rede local, tal qual foi recomendado. O que eu fiquei sem entender é em que gravar no registro vai te ajudar. -- Joao Morais -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry
Vitor, no Mysql ao criar um usuário vc pode determinar uma faixa de IP que o servidor vai aceitar;;; tipo se vc definir no campo host o valor 192.168.%.% o mysql so vai deixar o cliente conectar caso o IP dele seja 192.168.X.X para permitir que qualquer IP conecte ao servidor basta colocar % no campo Host.. Em 24/01/08, Vitor Redes [EMAIL PROTECTED] escreveu: Não conheço MySQL tão bem assim, mas presumo que o IP do cliente não tenha nada a ver com a conexão estabelecida, se tivesse, nenhum site usaria, certo? É esse mesmo o problema? Os outros bancos de dados, com os quais já tive experiência, não dependiam do IP do cliente, pelo menos... Mas se o Registry está bloqueado, escreva o arquivo necessário em alguma pasta escondida... é um solução mais simples do que passar pelo bloqueio do windows. Vitor. _ De: 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, 24 de janeiro de 2008 14:39 Assunto: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry Olá amigos, Eu tenho um sistema instalado em um cliente a muito muito tempo que vinha funcionando corretamente, mas o administrador da empresa resolveu adotada uma politica de segurança devido a quantidade de vírus que esta infestando a rede. Uma dessas medidas foi a proibição da escrita na registry e retirando todos os usuários da rede como administrador da máquina. Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Espero ter sido claro no meu problema. Obs: Não gostaria de usar arquivo INI pois já tive sério problemas de exclusão de arquivos. Valew !!! -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsso http://www.jericsson.com.br n.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry
Jorge Ericsson wrote: Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Não é todo o registro que fica bloqueado, as chaves de usuário são leitura e escrita. Mas o melhor mesmo é permitir que o banco receba conexão de toda sua rede local, tal qual foi recomendado. O que eu fiquei sem entender é em que gravar no registro vai te ajudar. -- Joao Morais
Re: [delphi-br] URGENTE - Inserir uma imagem na planilha Excel
Valew amigos pelas dicas, mas não deu certo para o que eu quero. Estou utilizando um componente DevExpress para resolver o problema. Obrigado. Em 18/01/08, Adriano Santos (Yahoo) [EMAIL PROTECTED] escreveu: Dê uma olhada nesse artigo que publiquei e veja se ajuda. http://www.devmedia.com.br/articles/viewcomp.asp?comp=1298 Adriano Santos -- Editor Técnico Revista ClubeDelphi www.delphitodelphi.blogspot.com www.devmedia.com.br www.devmedia.com.br/clubedelphi/pagina.asp fabio giro respondeu: Peguei estas duas dicas na lista. try xlws.Shapes.AddPicture(logofname, LinkToFile, SaveWithDocument, 1, 1, 143, 32); except end; Onde: xlws é um objeto do tipo TExcelWorksheet logofname é uma variável que contem o path + o nome do jpg LinkToFile pode ser setado para 0 SaveWithDocument informa se a imagem deve ser salva no local de destino, sete ela para 1 os dois ultimos parametros, 143 e 32, correspondem as medidas que você quer que a imagem tenha na planilha ** www.devmedia.com.br/articles/viewcomp.asp?comp=1298hl= Espero ter ajudado. Jorge Ericsson [EMAIL PROTECTED] jericssonsup%40gmail.com mailto:jericssonsup%40gmail.com escreveu: Olá amigos delphianos, Primeiramente desejo a todos do grupo um 2008 repleto de desafios e mais conhecimentos. Que o desejo de todos se realizem neste ano que se inicia. Pessoal, através de OleContainer eu atribuir dados em uma planinha e formatei os campos do jeito que precisava, mas não consegui acrescentar na primeira linha da primeira coluna a logo do meu cliente. Alguém tem uma idéia de como faço isso automaticamente sem ter que ir na opção INSERIR IMAGEM ?: Obs.: Alguém utiliza o componente DevExpress cxSpreadBook ? []´s Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.516 / Virus Database: 269.19.6/1230 - Release Date: 17/01/2008 16:59 -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE - Inserir uma imagem na planilha Excel
Peguei estas duas dicas na lista. try xlws.Shapes.AddPicture(logofname, LinkToFile, SaveWithDocument, 1, 1, 143, 32); except end; Onde: xlws é um objeto do tipo TExcelWorksheet logofname é uma variável que contem o path + o nome do jpg LinkToFile pode ser setado para 0 SaveWithDocument informa se a imagem deve ser salva no local de destino, sete ela para 1 os dois ultimos parametros, 143 e 32, correspondem as medidas que você quer que a imagem tenha na planilha ** www.devmedia.com.br/articles/viewcomp.asp?comp=1298hl= Espero ter ajudado. Jorge Ericsson [EMAIL PROTECTED] escreveu: Olá amigos delphianos, Primeiramente desejo a todos do grupo um 2008 repleto de desafios e mais conhecimentos. Que o desejo de todos se realizem neste ano que se inicia. Pessoal, através de OleContainer eu atribuir dados em uma planinha e formatei os campos do jeito que precisava, mas não consegui acrescentar na primeira linha da primeira coluna a logo do meu cliente. Alguém tem uma idéia de como faço isso automaticamente sem ter que ir na opção INSERIR IMAGEM ?: Obs.: Alguém utiliza o componente DevExpress cxSpreadBook ? []´s Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE - Inserir uma imagem na planilha Excel
Dê uma olhada nesse artigo que publiquei e veja se ajuda. http://www.devmedia.com.br/articles/viewcomp.asp?comp=1298 Adriano Santos - Editor Técnico Revista ClubeDelphi www.delphitodelphi.blogspot.com www.devmedia.com.br www.devmedia.com.br/clubedelphi/pagina.asp fabio giro respondeu: Peguei estas duas dicas na lista. try xlws.Shapes.AddPicture(logofname, LinkToFile, SaveWithDocument, 1, 1, 143, 32); except end; Onde: xlws é um objeto do tipo TExcelWorksheet logofname é uma variável que contem o path + o nome do jpg LinkToFile pode ser setado para 0 SaveWithDocument informa se a imagem deve ser salva no local de destino, sete ela para 1 os dois ultimos parametros, 143 e 32, correspondem as medidas que você quer que a imagem tenha na planilha ** www.devmedia.com.br/articles/viewcomp.asp?comp=1298hl= Espero ter ajudado. Jorge Ericsson [EMAIL PROTECTED] mailto:jericssonsup%40gmail.com escreveu: Olá amigos delphianos, Primeiramente desejo a todos do grupo um 2008 repleto de desafios e mais conhecimentos. Que o desejo de todos se realizem neste ano que se inicia. Pessoal, através de OleContainer eu atribuir dados em uma planinha e formatei os campos do jeito que precisava, mas não consegui acrescentar na primeira linha da primeira coluna a logo do meu cliente. Alguém tem uma idéia de como faço isso automaticamente sem ter que ir na opção INSERIR IMAGEM ?: Obs.: Alguém utiliza o componente DevExpress cxSpreadBook ? []´s Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.516 / Virus Database: 269.19.6/1230 - Release Date: 17/01/2008 16:59
Re: [delphi-br] URGENTE- win98 esconde as telas....
Olá Rafael, me diga uma coisa.. compilando seu projeto no Delphi 7 ou 2006 ele roda no Win98? digo isso pq a tendência daqui pra frente é do Delphi so dar suporte do XP pra frente.. exemplo prático, o exe gerado no D2007 não roda no NT4, só são lembro qual service pack tinha o NT que testei. vou compilar um projeto aqui no 2007 e testar no Win98 pra ver.. depois de falo alguma coisa. ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... - Original Message - From: Rafael Jorge To: delphi-br Sent: Thursday, January 03, 2008 6:42 PM Subject: [delphi-br] URGENTE- win98 esconde as telas Já postei antes sobre isso mas não obtive resposta, então como meu problema ainda persiste e acho que alguém pode ter esse mesmo problema vou explicar de novo ele aqui.. (obs. Não to reclamando não, sei que aqui é uma lista ninguém tem dever de responder a ninguém não... não me entendam mal). Tenho um aplicativo desenvolvido em delphi 2007, ele roda normalmente em maquinas win xp, windows 2000 e assim vai. Mas em windows 98 ele roda.. so que escondendo as janelas.. tipo.. ao iniciar meu sistema ele cria o form principal e chama a tela de login (no evento onactive) pro usuário passar seus dados para poder logar no sistema. Se meu sistema rodar num windows 98 simplesmente o form principal aparece. E a tela de login não.. mas se vc digitar o login.. apertar enter e digitar a senha e apertar entre ele loga.. e como se o focu tivesse na tela de login e tudo o mais. Só que ela esta atraz do form principal.. Outra coisa. Tem telas que ficam cortadas no meio.. com barra de rolagem e tudo o mais. Aquém já passou por isso? Ou sabe o que eu tenho que fazer pra evitar esses erros? Porque tem um novo cliente e lá é uma rede só com windows 98. e ele não vai atualizar pra xp nem nada disso. Ou eu resolvo essa bronca ou infelizmente vou perde-lo.. Obrigado quem puder me ajudar.. t+ -- Rafael jorge alves (Analista/desenvolvedor) www.sistemafocus.com.br sistema focus de gestão comercial e serviços em informatica. -- [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente (Exibir Dia e Mês do Aniversariante no QuickReport)
Eu já fiz isso amigo, o problema esta na ordenação, pois ele ordena o data 01/01/2000 e não 01/11. Mas valew pela dica... Em 12/12/07, Alcistemas Informática [EMAIL PROTECTED] escreveu: Quer um conselho, deixa a data no field normal 01/11/2000 porém no mask do componente digite assim: DD/MM E só. - Original Message - From: Jorge Ericsson Sent: Wednesday, December 12, 2007 12:21 PM Subject: [delphi-br] Urgente (Exibir Dia e Mês do Aniversariante no QuickReport) Olá pessoal, Eu uso D7+ADO+MySql e preciso exibir no relatório apenas o DIA/MES do aniversariante e estou usando a instrução abaixo: SELECT nom_membro as Membro, dta_nascimento as Nascimento, CONCAT(extract(day from dta_nascimento), '/', extract(month from dta_nascimento)) as DiaMes, des_congregacao FROM TB_SGI_MEMBROS MEMBROS INNER JOIN TB_SGI_CONGREGACAO CONGREGACAO ON CONGREGACAO.COD_CONGREGACAO = MEMBROS.COD_CONGREGACAO WHERE MONTH(DTA_NASCIMENTO) = :prMes AND COD_SITUACAO IN (1,3,8) ORDER BY 4, 3 O problema é que esta gerando um código VARBYTES no campo e não o valor concatenado da data, se eu coloco o campo Nascimento os dados são exibidos corretamente. Alguém já passou por isso ? -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente (Exibir Dia e Mês do Aniversariante no QuickReport)
Problema Resolvido: Apenas coloquei um Componente TQRExpr e Atribui o valor da Query ao mesmo. Segue instrução adicionada ao ONPrint Procedure TForm.QRExpr1Print(sender: TObject; var Value: String); begin Value := ADOQueryTemplate.FieldbyName('Nascimento').AsString; if Value = Copy(DateToStr(Now),1,5) Then begin QRExpr1.Font.Style := [fsBold]; QRExpr1.Font.Color := clBlue; end else begin QRExpr1.Font.Style := []; QRExpr1.Font.Color := clBlack; end; end; Em 12/12/07, Jorge Ericsson [EMAIL PROTECTED] escreveu: Eu já fiz isso amigo, o problema esta na ordenação, pois ele ordena o data 01/01/2000 e não 01/11. Mas valew pela dica... Em 12/12/07, Alcistemas Informática [EMAIL PROTECTED] escreveu: Quer um conselho, deixa a data no field normal 01/11/2000 porém no mask do componente digite assim: DD/MM E só. - Original Message - From: Jorge Ericsson Sent: Wednesday, December 12, 2007 12:21 PM Subject: [delphi-br] Urgente (Exibir Dia e Mês do Aniversariante no QuickReport) Olá pessoal, Eu uso D7+ADO+MySql e preciso exibir no relatório apenas o DIA/MES do aniversariante e estou usando a instrução abaixo: SELECT nom_membro as Membro, dta_nascimento as Nascimento, CONCAT(extract(day from dta_nascimento), '/', extract(month from dta_nascimento)) as DiaMes, des_congregacao FROM TB_SGI_MEMBROS MEMBROS INNER JOIN TB_SGI_CONGREGACAO CONGREGACAO ON CONGREGACAO.COD_CONGREGACAO= MEMBROS.COD_CONGREGACAO WHERE MONTH(DTA_NASCIMENTO) = :prMes AND COD_SITUACAO IN (1,3,8) ORDER BY 4, 3 O problema é que esta gerando um código VARBYTES no campo e não o valor concatenado da data, se eu coloco o campo Nascimento os dados são exibidos corretamente. Alguém já passou por isso ? -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente (Exibir Dia e Mês do Anive rsariante no QuickReport)
quando for assim é so vc ir no field da data e configurar em displayformat = dd/mm ou query.fieldbyname('data').displayformat = 'dd/mm'; qualquer data em formato dd/mm/ é tranformado como vc quiser no display nesse caso dd/mm funciona , simples e limpo. - Original Message - From: Jorge Ericsson To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 13, 2007 12:26 AM Subject: Re: [delphi-br] Urgente (Exibir Dia e Mês do Aniversariante no QuickReport) Problema Resolvido: Apenas coloquei um Componente TQRExpr e Atribui o valor da Query ao mesmo. Segue instrução adicionada ao ONPrint Procedure TForm.QRExpr1Print(sender: TObject; var Value: String); begin Value := ADOQueryTemplate.FieldbyName('Nascimento').AsString; if Value = Copy(DateToStr(Now),1,5) Then begin QRExpr1.Font.Style := [fsBold]; QRExpr1.Font.Color := clBlue; end else begin QRExpr1.Font.Style := []; QRExpr1.Font.Color := clBlack; end; end; Em 12/12/07, Jorge Ericsson [EMAIL PROTECTED] escreveu: Eu já fiz isso amigo, o problema esta na ordenação, pois ele ordena o data 01/01/2000 e não 01/11. Mas valew pela dica... Em 12/12/07, Alcistemas Informática [EMAIL PROTECTED] escreveu: Quer um conselho, deixa a data no field normal 01/11/2000 porém no mask do componente digite assim: DD/MM E só. - Original Message - From: Jorge Ericsson Sent: Wednesday, December 12, 2007 12:21 PM Subject: [delphi-br] Urgente (Exibir Dia e Mês do Aniversariante no QuickReport) Olá pessoal, Eu uso D7+ADO+MySql e preciso exibir no relatório apenas o DIA/MES do aniversariante e estou usando a instrução abaixo: SELECT nom_membro as Membro, dta_nascimento as Nascimento, CONCAT(extract(day from dta_nascimento), '/', extract(month from dta_nascimento)) as DiaMes, des_congregacao FROM TB_SGI_MEMBROS MEMBROS INNER JOIN TB_SGI_CONGREGACAO CONGREGACAO ON CONGREGACAO.COD_CONGREGACAO= MEMBROS.COD_CONGREGACAO WHERE MONTH(DTA_NASCIMENTO) = :prMes AND COD_SITUACAO IN (1,3,8) ORDER BY 4, 3 O problema é que esta gerando um código VARBYTES no campo e não o valor concatenado da data, se eu coloco o campo Nascimento os dados são exibidos corretamente. Alguém já passou por isso ? -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente (Exibir Dia e Mês do Anive rsariante no QuickReport)
Quer um conselho, deixa a data no field normal 01/11/2000 porém no mask do componente digite assim: DD/MM E só. - Original Message - From: Jorge Ericsson Sent: Wednesday, December 12, 2007 12:21 PM Subject: [delphi-br] Urgente (Exibir Dia e Mês do Aniversariante no QuickReport) Olá pessoal, Eu uso D7+ADO+MySql e preciso exibir no relatório apenas o DIA/MES do aniversariante e estou usando a instrução abaixo: SELECT nom_membro as Membro, dta_nascimento as Nascimento, CONCAT(extract(day from dta_nascimento), '/', extract(month from dta_nascimento)) as DiaMes, des_congregacao FROM TB_SGI_MEMBROS MEMBROS INNER JOIN TB_SGI_CONGREGACAO CONGREGACAO ON CONGREGACAO.COD_CONGREGACAO = MEMBROS.COD_CONGREGACAO WHERE MONTH(DTA_NASCIMENTO) = :prMes AND COD_SITUACAO IN (1,3,8) ORDER BY 4, 3 O problema é que esta gerando um código VARBYTES no campo e não o valor concatenado da data, se eu coloco o campo Nascimento os dados são exibidos corretamente. Alguém já passou por isso ? -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE : Salvando dados no BD
ProgCOD deve ser a chave primária da tabela, não? Por isso, vc não pode criar duas linhas com o mesmo valor na chave primária. Se o campo for autoinc, então, vc não precisa dar um valor pra ele na hora de incluir. Em 06/12/07, william.designer [EMAIL PROTECTED] escreveu: tenho os seguintes componentes em um Data module, um SQLConection, um SQLDataSet{SQLcadLista}, um DataSetProvider{DSPcadLista} e um ClientDataset{CDScadLista} Criei um formulario a partir dos campos do meu ClienteDataset... e Criei um botão para Salvar e coloque o seguinte código no Onclick do botão.. if DNNConexao.CDScadListaProgCOD.IsNull then begin DNNConexao.CDScadListaProgCOD.Value := 0; DNNConexao.CDScadListaProg.ApplyUpdates(-1); DNNConexao.CDScadListaProg.Open; DNNConexao.CDScadListaProg.Close; end else DNNConexao.CDScadListaProg.ApplyUpdates(-1); Fechar:=true; Close; O primeiro registro ele salva normal...mas quando tenho cadastrar um novo registro ele dá a seguinte mensagem... Project NomeProjeto.exe raised exception class EDBClient with message 'KeyViolation.'. Process stop. Use step or run to continue. -- Timeo hominem unius libri Cogito ergo sum - Carpe diem []s Guionardo Furlan http://guionardo.blogspot.com
Re: [delphi-br] URGENTE POR FAVOR
Na Paleta ADDITIONAL, tem um componente chamado ApplicationEvents. Vc pode adicioná-lo no seu projeto, no DATA MODULE, por exemplo. Dê uma pesquisada sobre o mesmo. Vc vai encontra mta coisa pela net inclusive a forma de tratar cada erro. Vc vai adicionar os tratamentos no evento dele chamado onException. Att, Sérgio On Sun, 25 Nov 2007 16:59:40 -0200, Diego Seleguim wrote Preciso de tratar alguns erros no meu sistema e um deles é... violação de chave estrangeira. Isso acontece quando vou tentar deletar algo... e está sendo usado..! (claro) Alguem poderia me ajudar!? Abraçosss Em 17/11/07, Jumper [EMAIL PROTECTED] escreveu: Voce não precisa citar o nome da tabela novamente no join tente assim: select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, x.nome as destinatario from rota_viagem r inner join empresa e on (r.id_remet = e.idemp) and (r.id_destino = x.idemp) [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] Sérgio Tecnologia da Informação - TI Tel.: 16 3810 1060 e-mail: [EMAIL PROTECTED] Usina Alta Mogiana S/A - Acucar e Alcool [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE POR FAVOR
Eita..olha só quem eu encontro aqui.. rs rs... Blza parceiro??? Então.. já fiz isso e declarei as mensagensde acordo com os erros.. mas tá passando direto... vou dar uma olhada com calma depois...e posto se ñ conseguir sucesso! Vlw... Em 26/11/07, Sérgio [EMAIL PROTECTED] escreveu: Na Paleta ADDITIONAL, tem um componente chamado ApplicationEvents. Vc pode adicioná-lo no seu projeto, no DATA MODULE, por exemplo. Dê uma pesquisada sobre o mesmo. Vc vai encontra mta coisa pela net inclusive a forma de tratar cada erro. Vc vai adicionar os tratamentos no evento dele chamado onException. Att, Sérgio On Sun, 25 Nov 2007 16:59:40 -0200, Diego Seleguim wrote Preciso de tratar alguns erros no meu sistema e um deles é... violação de chave estrangeira. Isso acontece quando vou tentar deletar algo... e está sendo usado..! (claro) Alguem poderia me ajudar!? Abraçosss Em 17/11/07, Jumper [EMAIL PROTECTED] joaopaulo.jpo%40gmail.com escreveu: Voce não precisa citar o nome da tabela novamente no join tente assim: select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, x.nome as destinatario from rota_viagem r inner join empresa e on (r.id_remet = e.idemp) and (r.id_destino = x.idemp) [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] Sérgio Tecnologia da Informação - TI Tel.: 16 3810 1060 e-mail: [EMAIL PROTECTED] sergio%40altamogiana.com.br Usina Alta Mogiana S/A - Acucar e Alcool [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] URGENTE POR FAVOR
Preciso de tratar alguns erros no meu sistema e um deles é... violação de chave estrangeira. Isso acontece quando vou tentar deletar algo... e está sendo usado..! (claro) Alguem poderia me ajudar!? Abraçosss Em 17/11/07, Jumper [EMAIL PROTECTED] escreveu: Voce não precisa citar o nome da tabela novamente no join tente assim: select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, x.nome as destinatario from rota_viagem r inner join empresa e on (r.id_remet = e.idemp) and (r.id_destino = x.idemp) [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] URGENTE POR FAVOR
Voce não precisa citar o nome da tabela novamente no join tente assim: select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, x.nome as destinatario from rota_viagem r inner join empresa e on (r.id_remet = e.idemp) and (r.id_destino = x.idemp) [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE POR FAVOR
Tente assim : === Aqui a parte alterada = select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, x.nome as destinatario from rota_viagem r join empresa e on r.id_remet = e.idemp join empresa x on r.id_destino = x.idemp [ ]´s Moacir = Diego Seleguim escreveu: CREATE TABLE EMPRESA ( IDEMP INTEGER NOT NULL, IDLOGRADOURO INTEGER, NOME VARCHAR(50), CGC VARCHAR(14), INSCEST VARCHAR(14), TELEFONE VARCHAR(10), FAX VARCHAR(10), EMAIL VARCHAR(50), CONTATO VARCHAR(50), DT_CADASTRO DATE, CELULAR VARCHAR(10), NUM_END INTEGER ); CREATE TABLE ROTA_VIAGEM ( IDROTA NUMERIC(9,0) NOT NULL, ID_REMETINTEGER NOT NULL, ID_DESTINO INTEGER NOT NULL, FRETE_TON NUMERIC(9,2), ICMSNUMERIC(9,2), DISTANCIA INTEGER, PEDAGIO NUMERIC(9,2) /**/ / Primary Keys / /**/ ALTER TABLE EMPRESA ADD CONSTRAINT EMPRESA PRIMARY KEY (IDEMP); ALTER TABLE ROTA_VIAGEM ADD CONSTRAINT ROTA_VIAGEM PRIMARY KEY (IDROTA); /**/ / Foreign Keys / /**/ ALTER TABLE EMPRESA ADD FOREIGN KEY (IDLOGRADOURO) REFERENCES LOGRADOURO (IDLOGRADOURO); ALTER TABLE ROTA_VIAGEM ADD FOREIGN KEY (ID_REMET) REFERENCES EMPRESA (IDEMP); ALTER TABLE ROTA_VIAGEM ADD FOREIGN KEY (ID_DESTINO) REFERENCES EMPRESA (IDEMP); Função da query: Retornar os nomes das empresas remetente e destinatario. select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, e.nome as destinatario from rota_viagem r join empresa e on r.id_remet = e.idemp join empresa e on r.id_destino = e.idemp Erro: alias E conflicts with an alias in the same statemente. Alguem pode me ajudar com esse erro? [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE POR FAVOR
Obrigado Moacir, era exatamente isso que eu precisava Abraços Em 15/11/07, Moacir - GMail [EMAIL PROTECTED] escreveu: Tente assim : === Aqui a parte alterada = select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, x.nome as destinatario from rota_viagem r join empresa e on r.id_remet = e.idemp join empresa x on r.id_destino = x.idemp [ ]´s Moacir = Diego Seleguim escreveu: CREATE TABLE EMPRESA ( IDEMP INTEGER NOT NULL, IDLOGRADOURO INTEGER, NOME VARCHAR(50), CGC VARCHAR(14), INSCEST VARCHAR(14), TELEFONE VARCHAR(10), FAX VARCHAR(10), EMAIL VARCHAR(50), CONTATO VARCHAR(50), DT_CADASTRO DATE, CELULAR VARCHAR(10), NUM_END INTEGER ); CREATE TABLE ROTA_VIAGEM ( IDROTA NUMERIC(9,0) NOT NULL, ID_REMET INTEGER NOT NULL, ID_DESTINO INTEGER NOT NULL, FRETE_TON NUMERIC(9,2), ICMS NUMERIC(9,2), DISTANCIA INTEGER, PEDAGIO NUMERIC(9,2) /**/ / Primary Keys / /**/ ALTER TABLE EMPRESA ADD CONSTRAINT EMPRESA PRIMARY KEY (IDEMP); ALTER TABLE ROTA_VIAGEM ADD CONSTRAINT ROTA_VIAGEM PRIMARY KEY (IDROTA); /**/ / Foreign Keys / /**/ ALTER TABLE EMPRESA ADD FOREIGN KEY (IDLOGRADOURO) REFERENCES LOGRADOURO (IDLOGRADOURO); ALTER TABLE ROTA_VIAGEM ADD FOREIGN KEY (ID_REMET) REFERENCES EMPRESA (IDEMP); ALTER TABLE ROTA_VIAGEM ADD FOREIGN KEY (ID_DESTINO) REFERENCES EMPRESA (IDEMP); Função da query: Retornar os nomes das empresas remetente e destinatario. select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, e.nome as destinatario from rota_viagem r join empresa e on r.id_remet = e.idemp join empresa e on r.id_destino = e.idemp Erro: alias E conflicts with an alias in the same statemente. Alguem pode me ajudar com esse erro? [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] Urgente - Componente para Comunicação Remota Free com fontes
http://www.radix.net/~bziegler/Delphi/Source.html Sds. To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Tue, 30 Oct 2007 00:18:10 -0200Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Pode ser, mais todos as buscas que fiz em outros sites que apontão para estelink não funcionou e tbém entrei no própio site do Ben e nada, apenas estelink dá problema. Provavelmente é um link quebrado ou removeram os arquivos.Se vc tiver o remotecontrol.zip ou consegui baixar vc me envia em PVT ?Preciso estudar o código dele.Obrigado.Em 30/10/07, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Mestre, vc deve ter alguma restrição de acesso a esse link, pq tanto na faculdade como em casa eu consigo acessar normalmente este link. Sds. To: [EMAIL PROTECTED] delphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] jericssonsup%40gmail.comDate: Mon, 29 Oct 2007 22:59:08 -0200Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Este link não existe mais, estão todos quebrados qdo se refere ao BenZieglers.Mas vou continua meu garimpo... heheheEm 29/10/07, Rubem Nascimento da Rocha [EMAIL PROTECTED]djpardalrocha%40hotmail.com escreveu: Minha outra sugestão: http://www.radix.net/~bziegler/Delphi/http://www.radix.net/%7Ebziegler/Delphi/ http://www.radix.net/%7Ebziegler/Delphi/ (Procure pelo projeto Remote Control) Sds. To: [EMAIL PROTECTED]delphi-br%40yahoogrupos.com.brFromdelphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] o2tecnologia%40ajato.com.brDateo2tecnologia%40ajato.com.brDate: Mon, 29 Oct 2007 20:03:13 -0300Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80.JorgeEricsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live Search Maps! http://www.livemaps.com.br/index.aspx?tr=true [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. PinheiroAnalista/Projetista de SistemasEricsson Sistemas e Soluçõ eshttp://www.jericsson.com.br61 9227.4785 / 3965.2992 / 3039.1768Brasília- DF[As partes desta mensagem que não continham texto foram removidas] __ Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live Search Maps! http://www.livemaps.com.br/index.aspx?tr=true [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. PinheiroAnalista/Projetista de SistemasEricsson Sistemas e Soluçõeshttp://www.jericsson.com.br61 9227.4785 / 3965.2992 / 3039.1768Brasília - DF[As partes desta mensagem que não continham texto foram removidas] _ Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live Search Maps! http://www.livemaps.com.br/index.aspx?tr=true [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes
Tem uma empresa de SP, não sei se vc é de SP, que desenvolve o WinConnection, bom na verdade a empresa é do Rio. Que não sei bem como eles personalizaram o ultravnc, e é interessante, vc não instala nada. Eles te mandam um arquivo, e quando precisa de suporte vc abre este arquivo e eles entram na sua maquina, depois que terminar vc fecha o executavel, nada no registro, nada na memoria. E eles tem um programa para cada atendente do suporte. Se tivesse como descobrir o q eles fizeram. Em 29/10/07, Jorge Ericsson [EMAIL PROTECTED] escreveu: Nunca usei, mas eu preciso mesmo é implementar um cliente no meu programa para depois usar o LogMeIn de qq lugar. Meu problema é desenvolver um Client funcional. Mas valeu pela diga e me parecer ser muito bom mesmo. Em 29/10/07, O2 Tecnologia (aJato) [EMAIL PROTECTED]o2tecnologia%40ajato.com.br escreveu: Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80. Jorge Ericsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- Visite: Fundamental: www.amados.com.br Dúvidas:http://nilsoftware.blogspot.com/ Obrigatório: www.saopaulofc.com.br [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes
Provavelmente eles usaram isso: http://sc.uvnc.com/cgi-bin/upload3.pl O UltraVNC personalizado, voce cria um EXE, informa quais serão os usuários, configura nas máquinas dos atendentes, e pronto... envia para o cliente, o cara clica no nome e o atendente recebe uma mensagem, e entra na maquina do cara... so precisa de um ip fixo na empresa sua, e nao no cliente, eu por exemplo uso o no-ip por causa de usar o Velox. []s Em 30/10/07, Nilson Chagas [EMAIL PROTECTED] escreveu: Tem uma empresa de SP, não sei se vc é de SP, que desenvolve o WinConnection, bom na verdade a empresa é do Rio. Que não sei bem como eles personalizaram o ultravnc, e é interessante, vc não instala nada. Eles te mandam um arquivo, e quando precisa de suporte vc abre este arquivo e eles entram na sua maquina, depois que terminar vc fecha o executavel, nada no registro, nada na memoria. E eles tem um programa para cada atendente do suporte. Se tivesse como descobrir o q eles fizeram. Em 29/10/07, Jorge Ericsson [EMAIL PROTECTED]jericssonsup%40gmail.com escreveu: Nunca usei, mas eu preciso mesmo é implementar um cliente no meu programa para depois usar o LogMeIn de qq lugar. Meu problema é desenvolver um Client funcional. Mas valeu pela diga e me parecer ser muito bom mesmo. Em 29/10/07, O2 Tecnologia (aJato) [EMAIL PROTECTED]o2tecnologia%40ajato.com.br o2tecnologia%40ajato.com.br escreveu: Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80. Jorge Ericsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- Visite: Fundamental: www.amados.com.br Dúvidas:http://nilsoftware.blogspot.com/ Obrigatório: www.saopaulofc.com.br [As partes desta mensagem que não continham texto foram removidas] -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Componente para Comunica ção Remota Free com fontes
Eles devem usar o UltraVNC Single Click... http://www.uvnc.com/addons/singleclick.html Com ele você pode personalizar tudo. Aqui também usamos. E nada impede que você o abra pelo seu sistema. Abraço _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Maringá - Paraná www.n2solutions.com.br - Original Message - From: Nilson Chagas To: delphi-br@yahoogrupos.com.br Sent: Tuesday, October 30, 2007 7:28 AM Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Tem uma empresa de SP, não sei se vc é de SP, que desenvolve o WinConnection, bom na verdade a empresa é do Rio. Que não sei bem como eles personalizaram o ultravnc, e é interessante, vc não instala nada. Eles te mandam um arquivo, e quando precisa de suporte vc abre este arquivo e eles entram na sua maquina, depois que terminar vc fecha o executavel, nada no registro, nada na memoria. E eles tem um programa para cada atendente do suporte. Se tivesse como descobrir o q eles fizeram. Em 29/10/07, Jorge Ericsson [EMAIL PROTECTED] escreveu: Nunca usei, mas eu preciso mesmo é implementar um cliente no meu programa para depois usar o LogMeIn de qq lugar. Meu problema é desenvolver um Client funcional. Mas valeu pela diga e me parecer ser muito bom mesmo. Em 29/10/07, O2 Tecnologia (aJato) [EMAIL PROTECTED]o2tecnologia%40ajato.com.br escreveu: Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80. Jorge Ericsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- Visite: Fundamental: www.amados.com.br Dúvidas:http://nilsoftware.blogspot.com/ Obrigatório: www.saopaulofc.com.br [As partes desta mensagem que não continham texto foram removidas] __ NOD32 2626 (20071030) Information __ This message was checked by NOD32 antivirus system. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Componente para Comunica ção Remota Free com fontes
aqui eu acesso pelo speedy da telefonica e da pagina ñao encontrada tb... acho que é algum pau da telefonica se alguem conseguir puxar e me enviar em pvt.. agradeço - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Monday, October 29, 2007 11:37 PM Subject: RE: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes http://www.radix.net/~bziegler/Delphi/Source.html Sds. To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Tue, 30 Oct 2007 00:18:10 -0200Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Pode ser, mais todos as buscas que fiz em outros sites que apontão para estelink não funcionou e tbém entrei no própio site do Ben e nada, apenas estelink dá problema. Provavelmente é um link quebrado ou removeram os arquivos.Se vc tiver o remotecontrol.zip ou consegui baixar vc me envia em PVT ?Preciso estudar o código dele.Obrigado.Em 30/10/07, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Mestre, vc deve ter alguma restrição de acesso a esse link, pq tanto na faculdade como em casa eu consigo acessar normalmente este link. Sds. To: [EMAIL PROTECTED] delphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] jericssonsup%40gmail.comDate: Mon, 29 Oct 2007 22:59:08 -0200Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Este link não existe mais, estão todos quebrados qdo se refere ao BenZieglers.Mas vou continua meu garimpo... heheheEm 29/10/07, Rubem Nascimento da Rocha [EMAIL PROTECTED]djpardalrocha%40hotmail.com escreveu: Minha outra sugestão: http://www.radix.net/~bziegler/Delphi/http://www.radix.net/%7Ebziegler/Delphi/ http://www.radix.net/%7Ebziegler/Delphi/ (Procure pelo projeto Remote Control) Sds. To: [EMAIL PROTECTED]delphi-br%40yahoogrupos.com.brFromdelphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] o2tecnologia%40ajato.com.brDateo2tecnologia%40ajato.com.brDate: Mon, 29 Oct 2007 20:03:13 -0300Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80.JorgeEricsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live Search Maps! http://www.livemaps.com.br/index.aspx?tr=true [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. PinheiroAnalista/Projetista de SistemasEricsson Sistemas e Soluçõ eshttp://www.jericsson.com.br61 9227.4785 / 3965.2992 / 3039.1768Brasília- DF[As partes desta mensagem que não continham texto foram removidas] __ Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live Search Maps! http://www.livemaps.com.br/index.aspx?tr=true [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. PinheiroAnalista/Projetista de SistemasEricsson Sistemas e Soluçõeshttp://www.jericsson.com.br61 9227.4785 / 3965.2992 / 3039.1768Brasília - DF[As partes desta mensagem que não continham texto foram removidas] __ Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live Search Maps! http://www.livemaps.com.br/index.aspx?tr=true [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] Urgente - Componente para Comunica ção Remota Free com fontes
O VNC pode ser configurado para rodar na porta 80 também Luiz Escobar - Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/ASSEMBLY/MySQL/xBase SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse10.2), Windows 2K/XP - Original Message - From: O2 Tecnologia (aJato) To: delphi-br@yahoogrupos.com.br Sent: Monday, October 29, 2007 9:03 PM Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80. Jorge Ericsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Component e para Comunicação Remota Free com fontes
Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80. Jorge Ericsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes
Minha outra sugestão: http://www.radix.net/~bziegler/Delphi/ (Procure pelo projeto Remote Control) Sds. To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Mon, 29 Oct 2007 20:03:13 -0300Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80.Jorge Ericsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] _ Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live Search Maps! http://www.livemaps.com.br/index.aspx?tr=true [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes
Mestre, vc deve ter alguma restrição de acesso a esse link, pq tanto na faculdade como em casa eu consigo acessar normalmente este link. Sds. To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Mon, 29 Oct 2007 22:59:08 -0200Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Este link não existe mais, estão todos quebrados qdo se refere ao BenZieglers.Mas vou continua meu garimpo... heheheEm 29/10/07, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Minha outra sugestão: http://www.radix.net/~bziegler/Delphi/http://www.radix.net/%7Ebziegler/Delphi/ (Procure pelo projeto Remote Control) Sds. To: [EMAIL PROTECTED] delphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] o2tecnologia%40ajato.com.brDate: Mon, 29 Oct 2007 20:03:13 -0300Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80.JorgeEricsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live Search Maps! http://www.livemaps.com.br/index.aspx?tr=true [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. PinheiroAnalista/Projetista de SistemasEricsson Sistemas e Soluçõeshttp://www.jericsson.com.br61 9227.4785 / 3965.2992 / 3039.1768Brasília - DF[As partes desta mensagem que não continham texto foram removidas] _ Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live Search Maps! http://www.livemaps.com.br/index.aspx?tr=true [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes
Pode ser, mais todos as buscas que fiz em outros sites que apontão para este link não funcionou e tbém entrei no própio site do Ben e nada, apenas este link dá problema. Provavelmente é um link quebrado ou removeram os arquivos. Se vc tiver o remotecontrol.zip ou consegui baixar vc me envia em PVT ? Preciso estudar o código dele. Obrigado. Em 30/10/07, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Mestre, vc deve ter alguma restrição de acesso a esse link, pq tanto na faculdade como em casa eu consigo acessar normalmente este link. Sds. To: [EMAIL PROTECTED] delphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] jericssonsup%40gmail.comDate: Mon, 29 Oct 2007 22:59:08 -0200Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Este link não existe mais, estão todos quebrados qdo se refere ao BenZieglers.Mas vou continua meu garimpo... heheheEm 29/10/07, Rubem Nascimento da Rocha [EMAIL PROTECTED]djpardalrocha%40hotmail.com escreveu: Minha outra sugestão: http://www.radix.net/~bziegler/Delphi/http://www.radix.net/%7Ebziegler/Delphi/ http://www.radix.net/%7Ebziegler/Delphi/ (Procure pelo projeto Remote Control) Sds. To: [EMAIL PROTECTED]delphi-br%40yahoogrupos.com.brFromdelphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] o2tecnologia%40ajato.com.brDateo2tecnologia%40ajato.com.brDate: Mon, 29 Oct 2007 20:03:13 -0300Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80.JorgeEricsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live Search Maps! http://www.livemaps.com.br/index.aspx?tr=true [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. PinheiroAnalista/Projetista de SistemasEricsson Sistemas e Soluçõ eshttp://www.jericsson.com.br61 9227.4785 / 3965.2992 / 3039.1768Brasília- DF[As partes desta mensagem que não continham texto foram removidas] __ Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live Search Maps! http://www.livemaps.com.br/index.aspx?tr=true [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Digitalização de documentos
Oi Jorge, Que erro deu? Qual o modelo do scannner? Qdo escrevi o artigo testei na minha Lexmark 1185 Multifuncional. Abs -- Adriano Santos - Desenvolvedor Delphi desde 1998. Professor e programador PHP. Bacharel em Comunicação Social pela Universidade Cruzeiro do Sul, SP. Editor Técnico, Colunista e Comissão Editorial da revista ClubeDelphi. http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: O Exemplo do Adriano é muito bom, cai como uma luva no que preciso, mas não esta funcionando bem, apresenta um erro ao capturar a imagem do scanner. Funcionou com vc Luciano ?? Em 25/10/07, Luciano Angelini [EMAIL PROTECTED] mailto:luciano.angelini%40uol.com.br escreveu: Bom dia Jorge Acesse o Site da www.devmedia.com.br tem uma edição da revista ClubeDelphi n° 83 que mostra passo a passo como fazer Espero ter ajudado Luciano Angelini Prefeitura de Lupionópolis-Pr Jorge Ericsson escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.15.11/1094 - Release Date: 26/10/2007 08:50
Re: [delphi-br] Urgente - Digitalização de documentos
Boa Tarde Jorge Eu ainda não usei ... eu apenas me lembrei que tinha lido na Revista ClubeDelphi Luciano Angelini Prefeitura de Lupionópolis-Pr Jorge Ericsson escreveu: O Exemplo do Adriano é muito bom, cai como uma luva no que preciso, mas não esta funcionando bem, apresenta um erro ao capturar a imagem do scanner. Funcionou com vc Luciano ?? Em 25/10/07, Luciano Angelini [EMAIL PROTECTED] mailto:luciano.angelini%40uol.com.br escreveu: Bom dia Jorge Acesse o Site da www.devmedia.com.br tem uma edição da revista ClubeDelphi n° 83 que mostra passo a passo como fazer Espero ter ajudado Luciano Angelini Prefeitura de Lupionópolis-Pr Jorge Ericsson escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Digitalização de documentos
Entendi. A única coisa que me deixou um pouco desconte com este componente foi o fato de dar um erro meio horrível quando vc cancela o escaneamento. Precisa fazer um tratamento de erro pra não aparecer mensaens feias demais ao usuário, se não assusta. Qq coisa tenta com TWain que deve funcionar tb. Esse componente que menciono no artigo é um pouco antigo. -- Adriano Santos - Desenvolvedor Delphi desde 1998. Professor e programador PHP. Bacharel em Comunicação Social pela Universidade Cruzeiro do Sul, SP. Editor Técnico, Colunista e Comissão Editorial da revista ClubeDelphi. http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: Oi Adriano eu uso o ColorPage-Slim 1200 da Genius e o erro apresentado é: Error from state: 4. Error type: 1. Eu acho que deve ser alhum problema com a unit TAcquireImage pq testei com outros exemplos que usam esta unit e apresentou o mesmo erro. Vou tentar com o Scanner da minha multifuncional e verificar se acontece o mesmo. Em 26/10/07, Adriano Santos [EMAIL PROTECTED] mailto:artes%40doiscliques.com escreveu: Oi Jorge, Que erro deu? Qual o modelo do scannner? Qdo escrevi o artigo testei na minha Lexmark 1185 Multifuncional. Abs -- Adriano Santos -- Desenvolvedor Delphi desde 1998. Professor e programador PHP. Bacharel em Comunicação Social pela Universidade Cruzeiro do Sul, SP. Editor Técnico, Colunista e Comissão Editorial da revista ClubeDelphi. http://www.delphitodelphi.blogspot.com http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: O Exemplo do Adriano é muito bom, cai como uma luva no que preciso, mas não esta funcionando bem, apresenta um erro ao capturar a imagem do scanner. Funcionou com vc Luciano ?? Em 25/10/07, Luciano Angelini [EMAIL PROTECTED] mailto:luciano.angelini%40uol.com.brluciano.angelini%40uol.com.br mailto:luciano.angelini%40uol.com.br escreveu: Bom dia Jorge Acesse o Site da www.devmedia.com.br tem uma edição da revista ClubeDelphi n° 83 que mostra passo a passo como fazer Espero ter ajudado Luciano Angelini Prefeitura de Lupionópolis-Pr Jorge Ericsson escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.15.11/1094 - Release Date: 26/10/2007 08:50 -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.15.11/1094 - Release Date: 26/10/2007 08:50 -- *Adriano Santos*
Re: [delphi-br] Urgente - Digitalização de documentos
Exatamente o que eu imaginava Adriano, funcionou com outro scanner (multifuncional da hp). Eu já tratei os erros malucos que apareceram, mas gostaria de desenvolver algum que servisse para qq scanner. Vou tentar trabalhar com o Twain agora... Obrigado pelo retorno. Em 26/10/07, Adriano Santos [EMAIL PROTECTED] escreveu: Entendi. A única coisa que me deixou um pouco desconte com este componente foi o fato de dar um erro meio horrível quando vc cancela o escaneamento. Precisa fazer um tratamento de erro pra não aparecer mensaens feias demais ao usuário, se não assusta. Qq coisa tenta com TWain que deve funcionar tb. Esse componente que menciono no artigo é um pouco antigo. -- Adriano Santos -- Desenvolvedor Delphi desde 1998. Professor e programador PHP. Bacharel em Comunicação Social pela Universidade Cruzeiro do Sul, SP. Editor Técnico, Colunista e Comissão Editorial da revista ClubeDelphi. http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: Oi Adriano eu uso o ColorPage-Slim 1200 da Genius e o erro apresentado é: Error from state: 4. Error type: 1. Eu acho que deve ser alhum problema com a unit TAcquireImage pq testei com outros exemplos que usam esta unit e apresentou o mesmo erro. Vou tentar com o Scanner da minha multifuncional e verificar se acontece o mesmo. Em 26/10/07, Adriano Santos [EMAIL PROTECTED]artes%40doiscliques.com mailto:artes%40doiscliques.com escreveu: Oi Jorge, Que erro deu? Qual o modelo do scannner? Qdo escrevi o artigo testei na minha Lexmark 1185 Multifuncional. Abs -- Adriano Santos -- Desenvolvedor Delphi desde 1998. Professor e programador PHP. Bacharel em Comunicação Social pela Universidade Cruzeiro do Sul, SP. Editor Técnico, Colunista e Comissão Editorial da revista ClubeDelphi. http://www.delphitodelphi.blogspot.com http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: O Exemplo do Adriano é muito bom, cai como uma luva no que preciso, mas não esta funcionando bem, apresenta um erro ao capturar a imagem do scanner. Funcionou com vc Luciano ?? Em 25/10/07, Luciano Angelini [EMAIL PROTECTED]luciano.angelini%40uol.com.br mailto:luciano.angelini%40uol.com.brluciano.angelini%40uol.com.br mailto:luciano.angelini%40uol.com.br escreveu: Bom dia Jorge Acesse o Site da www.devmedia.com.br tem uma edição da revista ClubeDelphi n° 83 que mostra passo a passo como fazer Espero ter ajudado Luciano Angelini Prefeitura de Lupionópolis-Pr Jorge Ericsson escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.15.11/1094 - Release Date: 26/10/2007 08:50 -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta
Re: [delphi-br] Urgente - Digitalização de documentos
Por nada meu velho, sempre as ordens. -- Adriano Santos - Desenvolvedor Delphi desde 1998. Professor e programador PHP. Bacharel em Comunicação Social pela Universidade Cruzeiro do Sul, SP. Editor Técnico, Colunista e Comissão Editorial da revista ClubeDelphi. http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: Exatamente o que eu imaginava Adriano, funcionou com outro scanner (multifuncional da hp). Eu já tratei os erros malucos que apareceram, mas gostaria de desenvolver algum que servisse para qq scanner. Vou tentar trabalhar com o Twain agora... Obrigado pelo retorno. Em 26/10/07, Adriano Santos [EMAIL PROTECTED] mailto:artes%40doiscliques.com escreveu: Entendi. A única coisa que me deixou um pouco desconte com este componente foi o fato de dar um erro meio horrível quando vc cancela o escaneamento. Precisa fazer um tratamento de erro pra não aparecer mensaens feias demais ao usuário, se não assusta. Qq coisa tenta com TWain que deve funcionar tb. Esse componente que menciono no artigo é um pouco antigo. -- Adriano Santos -- Desenvolvedor Delphi desde 1998. Professor e programador PHP. Bacharel em Comunicação Social pela Universidade Cruzeiro do Sul, SP. Editor Técnico, Colunista e Comissão Editorial da revista ClubeDelphi. http://www.delphitodelphi.blogspot.com http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: Oi Adriano eu uso o ColorPage-Slim 1200 da Genius e o erro apresentado é: Error from state: 4. Error type: 1. Eu acho que deve ser alhum problema com a unit TAcquireImage pq testei com outros exemplos que usam esta unit e apresentou o mesmo erro. Vou tentar com o Scanner da minha multifuncional e verificar se acontece o mesmo. Em 26/10/07, Adriano Santos [EMAIL PROTECTED] mailto:artes%40doiscliques.comartes%40doiscliques.com mailto:artes%40doiscliques.com escreveu: Oi Jorge, Que erro deu? Qual o modelo do scannner? Qdo escrevi o artigo testei na minha Lexmark 1185 Multifuncional. Abs -- Adriano Santos -- Desenvolvedor Delphi desde 1998. Professor e programador PHP. Bacharel em Comunicação Social pela Universidade Cruzeiro do Sul, SP. Editor Técnico, Colunista e Comissão Editorial da revista ClubeDelphi. http://www.delphitodelphi.blogspot.com http://www.delphitodelphi.blogspot.com http://www.delphitodelphi.blogspot.com http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br http://www.devmedia.com.br http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp http://www.devmedia.com.br/clubedelphi/pagina.asp http://www.devmedia.com.br/clubedelphi/pagina.asp http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: O Exemplo do Adriano é muito bom, cai como uma luva no que preciso, mas não esta funcionando bem, apresenta um erro ao capturar a imagem do scanner. Funcionou com vc Luciano ?? Em 25/10/07, Luciano Angelini [EMAIL PROTECTED] mailto:luciano.angelini%40uol.com.brluciano.angelini%40uol.com.br mailto:luciano.angelini%40uol.com.brluciano.angelini%40uol.com.br mailto:luciano.angelini%40uol.com.br escreveu: Bom dia Jorge Acesse o Site da www.devmedia.com.br tem uma edição da revista ClubeDelphi n° 83 que mostra passo a passo como fazer Espero ter ajudado Luciano Angelini Prefeitura de Lupionópolis-Pr Jorge Ericsson escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br
Re: [delphi-br] Urgente - Digitalização de documentos
Fiz uma busca rápida no torry.net por TWAIN e achei este componente: * MultiTWAIN v0.5 (free com fontes) porém o componente foi desenvolvido em 1998 e é compatível até o D4. Se lhe servir está no link [ http://www.torry.net/vcl/mmedia/twain/multwain.zip ] No mesmo site, pesquisando dicas de Scanner achei esta dica: * http://www.swissdelphicenter.ch/torry/showcode.php?id=971 Talvez seja um bom ponto de partida. Sds, Ricardo. Jorge Ericsson [EMAIL PROTECTED] escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Digitalização de documentos
Oi Jorge Ericsson, Se precisar de um help, tem um artigo meu publicado na revista ClubeDelphi 83. Tem exemplo no meu blog e na página da Devmedia. Blog: http://www.delphitodelphi.blogspot.com Devmedia http://www.devmedia.com.br/resumo/download.asp?site=3 Abs -- Adriano Santos - Desenvolvedor Delphi desde 1998. Professor e programador PHP. Bacharel em Comunicação Social pela Universidade Cruzeiro do Sul, SP. Editor Técnico, Colunista e Comissão Editorial da revista ClubeDelphi. http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp Ricardo César Cardoso respondeu: Fiz uma busca rápida no torry.net por TWAIN e achei este componente: * MultiTWAIN v0.5 (free com fontes) porém o componente foi desenvolvido em 1998 e é compatível até o D4. Se lhe servir está no link [ http://www.torry.net/vcl/mmedia/twain/multwain.zip http://www.torry.net/vcl/mmedia/twain/multwain.zip ] No mesmo site, pesquisando dicas de Scanner achei esta dica: * http://www.swissdelphicenter.ch/torry/showcode.php?id=971 http://www.swissdelphicenter.ch/torry/showcode.php?id=971 Talvez seja um bom ponto de partida. Sds, Ricardo. Jorge Ericsson [EMAIL PROTECTED] mailto:jericssonsup%40gmail.com escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.15.9/1090 - Release Date: 24/10/2007 08:48
Re: [delphi-br] Urgente - Digitalização de documentos
Bom dia Jorge Acesse o Site da www.devmedia.com.br tem uma edição da revista ClubeDelphi n° 83 que mostra passo a passo como fazer Espero ter ajudado Luciano Angelini Prefeitura de Lupionópolis-Pr Jorge Ericsson escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE - Dúvidas sobre como informa r as atualizações do sistema
Olá Jorge. Hoje eu faço isso de uma forma bem simples. Usando ftp. Eu crio um arquivo zip com a última versão e disponibilizo no ftp. Quando o cliente loga no sistema eu verifico a versão que está guardada em uma tabela de configurações e comparo com a versão do arquivo no ftp. Eu uso como versão a data do arquivo zip. Dessa maneira sempre que tem um arquivo mais recente eu sei que houve atualização e informo ao usuário que existe, perguntando se quer atualizar no momento. Se sim, baixo usando ftp e descompacto na pasta do sistema. No próximo login, abro um form com um histórico das atualizações disponíveis em cada versão, inclusive a que acabou de baixar, com opção de não abrir mais, ou continuar abrindo toda vez que iniciar o sistema. Porém não faço verificação se o usuário é administrador do sistema, mas é possível fazer, pois a atualização só acontece depois do login. Também ainda não uso threads pra isso, mas vou adicionar isso ao sistema com certeza, pois o que fica ruim nesse caso é que sempre na entrada do sistema ele fica alguns segundos parados esperando a resposta do site ftp. Quanto as threads é bem simples de implementar. Tenho alguns exemplos bem fáceis de entender. Caso queira me avise que envio. Abraço _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Maringá - Paraná www.n2solutions.com.br - Original Message - From: Jorge Ericsson Sent: Wednesday, October 17, 2007 2:25 AM Subject: [delphi-br] URGENTE - Dúvidas sobre como informar as atualizações do sistema Olá Amigos, Estou com o problema de definir uma forma eficiente de meus usuários visualizarem as novas atualizações do meu sistema. Bom eu criei um arquivo no meu servidor onde informo as novas atualizações do meu sistema e preciso que o meu usuário visualize essas informações assim que o mesmo loga no sistema. Mas não estou encontrando a forma correta de informar essas atualizações. Preciso testar se o usuário é o administrador, preciso checar as suas conexões com a internet e tbém busca as novas atualizações depois de um certo tempo de logado no sistema. Como fazer de forma rápida e eficiente este processo. Alguém usa Threeds ? Valew, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] __ NOD32 2596 (20071017) Information __ This message was checked by NOD32 antivirus system. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]