Re: [delphi-br] URGENTE: UserControl Decriptar senha para teste

2010-08-16 Por tôpico Jorge Ericsson
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 escreveu:

>
>
> 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]
> >
> >
> >
> > 
> >
>
>  
>



-- 
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: UserControl Decriptar senha para teste

2010-08-16 Por tôpico Murilo Cunha
  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: Problema com Exceçõe s

2010-04-29 Por tôpico Fabiano Almeida
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: Problema com Exceções

2010-04-29 Por tôpico Dirlei Dionisio
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ções

2010-04-29 Por tôpico Dirlei
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: Erro ao atualizar dados em uma tabela.

2010-02-05 Por tôpico Jorge Ericsson
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)
escreveu:

>
>
> 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]
>
>  
>


[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: Erro ao atualizar dados em uma tabela.

2010-02-05 Por tôpico Walter Chagas (Bol)
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: Identificador de Chamadas

2009-12-15 Por tôpico Jorge Ericsson
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 

> 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 
>
> >
> >
> > 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]
> >
> >
> >
>
>
> [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: Identificador de Chamadas

2009-12-15 Por tôpico Gabriel R B
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 

>
>
> 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]
>
>  
>


[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

2009-12-15 Por tôpico Andrei Luís
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 

> 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

2009-12-15 Por tôpico EmbarcaDelphi
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 
> 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

2009-06-15 Por tôpico Evaldo
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: Criando um Data Mining

2009-06-15 Por tôpico Evaldo
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

2009-06-15 Por tôpico Fernando Nati
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 

>
>
> 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: Desabilitar ShortCut

2009-05-19 Por tôpico Wainer
So executa a opcao do menu se ele estiver visible
if menuitem.visible then
   form1.showmodal

Wainer
16--6697
16-9101-1757

Wisa soft
16-3721-7187

o[|||]o   
  ▓-o---▓
CJ3A - 49




Re: [delphi-br] Urgente: Como detectar o modelo da p laca mãe pelo Delphi

2009-03-24 Por tôpico Jorge Ericsson
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 

>   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  [mailto:
> delphi-br@yahoogrupos.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

2009-01-21 Por tôpico Jorge Ericsson
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

2009-01-20 Por tôpico Eduardo Silva dos Santos
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 

>   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 
> 
> >
>
> > 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: Gravar e Ler imagem no banco MYSQL

2009-01-20 Por tôpico Jorge Ericsson
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 

>   Jorge, você deve fazer da mesma forma que fazia com o ADO. Qual
> exatamente o
> seu problema?
>
>
> 2009/1/20 Jorge Ericsson 
> >
>
> > 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 
> > 
> 
> > >
> >
> >
> > > Jorge, qual o componente de acesso você ta usando?
> > >
> > > o campo deve ser do tipo LongBlob ok.
> > >
> > > 2009/1/20 Jorge Ericsson 
> 
> > 
> > > >
> > >
> > >
> > > > 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   40gmail.com>  > 40gmail.com>  > > 40gmail.com>
> > > > jericsson...@hotmail.com   40hotmail.com>  > 40hotmail.com>  > > 40hotmail.com>
> > > > skype:jericsson
> > > > Brasília - DF
> > > >
> > > >
> > >
> > > --
> > > ...
> > > Eduardo Silva dos Santos
> > > DRD SISTEMAS
> > > (27) 3218-4201
> > > (27) 8842-9489
> > > MSN: eduardo@gmail.com   40gmail.com>  > 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   40gmail.com>
> > jericsson...@hotmail.com   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]
>
>  
>



-- 
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

2009-01-20 Por tôpico Eduardo Silva dos Santos
Jorge, você deve fazer da mesma forma que fazia com o ADO. Qual exatamente o
seu problema?

2009/1/20 Jorge Ericsson 

>   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 
> 
> >
>
>
> > Jorge, qual o componente de acesso você ta usando?
> >
> > o campo deve ser do tipo LongBlob ok.
> >
> > 2009/1/20 Jorge Ericsson 
> 
> > >
> >
> >
> > > 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   40gmail.com>  > 40gmail.com>
> > > jericsson...@hotmail.com   40hotmail.com>  > 40hotmail.com>
> > > skype:jericsson
> > > Brasília - DF
> > >
> > >
> >
> > --
> > ...
> > Eduardo Silva dos Santos
> > DRD SISTEMAS
> > (27) 3218-4201
> > (27) 8842-9489
> > MSN: eduardo@gmail.com   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]
>
>  
>



-- 
...
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

2009-01-20 Por tôpico Jorge Ericsson
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 

>   Jorge, qual o componente de acesso você ta usando?
>
> o campo deve ser do tipo LongBlob ok.
>
> 2009/1/20 Jorge Ericsson 
> >
>
>
> > 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   40gmail.com>
> > jericsson...@hotmail.com   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]
>
>  
>



-- 
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

2009-01-20 Por tôpico Eduardo Silva dos Santos
Jorge, qual o componente de acesso você ta usando?

o campo deve ser do tipo LongBlob ok.

2009/1/20 Jorge Ericsson 

>   Olá amigos delphianos, migrei um aplicação ACCESS para MySql e estou com
> problemas em gravar e recuperar a foto do membro.
>
> Alguém poderia me indicar uma rotina para realizar essa tarefa sem que ter
> que popular a Query ou a Table com os campos ?? Exemplo.
>
> Tabelas.*TabDirigenteImg_Foto_Dirigente*
> .SaveToStream(Tabelas.BlobMemoryStream);
> Tabelas.BlobMemoryStream.Position := 0;
> Tabelas.JPEGImage.LoadFromStream(Tabelas.BlobMemoryStream);
> FotoDirigente.Picture.Assign(Tabelas.JPEGImage);
>
> Gostaria de uma solução inteligente para gravar e carregar tanto BMP, JPEG,
> JPG e etc se possível..
>
> Valew Amigos..
>
> Jorge Ericsson S. Pinheiro
> Ericsson Sistemas e Soluções
> (61) 3797-4785 / 3244-8689 / 9227 4785
> http://www.jericsson.com.br
> jericsson...@gmail.com 
> jericsson...@hotmail.com 
> skype:jericsson
> Brasília - DF
>
>


-- 
...
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

2008-12-31 Por tôpico Fortes Marcelo

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  escreveu:

De: Jorge Ericsson 
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.

2008-12-12 Por tôpico Jorge Ericsson
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 

>   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 
> >
>
>
> > 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   40gmail.com>
> > jericsson...@hotmail.com   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]
>
>  
>



-- 
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.

2008-12-11 Por tôpico Eduardo Silva dos Santos
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 

>   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 
> jericsson...@hotmail.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

2008-11-18 Por tôpico Joao Morais
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: Controlar Inatividade do sistema

2008-11-18 Por tôpico Paulo Coutinho
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] iw do delphi 2009 nao funciona com o iis 6.0

2008-10-22 Por tôpico Rafael Jorge
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 [mailto:
> delphi-br@yahoogrupos.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] iw do delphi 2009 nao funciona com o iis 6.0

2008-10-22 Por tôpico Bruno Lichot
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] Intraweb delphi 2009 cheio de ?????

2008-10-11 Por tôpico

> 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
Tools&Comps - 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

2008-09-30 Por tôpico Jorge Ericsson
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]
>> ';
>> 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] ';
>> 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 
>> 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: Autenticação no GMAIL para envio de e-mail

2008-09-30 Por tôpico Onjahyr - GMAIL
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] 
> ';
> 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] ';
> 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 
> 61 9227.4785 / 3967.6172
> Brasília - DF
>
>  


Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows

2008-08-14 Por tôpico Daniel Bastos
Na unit shlobj, vc tem a função ShGetSpecialFolderPath. Uma API do windows
justamente para esta função.

usando:
var
  Pasta : array[0..MAX_PATH] of Char;
begin
  SHGetSpecialFolderPath(0, Pasta, CSIDL_XXX, False);
  SHowMessage(Pasta);
end;

Onde CSIDL_XXX é uma constânte.
A Lista das constântes pode ser obtida aqui
http://msdn.microsoft.com/en-us/library/bb762494.aspx

Não sei se o Delphi tem todas as constântes da MS na unit, mas só usei
algumas. E as que eu usei, tinha. heheh

Abs.
Daniel A. Bastos

Não sei se o delphi tem todas as constântes do windows
2008/8/14 Jorge Ericsson <[EMAIL PROTECTED]>

>   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  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]
> 
> > >
> >
> > > 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 
> > >  40yahoogrupos.com.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]
> 
> > 
> >
> > > >
> > >
> > > > 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 ;.
> &

Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows

2008-08-14 Por tôpico Jorge Ericsson
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 
> 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  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]
> 
>
> > >
> >
> > > 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 - Criação de Subpasta no m enu INICIAR do Windows

2008-08-14 Por tôpico Vinicius Santos - MSI
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 
  > 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]
  >
  > 
  >

  -- 
  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

2008-08-14 Por tôpico Jorge Ericsson
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 
> 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]
>
>  
>



-- 
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

2008-08-14 Por tôpico Vinicius Santos - MSI
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

2008-08-14 Por tôpico Jorge Ericsson
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

2008-08-14 Por tôpico Vinicius Santos - MSI
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 - Como bloquear um texto no TMemo ?

2008-08-11 Por tôpico Yahoo
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."

2008-07-16 Por tôpico Leandro
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

2008-06-13 Por tôpico Daniel Bastos
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

2008-06-12 Por tôpico Rubem Nascimento da Rocha

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

2008-06-04 Por tôpico Jorge Ericsson
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 
> 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
>  
>



-- 
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

2008-06-03 Por tôpico Rubem Nascimento da Rocha


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: Join entre 4 tabelas em XML

2008-06-03 Por tôpico Jorge Ericsson
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
> 
>



-- 
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

2008-06-03 Por tôpico Rubem Nascimento da Rocha

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

2008-06-03 Por tôpico Jorge Ericsson
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
>
> __
> 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

2008-06-03 Por tôpico Rubem Nascimento da Rocha

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 - Commit depois que inserir 1mil registros

2008-05-23 Por tôpico Jorge Ericsson
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 
> >> 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

2008-05-21 Por tôpico Joao Morais
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 
>> 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

2008-05-21 Por tôpico berdam
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 
> 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 - CVomo reiniciar um aplicativo.

2008-05-19 Por tôpico Jorge Ericsson
Eu resolvi o problema usando a função ExecuteFileWait.

Valew

2008/5/19 Edson Marco <[EMAIL PROTECTED]>:

>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]
>
>  
>



-- 
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 - CVomo reiniciar um aplicativo.

2008-05-19 Por tôpico Edson Marco
 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: Como localizar o diretório do IIS e sua versão.

2008-05-15 Por tôpico Jorge Ericsson
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] >
> 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.

2008-05-14 Por tôpico Ricardo César Cardoso
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

2008-05-04 Por tôpico

> upper(co_agrupado) like upper("E668") or

upper(co_agrupado) like upper("%E668%") or

Jackson Gomes
Tools&Comps - 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

2008-04-14 Por tôpico Jorge Ericsson
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] >
> Para: delphi-br@yahoogrupos.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]
>
>
> 
>
> 
>
> 
>
>
> Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
> armazenamento!
> http://br.mail.yahoo.com/
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
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 retornar Campos Primário do DataSet

2008-04-11 Por tôpico Rubem Nascimento da Rocha


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

2008-04-11 Por tôpico Vinicius Santos - MSI
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

2008-02-01 Por tôpico Jorge Ericsson
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 - Tabelas com todos os sindicatos

2008-02-01 Por tôpico Marcus Vinicius Scarpelli
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!!!!!!!!! Itens da Nota - DBGRID

2008-01-29 Por tôpico Rafael Da Silva
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

2008-01-25 Por tôpico Eduardo Silva dos Santos
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]>
> 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

2008-01-25 Por tôpico Ricardo César Cardoso
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

2008-01-25 Por tôpico Jorge Ericsson
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

2008-01-24 Por tôpico Joao Morais
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!!! Problemas com bloqueio de escrita na registry

2008-01-24 Por tôpico Eduardo Silva dos Santos
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  [mailto:
> delphi-br@yahoogrupos.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  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 - Inserir uma imagem na planilha Excel

2008-01-21 Por tôpico Jorge Ericsson
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=1298&hl=
> >
> > 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]
> >
> >
> > --
> >
> > 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

2008-01-18 Por tôpico Adriano Santos (Yahoo)
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=1298&hl=
>
> 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]
>
> 
> 
>
> 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 - Inserir uma imagem na planilha Excel

2008-01-18 Por tôpico fabio giro
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=1298&hl=
   
  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- win98 esconde as telas....

2008-01-06 Por tôpico Eduardo Silva dos Santos
Raphael, fiz um pequeno projeto para tentar reproduzir o seu problema, mas 
rodou direitinho no Win98, to te enviando em anexo pra vc fazer o teste.  teste 
com o exe que compilei e depois compile no seu Delphi para ver.

obs: mudei o exe para teste.ex1 senão o gmail nao envia nem por Decreto do lula.

espero que de certo.

ate++

...
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- win98 esconde as telas....

2008-01-04 Por tôpico Eduardo Silva dos Santos
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 Anive rsariante no QuickReport)

2007-12-13 Por tôpico Apoio
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 Aniversariante no QuickReport)

2007-12-13 Por tôpico Jorge Ericsson
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 Aniversariante no QuickReport)

2007-12-13 Por tôpico Jorge Ericsson
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 Anive rsariante no QuickReport)

2007-12-12 Por tôpico Alcistemas Informática
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

2007-12-06 Por tôpico Guionardo Furlan
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

2007-11-26 Por tôpico Diego Seleguim
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] >
> 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]
>
>  
>


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] URGENTE POR FAVOR

2007-11-26 Por tôpico Sérgio
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

2007-11-25 Por tôpico Diego Seleguim
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

2007-11-16 Por tôpico Jumper
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

2007-11-15 Por tôpico Diego Seleguim
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 POR FAVOR

2007-11-15 Por tôpico Moacir - GMail
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 - Componente para Comunica ção Remota Free com fontes

2007-10-30 Por tôpico escobar
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 - Componente para Comunica ção Remota Free com fontes

2007-10-30 Por tôpico Valdemir - Yahoo
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] 
:> [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/>>
 <http://www.radix.net/%7Ebziegler/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.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

2007-10-30 Por tôpico Claudiney Cogo
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]>
  > 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

2007-10-30 Por tôpico Fellipe Henrique
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]>
> 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]
> >
>
> > 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 
> > > > 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

2007-10-30 Por tôpico Nilson Chagas
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]>
> 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 
> > > 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

2007-10-30 Por tôpico Rubem Nascimento da Rocha

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] 
:> [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/>>
 <http://www.radix.net/%7Ebziegler/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.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

2007-10-29 Por tôpico Jorge Ericsson
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] :
> [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/>
> <http://www.radix.net/%7Ebziegler/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.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 - Componente para Comunicação Remota Free com fontes

2007-10-29 Por tôpico Rubem Nascimento da Rocha

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] 
:> [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.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

2007-10-29 Por tôpico Rubem Nascimento da Rocha

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 - Component e para Comunicação Remota Free com fontes

2007-10-29 Por tôpico O2 Tecnologia (aJato)

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 
> 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 - Digitalização de documentos

2007-10-26 Por tôpico Adriano Santos
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] 
> > 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] 
> 
> > > > 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.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] 
> 
> > > 
> >
> > > > > > 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 t

Re: [delphi-br] Urgente - Digitalização de documentos

2007-10-26 Por tôpico Jorge Ericsson
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]
> > > 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.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]
> > 
>
> > > > > 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 
> > >
> > > > 
> > >>
> > > > > > 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 
> > >
> > > > 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

2007-10-26 Por tôpico Adriano Santos
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] 
> > 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.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] 
> 
> > > > 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  
> >
> > >  
> >>
> > > > > 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  
> >
> > > 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 
> 61 9227.4785 / 3965.2992 / 3039.1768
> Brasília - DF
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 
> 
>
> No viru

Re: [delphi-br] Urgente - Digitalização de documentos

2007-10-26 Por tôpico Luciano Angelini
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] 
> > 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  
> >
> > > 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 
> 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

2007-10-26 Por tôpico Adriano Santos
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] 
> > 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  
> >
> > > 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 
> 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

2007-10-25 Por tôpico Luciano Angelini
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 
> 61 9227.4785 / 3965.2992 / 3039.1768
> Brasília - DF
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  


  1   2   >