Re: [delphi-br] Erro ao abrir TADOQuery

2010-08-27 Por tôpico Diego Garcia
Amigo, mande o código de como vc está atribuindo o comando para o AdoQuery
dinamico, só para ter uma noção...

*Diego Garcia*
Twitter: http://www.twitter.com/drgarcia1986


Em 27 de agosto de 2010 10:44, Jhosef Marks jho...@gmail.com escreveu:



 Tenho uma query com um comando SQL que funciona normalmente.

 Mas quando eu tento passar o mesmo SQL para uma outra query criada
 dinamicamente e tento dar um OPEN. Aparece o seguinte erro:

 *espaço insuficiente de armazenamento para concluir a operação*

 Alguém já passou por isso?

 Att,

 *Jhosef Marks de Carvalho*
 *Blog: **http://www.jhosefmarks.com.br* http://www.jhosefmarks.com.br*
 Jesus está voltando

 *
 *E se o meu povo, que se chama pelo meu nome, se humilhar, e orar, e
 buscar
 a minha face e se converter dos seus maus caminhos, então eu ouvirei dos
 céus, e perdoarei os seus pecados, e sararei a sua terra. (2 Cr 7:14) *

 [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] Erro BDE

2010-08-16 Por tôpico Diego Garcia
por curiosidade, qual é o tipo de dados e o tipo de componente você esta
usando nesses campos ?

*Diego Garcia*



Em 16 de agosto de 2010 10:47, Evaldo evaldoave...@yahoo.com.br escreveu:




 Tenho uma aplicação que ainda usa BDE. Em uma determinada tela ocorre um
 problema que é intermitente:

 O usuário cria um registro e o salva. Depois quando o usuário volta a esta
 tela
 e altera o registro e salva em três campos os dados são perdidos.

 Como disse anteriormente, o problema é intermitente, Já conferi o object
 updade
 e não tem nada de anormal, no código, também não tem referencias para os
 campos
 que estão desaparecendo.

 Alguém já passou por algo parecido e pode me dar uma luz?

 ou pelo menos como eu posso monitorar este problema.

 Obrigado!

 [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] Erro BDE

2010-08-16 Por tôpico Evaldo


Componente é o TQuery da paleta BDE conectado a um TOBjectUpdate com instruções 
de Insert, updade, delete

Os tipos de dados são dois campos TStringField correspondente a um VARCHAR2(60 
BYTE) e um TBCDField correspondente a um NUMBER(5,2)

Delphi é o 2007

BD Oracle 







por curiosidade, qual é o tipo de dados e o tipo de componente você esta
usando nesses campos ?

*Diego Garcia*



Em 16 de agosto de 2010 10:47, Evaldo evaldoave...@yahoo.com.br escreveu:




 Tenho uma aplicação que ainda usa BDE. Em uma determinada tela ocorre um
 problema que é intermitente:

 O usuário cria um registro e o salva. Depois quando o usuário volta a esta
 tela
 e altera o registro e salva em três campos os dados são perdidos.

 Como disse anteriormente, o problema é intermitente, Já conferi o object
 updade
 e não tem nada de anormal, no código, também não tem referencias para os
 campos
 que estão desaparecendo.

 Alguém já passou por algo parecido e pode me dar uma luz?

 ou pelo menos como eu posso monitorar este problema.

 Obrigado!

 [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 



  

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



Re: [delphi-br] Erro BDE

2010-08-16 Por tôpico Fabiano Almeida
Se entendi apenas 3 campos do cadastro que não são atualizados... se for 
isso verifique:

-comandos de update, se estão inclusos esses campos e são valorados 
corretamente
-se não ha alguma regra de validação desses campos, seja no programa ou 
no próprio bd


Ja me aconteceu ter de excluir os componentes que fazem acesso a tabela 
e recriá-los, e magicamente voltou a funcionar...

Sds,

Fabiano de Almeida

Em 16/08/2010 13:44, Evaldo escreveu:



 Componente é o TQuery da paleta BDE conectado a um TOBjectUpdate com 
 instruções
 de Insert, updade, delete

 Os tipos de dados são dois campos TStringField correspondente a um 
 VARCHAR2(60
 BYTE) e um TBCDField correspondente a um NUMBER(5,2)

 Delphi é o 2007

 BD Oracle

 

 por curiosidade, qual é o tipo de dados e o tipo de componente você esta
 usando nesses campos ?

 *Diego Garcia*

 Em 16 de agosto de 2010 10:47, Evaldo evaldoave...@yahoo.com.br 
 mailto:evaldoavelar%40yahoo.com.br escreveu:

 
 
 
  Tenho uma aplicação que ainda usa BDE. Em uma determinada tela ocorre um
  problema que é intermitente:
 
  O usuário cria um registro e o salva. Depois quando o usuário volta 
 a esta
  tela
  e altera o registro e salva em três campos os dados são perdidos.
 
  Como disse anteriormente, o problema é intermitente, Já conferi o object
  updade
  e não tem nada de anormal, no código, também não tem referencias para os
  campos
  que estão desaparecendo.
 
  Alguém já passou por algo parecido e pode me dar uma luz?
 
  ou pelo menos como eu posso monitorar este problema.
 
  Obrigado!
 
  [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 

 [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] Erro com Fortes Report 3.24 B14 + Delphi 7, Imprime direto sem Dialog Box, o que fazer

2010-06-30 Por tôpico Leonardo Quinino
Acho que isso é da nova versáo, eu tbm estranhei isso, ele faz algo parecido
que temos no word quando clica no icone da impressora, manda tudo para a
impressora default.

Se vc quiser, fazer o dialogo, tem que clikar no icone com uma
engranagem.

Agora se pode ser mudado isso, eé  outra situação.

Mas não tem erro algum.

Foi simplesmente, um jeito diferente de fazer a mesma coisa.



2010/6/29 Allan GabrielAM alla...@americamoveiseletro.com.br



 Pessoal,
 estou usado Delphi 7 com fortes 3.24 B14, ao clicar no botão está
 imprimindo direto ao invés abrira caixa de dialogo pra selecionar a
 impressora e configurações, como qual página imprimir dentre outras, o que
 posso fazer pra resolver isso ?

 Atenciosamente,
 Rafael.


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

 




-- 
Leonardo Quinino


[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] Erro CoInitialize não inicializado usando com Thread, como solucionar?

2010-06-16 Por tôpico Fellipe Henrique
Obrigado amigo


Em 16 de junho de 2010 09:09, André Moraes - Gmail
andrefmor...@gmail.comescreveu:



 Talvez este link te ajude
 http://acbr.sourceforge.net/mantis/view.php?id=530

 André F. Moraes

 De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto:
 delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em
 nome de Fellipe Henrique
 Enviada em: quarta-feira, 16 de junho de 2010 08:58
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Assunto: [delphi-br] Erro CoInitialize não inicializado usando com
 Thread,
 como solucionar?


 Bom dia amigos,

 Utilizo o XMLDocument, do próprio delphi, porém gostaria de passar o
 processamento para uma Thread, para liberar mais o usuário, pois bem,
 funciona tudo, menos o que diz respeito ao XMLDocument, pois dá o seguinte
 erro:
 CoInitialize não inicializado, se eu tiro da thread funciona.. porém eu não
 inicializo nada disso em local algum, deveria? Se sim, onde?

 Att.

 --
 _
 T.·.F.·.A.·.
 Fellipe Henrique
 http://blogs.digitumsoft.com.br/fellipeh
 --

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

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

  




-- 
_
T.·.F.·.A.·.
Fellipe Henrique
http://blogs.digitumsoft.com.br/fellipeh
---


[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] Erro regular procedure and method po inter, alguém pode me ajudar?

2010-06-06 Por tôpico Joao Morais
2010/6/4 Suélio Santos sue...@focusautomacao.com.br:
 Bom dia galera, estou com um probleminha ao tentar criar um metodo que
 ordene uma lista, já pesquisei no google mais as respostas só me
 deixaram mais confuso.
 vamos ao problema, em uma classe que fiz declarei na propriedade private
 o método function  analizaNumero(item1, item2: pointer): integer; esse
 metodo analisa se um numero é ,  ou = ao outro,
 tenho uma variável lista: TObjectList; ai queria chamar o método
 lista.sort(analizarNumero), mais ai da esse erro Incompatible types:
 'regular procedure and method pointer'.

Quando você declara uma procedure dentro de uma classe, ela passa a
ser um método (method pointer da mensagem) e o que o Sort espera é uma
procedure regular. Declare a procedure fora do escopo da classe.

Joao Morais


Re: [delphi-br] Erro regular procedure and method po inter, alguém pode me ajudar?

2010-06-04 Por tôpico Fabricio Colombo
O método analizaNumero não pode fazer parte da classe, deixe ele abaixo da
seção implementation que ele não vai estar acessível fora da unit.

Em 4 de junho de 2010 08:54, Suélio Santos
sue...@focusautomacao.com.brescreveu:



 Bom dia galera, estou com um probleminha ao tentar criar um metodo que
 ordene uma lista, já pesquisei no google mais as respostas só me
 deixaram mais confuso.
 vamos ao problema, em uma classe que fiz declarei na propriedade private
 o método function analizaNumero(item1, item2: pointer): integer; esse
 metodo analisa se um numero é ,  ou = ao outro,
 tenho uma variável lista: TObjectList; ai queria chamar o método
 lista.sort(analizarNumero), mais ai da esse erro Incompatible types:
 'regular procedure and method pointer'.

 Alguém poderia me dar uma ajuda?
 --
 Suélio Santos
  



[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] ERRO: Zeos online

2010-05-28 Por tôpico Eduardo Silva dos Santos
Ta olha olhada ai porque acho que foi coincidência.. pois o cachedUpdates
teoricamente nao muda nada na conexão..

me faz um favor... me manda um printscreen das propriedades do
TZConnection..

manda pra eduardo@gmail.com

valew

Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...


Em 27 de maio de 2010 20:35, Hudson BHTE hudson_tor...@yahoo.com.brescreveu:



 Ok Eduardo deu certinho!!!

 Valeu mesmo, muito obrigado!!!

 Tbm fiz pelo o zeos 7 mas mudando a opção e tabm funcionou

 a opção é
 cachedupdates do zquery para true e funfo!!!


 --
 From: Eduardo Silva dos Santos 
 eduardo@gmail.comeduardo.drd%40gmail.com
 
 Sent: Wednesday, May 26, 2010 8:47 AM

 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Subject: Re: [delphi-br] ERRO: Zeos online

   Olá Hudson, O Mydac tem um recurso que o faz reconectar de forma
  silenciona
  caso o erro ocorra, faça o seguinte:
 
  Configure o TMyConnection em Options.LocalFailOver = true
 
  no Evento OnConnectionLost coloque o código:
  ***
  RetryMode := rmReconnectExecute;
  ***
 
  adicione a Unit MemData ao form onde está o connection.
 
  Com isso você ativou o recurso localFailOver.. e sempre que houver perda
  de
  conexão o mydac vai reconectar e executar as queries pendentes.
  É interessante você procurar no Help do MyDAC pela tecnologia
  DisconnectedModel..
  é bem interessante. Lembrando que esses recursos estão presente na versão

  5
  do Mydac.
 
  Att,
  ...
  Eduardo Silva dos Santos
  DRD SISTEMAS
  (27) 3218-4201
  (27) 9961-7095
  MSN: eduardo@gmail.com eduardo.drd%40gmail.com
  Site: http://www.drdsistemas.com.br/
  ...
 
 
  Em 25 de maio de 2010 22:22, Hudson BHTE
  hudson_tor...@yahoo.com.br hudson_torion%40yahoo.com.brescreveu:
 
 
 
  Olá Eduardo.
 
  Tentei fazer a conexão com o mydac, ai me apresentou outro erro lost
  connection to mysql server during query mas os dados são alterados
 
  --
  From: Eduardo Silva dos Santos
  eduardo@gmail.com eduardo.drd%40gmail.comeduardo.drd%
 40gmail.com

  
  Sent: Monday, May 24, 2010 3:35 PM
  To: delphi-br@yahoogrupos.com.br 
  delphi-br%40yahoogrupos.com.brdelphi-br%
 40yahoogrupos.com.br

  Subject: Re: [delphi-br] ERRO: Zeos online
 
   O MySQL é bem exigente com a conexão, qualquer anormalidade no pacote
   ele
   derruba a conexão.
   Você deve usar uma versão mais nova do Zeos que tem a capacidade de
   reconectar quando isso ocorra.
  
   Caso não consiga com Zeos, tente o Mydac da DevArt,
   www.devart.com/mydac
  
  
   Att,
   ...
   Eduardo Silva dos Santos
   DRD SISTEMAS
   (27) 3218-4201
   (27) 9961-7095
   MSN: eduardo@gmail.com eduardo.drd%40gmail.com eduardo.drd%
 40gmail.com

   Site: http://www.drdsistemas.com.br/
   ...
  
  
   Em 24 de maio de 2010 06:13, Hudson BHTE
   hudson_tor...@yahoo.com.br hudson_torion%40yahoo.com.brhudson_torion%
 40yahoo.com.brescreveu:

  
  
  
   Ola a todos.
  
   gente estou com um probleminha ao tentar conectar a um DB MySQL
 online
  em
   uma hospedagem pelo zeos 6.6.1.
  
   Consigo fazer a conexao, mas apos 5 segundos qualquer tarefa da um
   erro
   SQL
   Error: MySQL server has gone away.
  
   Alguem sabe resolver isso...
  
   Ha ja tentei usar o Munitor!!!
  
   grato
  
   [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 
  
  
  
 
 
 
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 
  
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 

  



[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] ERRO: Zeos online

2010-05-27 Por tôpico Hudson BHTE
Ok Eduardo deu certinho!!!

Valeu mesmo, muito obrigado!!!

Tbm fiz pelo o zeos 7 mas mudando a opção e tabm funcionou

a opção é
cachedupdates do zquery para true e funfo!!!

--
From: Eduardo Silva dos Santos eduardo@gmail.com
Sent: Wednesday, May 26, 2010 8:47 AM
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] ERRO: Zeos online

 Olá Hudson, O Mydac tem um recurso que o faz reconectar de forma 
 silenciona
 caso o erro ocorra, faça o seguinte:

 Configure o TMyConnection em  Options.LocalFailOver = true

 no Evento OnConnectionLost coloque o código:
 ***
 RetryMode := rmReconnectExecute;
 ***

 adicione a Unit MemData ao form onde está o connection.

 Com isso você ativou o recurso localFailOver.. e sempre que houver perda 
 de
 conexão o mydac vai reconectar e executar as queries pendentes.
 É interessante você procurar no Help do MyDAC pela tecnologia
 DisconnectedModel..
 é bem interessante. Lembrando que esses recursos estão presente na versão 
 5
 do Mydac.

 Att,
 ...
 Eduardo Silva dos Santos
 DRD SISTEMAS
 (27) 3218-4201
 (27) 9961-7095
 MSN: eduardo@gmail.com
 Site: http://www.drdsistemas.com.br/
 ...


 Em 25 de maio de 2010 22:22, Hudson BHTE 
 hudson_tor...@yahoo.com.brescreveu:



 Olá Eduardo.

 Tentei fazer a conexão com o mydac, ai me apresentou outro erro lost
 connection to mysql server during query mas os dados são alterados

 --
 From: Eduardo Silva dos Santos 
 eduardo@gmail.comeduardo.drd%40gmail.com
 
 Sent: Monday, May 24, 2010 3:35 PM
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Subject: Re: [delphi-br] ERRO: Zeos online

  O MySQL é bem exigente com a conexão, qualquer anormalidade no pacote 
  ele
  derruba a conexão.
  Você deve usar uma versão mais nova do Zeos que tem a capacidade de
  reconectar quando isso ocorra.
 
  Caso não consiga com Zeos, tente o Mydac da DevArt, 
  www.devart.com/mydac
 
 
  Att,
  ...
  Eduardo Silva dos Santos
  DRD SISTEMAS
  (27) 3218-4201
  (27) 9961-7095
  MSN: eduardo@gmail.com eduardo.drd%40gmail.com
  Site: http://www.drdsistemas.com.br/
  ...
 
 
  Em 24 de maio de 2010 06:13, Hudson BHTE
  hudson_tor...@yahoo.com.br hudson_torion%40yahoo.com.brescreveu:
 
 
 
  Ola a todos.
 
  gente estou com um probleminha ao tentar conectar a um DB MySQL online
 em
  uma hospedagem pelo zeos 6.6.1.
 
  Consigo fazer a conexao, mas apos 5 segundos qualquer tarefa da um 
  erro
  SQL
  Error: MySQL server has gone away.
 
  Alguem sabe resolver isso...
 
  Ha ja tentei usar o Munitor!!!
 
  grato
 
  [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 
 
 
 





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



 

 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 



Re: [delphi-br] ERRO: Zeos online

2010-05-26 Por tôpico Hudson BHTE
Olá Eduardo.

Tentei fazer a conexão com o mydac, ai me apresentou outro erro lost 
connection to mysql server during query mas os dados são alterados

--
From: Eduardo Silva dos Santos eduardo@gmail.com
Sent: Monday, May 24, 2010 3:35 PM
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] ERRO: Zeos online

 O MySQL é bem exigente com a conexão, qualquer anormalidade no pacote ele
 derruba a conexão.
 Você deve usar uma versão mais nova do Zeos que tem a capacidade de
 reconectar quando isso ocorra.

 Caso não consiga com Zeos, tente o Mydac da DevArt, www.devart.com/mydac


 Att,
 ...
 Eduardo Silva dos Santos
 DRD SISTEMAS
 (27) 3218-4201
 (27) 9961-7095
 MSN: eduardo@gmail.com
 Site: http://www.drdsistemas.com.br/
 ...


 Em 24 de maio de 2010 06:13, Hudson BHTE 
 hudson_tor...@yahoo.com.brescreveu:



 Ola a todos.

 gente estou com um probleminha ao tentar conectar a um DB MySQL online em
 uma hospedagem pelo zeos 6.6.1.

 Consigo fazer a conexao, mas apos 5 segundos qualquer tarefa da um erro 
 SQL
 Error: MySQL server has gone away.

 Alguem sabe resolver isso...

 Ha ja tentei usar o Munitor!!!

 grato

 [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 


 



Re: [delphi-br] ERRO: Zeos online

2010-05-26 Por tôpico Hudson BHTE
Olá Fabiano.

obrigado pela ajuda... Apos ter atualizado para versão 7.0.0 do zeos, ainda 
continua com o mesmo erro! só para ver se o defeito era no servidor fiz um 
teste simples usando o Java e me retornou certinho...

na verdade a conexão fica ansiosa por 5 segundos e cai com o Delphi e zeos, mas 
devo lembrar que isso só acontece no servidor de hospedagem...




From: Fabiano Almeida 
Sent: Monday, May 24, 2010 4:39 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] ERRO: Zeos online


  
Tente atualizar o seu Zeos, instale a 6.6.6 (última estável) que tem um 
monte de coisa corrigida

Sds,

Fabiano.

Em 24/05/2010 06:13, Hudson BHTE escreveu:

 Ola a todos.

 gente estou com um probleminha ao tentar conectar a um DB MySQL online 
 em uma hospedagem pelo zeos 6.6.1.

 Consigo fazer a conexao, mas apos 5 segundos qualquer tarefa da um 
 erro SQL Error: MySQL server has gone away.

 Alguem sabe resolver isso...

 Ha ja tentei usar o Munitor!!!

 grato

 [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] ERRO: Zeos online

2010-05-26 Por tôpico Eduardo Silva dos Santos
Olá Hudson, O Mydac tem um recurso que o faz reconectar de forma silenciona
caso o erro ocorra, faça o seguinte:

Configure o TMyConnection em  Options.LocalFailOver = true

no Evento OnConnectionLost coloque o código:
***
RetryMode := rmReconnectExecute;
***

adicione a Unit MemData ao form onde está o connection.

Com isso você ativou o recurso localFailOver.. e sempre que houver perda de
conexão o mydac vai reconectar e executar as queries pendentes.
É interessante você procurar no Help do MyDAC pela tecnologia
DisconnectedModel..
é bem interessante. Lembrando que esses recursos estão presente na versão 5
do Mydac.

Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...


Em 25 de maio de 2010 22:22, Hudson BHTE hudson_tor...@yahoo.com.brescreveu:



 Olá Eduardo.

 Tentei fazer a conexão com o mydac, ai me apresentou outro erro lost
 connection to mysql server during query mas os dados são alterados

 --
 From: Eduardo Silva dos Santos 
 eduardo@gmail.comeduardo.drd%40gmail.com
 
 Sent: Monday, May 24, 2010 3:35 PM
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Subject: Re: [delphi-br] ERRO: Zeos online

  O MySQL é bem exigente com a conexão, qualquer anormalidade no pacote ele
  derruba a conexão.
  Você deve usar uma versão mais nova do Zeos que tem a capacidade de
  reconectar quando isso ocorra.
 
  Caso não consiga com Zeos, tente o Mydac da DevArt, www.devart.com/mydac
 
 
  Att,
  ...
  Eduardo Silva dos Santos
  DRD SISTEMAS
  (27) 3218-4201
  (27) 9961-7095
  MSN: eduardo@gmail.com eduardo.drd%40gmail.com
  Site: http://www.drdsistemas.com.br/
  ...
 
 
  Em 24 de maio de 2010 06:13, Hudson BHTE
  hudson_tor...@yahoo.com.br hudson_torion%40yahoo.com.brescreveu:
 
 
 
  Ola a todos.
 
  gente estou com um probleminha ao tentar conectar a um DB MySQL online
 em
  uma hospedagem pelo zeos 6.6.1.
 
  Consigo fazer a conexao, mas apos 5 segundos qualquer tarefa da um erro
  SQL
  Error: MySQL server has gone away.
 
  Alguem sabe resolver isso...
 
  Ha ja tentei usar o Munitor!!!
 
  grato
 
  [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 
 
 
 

 



[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] ERRO: Zeos online

2010-05-24 Por tôpico Eduardo Silva dos Santos
O MySQL é bem exigente com a conexão, qualquer anormalidade no pacote ele
derruba a conexão.
Você deve usar uma versão mais nova do Zeos que tem a capacidade de
reconectar quando isso ocorra.

Caso não consiga com Zeos, tente o Mydac da DevArt, www.devart.com/mydac


Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...


Em 24 de maio de 2010 06:13, Hudson BHTE hudson_tor...@yahoo.com.brescreveu:



 Ola a todos.

 gente estou com um probleminha ao tentar conectar a um DB MySQL online em
 uma hospedagem pelo zeos 6.6.1.

 Consigo fazer a conexao, mas apos 5 segundos qualquer tarefa da um erro SQL
 Error: MySQL server has gone away.

 Alguem sabe resolver isso...

 Ha ja tentei usar o Munitor!!!

 grato

 [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] ERRO: Zeos online

2010-05-24 Por tôpico Fabiano Almeida
Tente atualizar o seu Zeos, instale a 6.6.6 (última estável) que tem um 
monte de coisa corrigida

Sds,

Fabiano.

Em 24/05/2010 06:13, Hudson BHTE escreveu:

 Ola a todos.

 gente estou com um probleminha ao tentar conectar a um DB MySQL online 
 em uma hospedagem pelo zeos 6.6.1.

 Consigo fazer a conexao, mas apos 5 segundos qualquer tarefa da um 
 erro SQL Error: MySQL server has gone away.

 Alguem sabe resolver isso...

 Ha ja tentei usar o Munitor!!!

 grato

 [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] Erro ApplyUpdate - ClientDataSet

2010-05-18 Por tôpico Samuel M. Basso
Acredito que não seja pois nunca usei os ProviderFlags.

2010/5/18 -:- Analucia Vardanega -:- analu...@stemmann.com.br



 Isso tá me cheirando algum campo de outra tabela que vc não tirou os
 ProviderFlags.

 Já tentou ver isso?

 Analucia Vardanega

 Analista/Programadora

 Stemmann Indústria e Comércio Ltda

 Porto Feliz - SP

 PABX: +55 (15) 3261-9190

 http://www.stemmann.com.br www.stemmann.com.br

 _

 De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto:
 delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em
 nome de Samuel M. Basso
 Enviada em: segunda-feira, 17 de maio de 2010 22:43

 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Assunto: [delphi-br] Erro ApplyUpdate - ClientDataSet


 Olá Pessoal!

 Estou tendo um problema em somente uma tabela do sistema que ocorre no
 momento que salvo com o ClientDataSet.

 No momento do Client.ApplyUpdates(-1) me aparece o seguinte
 erro:*Unsupported feature.
 *

 Alguem tem ideia do que seja?

 --
 Atenciosamente,

 Samuel M. Basso
 Cel: (54) 8135-3723
 Skype: samuelbasso
 E-mail/MSN: samuelba...@gmail.com samuelbasso%40gmail.com mailto:
 samuelbasso%40gmail.com samuelbasso%2540gmail.com
 Web site: www.samuelbasso.com

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

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

  




-- 
Atenciosamente,

Samuel M. Basso
Cel: (54) 8135-3723
Skype: samuelbasso
E-mail/MSN: samuelba...@gmail.com
Web site: www.samuelbasso.com


[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] Erro ApplyUpdate - ClientDataSet

2010-05-18 Por tôpico Bruno Lichot
Da uma olhada no meu video do FDD 2008 que esta no meu link de downloads,e um 
vídeo passo a passo sobre configurações e recursos do clientdataset e dbexpress

HTTP://cc.embarcadero.com/author/795118

Abs

Bruno

-Original Message-
From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] On 
Behalf Of Samuel M. Basso
Sent: terça-feira, 18 de maio de 2010 09:59
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Erro ApplyUpdate - ClientDataSet

Acredito que não seja pois nunca usei os ProviderFlags.

2010/5/18 -:- Analucia Vardanega -:- analu...@stemmann.com.br



 Isso tá me cheirando algum campo de outra tabela que vc não tirou os
 ProviderFlags.

 Já tentou ver isso?

 Analucia Vardanega

 Analista/Programadora

 Stemmann Indústria e Comércio Ltda

 Porto Feliz - SP

 PABX: +55 (15) 3261-9190

 http://www.stemmann.com.br www.stemmann.com.br

 _

 De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto:
 delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em
 nome de Samuel M. Basso
 Enviada em: segunda-feira, 17 de maio de 2010 22:43

 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Assunto: [delphi-br] Erro ApplyUpdate - ClientDataSet


 Olá Pessoal!

 Estou tendo um problema em somente uma tabela do sistema que ocorre no
 momento que salvo com o ClientDataSet.

 No momento do Client.ApplyUpdates(-1) me aparece o seguinte
 erro:*Unsupported feature.
 *

 Alguem tem ideia do que seja?

 --
 Atenciosamente,

 Samuel M. Basso
 Cel: (54) 8135-3723
 Skype: samuelbasso
 E-mail/MSN: samuelba...@gmail.com samuelbasso%40gmail.com mailto:
 samuelbasso%40gmail.com samuelbasso%2540gmail.com
 Web site: www.samuelbasso.com

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

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

  




-- 
Atenciosamente,

Samuel M. Basso
Cel: (54) 8135-3723
Skype: samuelbasso
E-mail/MSN: samuelba...@gmail.com
Web site: www.samuelbasso.com


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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





This message has been scanned for viruses by MailController - 
www.MailController.altohiway.com


Re: [delphi-br] Erro ApplyUpdate - ClientDataSet

2010-05-18 Por tôpico Samuel M. Basso
Não migrei, continuo usando o Delphi 7.

2010/5/18 Eny Urias enyur...@yahoo.com.br



 Se vc migrou seu sistema pra uma versao mais nova do Delphi pode ser
 incompatibilidade entre tipo de dados...

 --
 Eny Trova Urias

 Somos o que repetitivamente fazemos, portanto, a excelência não é um
 feito, mas um hábito- Aristóteles

 
 De: Samuel M. Basso samuelba...@yahoo.com.br samuelbasso%40yahoo.com.br
 
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Enviadas: Segunda-feira, 17 de Maio de 2010 22:43:21
 Assunto: [delphi-br] Erro ApplyUpdate - ClientDataSet

 Olá Pessoal!

 Estou tendo um problema em somente uma tabela do sistema que ocorre no
 momento que salvo com o ClientDataSet.

 No momento do Client.ApplyUpdates(-1) me aparece o seguinte
 erro:*Unsupported feature.
 *

 Alguem tem ideia do que seja?

 --
 Atenciosamente,

 Samuel M. Basso
 Cel: (54) 8135-3723
 Skype: samuelbasso
 E-mail/MSN: samuelba...@gmail.com samuelbasso%40gmail.com
 Web site: www.samuelbasso.com

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

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

  




-- 
Atenciosamente,

Samuel M. Basso
Cel: (54) 8135-3723
Skype: samuelbasso
E-mail/MSN: samuelba...@gmail.com
Web site: www.samuelbasso.com


[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] Erro ApplyUpdate - ClientDataSet

2010-05-18 Por tôpico Samuel M. Basso
Meu Client esta ligado a um provider e o estranho que esse erro ocorre
somente na edição de um registro e não na inclusao.

2010/5/18 Eny Urias enyur...@yahoo.com.br



 Entaum coloca aí a rotina onde vc alimenta os campos do clientdataset pra
 gente ter uma ideia


 --
 Eny Trova Urias
 Somos o que repetitivamente fazemos, portanto, a excelência não é um
 feito, mas um hábito- Aristóteles

 - Mensagem original 

 De: Samuel M. Basso samuelba...@yahoo.com.br samuelbasso%40yahoo.com.br
 
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Enviadas: Terça-feira, 18 de Maio de 2010 12:19:54
 Assunto: Re: [delphi-br] Erro ApplyUpdate - ClientDataSet


 Não migrei, continuo usando o Delphi 7.

 2010/5/18 Eny Urias enyur...@yahoo.com.br enyurias%40yahoo.com.br

 
 
  Se vc migrou seu sistema pra uma versao mais nova do Delphi pode ser
  incompatibilidade entre tipo de dados...
 
  --
  Eny Trova Urias
 
  Somos o que repetitivamente fazemos, portanto, a excelência não é um
  feito, mas um hábito- Aristóteles
 
  
  De: Samuel M. Basso 
  samuelba...@yahoo.com.brsamuelbasso%40yahoo.com.brsamuelbasso%
 40yahoo.com.br
  
  Para: delphi-br@yahoogrupos.com.br 
  delphi-br%40yahoogrupos.com.brdelphi-br%
 40yahoogrupos.com.br

  Enviadas: Segunda-feira, 17 de Maio de 2010 22:43:21
  Assunto: [delphi-br] Erro ApplyUpdate - ClientDataSet
 
  Olá Pessoal!
 
  Estou tendo um problema em somente uma tabela do sistema que ocorre no
  momento que salvo com o ClientDataSet.
 
  No momento do Client.ApplyUpdates(-1) me aparece o seguinte
  erro:*Unsupported feature.
  *
 
  Alguem tem ideia do que seja?
 
  --
  Atenciosamente,
 
  Samuel M. Basso
  Cel: (54) 8135-3723
  Skype: samuelbasso
  E-mail/MSN: samuelba...@gmail.com samuelbasso%40gmail.comsamuelbasso%
 40gmail.com

  Web site: www.samuelbasso.com
 
  [As partes desta mensagem que não continham texto foram removidas]
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

 --
 Atenciosamente,

 Samuel M. Basso
 Cel: (54) 8135-3723
 Skype: samuelbasso
 E-mail/MSN: samuelba...@gmail.com samuelbasso%40gmail.com
 Web site: www.samuelbasso.com

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

 


 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  




-- 
Atenciosamente,

Samuel M. Basso
Cel: (54) 8135-3723
Skype: samuelbasso
E-mail/MSN: samuelba...@gmail.com
Web site: www.samuelbasso.com


[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] Erro com Memory Leak e A.V.

2010-05-13 Por tôpico Daniel Hiromy
Se a propriedade KeyFieldNames do lookupcombobox for o código do cliente, no
duplo clique do grid jogue o código do cliente na propriedade EditValue do
lookupcombobox.

Em 12 de maio de 2010 11:37, Murilo Cunha mcscu...@yahoo.com.br escreveu:



 Daniel,

 Usando TcxLookupComboBox, como faco para que o combo exiba uma
 determinada linha na lista??

 Tenho no LookupComboBox esta estrutura, por exemplo:

 Codigo Nome
 --
 001 Murilo
 002 Denis
 003 Alessandra
 004 Marcio

 Em um grid no form tenho uma lista com produtos comprados por estes
 clientes, quando clico duas vezes rapido no grid quero que o
 LookupComboBox exiba os dados do cliente selecionado. Exemplo:

 Grid
 ID Cliente Produto
 1 001 Secador
 2 001 Xampu
 3 002 Escova
 4 003 Pente
 5 003 Creme de pentear

 Se clicar duas vezes rapido no registro 3 o lookupComboBox deve exibir
 DENIS.
 Como fazer isso?

 Obrigado
 MuriloCunha


 On 03/05/2010 16:47, Daniel Hiromy wrote:
  Não seria mais fácil usar o TcxLookupComboBox?
  Se você quiser exibir mais de um campo do seu dataset, basta colocar o
 nome
  dos fields na propriedade ListFieldNames separados por ';'.
 
  Em 30 de abril de 2010 11:07, Murilo 
  Cunhamcscu...@yahoo.com.brmcscunha%40yahoo.com.br
 escreveu:
 
 
 
  Pessoal,
 
  Estou com um pequeno problema:
 
  Tenho um TcxComboBox que recebe alguns valores (nomes dos usuarios de
  meu banco).
  Junto com estes nomes estao as senhas que os usuarios cadastraram, como
  se fosse o ultimo login.
 
  Para carregar o TcxComboBox uso esta estrutura:
  cbxUsuario.Properties.Items.AddObject(strUsuario,
  TObject(LongInt(NewStr(strSenha;
 
  onde:
  strUsuario = string com o nome do usuario
  strSenha = string com a senha
 
  Ateh aqui funciona perfeito.
 
  Quando vou fechar o form e destruir os objetos criados anteriormente dah
  erro de Access Violation
  Se nao destruo, dah erro de Memory Leak.
 
  Destruo desta forma:
  var
  idx : integer;
  begin
  for idx := 0 to Pred(cbxUsuario.Properties.Items.Count) do
  cbxUsuario.Properties.Items.Objects[idx].Free; //-- Erro
  de A. V.
 
  Alguem tem alguma ideia de como fazer para destruir estes objetos?
 
  Obrigado
  MuriloCunha
 
 
 
 
 
  [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] Erro com Memory Leak e A.V.

2010-05-12 Por tôpico Murilo Cunha
Daniel,

Usando TcxLookupComboBox, como faco para que o combo exiba uma 
determinada linha na lista??

Tenho no LookupComboBox esta estrutura, por exemplo:

CodigoNome
--
001Murilo
002Denis
003Alessandra
004Marcio

Em um grid no form tenho uma lista com produtos comprados por estes 
clientes, quando clico duas vezes rapido no grid quero que o 
LookupComboBox exiba os dados do cliente selecionado. Exemplo:

Grid
IDClienteProduto
1001Secador
2001Xampu
3002Escova
4003Pente
5003Creme de pentear

Se clicar duas vezes rapido no registro 3 o lookupComboBox deve exibir 
DENIS.
Como fazer isso?


Obrigado
MuriloCunha



On 03/05/2010 16:47, Daniel Hiromy wrote:
 Não seria mais fácil usar o TcxLookupComboBox?
 Se você quiser exibir mais de um campo do seu dataset, basta colocar o nome
 dos fields na propriedade ListFieldNames separados por ';'.

 Em 30 de abril de 2010 11:07, Murilo Cunhamcscu...@yahoo.com.br  escreveu:



 Pessoal,

 Estou com um pequeno problema:

 Tenho um TcxComboBox que recebe alguns valores (nomes dos usuarios de
 meu banco).
 Junto com estes nomes estao as senhas que os usuarios cadastraram, como
 se fosse o ultimo login.

 Para carregar o TcxComboBox uso esta estrutura:
 cbxUsuario.Properties.Items.AddObject(strUsuario,
 TObject(LongInt(NewStr(strSenha;

 onde:
 strUsuario = string com o nome do usuario
 strSenha = string com a senha

 Ateh aqui funciona perfeito.

 Quando vou fechar o form e destruir os objetos criados anteriormente dah
 erro de Access Violation
 Se nao destruo, dah erro de Memory Leak.

 Destruo desta forma:
 var
 idx : integer;
 begin
 for idx := 0 to Pred(cbxUsuario.Properties.Items.Count) do
 cbxUsuario.Properties.Items.Objects[idx].Free; //-- Erro
 de A. V.

 Alguem tem alguma ideia de como fazer para destruir estes objetos?

 Obrigado
 MuriloCunha



  

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



 





Re: [delphi-br] Erro com Memory Leak e A.V.

2010-05-03 Por tôpico Daniel Hiromy
Não seria mais fácil usar o TcxLookupComboBox?
Se você quiser exibir mais de um campo do seu dataset, basta colocar o nome
dos fields na propriedade ListFieldNames separados por ';'.

Em 30 de abril de 2010 11:07, Murilo Cunha mcscu...@yahoo.com.br escreveu:



 Pessoal,

 Estou com um pequeno problema:

 Tenho um TcxComboBox que recebe alguns valores (nomes dos usuarios de
 meu banco).
 Junto com estes nomes estao as senhas que os usuarios cadastraram, como
 se fosse o ultimo login.

 Para carregar o TcxComboBox uso esta estrutura:
 cbxUsuario.Properties.Items.AddObject(strUsuario,
 TObject(LongInt(NewStr(strSenha;

 onde:
 strUsuario = string com o nome do usuario
 strSenha = string com a senha

 Ateh aqui funciona perfeito.

 Quando vou fechar o form e destruir os objetos criados anteriormente dah
 erro de Access Violation
 Se nao destruo, dah erro de Memory Leak.

 Destruo desta forma:
 var
 idx : integer;
 begin
 for idx := 0 to Pred(cbxUsuario.Properties.Items.Count) do
 cbxUsuario.Properties.Items.Objects[idx].Free; // -- Erro
 de A. V.

 Alguem tem alguma ideia de como fazer para destruir estes objetos?

 Obrigado
 MuriloCunha

  



[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] Erro : Out of Memory

2010-04-14 Por tôpico José Mário Silva Guedes
Caso você utilize DBExpress eu já percebi que a abertura de uma conexão gera
Memory Leak. As observações do Alemão são pertinentes e o EurekaLog
certamente vai lhe ajudar.


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



Re: [delphi-br] Erro : Out of Memory

2010-04-14 Por tôpico Leandro Augusto Soares
Bom dia,

Também acho que deve ser vazamento de memória.
você também pode usar o FastMM, que é open source (inclusive já vem com as
versões mais novas do Delphi).
Com ele vc consegue ter um relatório dos objetos que não estão sendo
destruídos.

[]s
Leandro

Em 13 de abril de 2010 17:26, Alemão forumdel...@gmail.com escreveu:

 Isso está com cara de vazamento de memoria (memory leaks), verifique se nas
 suas funções você não esta criando algum objeto e não estra destruindo.

 Para certificar-se de estar destruindo, utilize o try .. finally.

 objeto := tobjeto.create
 try
  usa o objeto aqui..
 finally
  FreeAndNil(objeto);
 end;


 uma boa maneira de descobrir o que está ocorrendo tb, para facilitar a
 procura de qual objeto esta ficando alocado, vc pode instalar o eureka log
 e
 ativar a opção de memory leaks.
 Ela é paga, mas vc consegue usar um tempo como trial. Eu utilizo esta
 ferramenta (versão full) e é uma mão na roda.

 []s
 Alemao;

 Em 13 de abril de 2010 10:50, Samuca ( Yahoo )
 samuca_1...@yahoo.com.brescreveu:

 
 
  Olá Pessoal,
 
  Bom Dia...
 
  Eu tenho uma aplicação escrita em Delphi6 VCL que roda 24 hs por dia em
  um servidor windows 2000 server.
 
  Esta aplicação fica lendo uma tabela nomeada T_SPOOL_PRINTER e quando
  encontra uma solicitação de impressão ou envio de email com o orçamento,
  ela
  executa e volta ao estado de espera.
 
  Alé disso tem 3 rotinas diárias que executam às 21:30, 22:00 e 22:30
  horas que enviam emails de aviso de faturamento, cobrança de aprovação de
  orçamento e congelamento de pedidos antigos.
 
  O programa fica o dia inteiro rodando executando todas as funções sem
  dar qualquer tipo de erro, e às vezes até à noite, acontece que às vezes,
  sem explicação nenhuma,. o programa apresenta o erro Out of Memory e
  para.
  O engraçado é que as funções são sempre as mesmas, não teve alterações...
 
  A pergunta : Alguém sabe se tem como tratar este erro para impedí-lo?
 
  Abraço
 
  Samuca
 
  __
  Faça ligações para outros computadores com o novo Yahoo! Messenger
  http://br.beta.messenger.yahoo.com/
 
 
 


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



 

 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






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



Re: [delphi-br] Erro : Out of Memory

2010-04-13 Por tôpico Alemão
Isso está com cara de vazamento de memoria (memory leaks), verifique se nas
suas funções você não esta criando algum objeto e não estra destruindo.

Para certificar-se de estar destruindo, utilize o try .. finally.

objeto := tobjeto.create
try
  usa o objeto aqui..
finally
  FreeAndNil(objeto);
end;


uma boa maneira de descobrir o que está ocorrendo tb, para facilitar a
procura de qual objeto esta ficando alocado, vc pode instalar o eureka log e
ativar a opção de memory leaks.
Ela é paga, mas vc consegue usar um tempo como trial. Eu utilizo esta
ferramenta (versão full) e é uma mão na roda.

[]s
Alemao;

Em 13 de abril de 2010 10:50, Samuca ( Yahoo )
samuca_1...@yahoo.com.brescreveu:



 Olá Pessoal,

 Bom Dia...

 Eu tenho uma aplicação escrita em Delphi6 VCL que roda 24 hs por dia em
 um servidor windows 2000 server.

 Esta aplicação fica lendo uma tabela nomeada T_SPOOL_PRINTER e quando
 encontra uma solicitação de impressão ou envio de email com o orçamento,
 ela
 executa e volta ao estado de espera.

 Alé disso tem 3 rotinas diárias que executam às 21:30, 22:00 e 22:30
 horas que enviam emails de aviso de faturamento, cobrança de aprovação de
 orçamento e congelamento de pedidos antigos.

 O programa fica o dia inteiro rodando executando todas as funções sem
 dar qualquer tipo de erro, e às vezes até à noite, acontece que às vezes,
 sem explicação nenhuma,. o programa apresenta o erro Out of Memory e
 para.
 O engraçado é que as funções são sempre as mesmas, não teve alterações...

 A pergunta : Alguém sabe se tem como tratar este erro para impedí-lo?

 Abraço

 Samuca

 __
 Faça ligações para outros computadores com o novo Yahoo! Messenger
 http://br.beta.messenger.yahoo.com/

  



[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] Erro ao cancelar formulario

2010-02-19 Por tôpico Régis Bender
Bom dia..

como está a mascara dele?

sds
 
Bender Desenvolvimento de Sistemas 
   e  Serviços Contábeis (Régis)
   (51) 98470699
 
Novo Hamburgo/RS
MSN: regis...@terra.com.br

''A vida é um milhão de novos começos movidos pelo desafio sempre novo de viver 
e fazer todo sonho brilhar!

''Ser feliz não é apenas valorizar um sorriso, mas refletir sobre a tristeza. 
Não é apenas comemorar o sucesso, mas aprender com as lições que nos fracassam
  - Original Message - 
  From: edhelly 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 18, 2010 4:00 PM
  Subject: [delphi-br] Erro ao cancelar formulario



  Olá Grupo de Delphi!

  sou iniciante em Delphi e estou fazendo um sistema simples de cadastro de 
pessoas.

  Boa parte do código já está implementado, no entanto estou tendo problema 
para tratar um erro.

  Estou usando o Mysql e as conexões com AdoQuery... pq pretendo usar em rede 
no trabalho.

  o erro é o seguinte o dbedit que recebe a data de nascimento, e somente ele 
em todo formulário, quando coloco um número e desisto de preencher o 
formulário( ...tbpessoa.cancelar) todo ele dá um erro.

  coloquei um tratamento ApplicationEvent no formulário principal, mas mesmo 
assim fico presa pois não me permiti sair do formulário.

  alguma dica de como devo tratar essa parte do código.

  obrigada



  

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



Re: [delphi-br] Erro ao cancelar formulario

2010-02-19 Por tôpico Josinaldo
mostre ai para a gente analisar  o teu codigo do botao cancelar

  - Original Message - 
  From: edhelly 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 18, 2010 4:00 PM
  Subject: [delphi-br] Erro ao cancelar formulario



  Olá Grupo de Delphi!

  sou iniciante em Delphi e estou fazendo um sistema simples de cadastro de 
pessoas.

  Boa parte do código já está implementado, no entanto estou tendo problema 
para tratar um erro.

  Estou usando o Mysql e as conexões com AdoQuery... pq pretendo usar em rede 
no trabalho.

  o erro é o seguinte o dbedit que recebe a data de nascimento, e somente ele 
em todo formulário, quando coloco um número e desisto de preencher o 
formulário( ...tbpessoa.cancelar) todo ele dá um erro.

  coloquei um tratamento ApplicationEvent no formulário principal, mas mesmo 
assim fico presa pois não me permiti sair do formulário.

  alguma dica de como devo tratar essa parte do código.

  obrigada



  

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



Re: [delphi-br] Erro na Conversão de BD usando Clien tDataSet

2010-02-09 Por tôpico Alisson Yahoo
Veja o que diz o help do Delphi : Set MaxErrors to -1 to indicate that 
there is no limit to the number of errors.  Ou seja, se você colocar -1 no 
parâmetro o ClientDataset vai aceitar infinitos erros. Coloque 
DMCONVERTE.CDSForn2.ApplyUpdates(0); e não esqueça de colocar uma exceção 
no evento OnReconcileError. 

__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 



Re: [delphi-br] Erro ao passar valores de um Form para outro

2010-01-26 Por tôpico Marcos Douglas
Para simplificar, faça consultas separadas entre os Forms. A pesquisa terá
sua query de consulta. Quando escolher o registro a ser editado, chame o
Form de edição e só passe o ID do registro (ID, CPF, ou seja lá qual for seu
identificador único) como parâmetro. No Form de edição você traz, do banco
de dados, somente este registro.


Marcos Douglas


2010/1/25 Ricardo Ravelli ricardorave...@gmail.com

 Pessoal, boa noite.



 Eu estou um sistema MDI, no qual tenho um formulário principal (Form Pai) e
 os demais estão como Forms filhos. O meu problema é o seguinte:



 Eu criei um form Filho de cadastro de produtos e dentro dele eu chamo um
 outro form filho que consulta os produtos cadastrados, porém eu também uso
 esse Form de consulta para “jogar” de volta uma linha do registro do DbGrid
 para o formulário de cadastro, assim podendo realizar a alteração desse
 registro (qdo eu dou um duplo-clique em cima do registro).



 Dentro do form de Cadastro de Produtos eu usei o seguinte código para
 chamar
 o Form de consulta:



  Application.CreateForm(TFrmConProduto, FrmConProduto);



 Dentro do DbGrid desse form de consulta eu utilizei o seguinte código para
 trazer as informações para o outro Form (Cadastro):



 procedure TFrmConProduto.DBGrid1DblClick(Sender: TObject);

 var

  Cd_Produto: string;

  Ds_Produto: string;

  Qtd_Produto: string;

  Vl_Unit_Produto: string;

  Vl_Total_Produto: string;

  X: Integer;

 begin

  with DBGrid1.DataSource.DataSet do

for X := 0 to FieldCount - 1 do

begin

  case X of

0:

  Cd_Produto := Fields[X].AsString;

1:

  Ds_Produto := Fields[X].AsString;

2:

  Qtd_Produto := Fields[X].AsString;

3:

  Vl_Unit_Produto := Fields[X].AsString;

4:

  Vl_Total_Produto := Fields[X].AsString;

  end;

  FrmCadProduto.EdtCodigo.Text := Cd_Produto;

  FrmCadProduto.EdtProduto.Text := Ds_Produto;

  FrmCadProduto.EdtQdt.Text := Qtd_Produto;

  FrmCadProduto.EdtValorUnit.Text := Vl_Unit_Produto;

  FrmCadProduto.EdtValorTotal.Text := Vl_Total_Produto;

end;

  FrmCadProduto.HabilitaDesabilita(2);

  FrmConProduto.Close;

 end;



 O erro está acontecendo quando eu tendo passar os valores das variáveis
 para
 os Edits do outro Form (que fica aberto mesmo com o Form Consulta aberto).
 Ele apresenta um erro de Access Violation e eu notei que ele não consegue
 encontrar as informações do Form Cadastro mesmo ele estando aberto e
 adicionado na Unit.



 Eu já utilizei esse código com Sistemas que não estão em MDI e funcionaram
 corretamente.



 Alguém sabe o que está acontecendo? Ou tem alguma solução diferente para
 trabalhar com forms MDI?



 Obrigado.



 Abraços.



 Att.

 Ricardo Ravelli.



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



 

 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






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



Re: [delphi-br] Erro Leitura Registro Windows 7

2010-01-23 Por tôpico EmbarcaDelphi
Sinceramente, o Windows 7 de vocês devem ser pirata (XP misturado com 
Win7), O meu Windows 7 é Original, 32 bits e não existe este valor. 
VOCÊS ESTÃO CONFUNDINDO. A CHAVE EXISTE, mas o valor não existe, o valor 
é o valor, a chave é a chave, A CHAVE EXISTE, o VALOR NÃO.
A, não vou mais discutir, parece até brincadeira, fala sério!

Parei por aqui.

Em 21/01/2010 20:05, Mieli Jr. escreveu:

 So abrir com 'OpenKeyReadOnly'...
 Agora eu tive tempo e testei aqui e retornou numa boa, até mesmo 
 logado como
 usuario comum.




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



Re: [delphi-br] Erro Leitura Registro Windows 7

2010-01-23 Por tôpico Dirceu
Alguém aqui pode me indicar (ou enviar) uma boa apostila sobre banco de dados, 
falando sobre chave estrangeira, relacionamentos (com exemplos) e, de 
preferência, sobre o Firebird?

Agradeço!


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



Re: [delphi-br] Erro Leitura Registro Windows 7

2010-01-23 Por tôpico Ricardo César Cardoso
O que eu testei tb era original e a situação é a q vc descreveu. A chave 
existe, porém o valor estava em branco (não preenchido), até onde eu me lembro.

Mas como essa mensagem só chegou no momento em que estou redigindo (Sab, 
23.01.2010 - 11:54) nem vale a pena requentar o caldo.

Atte,
Ricardo.

1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.

2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor 
compreendida.

3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!

--- Em qui, 21/1/10, EmbarcaDelphi embarcadel...@yahoo.com.br escreveu:

De: EmbarcaDelphi embarcadel...@yahoo.com.br
Assunto: Re: [delphi-br] Erro Leitura Registro Windows 7
Para: delphi-br@yahoogrupos.com.br
Data: Quinta-feira, 21 de Janeiro de 2010, 22:46







 



  



  
  
  Sinceramente, o Windows 7 de vocês devem ser pirata (XP misturado com 

Win7), O meu Windows 7 é Original, 32 bits e não existe este valor. 

VOCÊS ESTÃO CONFUNDINDO. A CHAVE EXISTE, mas o valor não existe, o valor 

é o valor, a chave é a chave, A CHAVE EXISTE, o VALOR NÃO.

A, não vou mais discutir, parece até brincadeira, fala sério!



Parei por aqui.



Em 21/01/2010 20:05, Mieli Jr. escreveu:



 So abrir com 'OpenKeyReadOnly' ...

 Agora eu tive tempo e testei aqui e retornou numa boa, até mesmo 

 logado como

 usuario comum.





[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] Erro Leitura Registro Windows 7

2010-01-21 Por tôpico EmbarcaDelphi
Francamente heim!!! :(

Como você posta uma pergunta dessa sem primeiro ir lá no regedit 
verificar se esta chave existe ou não?
ProductName não existe no Windows 7


Em 20/01/2010 15:47, rcesa...@ymail.com escreveu:

 Prezados,

 Tenho um aplicação que lê algumas informações do registro do Windows. 
 No Windows XP ela funciona sem problemas, mas no Windows 7 a leitura 
 das mesmas chaves não traz valor nenhum e também não dá erro.

 Uma das funções de leitura é a seguinte:

 function NomeProduto: String;

 var
 registro_aux: TRegistry;

 begin
 registro_aux := TRegistry.Create;
 Result := '';

 try
 registro_aux.RootKey := HKEY_LOCAL_MACHINE;

 if (registro_aux.OpenKey ('\SOFTWARE\Microsoft\Windows 
 NT\CurrentVersion', False)) then
 begin
 Result := registro_aux.ReadString ('ProductName');
 registro_aux.CloseKey;
 end;

 finally
 registro_aux.Free;
 end;

 end;

 Será que alguém poderia me dizer o que fazer pra essa função retornar 
 o valor da chave no Windows 7?

 Obrigado.




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



Re: [delphi-br] Erro Leitura Registro Windows 7

2010-01-21 Por tôpico Mieli Jr.
Francamente heim!!! :(

Como você posta uma resposta dessa sem primeiro ir lá no regedit
verificar se esta chave existe ou não?
ProductName EXISTE SIM! no Windows 7

RSRSRS

Desculpe mais eu não resisti! Realmente existe sim...

2010/1/21 EmbarcaDelphi embarcadel...@yahoo.com.br

 Francamente heim!!! :(

 Como você posta uma pergunta dessa sem primeiro ir lá no regedit
 verificar se esta chave existe ou não?
 ProductName não existe no Windows 7


 Em 20/01/2010 15:47, rcesa...@ymail.com escreveu:
 
  Prezados,
 
  Tenho um aplicação que lê algumas informações do registro do Windows.
  No Windows XP ela funciona sem problemas, mas no Windows 7 a leitura
  das mesmas chaves não traz valor nenhum e também não dá erro.
 
  Uma das funções de leitura é a seguinte:
 
  function NomeProduto: String;
 
  var
  registro_aux: TRegistry;
 
  begin
  registro_aux := TRegistry.Create;
  Result := '';
 
  try
  registro_aux.RootKey := HKEY_LOCAL_MACHINE;
 
  if (registro_aux.OpenKey ('\SOFTWARE\Microsoft\Windows
  NT\CurrentVersion', False)) then
  begin
  Result := registro_aux.ReadString ('ProductName');
  registro_aux.CloseKey;
  end;
 
  finally
  registro_aux.Free;
  end;
 
  end;
 
  Será que alguém poderia me dizer o que fazer pra essa função retornar
  o valor da chave no Windows 7?
 
  Obrigado.



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



Re: [delphi-br] Erro Leitura Registro Windows 7

2010-01-21 Por tôpico Mieli Jr.
Deve ser problemas com permissão mesmo.

Mas se é somente pra retornar a versão so windows você poderia tentar
resolver isso abrindo a chave como somente leitura nesse caso:

registro_aux.OpenKeyReadOnly('\SOFTWARE\Microsoft\Windows
NT\CurrentVersion')

Vê ai se funfa!


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



RE: [delphi-br] Erro Leitura Registro Windows 7

2010-01-21 Por tôpico Rubem Nascimento da Rocha

Particularmente usaria a dica do artigo publicado em 
http://www.delphi3000.com/articles/article_3851.asp, e o adaptaria para 
detecter versões do Windows 7. Ou seja, acho melhor usar a API do Windows para 
detectar e analisar qual a versão em uso.

 

Boa sorte.

Sds.
 


To: delphi-br@yahoogrupos.com.br
From: ml.li...@gmail.com
Date: Thu, 21 Jan 2010 12:14:56 -0200
Subject: Re: [delphi-br] Erro Leitura Registro Windows 7

  



Deve ser problemas com permissão mesmo.

Mas se é somente pra retornar a versão so windows você poderia tentar
resolver isso abrindo a chave como somente leitura nesse caso:

registro_aux.OpenKeyReadOnly('\SOFTWARE\Microsoft\Windows
NT\CurrentVersion')

Vê ai se funfa!


  
_
Com o Windows 7 nenhum arquivo vai se esconder de você. Clique para conhecer !
http://www.microsoft.com/brasil/windows7/default.html?WT.mc_id=1539

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



Re: [delphi-br] Erro Leitura Registro Windows 7

2010-01-21 Por tôpico EmbarcaDelphi
Existe porque foi criada pelo seu programa ou por terceiros, mas no 
original o Windows 7 não trás este valor. Eu uso o Windows 7 32 bits. 
pode ser que venha no de 64 bits (mas ainda assim eu duvido).


Em 21/01/2010 10:52, Marcelo Magnani escreveu:

 Desculpe a intromissão, mas a chave ProductName existe sim no Windows 7. O
 problema deve ser outro.

 A função abaixo foi testada no Windows 7 e funcionou normalmente.

 function NomeProduto: String;

 var

 registro_aux: TRegistry;

 begin

 registro_aux := TRegistry.Create;

 Result := '';

 try

 registro_aux.RootKey := HKEY_LOCAL_MACHINE;

 if (registro_aux.OpenKey ('\SOFTWARE\Microsoft\Windows NT\CurrentVersion',
 False)) then

 begin

 Result := registro_aux.ReadString ('ProductName');

 registro_aux.CloseKey;

 end;

 finally

 registro_aux.Free;

 end;

 end;

 Abraços




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



Re: [delphi-br] Erro Leitura Registro Windows 7

2010-01-21 Por tôpico EmbarcaDelphi
NÃO EXISTE.

Se tem no seu Windows 7 é porque foi colocado através de outros 
programas, não vem no original.
A não ser que seja Windows 7 64 bits, pois o meu é de 32 bits.


Em 21/01/2010 10:58, Mieli Jr. escreveu:

 Francamente heim!!! :(

 Como você posta uma resposta dessa sem primeiro ir lá no regedit
 verificar se esta chave existe ou não?
 ProductName EXISTE SIM! no Windows 7

 RSRSRS

 Desculpe mais eu não resisti! Realmente existe sim...




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



Re: [delphi-br] Erro em Post Usando 2 Tabelas

2010-01-21 Por tôpico Eduardo Melo
sim, mas mesmo assim diz que nao foi possivel encontrar chave,mas defini uma
chave

2010/1/18 Alisson Yahoo alss...@yahoo.com.br



 Você configurou os ProvidersFlags dos campos que não serão salvos para
 False?

 __
 Faça ligações para outros computadores com o novo Yahoo! Messenger
 http://br.beta.messenger.yahoo.com/

  




-- 
Atenciosamente

Eduardo Melo
4º Sistemas de Informação - Bacharelado
www.meloshospedagem.com.br
Porque Deus amou o mundo de tal maneira que deu o seu Filho unigênito, para
que todo aquele que nele crê não pereça, mas tenha a vida eterna. (João
3:16)


[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] Erro Leitura Registro Windows 7

2010-01-21 Por tôpico Eduardo Silva dos Santos
Eu acredito que seja o controle de conta do usuário.. com ele ativado não da
nem pra instalar um serviço.


Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...


Em 21 de janeiro de 2010 14:29, Marcelo leite_rom...@yahoo.com.brescreveu:



 Mas voces estão desviando o foco da pergunta, o nosso colega perguntou se
 há algum problema de leitura da chave do registro e não a existencia da
 mesma.

 
 De: EmbarcaDelphi embarcadel...@yahoo.com.brembarcadelphi%40yahoo.com.br
 
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Enviadas: Quinta-feira, 21 de Janeiro de 2010 12:12:36
 Assunto: Re: [delphi-br] Erro Leitura Registro Windows 7

 NÃO EXISTE.

 Se tem no seu Windows 7 é porque foi colocado através de outros
 programas, não vem no original.
 A não ser que seja Windows 7 64 bits, pois o meu é de 32 bits.

 Em 21/01/2010 10:58, Mieli Jr. escreveu:
 
  Francamente heim!!! :(
 
  Como você posta uma resposta dessa sem primeiro ir lá no regedit
  verificar se esta chave existe ou não?
  ProductName EXISTE SIM! no Windows 7
 
  RSRSRS
 
  Desculpe mais eu não resisti! Realmente existe sim...
 

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

 __
 Veja quais são os assuntos do momento no Yahoo! +Buscados
 http://br.maisbuscados.yahoo.com

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

  



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





-- 
 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] Erro Leitura Registro Windows 7

2010-01-21 Por tôpico Mieli Jr.
So abrir com 'OpenKeyReadOnly'...
Agora eu tive tempo e testei aqui e retornou numa boa, até mesmo logado como
usuario comum.

[]'s


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



Re: [delphi-br] Erro Leitura Registro Windows 7

2010-01-20 Por tôpico Jackson Gomes - ToolsComps

if (registro_aux.OpenKey ('\SOFTWARE\Microsoft\Windows NT\CurrentVersion', 
 False)) then
 Será que alguém poderia me dizer o que fazer pra essa função retornar o valor 
 da chave no Windows 7?

mas essa chave está lá no registro? Se sim, pode ser permissão de acesso...

--
Jackson 




Re: [delphi-br] Erro com ApllyUpdate

2010-01-19 Por tôpico Marcelo Luiz Onhate
Tenta colocar um AS

order by c.data_cot desc) AS VALOR_MOEDA

e coloca no Provider para não utiliza QuotedChar... faz esse teste e 
responde oque ocorreu.

Em 19/01/2010 12:07, Huander escreveu:


 Pessoal tenho um sqldataset onde eu faço uma SQL do seguinte modelo:

 select R.RECEB_COD, P.RAZAO_PAR, R.COD_EMP, R.COD_PAR, R.TIPDOC_COD,
 T.TIPDC_DESC,

 R.COD_MOEDA, M.DESC_MOEDA, R.RECEB_SIT,

 (select first 1 c.vlor_cot

 from cotacoes c

 where c.data_cot = :DATA and c.cod_moeda = r.cod_moeda

 order by c.data_cot desc) VALOR_MOEDA

 from RECEBER R

 left join parceiros p on (P.COD_PAR = R.COD_PAR)

 left join moedas m on (M.COD_MOEDA = R.COD_MOEDA)

 left join tipdoc t on (T.TIPDC_COD = R.TIPDOC_COD)

 where R.RECEB_COD = :CODIGO and R.COD_EMP = :EMPRESA

 A SQL funciona tranquilamente, faz todos os campos sem nenhum erro!

 Fiz a associação de sqldataset com um clientdataset e seu respectivo
 datasource!

 Faço alterações no registro especifico realizo um post e tudo ok!

 Quando mando um apllyupdate o reconcileerror me retorna o seguinte erro:

 Column Unknown RECEB_SIT At line 1, column 20

 Mas não há dúvidas que o campo existe! O providersflags estão todos 
 setados
 corretamente, sendo true pra os chaves(e também where) e os demais 
 update e
 somente os campos de left join com outras tabelas setados tudo como false!

 Detalhe quando eu retiro o campo que denominei como VALOR_MOEDA que é
 retornado através de um select dentro do select a operação com o 
 apllyupdate
 funciona normamente!

 Estou usando Delphi 2010 com firebird...

 Alguem já passou por algo parecido?

 Agradeço qualquer opinião...




Re: [delphi-br] Erro com ApllyUpdate

2010-01-19 Por tôpico Walter Chagas (Bol)
O erro diz aue o campo RECEB_SIT não existe. Se existe ou tá com alguma 
configuração errada. Convem rever os Fields tanto da Query como do CDS. Um 
deles pode estar com erro. Também convem olhar a sentença pois este campo 
(RECEB_SIT) é referenciado na mesma como membro da tabela Receber. Será que é 
nela mesmo que este campo existe?

[]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: Huander 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, January 19, 2010 4:44 PM
  Subject: RES: [delphi-br] Erro com ApllyUpdate



  Pior que o erro continua!

  Att.

  De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
  nome de Marcelo Luiz Onhate
  Enviada em: terça-feira, 19 de janeiro de 2010 13:22
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Erro com ApllyUpdate

  Tenta colocar um AS

  order by c.data_cot desc) AS VALOR_MOEDA

  e coloca no Provider para não utiliza QuotedChar... faz esse teste e 
  responde oque ocorreu.

  Em 19/01/2010 12:07, Huander escreveu:
  
  
   Pessoal tenho um sqldataset onde eu faço uma SQL do seguinte modelo:
  
   select R.RECEB_COD, P.RAZAO_PAR, R.COD_EMP, R.COD_PAR, R.TIPDOC_COD,
   T.TIPDC_DESC,
  
   R.COD_MOEDA, M.DESC_MOEDA, R.RECEB_SIT,
  
   (select first 1 c.vlor_cot
  
   from cotacoes c
  
   where c.data_cot = :DATA and c.cod_moeda = r.cod_moeda
  
   order by c.data_cot desc) VALOR_MOEDA
  
   from RECEBER R
  
   left join parceiros p on (P.COD_PAR = R.COD_PAR)
  
   left join moedas m on (M.COD_MOEDA = R.COD_MOEDA)
  
   left join tipdoc t on (T.TIPDC_COD = R.TIPDOC_COD)
  
   where R.RECEB_COD = :CODIGO and R.COD_EMP = :EMPRESA
  
   A SQL funciona tranquilamente, faz todos os campos sem nenhum erro!
  
   Fiz a associação de sqldataset com um clientdataset e seu respectivo
   datasource!
  
   Faço alterações no registro especifico realizo um post e tudo ok!
  
   Quando mando um apllyupdate o reconcileerror me retorna o seguinte erro:
  
   Column Unknown RECEB_SIT At line 1, column 20
  
   Mas não há dúvidas que o campo existe! O providersflags estão todos 
   setados
   corretamente, sendo true pra os chaves(e também where) e os demais 
   update e
   somente os campos de left join com outras tabelas setados tudo como false!
  
   Detalhe quando eu retiro o campo que denominei como VALOR_MOEDA que é
   retornado através de um select dentro do select a operação com o 
   apllyupdate
   funciona normamente!
  
   Estou usando Delphi 2010 com firebird...
  
   Alguem já passou por algo parecido?
  
   Agradeço qualquer opinião...
  

  [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] Erro em Post Usando 2 Tabelas

2010-01-18 Por tôpico Alisson Yahoo
Você configurou  os ProvidersFlags dos campos que não serão salvos para 
False? 

__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 



Re: [delphi-br] Erro em Delphi 7 com AMD Athlon X2 5000B

2009-12-17 Por tôpico contato
Boa tarde a todos,

Obrigado Luiz, Marcelo e Aureo, para mim foi importante estas informacoes, para 
eu ter a confirmacao de que pode haver uma execucao diferente nestes 
processadores.

Este cliente onde instalei o sistema é o unico com este processador, e o unico 
em que deu erro. Em varios outros micros rodam tudo normalmente.

No momento, a solucao que eu adotei foi tornar o programa mais simples, eu 
tirei um processo que gerava uma grid que mostrava informacoes que estavam em 
banco, e que nao eram de vital importancia para o funcionamento. Feito isso 
pararam todos os erros de Violacao de Acesso e Erro de Leitura de Memoria.

Agora com mais tempo vou fazer mais testes.

Obrigado a todos.

Moreira



  - Original Message - 
  From: Luiz Escobar 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, December 16, 2009 1:52 PM
  Subject: Re: [delphi-br] Erro em Delphi 7 com AMD Athlon X2 5000B



  Bom quando vc tem um micro da marca AiMeuDeus, todos os problemas vem em 
dobro, tem como trocar por um Pentium não ?
  Aqui na empresa tínhamos 3 AiMeuDeus e 25 Intel, trocamos os 3 pq varias 
vezes alguns programas não funcionavam direito, davam erros inexplicáveis, 
temos um programa do IBOPE e ele tem versão pra Intel e uma pra AiMeuDeus e 
mesmo assim os próprios desenvolvedores do IBOPE ja falavam, se vc puder rodar 
nas maquinas INTEL será melhor, pq mesmo tendo a versão pra AiMeuDeus ele 
ainda assim dava uns probleminhas, a versão INTEL então nem entrava nem sei 
se já arrumaram isso pq faz tanto tempo

  []s
  Luiz Escobar - http://www.megasistema.com.br
  
  Harbour 2.0.0beta3(Rev.13200) (DbfNtx+MySQL)
  MiniGUI 1.7 Extended (Build 78a)-2009.12.15
  BCC 5.8.2 (Turbo C++ Explorer 2006)
  
  XAMPP 1.7.1 (Apache+MySQL+PHP+(Linux/Win))
  FLEX 3.0 (iniciante)
  
  Delphi ( 6 PRO  7 Ent ) (DBF/NTX+MySQL)
  
  AMD (AiMeuDeus) ? Ñ!, Sou + Intel

  From: Marcelo 
  Sent: Tuesday, December 15, 2009 4:21 PM
  To: delphi-br@yahoogrupos.com.br 
  Subject: Re: [delphi-br] Erro em Delphi 7 com AMD Athlon X2 5000B

  Ja tive um problema parecido com um Pentium HT, o problema era em uma unit da 
biblioteca Jedi especificamente a unt JclSysInfo ela tem uma procedure chamada 
GetCpuInfo este foi meu problema . Solução um bloco try except e no excepto 
coloquei para não fazer nada. Solucionou.blz 

  --- Em ter, 15/12/09, Aureo Koppe aureoko...@yahoo.com.br escreveu:

  De: Aureo Koppe aureoko...@yahoo.com.br
  Assunto: Re: [delphi-br] Erro em Delphi 7 com AMD Athlon X2 5000B
  Para: delphi-br@yahoogrupos.com.br
  Data: Terça-feira, 15 de Dezembro de 2009, 11:29

  Uma dica: Quando teu programa usa várias thread's, e principalmente quando

  uma destes thread modifica outra ou duas thread modificam um mesmo arquivo,

  se for o caso, você terá que colocar um bom mecanismo de bloqueio, ou seja

  se uma thread está gravando em um determinado arquivo, então nehuma outra

  poderá gravar neste arquivo enquanto a primeira não terminar, note que em

  uma máquina bi-processada vai ter dois processos rodando ao mesmo tempo. o

  que não acontece quando a máquina tem somente um processador.

  é isso.

  2009/12/10 contato cont...@antoniomore ira.com.br

  

  

   Boa noite a todos,

  

   alguem ja enfrentou algum problema de incompatibilidade do Delphi 7 com

   computadores com processador AMD Athlon X2 500B, ou outro parecido ?

  

   Sei que nao deveria haver incompatibilidade, mas tenho um sistema com

   varias threads, onde monitoro/libero uma catraca de acesso atraves de

   componentes Activex, este sistema funciona em varios computadores sem erros,

   mas neste especifico esta dando varios erros estranhos.

  

   O micro é um HP, ja foi formatado, reinstalado tudo, esta tudo funcionando

   bem (XP, Office, etc), menos o que precisava :( , que é o sistema..

  

   Se alguem tiver alguma dica, ou se ja passou por algum problema assim...

   agradeco qualquer ajuda.

  

   Obrigado

   Moreira

  

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

  

   

  

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

  __
  Veja quais são os assuntos do momento no Yahoo! +Buscados
  http://br.maisbuscados.yahoo.com

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

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



  

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



Re: [delphi-br] Erro em Delphi 7 com AMD Athlon X2 5000B

2009-12-16 Por tôpico Luiz Escobar
Bom quando vc tem um micro da marca AiMeuDeus, todos os problemas vem em 
dobro, tem como trocar por um Pentium não ?
Aqui na empresa tínhamos 3 AiMeuDeus e 25 Intel, trocamos os 3 pq varias 
vezes alguns programas não funcionavam direito, davam erros inexplicáveis, 
temos um programa do IBOPE e ele tem versão pra Intel e uma pra AiMeuDeus  e 
mesmo assim os próprios desenvolvedores do IBOPE ja falavam, se vc puder rodar 
nas maquinas INTEL será melhor, pq mesmo tendo a versão pra AiMeuDeus ele 
ainda assim dava uns probleminhas, a versão INTEL então nem entrava nem sei 
se já arrumaram isso pq faz tanto tempo


[]s
Luiz Escobar - http://www.megasistema.com.br

Harbour 2.0.0beta3(Rev.13200) (DbfNtx+MySQL)
MiniGUI 1.7 Extended (Build 78a)-2009.12.15
BCC 5.8.2 (Turbo C++ Explorer 2006)

XAMPP  1.7.1 (Apache+MySQL+PHP+(Linux/Win))
FLEX   3.0 (iniciante)

Delphi ( 6 PRO  7 Ent ) (DBF/NTX+MySQL)

AMD (AiMeuDeus) ? Ñ!, Sou + Intel




From: Marcelo 
Sent: Tuesday, December 15, 2009 4:21 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Erro em Delphi 7 com AMD Athlon X2 5000B


  
Ja tive um problema parecido com um Pentium HT, o problema era em uma unit da 
biblioteca Jedi especificamente a unt JclSysInfo ela tem uma procedure chamada 
GetCpuInfo este foi meu problema . Solução um bloco try except e no excepto 
coloquei para não fazer nada. Solucionou.blz 

--- Em ter, 15/12/09, Aureo Koppe aureoko...@yahoo.com.br escreveu:

De: Aureo Koppe aureoko...@yahoo.com.br
Assunto: Re: [delphi-br] Erro em Delphi 7 com AMD Athlon X2 5000B
Para: delphi-br@yahoogrupos.com.br
Data: Terça-feira, 15 de Dezembro de 2009, 11:29

 

Uma dica: Quando teu programa usa várias thread's, e principalmente quando

uma destes thread modifica outra ou duas thread modificam um mesmo arquivo,

se for o caso, você terá que colocar um bom mecanismo de bloqueio, ou seja

se uma thread está gravando em um determinado arquivo, então nehuma outra

poderá gravar neste arquivo enquanto a primeira não terminar, note que em

uma máquina bi-processada vai ter dois processos rodando ao mesmo tempo. o

que não acontece quando a máquina tem somente um processador.

é isso.

2009/12/10 contato cont...@antoniomore ira.com.br





 Boa noite a todos,



 alguem ja enfrentou algum problema de incompatibilidade do Delphi 7 com

 computadores com processador AMD Athlon X2 500B, ou outro parecido ?



 Sei que nao deveria haver incompatibilidade, mas tenho um sistema com

 varias threads, onde monitoro/libero uma catraca de acesso atraves de

 componentes Activex, este sistema funciona em varios computadores sem erros,

 mas neste especifico esta dando varios erros estranhos.



 O micro é um HP, ja foi formatado, reinstalado tudo, esta tudo funcionando

 bem (XP, Office, etc), menos o que precisava :( , que é o sistema..



 Se alguem tiver alguma dica, ou se ja passou por algum problema assim...

 agradeco qualquer ajuda.



 Obrigado

 Moreira



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



 



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

__
Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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





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



Re: [delphi-br] Erro em Delphi 7 com AMD Athlon X2 5000B

2009-12-15 Por tôpico Aureo Koppe
Uma dica: Quando teu programa usa várias thread's, e principalmente quando
uma destes thread modifica outra ou duas thread modificam um mesmo arquivo,
se for o caso, você terá que colocar um bom mecanismo de bloqueio, ou seja
se uma thread está gravando em um determinado arquivo, então nehuma outra
poderá gravar neste arquivo enquanto a primeira não terminar, note que em
uma máquina bi-processada vai ter dois processos rodando ao mesmo tempo. o
que não acontece quando a máquina tem somente um processador.

é isso.




2009/12/10 contato cont...@antoniomoreira.com.br



 Boa noite a todos,

 alguem ja enfrentou algum problema de incompatibilidade do Delphi 7 com
 computadores com processador AMD Athlon X2 500B, ou outro parecido ?

 Sei que nao deveria haver incompatibilidade, mas tenho um sistema com
 varias threads, onde monitoro/libero uma catraca de acesso atraves de
 componentes Activex, este sistema funciona em varios computadores sem erros,
 mas neste especifico esta dando varios erros estranhos.

 O micro é um HP, ja foi formatado, reinstalado tudo, esta tudo funcionando
 bem (XP, Office, etc), menos o que precisava :( , que é o sistema.

 Se alguem tiver alguma dica, ou se ja passou por algum problema assim..
 agradeco qualquer ajuda.

 Obrigado
 Moreira

 [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] Erro em Delphi 7 com AMD Athlon X2 5000B

2009-12-15 Por tôpico Marcelo
Ja tive um problema parecido com um Pentium HT, o problema era em uma unit da 
biblioteca Jedi especificamente a unt JclSysInfo ela tem uma procedure chamada 
GetCpuInfo este foi meu problema . Solução um bloco try except e no excepto 
coloquei para não fazer nada. Solucionou.blz 

--- Em ter, 15/12/09, Aureo Koppe aureoko...@yahoo.com.br escreveu:

De: Aureo Koppe aureoko...@yahoo.com.br
Assunto: Re: [delphi-br] Erro em Delphi 7 com AMD Athlon X2 5000B
Para: delphi-br@yahoogrupos.com.br
Data: Terça-feira, 15 de Dezembro de 2009, 11:29















 
 



  



  
  
  Uma dica: Quando teu programa usa várias thread's, e principalmente quando

uma destes thread modifica outra ou duas thread modificam um mesmo arquivo,

se for o caso, você terá que colocar um bom mecanismo de bloqueio, ou seja

se uma thread está gravando em um determinado arquivo, então nehuma outra

poderá gravar neste arquivo enquanto a primeira não terminar, note que em

uma máquina bi-processada vai ter dois processos rodando ao mesmo tempo. o

que não acontece quando a máquina tem somente um processador.



é isso.



2009/12/10 contato cont...@antoniomore ira.com.br







 Boa noite a todos,



 alguem ja enfrentou algum problema de incompatibilidade do Delphi 7 com

 computadores com processador AMD Athlon X2 500B, ou outro parecido ?



 Sei que nao deveria haver incompatibilidade, mas tenho um sistema com

 varias threads, onde monitoro/libero uma catraca de acesso atraves de

 componentes Activex, este sistema funciona em varios computadores sem erros,

 mas neste especifico esta dando varios erros estranhos.



 O micro é um HP, ja foi formatado, reinstalado tudo, esta tudo funcionando

 bem (XP, Office, etc), menos o que precisava :( , que é o sistema..



 Se alguem tiver alguma dica, ou se ja passou por algum problema assim...

 agradeco qualquer ajuda.



 Obrigado

 Moreira



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



  





[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] erro ao restaurar backUp do interbase

2009-11-19 Por tôpico Alisson Yahoo
Deu algum quando começou o backup e o arquivo ficou travado. Se reiniciar o 
computador deve resolver. 

__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 



Re: [delphi-br] Erro estranho usando um Strings.LoadFromFile

2009-10-27 Por tôpico Júlio César Santiago Guiótti
Felipe,

pelo fato de ter dado erro em duas estruturas distintas (TStringList e
TextFile) é muito provável que o erro esteja no arquivo.
Tente gerar outro arquivo texto de teste.

Abraço,
Júlio César Santiago Guiótti


2009/10/27 Fellipe Henrique felli...@gmail.com



 Amigos, estou usando um StringList para carregar um arquivo texto, porém
 alguns arquivos textos, que abrem normalmente no Notepad, abrem assim pelo
 Delphi:

 'ÿþ'#0'?'#0'x'#0'm'#0'l'#0'
 '#0'v'#0'e'#0'r'#0's'#0'i'#0'o'#0'n'#0'='#0''#0'1'#0'.'#0'0'#0''#0'

 '#0'e'#0'n'#0'c'#0'o'#0'd'#0'i'#0'n'#0'g'#0'='#0''#0'U'#0'T'#0'F'#0'-'#0'8'#0''#0'?'#0''#0''#0'N'#0'F'#0'e'#0'

 '#0'x'#0'm'#0'l'#0'n'#0's'#0'='#0''#0'h'#0't'#0't'#0'p'#0':'#0'/'#0'/'#0'w'#0'w'#0'w'#0'.'#0'p'#0'o'#0'r'#0't'#0'a'#0'l'#0'f'#0'i'#0's'#0'c'#0'a'#0'l'#0'.'#0'i'#0'n'#0'f'#0'.'#0'b'#0'r'#0'/'#0'n'#0'f'#0'e'#0''#0''#0''#0'i'#0'n'#0'f'#0'N'#0'F'#0'e'#0'

 '#0'I'#0'd'#0'='#0''#0'N'#0'F'#0'e'#0'3'#0'1'#0'0'#0'9'#0'0'#0'9'#0'2'#0'0'#0'9'#0'0'#0'9'#0'2'#0'9'#0'7'#0'0'#0'0'#0'0'#0'1'#0'1'#0'0'#0'5'#0'5'#0'0'#0'0'#0'1'#0'0'#0'0'#0'0'#0'0'#0'0'#0'0'#0'1'#0'5'#0'1'#0'0'#0'0'#0'0'#0'0'#0'0'#0'0'#0'1'#0'5'#0'0'#0'0'#0''#0'

 '#0'v'#0'e'#0'r'#0's'#0'a'#0'o'#0'='#0''#0'1'#0'.'#0'1'#0'0'#0''#0''#0''#0'i'#0'd'#0'e'#0''#0''#0'c'#0'U'#0'F'#0''#0'3'#0'1'#0''#0'/'#0'c'#0'U'#0'F'#0''#0''#0'c'#0'N'#0'F'#0''#0'0'#0'0'#0'0'#0'0'#0'0'#0'0'#0'1'#0'5'#0'0'#0''#0'/'#0'c'#0'N'#0'F'#0''#0''#0'n'#0'a'#0't'#0'O'#0'p'#0''#0'V'#0'e'#0'n'#0'd'#0'a'#0'
 '#0'd'#0'e'#0' '#0'm'#0'e'#0'r'#0'c'#0'a'#0'd'#0'o'#0'r'#0'i'#0'a'#0'
 '#0'a'#0'd'#0'q'#0'u'#0'i'#0'r'#0'i'#0'd'#0'a'#0' '#0'o'#0'u'#0'
 '#0'r'#0'e'#0'c'#0'e'#0'b'#0'i'#0'd'#0'a'#0' '#0'd'#0'e'#0'

 '#0't'#0'e'#0'r'#0'c'#0'e'#0'i'#0'r'#0'o'#0's'#0''#0'/'#0'n'#0'a'#0't'#0'O'#0'p'#0''#0''#0'i'#0'n'#0'd'#0'P'#0'a'#0'g'#0''#0'1'#0''#0'/'#0'i'#0'n'#0'd'#0'P'#0'a'#0'g'#0''#0''#0'm'#0'o'#0'd'#0''#0'5'#0'5'#0''#0'/'#0'm'#0'o'#0'd'#0''#0''#0's'#0'e'#0'r'#0'i'#0'e'#0''#0'1'#0''#0'/'#0's'#0'e'#0'r'#0'i'#0'e'#0''#0''#0'n'#0'N'#0'F'#0''#0'1'#0'5'#0'1'#0''#0'/'#0'n'#0'N'#0'F'#0''#0''#0'd'#0'E'#0'm'#0'i'#0''#0'2'#0'0'#0'0'#0'9'#0'-'#0'0'#0'9'#0'-'#0'2'#0'4'#0''#0'/'#0'd'#0'E'#0'm'#0'i'#0''#0''#0'd'#0'S'#0'a'#0'i'#0'E'#0'n'#0't'#0''#0'2'#0'0'#0'0'#0'9'#0'-'#0'0'#0'9'#0'-'#0'2'#0'4'#0''#0'/'#0'd'#0'S'#0'a'#0'i'#0'E'#0'n'#0't'#0''#0''#0't'#0'p'#0'N'#0'F'#0''#0'1'#0''#0'/'#0't'#0'p'#0'N'#0'F'#0''#0''#0'c'#0'M'#0'u'#0'n'#0'F'#0'G'#0''#0'3'#0'1'#0'4'#0'3'#0'9'#0'0'

 Até aí, achei que o problema era do StringList, troquei por uma função que
 le usando ReadLn, linha a linha, e mesma coisa... nada... e o mais estranho
 é que tem arquivos que le normalmente...

 Alguém já passou por isso? O que pode ser?

 --
 _
 T.·.F.·.A.·.
 Fellipe Henrique
 --
 CAMPANHA POR UMA INTERNET SEGURA
 Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar
 mensagens use SEMPRE o Cco (cópia oculta).
 Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar
 um e-mail, delete todas as informações que apareçam no corpo do e-mail e
 que
 possam ser usadas por hackers.
 ###

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

  



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



Re: [delphi-br] Erro estranho usando um Strings.LoadFromFile

2009-10-27 Por tôpico Joao Morais
O texto está provavelmente em UTF-8 com um indicador no início do
arquivo informando que é UTF-8 (BOM). Tente um save as no notepad e
grave em ISO, CP1252 ou algo que o Delphi entenda.

Joao Morais



2009/10/27 Fellipe Henrique felli...@gmail.com:
 Amigos, estou usando um StringList para carregar um arquivo texto, porém
 alguns arquivos textos, que abrem normalmente no Notepad, abrem assim pelo
 Delphi:

 'ÿþ'#0'?'#0'x'#0'm'#0'l'#0'
 '#0'v'#0'e'#0'r'#0's'#0'i'#0'o'#0'n'#0'='#0''#0'1'#0'.'#0'0'#0''#0'
[snip]


Re: [delphi-br] Erro em bloco try...finally

2009-10-23 Por tôpico Adriano O. Cipriano
Você vai ter que criar dois blocos try..
Assim:

try
   try
   
   except
   
   end;
finally
   .
end;

[]´s
Adriano


  - Original Message - 
  From: Alisson Yahoo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, October 23, 2009 8:30 AM
  Subject: [delphi-br] Erro em bloco try...finally


Pessoal, tenho um código em bloco try...finally que não mostra mensagem 
  quando há uma exceção. Esse tipo de estrutura esconde as exceções? Eu tenho 
  que colocar um bloco try...except dentro do try...finally? 

  __
  Faça ligações para outros computadores com o novo Yahoo! Messenger 
  http://br.beta.messenger.yahoo.com/ 


  

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



Re: [delphi-br] Erro DBX+Firebird Delphi 2010

2009-10-21 Por tôpico Marcelo Moacir Florindo
Olá,

Este erro, normalmente, refere-se a parametros de passagem.

Qual o teu sql?

Abraços,

Marcelo

2009/10/20 Fellipe Henrique felli...@gmail.com



 Amigos, testando o D2010, eis que me deparo com um problema em uma tabela
 simples...

 CREATE TABLE AGENDA (
 IDAGENDA INTEGER NOT NULL,
 IDMEDICO INTEGER,
 DATA DATE,
 OBS_DIA BLOB SUB_TYPE 1 SEGMENT SIZE 80
 );

 Ao tentar puxar os Fields:

 dbExpress .. unknown ISC 0

 Porém a tabela tá certa... abro tranquilo no IBExpert...

 O Firebird que uso é o 2.0.5

 O que posso estar fazendo de errado?
 --
 _
 T.·.F.·.A.·.
 Fellipe Henrique
 --
 CAMPANHA POR UMA INTERNET SEGURA
 Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar
 mensagens use SEMPRE o Cco (cópia oculta).
 Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar
 um e-mail, delete todas as informações que apareçam no corpo do e-mail e
 que
 possam ser usadas por hackers.
 ###

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

  




-- 
Marcelo Moacir Florindo
Analista/Desenvolvedor
http://www.gestaotec.com.br


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



RE: [delphi-br] Erro DBX+Firebird Delphi 2010

2009-10-21 Por tôpico Bruno Lichot
Acabei de publicar um exemplo com um CRUD e uso de InternalCalc e Agregates com 
Delphi 2010 e FireBird.

 

HTTP://cc.embarcadero.com/author/795118

 

Abs

 

BL

 

From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] On 
Behalf Of Marcelo Moacir Florindo
Sent: quarta-feira, 21 de outubro de 2009 09:26
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Erro DBX+Firebird Delphi 2010

 

  

Olá,

Este erro, normalmente, refere-se a parametros de passagem.

Qual o teu sql?

Abraços,

Marcelo

2009/10/20 Fellipe Henrique felli...@gmail.com mailto:fellipeh%40gmail.com 



 Amigos, testando o D2010, eis que me deparo com um problema em uma tabela
 simples...

 CREATE TABLE AGENDA (
 IDAGENDA INTEGER NOT NULL,
 IDMEDICO INTEGER,
 DATA DATE,
 OBS_DIA BLOB SUB_TYPE 1 SEGMENT SIZE 80
 );

 Ao tentar puxar os Fields:

 dbExpress .. unknown ISC 0

 Porém a tabela tá certa... abro tranquilo no IBExpert...

 O Firebird que uso é o 2.0.5

 O que posso estar fazendo de errado?
 --
 _
 T.·.F.·.A.·.
 Fellipe Henrique
 --
 CAMPANHA POR UMA INTERNET SEGURA
 Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar
 mensagens use SEMPRE o Cco (cópia oculta).
 Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar
 um e-mail, delete todas as informações que apareçam no corpo do e-mail e
 que
 possam ser usadas por hackers.
 ###

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

 


-- 
Marcelo Moacir Florindo
Analista/Desenvolvedor
http://www.gestaotec.com.br

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



 

Click here 
https://www.mailcontroller.altohiway.com/sr/++C1lmfv4!jTndxI!oX7Up4RmTWEAj2hmAD3tvwEkMDk0rg6M6OCqiPiFKrLn+KPPlN8k7TNvyMakVWf!6zCig==
  to report this email as spam.

This message has been scanned for viruses by MailController 
http://www.MailController.altohiway.com/ .



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



Re: [delphi-br] Erro ao carregar dll

2009-10-17 Por tôpico Moacir - GMail
Alisson,

De uma googlada e vc obterá algumas respostas.

Pelo que vi aqui, pode se tratar de virus !!

http://www.google.com.br/search?sourceid=chromeie=UTF-8q=Libeay32.dll 
http://www.google.com.br/search?sourceid=chromeie=UTF-8q=Libeay32.dll

Sucesso !!

Moacir



Alisson Yahoo escreveu:
 Uso algumas dlls em meu projeto. Quando tento abrir o exe em algumas 
 máquinas pede uma dll que não está incluída no projeto(Libeay32.dll). 
 Inclusive em algumas máquinas o exe nem abre se não existir essa dll, dando 
 a seguinte mensagem: Aplicativo não inicializado corretamente (9xc015002). 
 Clique em OK para finalizar.. Alguém sabe do que se trata essa dll, e por 
 que meu programa está pedindo ela? 

 __
 Faça ligações para outros computadores com o novo Yahoo! Messenger 
 http://br.beta.messenger.yahoo.com/ 


 

   


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



Re: [delphi-br] Erro ao carregar dll

2009-10-17 Por tôpico Dirlei Dionísio
Alisson,

Libeay32.dll é usada na implementação de SSL. Sua aplicação talvez não use
SSL, mas certamente depende de alguma DLL que usa. Seu programa funciona em
algumas máquinas porque elas já possuem essa DLL, provavelmente porque a
instalação de algum programa a levou.

Ah, ela não tem nada a ver com vírus, ok?

Um abraço.


2009/10/17 Alisson Yahoo alss...@yahoo.com.br



 Uso algumas dlls em meu projeto. Quando tento abrir o exe em algumas
 máquinas pede uma dll que não está incluída no projeto(Libeay32.dll).
 Inclusive em algumas máquinas o exe nem abre se não existir essa dll, dando

 a seguinte mensagem: Aplicativo não inicializado corretamente (9xc015002).

 Clique em OK para finalizar.. Alguém sabe do que se trata essa dll, e por
 que meu programa está pedindo ela?

 __
 Faça ligações para outros computadores com o novo Yahoo! Messenger
 http://br.beta.messenger.yahoo.com/
  



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



Re: [delphi-br] Erro ao gravar - Dbx

2009-10-14 Por tôpico Ricardo Diniz
Bom dia...
 
Verifique alguns pontos como:
- Existe algum join q tras campos de outra tabela nessa edição do DBX?
- Verifique os FLAGS dos campos no CDS!
 
Já me ocorreu um erro parecido mas era em um DbCombo.
 
Att.
Ricardo.

--- Em ter, 13/10/09, Marcelo Moacir Florindo marceloflori...@gmail.com 
escreveu:


De: Marcelo Moacir Florindo marceloflori...@gmail.com
Assunto: [delphi-br] Erro ao gravar - Dbx
Para: delphi-br@yahoogrupos.com.br, n...@yahoogrupos.com.br
Data: Terça-feira, 13 de Outubro de 2009, 17:44


  



Colegas,

Ao fazer um cds.post está aparecendo o erro:

Remote Error: Dbx.Sql is an unreconized command type.
Alguma idéia?

Abração a todos!

-- 
Marcelo Moacir Florindo
Analista/Desenvolve dor
http://www.gestaote c.com.br

[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] Erro em Generator do Firebird

2009-10-14 Por tôpico Andrei Luís
Está correto, o generator corre direto no banco, fora da transação. Das duas
uma, ou você roda essa consulta uma linha antes do post (mesmo assim se der
erro no post, o generator já vai ter rodado) ou crie uma trigger direto no
banco.

[]
Andrei

2009/10/14 Alisson Yahoo alss...@yahoo.com.br

 Faço uma consulta que busca e incrementa o generator no BD:

 Select Gen_Id(Gen_PedVenda, 1) as Ultimo From Rdb$Database;

  Esse código está dentro uma transação juntamente com uma rotina de
 inserção
 em BD. Se der erro na inserção a mesma é cancelada, mas o incremento do
 generator não. Isso é normal? O que pode estar acontecendo?





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



Re: [delphi-br] Erro em Generator do Firebird

2009-10-14 Por tôpico Ricardo César Cardoso
Pensando aqui com os meus botões, sem avaliar se é viável ou não e nem as 
consequências, você poderia guardar o valor atual do generator antes do post e 
em caso de erro, pode setar o valor do generator para o valor antes do post. 
Acho que o único problema reside em ambientes multi-camadas... mas não tenho 
certeza.
Abraço,Ricardo

1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.

2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor 
compreendida.

3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!

--- Em qua, 14/10/09, Andrei Luís compuvale.softw...@gmail.com escreveu:

De: Andrei Luís compuvale.softw...@gmail.com
Assunto: Re: [delphi-br] Erro em Generator do Firebird
Para: delphi-br@yahoogrupos.com.br
Data: Quarta-feira, 14 de Outubro de 2009, 15:59












 
 





  Está correto, o generator corre direto no banco, fora da 
transação. Das duas

uma, ou você roda essa consulta uma linha antes do post (mesmo assim se der

erro no post, o generator já vai ter rodado) ou crie uma trigger direto no

banco.



[]

Andrei



2009/10/14 Alisson Yahoo alss...@yahoo. com.br



 Faço uma consulta que busca e incrementa o generator no BD:



 Select Gen_Id(Gen_PedVenda , 1) as Ultimo From Rdb$Database;



  Esse código está dentro uma transação juntamente com uma rotina de

 inserção

 em BD. Se der erro na inserção a mesma é cancelada, mas o incremento do

 generator não. Isso é normal? O que pode estar acontecendo?









[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] Erro em Generator do Firebird

2009-10-14 Por tôpico Andrei Luís
Olá Ricardo.

Com certeza daria problema num ambiente com + de 1 usuário simultâneo.

Cenário:

Usuário 1:
- Generator Gen_PedVenda é 100
- Select Gen_Id(Gen_PedVenda, 1) as Ultimo From Rdb$Database;
- Generator Gen_PedVenda é 101

Usuário 2:
- Select Gen_Id(Gen_PedVenda, 1) as Ultimo From Rdb$Database;
- Generator Gen_PedVenda é 102
- Post - OK

Usuário 1:
- Post - Erro
- Set generator Gen_PedVenda=100;
- Tá feito a m...


Alisson, o que esse generator alimenta? A chave primária ou o número do
pedido? Se for a chave primária, não tem stress se o nr pular. Se for o nr
do pedido, a melhor forma que vejo é via trigger no banco.

Outra idéia: procure por um artigo do Bruno Lichot que fala de números
sequenciais sem furos (não lembro agora o nome exato do artigo)

[]
Andrei





2009/10/14 Ricardo César Cardoso ricardo_engs...@yahoo.com.br

 Pensando aqui com os meus botões, sem avaliar se é viável ou não e nem as
 consequências, você poderia guardar o valor atual do generator antes do post
 e em caso de erro, pode setar o valor do generator para o valor antes do
 post.
 Acho que o único problema reside em ambientes multi-camadas... mas não
 tenho certeza.
 Abraço,Ricardo

 1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.

 2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor
 compreendida.

 3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!

 --- Em qua, 14/10/09, Andrei Luís compuvale.softw...@gmail.com escreveu:

 De: Andrei Luís compuvale.softw...@gmail.com
 Assunto: Re: [delphi-br] Erro em Generator do Firebird
 Para: delphi-br@yahoogrupos.com.br
 Data: Quarta-feira, 14 de Outubro de 2009, 15:59



















  Está correto, o generator corre direto no banco, fora da
 transação. Das duas

 uma, ou você roda essa consulta uma linha antes do post (mesmo assim se der

 erro no post, o generator já vai ter rodado) ou crie uma trigger direto no

 banco.



 []

 Andrei



 2009/10/14 Alisson Yahoo alss...@yahoo. com.br



  Faço uma consulta que busca e incrementa o generator no BD:

 

  Select Gen_Id(Gen_PedVenda , 1) as Ultimo From Rdb$Database;

 

   Esse código está dentro uma transação juntamente com uma rotina de

  inserção

  em BD. Se der erro na inserção a mesma é cancelada, mas o incremento do

  generator não. Isso é normal? O que pode estar acontecendo?




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



Re: [delphi-br] Erro em Generator do Firebird

2009-10-14 Por tôpico Alisson Yahoo
Pessoal, obrigado pelas sugestões. Ao invés de usar generator, estou 
pensando em fazer o seguinte: Vou criar um campo em uma tabela de 
configurações para guardar o número do último registro e fazer a sequência 
abaixo. O que acham?

try
   Iniciar transação;
   Selecionar o valor do campo;
   Inserir Dados(Tabela mestre e detalhe);
   Atualizar valor do campo para Valor+1;
   Confirmar transação;
except
   Cancelar transação;
end;


__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 


Re: [delphi-br] Erro em Generator do Firebird

2009-10-14 Por tôpico Andrei Luís
Alisson, se isso não for bem planejado pode dar problema também.

A solução que o Bruno bolou também envolve tabela ao invés de generator, mas
o cara fez um sistema a prova de erros, dê uma pesquisada no Code Central
que deve estar lá.

[]
Andrei

2009/10/14 Alisson Yahoo alss...@yahoo.com.br

 Pessoal, obrigado pelas sugestões. Ao invés de usar generator, estou
 pensando em fazer o seguinte: Vou criar um campo em uma tabela de
 configurações para guardar o número do último registro e fazer a sequência
 abaixo. O que acham?

 try
   Iniciar transação;
   Selecionar o valor do campo;
   Inserir Dados(Tabela mestre e detalhe);
   Atualizar valor do campo para Valor+1;
   Confirmar transação;
 except
   Cancelar transação;
 end;





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



RE: [delphi-br] Erro em Generator do Firebird

2009-10-14 Por tôpico Bruno Lichot
Esta disponivel no meu link de downloads, a maioria dos exemplos de datasnap 
tem a função retornaid que faz isso.

 

HTTP://cc.embarcadero.com/author/795118

 

Abs

 

BL

 

From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] On 
Behalf Of Andrei Luís
Sent: quarta-feira, 14 de outubro de 2009 23:13
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Erro em Generator do Firebird

 

  

Alisson, se isso não for bem planejado pode dar problema também.

A solução que o Bruno bolou também envolve tabela ao invés de generator, mas
o cara fez um sistema a prova de erros, dê uma pesquisada no Code Central
que deve estar lá.

[]
Andrei

2009/10/14 Alisson Yahoo alss...@yahoo.com.br mailto:alssnco%40yahoo.com.br 

 Pessoal, obrigado pelas sugestões. Ao invés de usar generator, estou
 pensando em fazer o seguinte: Vou criar um campo em uma tabela de
 configurações para guardar o número do último registro e fazer a sequência
 abaixo. O que acham?

 try
 Iniciar transação;
 Selecionar o valor do campo;
 Inserir Dados(Tabela mestre e detalhe);
 Atualizar valor do campo para Valor+1;
 Confirmar transação;
 except
 Cancelar transação;
 end;




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



 

Click here 
https://www.mailcontroller.altohiway.com/sr/38Nc4MOt25XTndxI!oX7UnrG9zI9o40spEMNBeZ8lwfdPN+T8dkK9vqqzaPoCz0rnSJtXAzzWJCENNTgBxFzrw==
  to report this email as spam.

This message has been scanned for viruses by MailController 
http://www.MailController.altohiway.com/ .



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



Re: [delphi-br] Erro migrar delphi 7 para delphi 2010

2009-10-13 Por tôpico stefaniak
troque aonde estiver pchar(xx) por pansichar(xx);


Em 09/10/2009 20:47, Samuel M. Basso escreveu:

 Olá Pessoal!

 Estou começando a fazer uns testes com o Delphi 2010 e estou querendo 
 migrar
 minha aplicação feita em delphi 7 para ele. E esta ocorrendo diversos 
 erros
 de incompatibilidade, segue erro abaixo:

 Incompatible types: 'AnsiChar' and 'Char'

 Alguem já passou por isso?

 -- 
 Atenciosamente,

 Samuel M. Basso
 Cel: (54) 8135-3723
 Skype: samuelbasso
 E-mail/MSN: samuelba...@gmail.com mailto:samuelbasso%40gmail.com
 Web site: www.samuelbasso.com

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

 



Re: [delphi-br] Erro migrar delphi 7 para delphi 2010

2009-10-13 Por tôpico Samuel M. Basso
Por exemplo nessa funcao é onde o erro aparece:

function AbDrive(const ArchiveName : string) : AnsiChar;
var
  iPos: Integer;
  Path : string;
begin
  Path := ExpandFileName(ArchiveName);
  iPos := Pos(':', Path);
  if (iPos = 0) then
Result := 'A'
  else
Result := Path[1]; //AQUI OCORRE O ERRO
end;

Erro: Incompatible types: 'AnsiChar' and 'Char'

Alterei a variavel Path para AnsiChar mas ai teria que mudar tambem
ArchiveName para AnsiChar tmb?

Nao compreendi o que necessariamente preciso mudar pois esse erro tem MUITO
para migrar.


2009/10/12 stefaniak stefan...@bol.com.br



 troque aonde estiver pchar(xx) por pansichar(xx);

 Em 09/10/2009 20:47, Samuel M. Basso escreveu:

 
  Olá Pessoal!
 
  Estou começando a fazer uns testes com o Delphi 2010 e estou querendo
  migrar
  minha aplicação feita em delphi 7 para ele. E esta ocorrendo diversos
  erros
  de incompatibilidade, segue erro abaixo:
 
  Incompatible types: 'AnsiChar' and 'Char'
 
  Alguem já passou por isso?
 
  --
  Atenciosamente,
 
  Samuel M. Basso
  Cel: (54) 8135-3723
  Skype: samuelbasso
  E-mail/MSN: samuelba...@gmail.com samuelbasso%40gmail.com mailto:
 samuelbasso%40gmail.com samuelbasso%2540gmail.com
  Web site: www.samuelbasso.com
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 

  




-- 
Atenciosamente,

Samuel M. Basso
Cel: (54) 8135-3723
Skype: samuelbasso
E-mail/MSN: samuelba...@gmail.com
Web site: www.samuelbasso.com


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



Re: [delphi-br] Erro - no corresponding master record found

2009-10-13 Por tôpico Marcelo Luiz Onhate
Como estão os seus ProviderFlags?

Marcelo Moacir Florindo escreveu:
  

 Colegas,

 Eu tenho na query master:

 select * from funcionario
 where codigo=:codigo

 no detalhe:

 SELECT f.*,d.nome
 FROM funcionario_professor f
 INNER JOIN disciplina d ON (d.codigo=f.codigoMateria)
 where f.codigoFuncionario=:codigo

 Porém ao dar o post está dando o erro:

 no corresponding master record found

 O que poderia estar ocorrendo, se a correspondência, acho eu, está 
 correta?

 Obrigado a todos,




Re: [delphi-br] Erro migrar delphi 7 para delphi 2010

2009-10-13 Por tôpico stefaniak
com resultado string a sua função dá certo.


function AbDrive(const ArchiveName : string) : string;
var
iPos: Integer;
Path : string;
begin
Path := ExpandFileName(ArchiveName);
iPos := Pos(':', Path);
if (iPos = 0) then
Result := 'A'
else
Result := Path[1]; //AQUI OCORRE O ERRO
end;

  - Original Message - 
  From: Samuel M. Basso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, October 13, 2009 10:49 AM
  Subject: Re: [delphi-br] Erro migrar delphi 7 para delphi 2010


Por exemplo nessa funcao é onde o erro aparece:

  function AbDrive(const ArchiveName : string) : AnsiChar;
  var
  iPos: Integer;
  Path : string;
  begin
  Path := ExpandFileName(ArchiveName);
  iPos := Pos(':', Path);
  if (iPos = 0) then
  Result := 'A'
  else
  Result := Path[1]; //AQUI OCORRE O ERRO
  end;

  Erro: Incompatible types: 'AnsiChar' and 'Char'

  Alterei a variavel Path para AnsiChar mas ai teria que mudar tambem
  ArchiveName para AnsiChar tmb?

  Nao compreendi o que necessariamente preciso mudar pois esse erro tem MUITO
  para migrar.

  2009/10/12 stefaniak stefan...@bol.com.br

  
  
   troque aonde estiver pchar(xx) por pansichar(xx);
  
   Em 09/10/2009 20:47, Samuel M. Basso escreveu:
  
   
Olá Pessoal!
   
Estou começando a fazer uns testes com o Delphi 2010 e estou querendo
migrar
minha aplicação feita em delphi 7 para ele. E esta ocorrendo diversos
erros
de incompatibilidade, segue erro abaixo:
   
Incompatible types: 'AnsiChar' and 'Char'
   
Alguem já passou por isso?
   
--
Atenciosamente,
   
Samuel M. Basso
Cel: (54) 8135-3723
Skype: samuelbasso
E-mail/MSN: samuelba...@gmail.com samuelbasso%40gmail.com mailto:
   samuelbasso%40gmail.com samuelbasso%2540gmail.com
Web site: www.samuelbasso.com
   
[As partes desta mensagem que não continham texto foram removidas]
   
   
  
   
  

  -- 
  Atenciosamente,

  Samuel M. Basso
  Cel: (54) 8135-3723
  Skype: samuelbasso
  E-mail/MSN: samuelba...@gmail.com
  Web site: www.samuelbasso.com

  [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] Erro migrar delphi 7 para delphi 2010

2009-10-13 Por tôpico Andreano Lanusse
Chr() no Delphi 2009 retorna WideChar, para resolver seu problema faça um type 
cast para AnsiChar

  function AbDrive(const ArchiveName: string): AnsiChar;
  var
iPos: Integer;
Path: string;
  begin
Path := ExpandFileName(ArchiveName);
iPos := Pos(':', Path);
if (iPos = 0) then
  Result := 'A'
else
  Result := AnsiChar(Path[1]); // ASSIM NÃO IRÁ OCORRER ERRO
  end;

From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] On 
Behalf Of stefaniak
Sent: Tuesday, October 13, 2009 10:03 AM
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Erro migrar delphi 7 para delphi 2010



com resultado string a sua função dá certo.

function AbDrive(const ArchiveName : string) : string;
var
iPos: Integer;
Path : string;
begin
Path := ExpandFileName(ArchiveName);
iPos := Pos(':', Path);
if (iPos = 0) then
Result := 'A'
else
Result := Path[1]; //AQUI OCORRE O ERRO
end;

- Original Message -
From: Samuel M. Basso
To: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br
Sent: Tuesday, October 13, 2009 10:49 AM
Subject: Re: [delphi-br] Erro migrar delphi 7 para delphi 2010

Por exemplo nessa funcao é onde o erro aparece:

function AbDrive(const ArchiveName : string) : AnsiChar;
var
iPos: Integer;
Path : string;
begin
Path := ExpandFileName(ArchiveName);
iPos := Pos(':', Path);
if (iPos = 0) then
Result := 'A'
else
Result := Path[1]; //AQUI OCORRE O ERRO
end;

Erro: Incompatible types: 'AnsiChar' and 'Char'

Alterei a variavel Path para AnsiChar mas ai teria que mudar tambem
ArchiveName para AnsiChar tmb?

Nao compreendi o que necessariamente preciso mudar pois esse erro tem MUITO
para migrar.

2009/10/12 stefaniak stefan...@bol.com.brmailto:stefaniak%40bol.com.br



 troque aonde estiver pchar(xx) por pansichar(xx);

 Em 09/10/2009 20:47, Samuel M. Basso escreveu:

 
  Olá Pessoal!
 
  Estou começando a fazer uns testes com o Delphi 2010 e estou querendo
  migrar
  minha aplicação feita em delphi 7 para ele. E esta ocorrendo diversos
  erros
  de incompatibilidade, segue erro abaixo:
 
  Incompatible types: 'AnsiChar' and 'Char'
 
  Alguem já passou por isso?
 
  --
  Atenciosamente,
 
  Samuel M. Basso
  Cel: (54) 8135-3723
  Skype: samuelbasso
  E-mail/MSN: samuelba...@gmail.commailto:samuelbasso%40gmail.com 
  samuelbasso%40gmail.com mailto:
 samuelbasso%40gmail.com samuelbasso%2540gmail.com
  Web site: www.samuelbasso.com
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 




--
Atenciosamente,

Samuel M. Basso
Cel: (54) 8135-3723
Skype: samuelbasso
E-mail/MSN: samuelba...@gmail.commailto:samuelbasso%40gmail.com
Web site: www.samuelbasso.com

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

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


CONFIDENTIALITY NOTICE: This email message is for the sole use of the intended 
recipient(s) and may contain confidential and privileged information. Any 
unauthorized review, use, disclosure or distribution is prohibited. If you are 
not the intended recipient, please contact the sender by reply email and 
destroy all copies of the original message.



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



Re: [delphi-br] Erro - no corresponding master record found

2009-10-13 Por tôpico Marcelo Moacir Florindo
O erro está no seguinte:

No master:

select * from funcionario (O CAMPO CHAVE AQUI É CODIGO)

No Detalhe:

select * from funcionario_professor
where codigofuncionario=:codigo

O sistema está populando no campo codigo do funcionario_professor o código
do master. Ele deveria estar populando no codigoFuncionario.

Pq será?

Grato a todos,

Marcelo



2009/10/13 Marcelo Luiz Onhate marc...@systempro.com.br



 Como estão os seus ProviderFlags?

 Marcelo Moacir Florindo escreveu:

 
 
  Colegas,
 
  Eu tenho na query master:
 
  select * from funcionario
  where codigo=:codigo
 
  no detalhe:
 
  SELECT f.*,d.nome
  FROM funcionario_professor f
  INNER JOIN disciplina d ON (d.codigo=f.codigoMateria)
  where f.codigoFuncionario=:codigo
 
  Porém ao dar o post está dando o erro:
 
  no corresponding master record found
 
  O que poderia estar ocorrendo, se a correspondência, acho eu, está
  correta?
 
  Obrigado a todos,
 

  




-- 
Marcelo Moacir Florindo
Analista/Desenvolvedor
http://www.gestaotec.com.br


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



Re: [delphi-br] Erro Componentes Indy

2009-10-06 Por tôpico Marcos Douglas
2009/10/5 Eduardo Suruagy eduardosuru...@gmail.com

 Alguem sabe o motivo desse erro??
 Build
  [Fatal Error] MainUnit.pas(10): Unit IdCommandHandlers was compiled with a
 different version of IdComponent.TIdComponent


Você instalou o Indy 10 mas não removeu (completamente) o Indy 9.
Desinstale o 10. Remova o 9, desinstalando os pacotes e _deletando_ os
arquivos com prefixo Id* e depois instale o 10.

--
Marcos Douglas


Re: [delphi-br] Erro Componentes Indy

2009-10-06 Por tôpico Eduardo Suruagy
Me diz uma coisa, eu apago todos os arquivos que começa, com id ? Isso
so na pasta de instalação do delphi ou tem outra pasta?


Eduardo Suruagy
Net System - (82) 9117-0204


2009/10/6 Eduardo Suruagy eduardosuru...@gmail.com

 Valeu Douglas, vou tentar aqui e qualquer coisa eu falo ok!!!



 Eduardo Suruagy
 Net System - (82) 9117-0204


 2009/10/6 Marcos Douglas m...@delfire.net



 2009/10/5 Eduardo Suruagy 
 eduardosuru...@gmail.comeduardosuruagy%40gmail.com
 

 
  Alguem sabe o motivo desse erro??
  Build
   [Fatal Error] MainUnit.pas(10): Unit IdCommandHandlers was compiled
 with a
  different version of IdComponent.TIdComponent
 

 Você instalou o Indy 10 mas não removeu (completamente) o Indy 9.
 Desinstale o 10. Remova o 9, desinstalando os pacotes e _deletando_ os
 arquivos com prefixo Id* e depois instale o 10.

 --
 Marcos Douglas
  





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



Re: [delphi-br] Erro Componentes Indy

2009-10-06 Por tôpico Eduardo Suruagy
Valeu Douglas, vou tentar aqui e qualquer coisa eu falo ok!!!



Eduardo Suruagy
Net System - (82) 9117-0204


2009/10/6 Marcos Douglas m...@delfire.net



 2009/10/5 Eduardo Suruagy 
 eduardosuru...@gmail.comeduardosuruagy%40gmail.com
 

 
  Alguem sabe o motivo desse erro??
  Build
   [Fatal Error] MainUnit.pas(10): Unit IdCommandHandlers was compiled with
 a
  different version of IdComponent.TIdComponent
 

 Você instalou o Indy 10 mas não removeu (completamente) o Indy 9.
 Desinstale o 10. Remova o 9, desinstalando os pacotes e _deletando_ os
 arquivos com prefixo Id* e depois instale o 10.

 --
 Marcos Douglas
  



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



Re: [delphi-br] Erro sinistro

2009-09-16 Por tôpico Vinicius A. Santos
Alisson Yahoo escreveu:
  
 
 Pessoal, tenho uma rotina onde atribuo valores a variáveis do tipo Real:
 
 Linha 1: rValItem := QualquerCoisa;
 Linha 2: rPercICMS := OutraCoisaQualquer;
 Linha 3: rVlrICMS := rValItem * rPercICMS;
 Linha 4: //ShowMessage(FormatFloat('#0.00', rVlrICMS);
 
 Se eu colocar um breakpoint na linha 3 eu verifico que variável rVlrICMS
 está com o valor = 0, mas as variáveis rValItem e rPercICMS estão com valor
 diferente de 0. Se eu habilitar a linha 4, a variável rVlrICMS recebe o
 valor corretamente. Alguém pode me ajudar a exorcizar esse espírito? Estou
 usando Delphi 7.

O depurador trabalha assim mesmo, o breakpoint pára ANTES da linha ser 
executada, tanto que se vc apertar F8, verá que a variável recebe os 
valores corretamente.
Portanto acho que não temos nenhum ET, ou espírito dentro da sua CPU. =D

-- 
Vinicius A. Santos
www.msisolucoes.com.br


Re: [delphi-br] Erro sinistro

2009-09-16 Por tôpico Marcelo Luiz Onhate
Se você não utilizar a variavel após a atribuição ela será ignorada. 
Acho que isso é feito durante a compilação ainda...

Alisson Yahoo escreveu:
  

 Pessoal, tenho uma rotina onde atribuo valores a variáveis do tipo Real:

 Linha 1: rValItem := QualquerCoisa;
 Linha 2: rPercICMS := OutraCoisaQualquer;
 Linha 3: rVlrICMS := rValItem * rPercICMS;
 Linha 4: //ShowMessage(FormatFloat('#0.00', rVlrICMS);

 Se eu colocar um breakpoint na linha 3 eu verifico que variável rVlrICMS
 está com o valor = 0, mas as variáveis rValItem e rPercICMS estão com 
 valor
 diferente de 0. Se eu habilitar a linha 4, a variável rVlrICMS recebe o
 valor corretamente. Alguém pode me ajudar a exorcizar esse espírito? 
 Estou
 usando Delphi 7.




Re: [delphi-br] Erro sinistro

2009-09-16 Por tôpico Yahoo
Viniucius, eu expliquei mal. Eu coloco o breakpoint é após a linha a ser 
verificada. O que está acontecendo é que a variável rVlrICMS fica sempre com 
valor zero, mesmo que as variáves rValItem e rPercICMS tenham valor diferente 
de zero. Se eu habilitar a linha 4 a variável rVlrICMS recebe o valor 
corretamente. Dê uma olhada no código:

Linha 1: rValItem := QualquerCoisa;
Linha 2: rPercICMS := OutraCoisaQualquer;
Linha 3: rVlrICMS := rValItem * rPercICMS;
Linha 4: //ShowMessage(FormatFloat('#0.00', rVlrICMS);


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



Re: [delphi-br] Erro ao enivar e-mail

2009-09-02 Por tôpico Guilherme Ventura de Souza
Trabalho na Multicobra em Bauru, mas trabalhava ai na softcon ^^

  - Original Message - 
  From: Eduardo Silva 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, September 02, 2009 7:54 AM
  Subject: RES: [delphi-br] Erro ao enivar e-mail


Trabalho na Câmara Municipal e vc?

  _ 

  De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
  nome de Guilherme Ventura de Souza
  Enviada em: terça-feira, 1 de setembro de 2009 15:06
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Erro ao enivar e-mail

  Eu tbm sou =PP
  trabalha aonde?
  - Original Message - 
  From: Eduardo Silva 
  To: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br 
  Sent: Tuesday, September 01, 2009 2:49 PM
  Subject: RES: [delphi-br] Erro ao enivar e-mail

  Sim, pq?

  _ 

  De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  [mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br
  os.com.br] Em
  nome de Guilherme Ventura de Souza
  Enviada em: terça-feira, 1 de setembro de 2009 08:46
  Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  Assunto: Re: [delphi-br] Erro ao enivar e-mail

  Lpnet? O.o

  Me intrometendo totalmente =P
  você é de Lençóis cara?

  - Original Message - 
  From: Eduardo Silva 
  To: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br 
  Sent: Tuesday, September 01, 2009 8:41 AM
  Subject: RES: [delphi-br] Erro ao enivar e-mail

  // Meu servidor SMTP

  NMSMTP1.Host := dmSIAEAP01.tblSIAECONFNM_SERVIDOR.AsString; //
  'bbs.lpnet.com.br';

  // Porta SMTP, não pode ser alterada

  NMSMTP1.Port := dmSIAEAP01.tblSIAECONFNR_PORTA.AsInteger; // 25

  // Nome de login do usuário

  NMSMTP1.UserID := dmSIAEAP01.tblSIAECONFNM_LOGIN.AsString; // 'manos';

  // Conecta ao servidor

  NMSMTP1.Connect;

  // Se ocorrer algum erro durante a conexão com o servidor, avise!

  if not NMSMTP1.Connected then

  raise Exception.Create('Erro de conexão');

  // Marca a posição atual do registro na tabela

  Posicao := dmSIAEAP01.tblSIAE0101.Bookmark;

  // Desabilita os controles Dataware

  dmSIAEAP01.tblSIAE0101.DisableControls;

  dmSIAEAP01.tblSIAE0101.First;

  while not dmSIAEAP01.tblSIAE0101.Eof do

  begin

  if dmSIAEAP01.tblSIAE0101NM_EMAIL.AsString  '' then

  begin

  Endereco := dmSIAEAP01.tblSIAE0101NM_EMAIL.AsString;

  with NMSMTP1.PostMessage do

  begin

  // Seu e-mail

  FromAddress := dmSIAEAP01.tblSIAECONFNM_EMAIL.AsString;
  // 'edua...@lpnet. mailto:%27eduardo%40lpnet.com.br com.br';

  // Seu nome

  FromName := dmSIAEAP01.tblSIAECONFNM_NOME.AsString;
  // 'Eduardo de Almeida Silva';

  ToAddress.Clear;

  // E-mail do(s) destinatário(s)

  ToAddress.Add(Endereco); // colocar aqui o endereço de
  quem vai receber o e-mail

  // Assunto da mensagem

  Subject := edtAssunto.Text; //'Teste de envio de e-mail
  através do delphi';

  // Corpo da mensagem

  Body.Clear;

  Body.Add(memoMensagem.Lines.Text);

  // Anexar arquivos

  // Attachments.Clear;

  // Endereço do anexo

  Attachments.AddStrings(Listbox.Items);

  // Attachments.Add(ListBox.Items.Text);

  // Manda o e-mail

  NMSMTP1.SendMail;

  end;

  end

  dmSIAEAP01.tblSIAE0101.Next;

  end;

  // Desconecta do servidor

  NMSMTP1.Disconnect;

  // Habilita os controles Dataware

  dmSIAEAP01.tblSIAE0101.EnableControls;

  // Volta a tabela na posição em que estava

  dmSIAEAP01.tblSIAE0101.Bookmark := Posicao;

  _ 

  De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  [mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br
  os.com.br] Em
  nome de Vinicius
  Enviada em: terça-feira, 1 de setembro de 2009 08:35
  Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  Assunto: RES: [delphi-br] Erro ao enivar e-mail

  Passe a sua rotina, derepente esta faltando algum detalhe que vc não esta
  percebendo.

  -Mensagem original-
  De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  [mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br
  os.com.br] Em
  nome de Eduardo Silva
  Enviada em: terça-feira, 1 de setembro de 2009 08:17
  Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  Assunto: RES: [delphi-br] Erro ao enivar e-mail

  O destinatário é válido.

  Não sei mais o que pode estar acontecendo.

  -Mensagem original-
  De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  [mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br
  os.com.br] Em
  nome de Leandro
  Enviada em: segunda-feira, 31 de agosto de 2009 17:34
  Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  Assunto: Re: [delphi-br] Erro ao enivar e-mail

  sim, q vc tem q adicionar pelo menos um destinatario valido..

  2009/8/31 Eduardo Silva eduko...@yahoo. mailto:edukobra%40yahoo.com.br
  com.br

  
  
   Galera, tentei enviar

RE: [delphi-br] Erro ao enivar e-mail

2009-09-01 Por tôpico Wilson, Stephen
Ola Eduardo

O Google tem alguns resultados interessantes (para 554 Refused). Uma sugestao e 
que talvez haja um problema com a configuracao de um dos servidores de correio. 
Voce recebe a mesma mensagem com qualquer destinatario? Lamento que eu nao 
posso ajudar mais.

Atenciosamente

Steve

-Original Message-
From: delphi-br@yahoogrupos.com.br
[mailto:delphi...@yahoogrupos.com.br]on Behalf Of Eduardo Silva
Sent: 01 September 2009 12:17
To: delphi-br@yahoogrupos.com.br
Subject: RES: [delphi-br] Erro ao enivar e-mail


O destinatário é válido.

Não sei mais o que pode estar acontecendo.


***
This e-mail and any files transmitted with it are confidential. If you are not 
the intended recipient, any reading, printing, storage, disclosure, copying or 
any other action taken in respect of this e-mail is prohibited and may be 
unlawful. If you are not the intended recipient, please notify the sender 
immediately by using the reply function and then permanently delete what you 
have received.
Content of emails received by this Trust will be subject to disclosure under 
the Freedom of Information Act 2000, subject to the specified exemptions, 
including the Data Protection Act 1998 and Caldicott Guardian principles.
This footnote also confirms that, unless otherwise stated, this email message 
has been swept by Sophos Anti-virus for the presence of computer viruses.
***



Re: [delphi-br] Erro ao enivar e-mail

2009-09-01 Por tôpico Leandro
pode ser q seu email esta sendo recusado pelo servidor de smtp por causa de
usuario e senha errados!
vc colocou a linha do password?
tente colocar no usuario tbm o resto do email @...

2009/9/1 Eduardo Silva eduko...@yahoo.com.br



 Sim, recebo, já tentei colocar um e-mail direto pra testar se não era erro
 na minha rotina, mas deu o mesmo erro.

 Já não sei mais o que fazer

 _

 De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto:
 delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em
 nome de Wilson, Stephen
 Enviada em: terça-feira, 1 de setembro de 2009 08:59
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Assunto: RE: [delphi-br] Erro ao enivar e-mail


 Ola Eduardo

 O Google tem alguns resultados interessantes (para 554 Refused). Uma
 sugestao e que talvez haja um problema com a configuracao de um dos
 servidores de correio. Voce recebe a mesma mensagem com qualquer
 destinatario? Lamento que eu nao posso ajudar mais.

 Atenciosamente

 Steve

 -Original Message-
 From: delphi...@yahoogrup 
 mailto:delphi-br%40yahoogrupos.com.brdelphi-br%2540yahoogrupos.com.br
 os.com.br
 [mailto:delphi...@yahoogrup 
 mailto:delphi-br%40yahoogrupos.com.brdelphi-br%2540yahoogrupos.com.br
 
 os.com.br]On Behalf Of Eduardo Silva
 Sent: 01 September 2009 12:17
 To: delphi...@yahoogrup 
 mailto:delphi-br%40yahoogrupos.com.brdelphi-br%2540yahoogrupos.com.br
 os.com.br
 Subject: RES: [delphi-br] Erro ao enivar e-mail

 O destinatário é válido.

 Não sei mais o que pode estar acontecendo.

 ***
 This e-mail and any files transmitted with it are confidential. If you are
 not the intended recipient, any reading, printing, storage, disclosure,
 copying or any other action taken in respect of this e-mail is prohibited
 and may be unlawful. If you are not the intended recipient, please notify
 the sender immediately by using the reply function and then permanently
 delete what you have received.
 Content of emails received by this Trust will be subject to disclosure
 under
 the Freedom of Information Act 2000, subject to the specified exemptions,
 including the Data Protection Act 1998 and Caldicott Guardian principles.
 This footnote also confirms that, unless otherwise stated, this email
 message has been swept by Sophos Anti-virus for the presence of computer
 viruses.
 ***

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

  




-- 
Leandro, MuTukA


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



Re: [delphi-br] Erro ClientDataSet

2009-09-01 Por tôpico Guilherme Ventura de Souza
Bom dia Dionatan, você já debugou para encontrar a linha com problema?
Provavelmente esteja na linha que você está atribuindo valor para o código.
Mas vc está atribuindo assim? CDSCliente.Value? E o nome do Field?

Bom enfim, você verificou se nesse ClienteDataSet você colocou algum evento no 
after ou before insert que possa estar chamando o metodo post e tirando o CDS 
de edição?

  - Original Message - 
  From: dionatanhenrique 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 01, 2009 8:11 AM
  Subject: [delphi-br] Erro ClientDataSet


Pessoal Bom dia,

  Seguinte tenho um cxgrid ligado ao clientdataset em uma aba, quando clico no 
grid (seleciono um registro) e clico no botão novo da um erro 
  CDSClient: DataSet not in edit or Insert mode.

  Porem no botao novo eu tenho o seguinte codigo:

  CDSClient.Open;
  CDSClient.Insert;
  PCPrinc.ActivePage := TSCad;
  CDSClient.Value := GeraCodigo;

  Quando eu nao clico no grid dai da certo!

  Oq ue poderia ser? como posso resolver esse problema?



  

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



Re: [delphi-br] Erro ao enivar e-mail

2009-09-01 Por tôpico Guilherme Ventura de Souza
Lpnet? O.o

Me intrometendo totalmente =P
você é de Lençóis cara?

  - Original Message - 
  From: Eduardo Silva 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 01, 2009 8:41 AM
  Subject: RES: [delphi-br] Erro ao enivar e-mail


// Meu servidor SMTP

  NMSMTP1.Host := dmSIAEAP01.tblSIAECONFNM_SERVIDOR.AsString; //
  'bbs.lpnet.com.br';

  // Porta SMTP, não pode ser alterada

  NMSMTP1.Port := dmSIAEAP01.tblSIAECONFNR_PORTA.AsInteger; // 25

  // Nome de login do usuário

  NMSMTP1.UserID := dmSIAEAP01.tblSIAECONFNM_LOGIN.AsString; // 'manos';

  // Conecta ao servidor

  NMSMTP1.Connect;

  // Se ocorrer algum erro durante a conexão com o servidor, avise!

  if not NMSMTP1.Connected then

  raise Exception.Create('Erro de conexão');

  // Marca a posição atual do registro na tabela

  Posicao := dmSIAEAP01.tblSIAE0101.Bookmark;

  // Desabilita os controles Dataware

  dmSIAEAP01.tblSIAE0101.DisableControls;

  dmSIAEAP01.tblSIAE0101.First;

  while not dmSIAEAP01.tblSIAE0101.Eof do

  begin

  if dmSIAEAP01.tblSIAE0101NM_EMAIL.AsString  '' then

  begin

  Endereco := dmSIAEAP01.tblSIAE0101NM_EMAIL.AsString;

  with NMSMTP1.PostMessage do

  begin

  // Seu e-mail

  FromAddress := dmSIAEAP01.tblSIAECONFNM_EMAIL.AsString;
  // 'edua...@lpnet.com.br';

  // Seu nome

  FromName := dmSIAEAP01.tblSIAECONFNM_NOME.AsString;
  // 'Eduardo de Almeida Silva';

  ToAddress.Clear;

  // E-mail do(s) destinatário(s)

  ToAddress.Add(Endereco); // colocar aqui o endereço de
  quem vai receber o e-mail

  // Assunto da mensagem

  Subject := edtAssunto.Text; //'Teste de envio de e-mail
  através do delphi';

  // Corpo da mensagem

  Body.Clear;

  Body.Add(memoMensagem.Lines.Text);

  // Anexar arquivos

  // Attachments.Clear;

  // Endereço do anexo

  Attachments.AddStrings(Listbox.Items);

  // Attachments.Add(ListBox.Items.Text);

  // Manda o e-mail

  NMSMTP1.SendMail;

  end;

  end

  dmSIAEAP01.tblSIAE0101.Next;

  end;

  // Desconecta do servidor

  NMSMTP1.Disconnect;

  // Habilita os controles Dataware

  dmSIAEAP01.tblSIAE0101.EnableControls;

  // Volta a tabela na posição em que estava

  dmSIAEAP01.tblSIAE0101.Bookmark := Posicao;

  _ 

  De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
  nome de Vinicius
  Enviada em: terça-feira, 1 de setembro de 2009 08:35
  Para: delphi-br@yahoogrupos.com.br
  Assunto: RES: [delphi-br] Erro ao enivar e-mail

  Passe a sua rotina, derepente esta faltando algum detalhe que vc não esta
  percebendo.

  -Mensagem original-
  De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  [mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br
  os.com.br] Em
  nome de Eduardo Silva
  Enviada em: terça-feira, 1 de setembro de 2009 08:17
  Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  Assunto: RES: [delphi-br] Erro ao enivar e-mail

  O destinatário é válido.

  Não sei mais o que pode estar acontecendo.

  -Mensagem original-
  De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  [mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br
  os.com.br] Em
  nome de Leandro
  Enviada em: segunda-feira, 31 de agosto de 2009 17:34
  Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  Assunto: Re: [delphi-br] Erro ao enivar e-mail

  sim, q vc tem q adicionar pelo menos um destinatario valido..

  2009/8/31 Eduardo Silva eduko...@yahoo. mailto:edukobra%40yahoo.com.br
  com.br

  
  
   Galera, tentei enviar um e-mail usando o componente NMSMTP e deu o
  seguinte
   erro
  
   554 REFUSED - YOU MUST SPECIFY AT LEAST ONE VALID RECIPIENT
  
   Alguém sabe me dizer que erro é esse?
  
   Uso o delphi 5, então tem que ser o NMSMTP mesmo.
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  -- 
  Leandro, MuTukA

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

  

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  [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] Erro ao enivar e-mail

2009-09-01 Por tôpico Guilherme Ventura de Souza
Eu tbm sou =PP
trabalha aonde?
  - Original Message - 
  From: Eduardo Silva 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 01, 2009 2:49 PM
  Subject: RES: [delphi-br] Erro ao enivar e-mail


Sim, pq?

  _ 

  De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
  nome de Guilherme Ventura de Souza
  Enviada em: terça-feira, 1 de setembro de 2009 08:46
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Erro ao enivar e-mail

  Lpnet? O.o

  Me intrometendo totalmente =P
  você é de Lençóis cara?

  - Original Message - 
  From: Eduardo Silva 
  To: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br 
  Sent: Tuesday, September 01, 2009 8:41 AM
  Subject: RES: [delphi-br] Erro ao enivar e-mail

  // Meu servidor SMTP

  NMSMTP1.Host := dmSIAEAP01.tblSIAECONFNM_SERVIDOR.AsString; //
  'bbs.lpnet.com.br';

  // Porta SMTP, não pode ser alterada

  NMSMTP1.Port := dmSIAEAP01.tblSIAECONFNR_PORTA.AsInteger; // 25

  // Nome de login do usuário

  NMSMTP1.UserID := dmSIAEAP01.tblSIAECONFNM_LOGIN.AsString; // 'manos';

  // Conecta ao servidor

  NMSMTP1.Connect;

  // Se ocorrer algum erro durante a conexão com o servidor, avise!

  if not NMSMTP1.Connected then

  raise Exception.Create('Erro de conexão');

  // Marca a posição atual do registro na tabela

  Posicao := dmSIAEAP01.tblSIAE0101.Bookmark;

  // Desabilita os controles Dataware

  dmSIAEAP01.tblSIAE0101.DisableControls;

  dmSIAEAP01.tblSIAE0101.First;

  while not dmSIAEAP01.tblSIAE0101.Eof do

  begin

  if dmSIAEAP01.tblSIAE0101NM_EMAIL.AsString  '' then

  begin

  Endereco := dmSIAEAP01.tblSIAE0101NM_EMAIL.AsString;

  with NMSMTP1.PostMessage do

  begin

  // Seu e-mail

  FromAddress := dmSIAEAP01.tblSIAECONFNM_EMAIL.AsString;
  // 'edua...@lpnet. mailto:%27eduardo%40lpnet.com.br com.br';

  // Seu nome

  FromName := dmSIAEAP01.tblSIAECONFNM_NOME.AsString;
  // 'Eduardo de Almeida Silva';

  ToAddress.Clear;

  // E-mail do(s) destinatário(s)

  ToAddress.Add(Endereco); // colocar aqui o endereço de
  quem vai receber o e-mail

  // Assunto da mensagem

  Subject := edtAssunto.Text; //'Teste de envio de e-mail
  através do delphi';

  // Corpo da mensagem

  Body.Clear;

  Body.Add(memoMensagem.Lines.Text);

  // Anexar arquivos

  // Attachments.Clear;

  // Endereço do anexo

  Attachments.AddStrings(Listbox.Items);

  // Attachments.Add(ListBox.Items.Text);

  // Manda o e-mail

  NMSMTP1.SendMail;

  end;

  end

  dmSIAEAP01.tblSIAE0101.Next;

  end;

  // Desconecta do servidor

  NMSMTP1.Disconnect;

  // Habilita os controles Dataware

  dmSIAEAP01.tblSIAE0101.EnableControls;

  // Volta a tabela na posição em que estava

  dmSIAEAP01.tblSIAE0101.Bookmark := Posicao;

  _ 

  De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  [mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br
  os.com.br] Em
  nome de Vinicius
  Enviada em: terça-feira, 1 de setembro de 2009 08:35
  Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  Assunto: RES: [delphi-br] Erro ao enivar e-mail

  Passe a sua rotina, derepente esta faltando algum detalhe que vc não esta
  percebendo.

  -Mensagem original-
  De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  [mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br
  os.com.br] Em
  nome de Eduardo Silva
  Enviada em: terça-feira, 1 de setembro de 2009 08:17
  Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  Assunto: RES: [delphi-br] Erro ao enivar e-mail

  O destinatário é válido.

  Não sei mais o que pode estar acontecendo.

  -Mensagem original-
  De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  [mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br
  os.com.br] Em
  nome de Leandro
  Enviada em: segunda-feira, 31 de agosto de 2009 17:34
  Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
  Assunto: Re: [delphi-br] Erro ao enivar e-mail

  sim, q vc tem q adicionar pelo menos um destinatario valido..

  2009/8/31 Eduardo Silva eduko...@yahoo. mailto:edukobra%40yahoo.com.br
  com.br

  
  
   Galera, tentei enviar um e-mail usando o componente NMSMTP e deu o
  seguinte
   erro
  
   554 REFUSED - YOU MUST SPECIFY AT LEAST ONE VALID RECIPIENT
  
   Alguém sabe me dizer que erro é esse?
  
   Uso o delphi 5, então tem que ser o NMSMTP mesmo.
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  -- 
  Leandro, MuTukA

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

  

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

  [As partes desta mensagem que não

Re: [delphi-br] Erro ao enivar e-mail

2009-08-31 Por tôpico Leandro
sim, q vc tem q adicionar pelo menos um destinatario valido..

2009/8/31 Eduardo Silva eduko...@yahoo.com.br



 Galera, tentei enviar um e-mail usando o componente NMSMTP e deu o seguinte
 erro

 554 REFUSED – YOU MUST SPECIFY AT LEAST ONE VALID RECIPIENT

 Alguém sabe me dizer que erro é esse?

 Uso o delphi 5, então tem que ser o NMSMTP mesmo.

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

  




-- 
Leandro, MuTukA


[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] Erro BDE

2009-08-20 Por tôpico Jackson Gomes - ToolsComps

 Estou utilizando o batch move para transferir de uma tabela do DBASE para o
 Oracle. Tenho dois database, um pro DBASE e outro para o Oracle, só que
 quando vou fazer a inclusão ou atualização no Oracle esta dando o erro :
 destination must be indexed.

A tabela de destino está indexada? O erro parece já dizer tudo...

Jackson Gomes
ToolsComps - Controle de Usuários para Desenvolvedores CodeGear
Web Site: http://www.toolsandcomps.com
Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
e-mail: jack...@toolsandcomps.com
Fone: 27 3389 1138 - 8811 0324

http://jacklovesdelphi.blogspot.com - Delphi, Intraweb, etc

Devhost - Webhost para desenvolvedores Delphi
http://www.devhost.com.br
devh...@devhost.com.br 




Re: [Delphi-Br] Erro estranho ao mandar e-mail!! (ou nao)

2009-08-19 Por tôpico EmbarcaDelphi
Vê este link com fontes de como enviar email com anexo:

// ---

http://www.devmedia.com.br/articles/viewcomp.asp?comp=13966hl=*email*%20and%20*com*%20and%20*anexo*

// -

Fernando Pires de Souza Filho escreveu:
  


 opa gente

 depois de pesquisar e nao achar muita coisa, e alem de estar comecando 
 a programar em delphi,
 to com um problema em enviar email com anexo, sem o anexo ta enviando 
 normal.

 ai as linhas que anexa:

 IdMessage.MessageParts.Clear;
 IdAttach := TIdAttachment.Create(IdMessage.MessageParts);
 IdAttach.FileName := ListBoxAnexos.Items.Text;

 dai passa, mais no Idsmtp.send(idmessage) da esse erro:

 Raised exception EAbstractError: Abstract Error

 quando compila, da os seguintes warnings:

 [DCC Warning] email.pas(113): W1020 Constructing instance of 
 'TIdAttachment' containing abstract method 'TIdAttachment.OpenLoadStream'
 [DCC Warning] email.pas(113): W1020 Constructing instance of 
 'TIdAttachment' containing abstract method 'TIdAttachment.CloseLoadStream'
 [DCC Warning] email.pas(113): W1020 Constructing instance of 
 'TIdAttachment' containing abstract method 
 'TIdAttachment.PrepareTempStream'

 acho que tem algo a ver :p

 eu nao sei que erro é esse.

 Se alguem poder da uma luz, agradeceria muito, e resolveria meu 
 problema!!!

 Atenciosamente
 Fernando Pires

 .

 



Re: [delphi-br] Erro recalculando DBGRID

2009-08-16 Por tôpico Leandro
postar o codigo eh um bom começo..

2009/8/16 barblo25 barbl...@yahoo.com.br



 Pessoal,

 Estou com um probleminha que não consigo resolver. TEnho um DBGRID e no
 evento do clientdataset (oncalcfield) coloco uma rotina para ser calculado.
 Na primeira vez que o dbgrid é criado os calculos saem perfeitos, sendo que
 quando faço scrooll no dbgrid ele recalcula deixando os valores todos
 diferentes, já tentei de tudo e não achei resposta, alguem poderia me
 ajudar?.

 att,

  




-- 
Leandro, MuTukA


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



Re: [delphi-br] Erro migração firebird 1.5 para 2.1

2009-08-04 Por tôpico Evandro Siqueira
Oi Fabiano,

O endereço correto do site é www.firebase.com.br.

Fabiano Moura escreveu:
 Samnuel, boa noite!

 Existe um site e um grupo de discusão mantido pelo site que é especializado
 em firebird 2.1.
 O site é www.firabse.com.br, porém se quiser saber se a tabela existe faça a
 seguinte query SELECT  * FROM RDB$RELATIONS; a coluna RDB$RELATIONS_NAME
 contém o nome das tabelas tanto de sistema quanto do banco de dados. Talvez
 você seja necessário criar a tabela manualmente caso não exista.

 Fabiano

 2009/8/3 Samuel M. Basso samuelba...@yahoo.com.br

   
 Bom dia Pessoal!

 Tentei fazer a migraçao de minha base de dados do firebird 1.5 para o 2.1,
 até então funcionou muito bem, mas tenho uma área no sistema que trabalha
 com permissões e grupos de usuários do banco de dados e foi aí onde ocorreu
 o erro na migração, voltando para 1.5 funciona perfeitamente mas com o 2.1
 não funciona, alguem saberia o porque? Segue erro abaixo.

 Size Mismatch - Field RDB$USER size is too small for data.


 --
 Atenciosamente,

 Samuel M. Basso
 Tel: (54) 3463-9114
 Cel: (54) 8135-3723
 E-mail/MSN: samuelba...@gmail.com
 Web site: www.samuelbasso.com


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



 

 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 




 


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



 

   

-- 
[]’s.

Evandro Siqueira
Programador de Sistemas
L’essentiel Lingerie
(79) 3254-5511 Ramal 218
skype: evandro.lessentiel





-- 
 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] Erro migração firebird 1.5 para 2.1

2009-08-04 Por tôpico Evandro Siqueira
Samuel,

Encontrei esse artigo no site da firebase. Talvez te ajude.

http://www.firebase.com.br/fb/artigo.php?id=1892



Samuel M. Basso escreveu:
 Bom dia Pessoal!

 Tentei fazer a migraçao de minha base de dados do firebird 1.5 para o 2.1,
 até então funcionou muito bem, mas tenho uma área no sistema que trabalha
 com permissões e grupos de usuários do banco de dados e foi aí onde ocorreu
 o erro na migração, voltando para 1.5 funciona perfeitamente mas com o 2.1
 não funciona, alguem saberia o porque? Segue erro abaixo.

 Size Mismatch - Field RDB$USER size is too small for data.


   

-- 
[]’s.

Evandro Siqueira
Programador de Sistemas
L’essentiel Lingerie
(79) 3254-5511 Ramal 218
skype: evandro.lessentiel





-- 
 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] Erro migração firebird 1.5 para 2. 1

2009-08-04 Por tôpico Fabiano Moura
Foi mau, escrevi meio rápido, rsrs, tava com pressa.

Fabiano

2009/8/4 Evandro Siqueira vans...@gmail.com

 Samuel,

 Encontrei esse artigo no site da firebase. Talvez te ajude.

 http://www.firebase.com.br/fb/artigo.php?id=1892



 Samuel M. Basso escreveu:
  Bom dia Pessoal!
 
  Tentei fazer a migraçao de minha base de dados do firebird 1.5 para o
 2.1,
  até então funcionou muito bem, mas tenho uma área no sistema que trabalha
  com permissões e grupos de usuários do banco de dados e foi aí onde
 ocorreu
  o erro na migração, voltando para 1.5 funciona perfeitamente mas com o
 2.1
  não funciona, alguem saberia o porque? Segue erro abaixo.
 
  Size Mismatch - Field RDB$USER size is too small for data.
 
 
 

 --
 []’s.

 Evandro Siqueira
 Programador de Sistemas
 L’essentiel Lingerie
 (79) 3254-5511 Ramal 218
 skype: evandro.lessentiel



 

 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






[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] Erro migração firebird 1.5 para 2. 1

2009-08-03 Por tôpico Fabiano Moura
Samnuel, boa noite!

Existe um site e um grupo de discusão mantido pelo site que é especializado
em firebird 2.1.
O site é www.firabse.com.br, porém se quiser saber se a tabela existe faça a
seguinte query SELECT  * FROM RDB$RELATIONS; a coluna RDB$RELATIONS_NAME
contém o nome das tabelas tanto de sistema quanto do banco de dados. Talvez
você seja necessário criar a tabela manualmente caso não exista.

Fabiano

2009/8/3 Samuel M. Basso samuelba...@yahoo.com.br

 Bom dia Pessoal!

 Tentei fazer a migraçao de minha base de dados do firebird 1.5 para o 2.1,
 até então funcionou muito bem, mas tenho uma área no sistema que trabalha
 com permissões e grupos de usuários do banco de dados e foi aí onde ocorreu
 o erro na migração, voltando para 1.5 funciona perfeitamente mas com o 2.1
 não funciona, alguem saberia o porque? Segue erro abaixo.

 Size Mismatch - Field RDB$USER size is too small for data.


 --
 Atenciosamente,

 Samuel M. Basso
 Tel: (54) 3463-9114
 Cel: (54) 8135-3723
 E-mail/MSN: samuelba...@gmail.com
 Web site: www.samuelbasso.com


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



 

 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






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



Re: [delphi-br] Erro ao inicilizar aplicativo

2009-07-21 Por tôpico Silvio Clecio
Em 21/7/2009 19:06, Huander escreveu:
 ... Runtime Error 3 at 0040916B

 Estou utilizando o Delphi 7. Pra ter noção melhor o este é o código do
 projeto ...

Vai em Tools | Environment options...  Library  Library path: , 
caso o campo esteja em branco (um certo componente já detonou meu 
library path e dava esse erro) escolha uma opção na lista do combobox, 
algo tipo isso: 
$(Delphi)\Lib;$(Delphi)\Bin;$(Delphi)\Imports;$(Delphi)\Projects\Bpl;$(Delphi)\Rave5\Lib
 
(sem aspas, espaços e em numa única linha).
-- 
[]'s, Silvio Clécio
---
Linux User: #481900
Gmail, GTalk: silviop...@gmail.com
E-mail, Y! Messenger: silviop...@yahoo.com.br
BlogSite: http://silvioprog.blogspot.com/
BlogSpot: http://silvioclecio.blogspot.com/
VirtualDriver: http://silvioprog.4shared.com/
°oO| Seja livre, use Linux! |Oo°


Re: [delphi-br] Erro firebird 2.1

2009-07-16 Por tôpico Fabiano Moura
Verifique o site www.firebase.com.br lá tem algumas dicas para atualização
do Banco de Dados e também possui uma lista de discusão mantida pela
firebase.

Fabiano

2009/7/15 Samuel M. Basso samuelba...@yahoo.com.br

 Olá Pessoal!

 Gostaria de saber se alguem já passou por este problema com o firebird,
 utilizava o firebird 1.5 funcionava tranquilamente ao tentar migrar para o
 2.1 e mexer com as tabelas de usuarios, grupos, permissoes que tenho no
 sistema ele aparece este erro que segue abaixo, alguem ja passou por isso:

 Size Mismatch - Field RDB$RELATION_NAME size is too small for data.

 Obs: Conforme comentei com o firebird 1.5 funciona normalmente acredito que
 seja alguma alteraçao que teve no 2.1 que mesmo fazendo backup e restore
 nao
 esta mudando.


 --
 Atenciosamente,

 Samuel M. Basso
 Tel: (54) 3463-9114
 Cel: (54) 8135-3723
 E-mail/MSN: samuelba...@gmail.com
 Web site: www.samuelbasso.com


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



 

 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






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



Re: [delphi-br] Erro firebird 2.1

2009-07-15 Por tôpico Alisson Yahoo
Já passei por um problema parecido migrando de Firebird 2.0 para Firebird 2.5. 
Usando o IBExpert, gerei um script de inserção com os dados da tabela que 
estava dando problema. Apaguei a tabela e criei novamente, depois rodei os 
scripts para inserir os dados novamente.


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



Re: [delphi-br] erro clientdataset

2009-07-10 Por tôpico Daniel Augusto Bastos
To sem Delphi aqui no momento, mas assim mesmo vai um chute:
Verifique se seu Field da chave primária está marcado como required.
Se tiver, sete o valor pra false e tente gravar.

Se não funcionar, tente atribuir um valor pro campo pra todo o mundo. Tipo
cds.fieldByName('id').AsInteger := 0;
Há chançes (como aconteceno SQL Server) do banco substituir seu valor pelo
número auto-incrementável dele.

Abs
Daniel Augusto Bastos


2009/7/9 felipe govoni govoni.fel...@gmail.com

 sim o campo e auto incremento, vou ter q colocar esse valor manualmente?
 pois a aplicação vai ser varios usuarios incluindo registros ao mesmo
 tempo,
 tenho
 medo q de algo errado.



 2009/7/9 Daniel Augusto Bastos danbas...@gmail.com

 
 
  Como é a geração da sua chave primária?
  Se for auto-incrementável pelo banco, com certeza não irá aparecer.
  O TClientDataSet trabalha gerenciando localmente os seus dados (mesmo
 apos
  o
  post) para obter um melhor desempenho ..
  a comunicação com o banco é feita realmente quando vc usa o apply. É
 nesta
  hora que é gerado o seu ID, pois é a hora que ele realmente grava os
 dados.
  Para fins de testes, e se a sua chave primária no seu banco está setada
  para
  auto incrementável, tente atribuir um valor qualquer no field da sua
 chave
  primária.
 
  Abs
  Daniel Augusto Bastos
 
  2009/7/9 felipe govoni govoni.fel...@gmail.comgovoni.felipe%
 40gmail.com
  
 
 
   boa tarde
  
   estou sando delphi 2007 + mysql 5.1
   o grupo query clientdataset + datasetprovider + datasource
   esta tudo configurado correto pois estou seguindo uma videoaula da
   devmedia,
   porem
   quando salvo, nao aparece a chave primaria e obviamente na hora do
   applyupdate da erro
   pois esta dizendo que a chave primaria esta null.
  
  
   alguem sabe oq pode se?
  
  
  
  
   --
   Felipe Govoni
   -
   GOVONI Sistemas
   Fone 8472-8718
   www.govoni.com.br
  
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
  
   
  
   --
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
  
  
  
  
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 



 --
 Felipe Govoni
 -
 GOVONI Sistemas
 Fone 8472-8718
 www.govoni.com.br


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



 

 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






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



Re: [delphi-br] erro clientdataset

2009-07-10 Por tôpico felipe govoni
descobri o problema, eu deveria colocar a propriedade do
dasetprovider resolvetodataset=true

obrigado daniel.




2009/7/10 Daniel Augusto Bastos danbas...@gmail.com



 To sem Delphi aqui no momento, mas assim mesmo vai um chute:
 Verifique se seu Field da chave primária está marcado como required.
 Se tiver, sete o valor pra false e tente gravar.

 Se não funcionar, tente atribuir um valor pro campo pra todo o mundo. Tipo
 cds.fieldByName('id').AsInteger := 0;
 Há chançes (como aconteceno SQL Server) do banco substituir seu valor pelo
 número auto-incrementável dele.


 Abs
 Daniel Augusto Bastos

 2009/7/9 felipe govoni govoni.fel...@gmail.comgovoni.felipe%40gmail.com
 

  sim o campo e auto incremento, vou ter q colocar esse valor manualmente?
  pois a aplicação vai ser varios usuarios incluindo registros ao mesmo
  tempo,
  tenho
  medo q de algo errado.
 
 
 
  2009/7/9 Daniel Augusto Bastos danbas...@gmail.comdanbastos%40gmail.com
 
 
  
  
   Como é a geração da sua chave primária?
   Se for auto-incrementável pelo banco, com certeza não irá aparecer.
   O TClientDataSet trabalha gerenciando localmente os seus dados (mesmo
  apos
   o
   post) para obter um melhor desempenho ..
   a comunicação com o banco é feita realmente quando vc usa o apply. É
  nesta
   hora que é gerado o seu ID, pois é a hora que ele realmente grava os
  dados.
   Para fins de testes, e se a sua chave primária no seu banco está setada
   para
   auto incrementável, tente atribuir um valor qualquer no field da sua
  chave
   primária.
  
   Abs
   Daniel Augusto Bastos
  
   2009/7/9 felipe govoni govoni.fel...@gmail.comgovoni.felipe%40gmail.com
 govoni.felipe%
  40gmail.com
   
  
  
boa tarde
   
estou sando delphi 2007 + mysql 5.1
o grupo query clientdataset + datasetprovider + datasource
esta tudo configurado correto pois estou seguindo uma videoaula da
devmedia,
porem
quando salvo, nao aparece a chave primaria e obviamente na hora do
applyupdate da erro
pois esta dizendo que a chave primaria esta null.
   
   
alguem sabe oq pode se?
   
   
   
   
--
Felipe Govoni
-
GOVONI Sistemas
Fone 8472-8718
www.govoni.com.br
   
   
[As partes desta mensagem que não continham texto foram removidas]
   
   
   

   
--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
   
   
   
   
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
  
 
 
 
  --
  Felipe Govoni
  -
  GOVONI Sistemas
  Fone 8472-8718
  www.govoni.com.br
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 
  
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
 

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

  




-- 
Felipe Govoni
-
GOVONI Sistemas
Fone 8472-8718
www.govoni.com.br


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



Re: [delphi-br] erro clientdataset

2009-07-09 Por tôpico Daniel Augusto Bastos
Como é a geração da sua chave primária?
Se for auto-incrementável pelo banco, com certeza não irá aparecer.
O TClientDataSet trabalha gerenciando localmente os seus dados (mesmo apos o
post) para obter um melhor desempenho ..
a comunicação com o banco é feita realmente quando vc usa o apply. É nesta
hora que é gerado o seu ID, pois é a hora que ele realmente grava os dados.
Para fins de testes, e se a sua chave primária no seu banco está setada para
auto incrementável, tente atribuir um valor qualquer no field da sua chave
primária.

Abs
Daniel Augusto Bastos


2009/7/9 felipe govoni govoni.fel...@gmail.com

 boa tarde

 estou sando delphi 2007 + mysql 5.1
 o grupo query clientdataset + datasetprovider + datasource
 esta tudo configurado correto pois estou seguindo uma videoaula da
 devmedia,
 porem
 quando salvo, nao aparece a chave primaria e obviamente na hora do
 applyupdate da erro
 pois esta dizendo que a chave primaria esta null.


 alguem sabe oq pode se?




 --
 Felipe Govoni
 -
 GOVONI Sistemas
 Fone 8472-8718
 www.govoni.com.br


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



 

 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






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



Re: [delphi-br] erro clientdataset

2009-07-09 Por tôpico felipe govoni
sim o campo e auto incremento, vou ter q colocar esse valor manualmente?
pois a aplicação vai ser varios usuarios incluindo registros ao mesmo tempo,
tenho
medo q de algo errado.



2009/7/9 Daniel Augusto Bastos danbas...@gmail.com



 Como é a geração da sua chave primária?
 Se for auto-incrementável pelo banco, com certeza não irá aparecer.
 O TClientDataSet trabalha gerenciando localmente os seus dados (mesmo apos
 o
 post) para obter um melhor desempenho ..
 a comunicação com o banco é feita realmente quando vc usa o apply. É nesta
 hora que é gerado o seu ID, pois é a hora que ele realmente grava os dados.
 Para fins de testes, e se a sua chave primária no seu banco está setada
 para
 auto incrementável, tente atribuir um valor qualquer no field da sua chave
 primária.

 Abs
 Daniel Augusto Bastos

 2009/7/9 felipe govoni govoni.fel...@gmail.comgovoni.felipe%40gmail.com
 


  boa tarde
 
  estou sando delphi 2007 + mysql 5.1
  o grupo query clientdataset + datasetprovider + datasource
  esta tudo configurado correto pois estou seguindo uma videoaula da
  devmedia,
  porem
  quando salvo, nao aparece a chave primaria e obviamente na hora do
  applyupdate da erro
  pois esta dizendo que a chave primaria esta null.
 
 
  alguem sabe oq pode se?
 
 
 
 
  --
  Felipe Govoni
  -
  GOVONI Sistemas
  Fone 8472-8718
  www.govoni.com.br
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 
  
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
 

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

  




-- 
Felipe Govoni
-
GOVONI Sistemas
Fone 8472-8718
www.govoni.com.br


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



Res: Re: Re: [delphi-br] Erro ao executar SQL

2009-06-25 Por tôpico Bruno Lepesqueur
Nas grids eu só estou usando o evento OnKeyPress que serve pra que qdo o
enter for pressionado, pular para a dbEdit7:
if key= #13 then
  dbEdit7.SetFocus;

Alguém tem mais alguma dica?
Obrigado a todos! 
 
---Mensagem original---
 
De: Leandro
Data: 24/06/2009 21:12:12
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: Re: [delphi-br] Erro ao executar SQL
 



pode nao ter eventos nas querys mas nos grids q voce mostra os dados?

2009/6/24 Thales (Shubacca) - Tebo Software tebosoftw...@gmail.com



 Voce poderia mandar o trecho completo para avaliarmos?


 2009/6/24 Bruno Lepesqueur brunolbra...@yahoo.com.brbrunolbrasil%40yahoo
com.br
 

 
 
  Não uso nenhum evento nessas querys!
  A única coisa que eu uso nelas é a propriedade CachedUpdate = True.
 
  Obrigado!
 
  ---Mensagem original---
 
  De: Thales (Shubacca) - Tebo Software
  Data: 06/24/09 19:27:59
  Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com
brdelphi-br%
 40yahoogrupos.com.br
  Assunto: Re: [delphi-br] Erro ao executar SQL
 
 
 
 
  voce por acaso tem algum evento de afterscroll ou afteropen nessas
 querys?
 
  se tiver de uma olhada para ver se alguma delas nao esta tentando editar
  sem
  a query estar em modo de edicao
 
  falow
 
  2009/6/24 Bruno Lepesqueur brunolbra...@yahoo.com
brbrunolbrasil%40yahoo.com.br
 brunolbrasil%40yahoo.com.br

 
 
  
  
   Boa noite pessoal!
  
   Estou com um problema que não consigo resolver desde a semana passada
e
   gostaria da ajuda de todos!
   Eu tenho 2 tabelas relacionadas: tblNotas e tblFrete (campo
 relacionado:
   codigoNF)
   Cada nota deve conter um frete que é relacionado através do campo
  codigoNF
 
  
  
   Eu consigo inserir registros nas tabelas através das funções
   tblNotas.insert
   e da função tblFrete.insert numa boua, mas qdo eu entro no formulário
  para
   alterar a nota e o frete que acabei de gravar usando um comando
simples
  do
   SQL como:
  
   with dmoQuerys.QueryNF.SQL do
   begin
   clear;
   add('select * from Notas where codigoNF = ');
   add(#39+queryNFCodigoNF.AsString+#39);
   end;
   dmoQuerys.QueryNF.Active := false;
   dmoQuerys.QueryNF.Active := true;
   (para selecionar a nota desejada para alteração)
  
   e depois faço o comando:
  
   with dmoQuerys.QueryFrete.SQL do
   begin
   clear;
   add('select * from frete where codigoNF = ');
   add(#39+dmoquerys.QueryNFCodigoNF.AsString+#39);
   end;
   dmoQuerys.QueryFrete.Active := false;
   dmoQuerys.QueryFrete.Active := true;
   (para selecionar o frete ref. a essa nota que estou alterando)
  
   ele dá o seguinte erro:
  
   Project SisNota.exe raised exception class EDatabaseError with
message
   Dataset not in edit or Insert mode'.
   Process stopped. Use Step or Run to continue.
   (o arquivo está anexo ao e-mail)
  
   Eu gostaria de esclarecer que nesse momento a única coisa que eu fiz
 foi
   ativar as duas tabelas e nada mais! Elas não estão sendo editadas ou
   inseridas.
   O estranho é que se eu mudo a ordem de execução das SQL (mandando a
   queryFrete antes da queryNF) elas executam numa boa e sem erro!
  
   O que será que pode ser pessoal?
   Eu uso delphi 7 com myDac.
  
   Um abraço a todos!
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
  
 
  --
  Thales Eduardo Barros de Oliveira
  Desenvolvedor Delphi / Firebird / Java
  Emails:
  tebosoftw...@gmail.com tebosoftware%40gmail.com tebosoftware%
 40gmail.com (GoogleTalk)
  thales_...@hotmail.com thales_oli%40hotmail.com thales_oli%
 40hotmail.com (MSN)
  Blog:
  http://tebosoftware.blogspot.com/
 
  Tente ser uma pessoa de valor, não de sucesso
  Albert Einstein
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

 --
 Thales Eduardo Barros de Oliveira
 Desenvolvedor Delphi / Firebird / Java
 Emails:
 tebosoftw...@gmail.com tebosoftware%40gmail.com (GoogleTalk)
 thales_...@hotmail.com thales_oli%40hotmail.com (MSN)
 Blog:
 http://tebosoftware.blogspot.com/

 Tente ser uma pessoa de valor, não de sucesso
 Albert Einstein

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

 


-- 
Leandro, MuTukA

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



 

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



Res: Re: Re: [delphi-br] Erro ao executar SQL

2009-06-25 Por tôpico Bruno Lepesqueur
Pessoal... to mandando os códigos que uso no delphi pra ver se vcs conseguem
me ajudar:

If (dbEdit7.Text  '0') and (dbEdit7.Text  '') then
  begin
If QueryQtdeCount.value  0 then
  begin
Edit1.text := 'alterar';

If (InicialFrm.dbEdit3.Text = '0') or (InicialFrm.dbEdit4.Text = '0
) or (InicialFrm.dbEdit5.Text = '0') or (InicialFrm.dbEdit6.Text = '0') or
(InicialFrm.dbEdit7.Text = '0') then
  begin
InicialFrm.QueryEndereco.Active := false;
InicialFrm.QueryEndereco.Active := true;
InicialFrm.QueryVendedor.Active := false;
InicialFrm.QueryVendedor.Active := true;
InicialFrm.QueryProdutos.Active := false;
InicialFrm.QueryProdutos.Active := true;
InicialFrm.QueryCliFornTrans2.Active := false;
InicialFrm.QueryCliFornTrans2.Active := true;
InicialFrm.QueryCodOper.Active := false;
InicialFrm.QueryCodOper.Active := true;
  end;

If InicialFrm.dbEdit5.text = '0' then
  ShowMessage('Não existe nenhum produto cadastrado! Você deve
cadastrar pelo menos 1 produto no sistema!') else
If InicialFrm.dbEdit6.text = '0' then
  ShowMessage('Não existe nenhum cliente, fornecedor ou
transportadora cadastrado! Você deve cadastrar pelo menos 1 cliente,
fornecedor ou transportadora no sistema!') else
If InicialFrm.dbEdit3.text = '0' then
  ShowMessage('Não existe nenhum endereço cadastrado! Você deve
cadastrar pelo menos 1 endereço no sistema!') else
If InicialFrm.dbEdit4.text = '0' then
  ShowMessage('Não existe nenhum vendedor cadastrado! Você deve
cadastrar pelo menos 1 vendedor no sistema!') else
If InicialFrm.dbEdit7.text = '0' then
  ShowMessage('Não existe nenhum código de operação cadastrado! Você
deve cadastrar pelo menos 1 código de operação no sistema!')
else
If InicialFrm.Edit1.Text = 'lcto' then
  begin
dmoQuerys.QueryEstoqueProd.Active := true;
dmoQuerys.queryParcFrete.active := true;
dmoQuerys.QueryCadEmpresa.Active := true;
dmoQuerys.QueryParcNF.Active := true;

If NotasFiscaisFrm.rgPessoa.ItemIndex = 0 then
  begin
NotasFiscaisFrm.label16.Visible := true;
NotasFiscaisFrm.label17.Visible := false;
  end else
If NotasFiscaisFrm.rgPessoa.ItemIndex = 1 then
  begin
NotasFiscaisFrm.label16.Visible := false;
NotasFiscaisFrm.label17.Visible := true;
  end;

with dmoQuerys.QueryNF.SQL do
  begin
clear;
add('select * from notasFiscais where codigoNF = ');
add(#39+queryNFCodigoNF.AsString+#39);
  end;
dmoQuerys.QueryNF.Active := false;
dmoQuerys.QueryNF.Active := true;

with dmoQuerys.QueryFrete.SQL do
  begin
clear;
add('select * from fretenf where codigoNF = ');
add(#39+dmoquerys.QueryNFCodigoNF.AsString+#39);
  end;
dmoQuerys.QueryFrete.Active := false;
dmoQuerys.QueryFrete.Active := true;
(Nessa parte aki ele dá o erro sitado abaixo)

Se eu colocar a queryFrete para executar antes da queryNF, nada de erro
acontece!

Um abraço a todos!
 
---Mensagem original---
 
De: Thales (Shubacca) - Tebo Software
Data: 24/06/2009 20:05:00
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: Re: [delphi-br] Erro ao executar SQL
 



Voce poderia mandar o trecho completo para avaliarmos?

2009/6/24 Bruno Lepesqueur brunolbra...@yahoo.com.br



 Não uso nenhum evento nessas querys!
 A única coisa que eu uso nelas é a propriedade CachedUpdate = True.

 Obrigado!

 ---Mensagem original---

 De: Thales (Shubacca) - Tebo Software
 Data: 06/24/09 19:27:59
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Assunto: Re: [delphi-br] Erro ao executar SQL




 voce por acaso tem algum evento de afterscroll ou afteropen nessas querys?

 se tiver de uma olhada para ver se alguma delas nao esta tentando editar
 sem
 a query estar em modo de edicao

 falow

 2009/6/24 Bruno Lepesqueur brunolbra...@yahoo.com.brbrunolbrasil%40yahoo
com.br


 
 
  Boa noite pessoal!
 
  Estou com um problema que não consigo resolver desde a semana passada e
  gostaria da ajuda de todos!
  Eu tenho 2 tabelas relacionadas: tblNotas e tblFrete (campo relacionado:
  codigoNF)
  Cada nota deve conter um frete que é relacionado através do campo
 codigoNF

 
 
  Eu consigo inserir registros nas tabelas através das funções
  tblNotas.insert
  e da função tblFrete.insert numa boua, mas qdo eu entro no formulário
 para
  alterar a nota e o frete que acabei de gravar usando um comando simples
 do
  SQL como:
 
  with dmoQuerys.QueryNF.SQL do
  begin
  clear;
  add('select * from Notas where codigoNF

Res: Re: Re: [delphi-br] Erro ao executar SQL

2009-06-25 Por tôpico Bruno Lepesqueur
Outra forma que dá certo é deixando nessa sequencia normal e mandando ativar
a queryNF só depois da QueryFrete já estar ativada!
Ele aceita inserir o código SQL na queryNF, mas só aceita ativar ela depois
da QueryFrete ativada.

Dá pra continuar usando dessa forma, mas tem algo errado  pra isso estar
acontecendo.

Um abraço a todos!
 
---Mensagem original---
 
De: Bruno Lepesqueur
Data: 25/06/2009 08:45:25
Para: delphi-br@yahoogrupos.com.br
Assunto: Res: Re: Re: [delphi-br] Erro ao executar SQL
 



Pessoal... to mandando os códigos que uso no delphi pra ver se vcs conseguem
me ajudar: 

If (dbEdit7.Text  '0') and (dbEdit7.Text  '') then 
begin 
If QueryQtdeCount.value  0 then 
begin 
Edit1.text := 'alterar'; 

If (InicialFrm.dbEdit3.Text = '0') or (InicialFrm.dbEdit4.Text = '0
) or (InicialFrm.dbEdit5.Text = '0') or (InicialFrm.dbEdit6.Text = '0') or
(InicialFrm.dbEdit7.Text = '0') then 
begin 
InicialFrm.QueryEndereco.Active := false; 
InicialFrm.QueryEndereco.Active := true; 
InicialFrm.QueryVendedor.Active := false; 
InicialFrm.QueryVendedor.Active := true; 
InicialFrm.QueryProdutos.Active := false; 
InicialFrm.QueryProdutos.Active := true; 
InicialFrm.QueryCliFornTrans2.Active := false; 
InicialFrm.QueryCliFornTrans2.Active := true; 
InicialFrm.QueryCodOper.Active := false; 
InicialFrm.QueryCodOper.Active := true; 
end; 

If InicialFrm.dbEdit5.text = '0' then 
ShowMessage('Não existe nenhum produto cadastrado! Você deve
cadastrar pelo menos 1 produto no sistema!') else 
If InicialFrm.dbEdit6.text = '0' then 
ShowMessage('Não existe nenhum cliente, fornecedor ou
transportadora cadastrado! Você deve cadastrar pelo menos 1 cliente,
fornecedor ou transportadora no sistema!') else 
If InicialFrm.dbEdit3.text = '0' then 
ShowMessage('Não existe nenhum endereço cadastrado! Você deve
cadastrar pelo menos 1 endereço no sistema!') else 
If InicialFrm.dbEdit4.text = '0' then 
ShowMessage('Não existe nenhum vendedor cadastrado! Você deve
cadastrar pelo menos 1 vendedor no sistema!') else 
If InicialFrm.dbEdit7.text = '0' then 
ShowMessage('Não existe nenhum código de operação cadastrado! Você
deve cadastrar pelo menos 1 código de operação no sistema!') 
else 
If InicialFrm.Edit1.Text = 'lcto' then 
begin 
dmoQuerys.QueryEstoqueProd.Active := true; 
dmoQuerys.queryParcFrete.active := true; 
dmoQuerys.QueryCadEmpresa.Active := true; 
dmoQuerys.QueryParcNF.Active := true; 

If NotasFiscaisFrm.rgPessoa.ItemIndex = 0 then 
begin 
NotasFiscaisFrm.label16.Visible := true; 
NotasFiscaisFrm.label17.Visible := false; 
end else 
If NotasFiscaisFrm.rgPessoa.ItemIndex = 1 then 
begin 
NotasFiscaisFrm.label16.Visible := false; 
NotasFiscaisFrm.label17.Visible := true; 
end; 

with dmoQuerys.QueryNF.SQL do 
begin 
clear; 
add('select * from notasFiscais where codigoNF = '); 
add(#39+queryNFCodigoNF.AsString+#39); 
end; 
dmoQuerys.QueryNF.Active := false; 
dmoQuerys.QueryNF.Active := true; 

with dmoQuerys.QueryFrete.SQL do 
begin 
clear; 
add('select * from fretenf where codigoNF = '); 
add(#39+dmoquerys.QueryNFCodigoNF.AsString+#39); 
end; 
dmoQuerys.QueryFrete.Active := false; 
dmoQuerys.QueryFrete.Active := true; 
(Nessa parte aki ele dá o erro sitado abaixo) 

Se eu colocar a queryFrete para executar antes da queryNF, nada de erro
acontece! 

Um abraço a todos! 

---Mensagem original--- 

De: Thales (Shubacca) - Tebo Software 
Data: 24/06/2009 20:05:00 
Para: delphi-br@yahoogrupos.com.br 
Assunto: Re: Re: [delphi-br] Erro ao executar SQL 




Voce poderia mandar o trecho completo para avaliarmos? 

2009/6/24 Bruno Lepesqueur brunolbra...@yahoo.com.br 

 
 
 Não uso nenhum evento nessas querys! 
 A única coisa que eu uso nelas é a propriedade CachedUpdate = True. 
 
 Obrigado! 
 
 ---Mensagem original--- 
 
 De: Thales (Shubacca) - Tebo Software 
 Data: 06/24/09 19:27:59 
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br 
 Assunto: Re: [delphi-br] Erro ao executar SQL 
 
 
 
 
 voce por acaso tem algum evento de afterscroll ou afteropen nessas querys?

 
 se tiver de uma olhada para ver se alguma delas nao esta tentando editar 
 sem 
 a query estar em modo de edicao 
 
 falow 
 
 2009/6/24 Bruno Lepesqueur brunolbra...@yahoo.com.brbrunolbrasil%40yahoo
com.br 
 
 
  
  
  Boa noite pessoal! 
  
  Estou com um problema que não consigo resolver desde a semana passada e 
  gostaria da ajuda de todos! 
  Eu tenho 2 tabelas relacionadas: tblNotas e tblFrete (campo relacionado:

  codigoNF) 
  Cada nota deve conter um frete que é relacionado através do campo 
 codigoNF 
 
  
  
  Eu consigo inserir registros nas tabelas através das funções 
  tblNotas.insert 
  e da função tblFrete.insert numa boua, mas qdo eu entro no formulário 
 para 
  alterar a nota e o frete que acabei de gravar usando um comando simples 
 do 
  SQL como: 
  
  with dmoQuerys.QueryNF.SQL do 
  begin 
  clear; 
  add('select * from Notas where codigoNF = '); 
  add(#39+queryNFCodigoNF.AsString+#39); 
  end

  1   2   3   4   5   6   7   8   9   >