[delphi-br] Arquivo Texto

2006-08-21 Por tôpico Renan
Tem como eu copiar caracteres de arquivo texto, mas em vez de mostrar de qual 
caracter deve começar, gostaria de mostrar qual tabulação ele deve começar a 
pegar os caracteres, existe como ??

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: RES: [delphi-br] Remover acentos via SP

2006-08-21 Por tôpico Marcelo
Bem quero remover os acentos visando a consulta do usuario. Por ex: No 
cadastro de cliente tem Jose e José. A intenção seria ficar tudo sem 
acento, para que na consulta ele apenas escreve-se Jose para realizar a 
busca.

Muito obrigado.



Francisco - Mol escreveu:

mas pq vc quer remover os acentos? é em algum campo do firebird?
- Original Message - 
From: Marcelo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Friday, August 18, 2006 11:48 AM
Subject: Re: RES: [delphi-br] Remover acentos via SP


  

Rodrigo, é para Firebird. Valeu. Agradeço tb a todos que respondeu a
minha duvida.

Rodrigo O. Farias escreveu:



Primeiro vc deve dizer pra que banco essa SP será escrita, já que cada um
tem a sua linguagem SQL




--
Rodrigo Othávio Farias



-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Marcelo
Enviada em: quinta-feira, 17 de agosto de 2006 09:06
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Remover acentos via SP

Amigos da lista, estou querendo aprender a trabalhar mais com SP e
gostaria de começar pelo básico. Gostaria de saber se alguém tem a
rotina de remover acento via SP e como eu faço para chamar essa SP no
Delphi?

Desde já eu agradeço a todos.




  


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos











-- 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.11.2/422 - Release Date: 17/08/2006







  




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: RES: [delphi-br] Remover acentos via SP

2006-08-21 Por tôpico Logos
mas o fb, ja tem esse controle... basta usar o colate correto
- Original Message - 
From: Marcelo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, August 21, 2006 8:52 AM
Subject: Re: RES: [delphi-br] Remover acentos via SP


 Bem quero remover os acentos visando a consulta do usuario. Por ex: No
 cadastro de cliente tem Jose e José. A intenção seria ficar tudo sem
 acento, para que na consulta ele apenas escreve-se Jose para realizar a
 busca.

 Muito obrigado.



 Francisco - Mol escreveu:

mas pq vc quer remover os acentos? é em algum campo do firebird?
- Original Message - 
From: Marcelo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Friday, August 18, 2006 11:48 AM
Subject: Re: RES: [delphi-br] Remover acentos via SP




Rodrigo, é para Firebird. Valeu. Agradeço tb a todos que respondeu a
minha duvida.

Rodrigo O. Farias escreveu:



Primeiro vc deve dizer pra que banco essa SP será escrita, já que cada 
um
tem a sua linguagem SQL




--
Rodrigo Othávio Farias



-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] 
Em
nome de Marcelo
Enviada em: quinta-feira, 17 de agosto de 2006 09:06
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Remover acentos via SP

Amigos da lista, estou querendo aprender a trabalhar mais com SP e
gostaria de começar pelo básico. Gostaria de saber se alguém tem a
rotina de remover acento via SP e como eu faço para chamar essa SP no
Delphi?

Desde já eu agradeço a todos.







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos











-- 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.11.2/422 - Release Date: 
17/08/2006












 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 Links do Yahoo! Grupos













 -- 
 No virus found in this incoming message.
 Checked by AVG Free Edition.
 Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date: 18/08/2006
 




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Celular

2006-08-21 Por tôpico Jonatã Castelo Branco
Anderson, se você quer comunicar dois celulares via GPRS, primeiro este assunto 
é OFF-TOPIC, e segundo, não dá para conectar dois celulares diretamente sem o 
auxílio de um terceiro componente. Deixa eu explicar.
   
  A conexão GPRS funciona mais ou menos como os computadores em ums LAN. 
Lembre-se que os IPs dos computadores são válidos apenas na rede interna e 
sendo assim, não dá para conectar um computador que esteja fora da rede, a um 
computador que esteja na rede a não ser que você mascare o computador da rede. 
Sempre que os celulares se conectam a rede, TIM, OI etc, eles ganham um IP 
diferente. Mas os celulares conectados a TIM estam na mesma rede, assim como os 
celulares conetados a OI estão na mesma rede. Por isso, se dois celulares estão 
conectados a uma mesma operadora e você souber o IP de um deles, é possível 
estabelecer a conexão via TCP/IP entre eles. Mas saiba que até onde eu sei, não 
é possível fazer mascaramento (se é que está palavra existe) e os IPs são 
trocados toda vida que os celulares se conectão a rede via GPRS.
   
  Então, se você planeja comunicar dois celulares via GPRS, a única solução que 
conheço é: dois celulares de uma mesma operadora se conectam; um deles envia IP 
para um servidor criado por você e pede a conexão com o outro celular; o 
servidor avisa o outro celular confirma o pedido; os dois celulares estabelecem 
a conexão, pois um deles sabe o IP do outro através do servidor (que pode ter 
um IP válido).
   
  Está solução acarretaria na criação de um programa para o celular, no 
protocolo, é claro, e no programa servidor (pode ser em delphi).
   
  Espero que tenha entendido.
   
  Jonatã.

[EMAIL PROTECTED] [EMAIL PROTECTED] escreveu:
  Sim é interface como a exemplo a Daruma, Neocel, Etc e faz ligações 
analogicas normalmente.
clovis
  - Original Message - 
  From: Desenvolvimento (Anderson) 
  To: Grupo Yahoo (Delphi) 
  Sent: Friday, August 18, 2006 4:48 PM
  Subject: [delphi-br] Celular


  Pessoal, 

  será q é possível usar um celular como modem e trocar dados entre celulares???
  Sei q existe um equipamento q faz algo parecido, q podemos ligar o celular no 
pabx para fazer ligações externas...
  Eu quero trocar dados entre aparelhos mesmo. Tipo GPRS...
  Vocês conhecem algo assim?

  Valeu

-
 O Yahoo! está de cara nova. Venha conferir!

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: RES: [delphi-br] Remover acentos via SP

2006-08-21 Por tôpico Welson Avelar
--- Marcelo escreveu:
 Bem quero remover os acentos visando a consulta do usuario. Por ex: No 
 cadastro de cliente tem Jose e José. A intenção seria ficar tudo sem 
 acento, para que na consulta ele apenas escreve-se Jose para realizar a 
 busca.
 
 Muito obrigado.
[--x--]

[Welson] Se você usar o Firebird 1.5.3.4870 pode usar o collate Win_PTBR que já
vem instalado com ele.
Daí esses problemas com acento terminam.


[]s.

=
O que me preocupa não é o grito dos maus. É o silêncio dos bons.
Martin Luther King.
=
Welson de Avelar Soares Filho
Analista/Programador Delphi
Gemini Sistemas
www.geminisistemas.com.br
Juiz de Fora - Minas Gerais
=



___ 
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale 
o discador agora! 
http://br.acesso.yahoo.com


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




RES: [delphi-br] Travar Sistema

2006-08-21 Por tôpico Douglas Uesato - Depto de Informática
Renam,

Neste link http://www.maxcomponents.net/components.html você vai
encontrar o TmxProtector. Ele vai atender a sua necessidade.

Atenciosamente,
Douglas Uesato





De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Renan
Enviada em: domingo, 20 de agosto de 2006 19:24
Para: Delphi Br
Assunto: [delphi-br] Travar Sistema

Gostaria de saber como posso travar meu sistema para ele executar uma
quantidade de vezes que definir, sem usar banco de dados. Pode ser por
registro, ou sei la !!!

Grato
Renan

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

 



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Celular Jonatã

2006-08-21 Por tôpico Desenvolvimento \(Anderson\)
Meu querido, 

Quero fazer isso no delphi, logo, não é OFF TOPIC... 
eu já criei diversos protocolos para comunicar com equipamentos eletrônicos, 
portanto, é até familiar o que vc me disse...
o que eu queria saber é como começar, como fazer o micro falar com o celular, 
para num segundo passo, fazer o resto...
eu teria q ver isso diretamente com os fabricantes de celulares? Ou existe um 
protocolo padrão?
Eles aceitam comunicação serial? Ou tem q ser via usb??? 
são essas as perguntas q preciso saber.

Obrigado.

Anderson



  - Original Message - 
  From: Jonatã Castelo Branco 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 9:18 AM
  Subject: Re: [delphi-br] Celular


  Anderson, se você quer comunicar dois celulares via GPRS, primeiro este 
assunto é OFF-TOPIC, e segundo, não dá para conectar dois celulares diretamente 
sem o auxílio de um terceiro componente. Deixa eu explicar.
 
A conexão GPRS funciona mais ou menos como os computadores em ums LAN. 
Lembre-se que os IPs dos computadores são válidos apenas na rede interna e 
sendo assim, não dá para conectar um computador que esteja fora da rede, a um 
computador que esteja na rede a não ser que você mascare o computador da rede. 
Sempre que os celulares se conectam a rede, TIM, OI etc, eles ganham um IP 
diferente. Mas os celulares conectados a TIM estam na mesma rede, assim como os 
celulares conetados a OI estão na mesma rede. Por isso, se dois celulares estão 
conectados a uma mesma operadora e você souber o IP de um deles, é possível 
estabelecer a conexão via TCP/IP entre eles. Mas saiba que até onde eu sei, não 
é possível fazer mascaramento (se é que está palavra existe) e os IPs são 
trocados toda vida que os celulares se conectão a rede via GPRS.
 
Então, se você planeja comunicar dois celulares via GPRS, a única solução 
que conheço é: dois celulares de uma mesma operadora se conectam; um deles 
envia IP para um servidor criado por você e pede a conexão com o outro celular; 
o servidor avisa o outro celular confirma o pedido; os dois celulares 
estabelecem a conexão, pois um deles sabe o IP do outro através do servidor 
(que pode ter um IP válido).
 
Está solução acarretaria na criação de um programa para o celular, no 
protocolo, é claro, e no programa servidor (pode ser em delphi).
 
Espero que tenha entendido.
 
Jonatã.

  [EMAIL PROTECTED] [EMAIL PROTECTED] escreveu:
Sim é interface como a exemplo a Daruma, Neocel, Etc e faz ligações 
analogicas normalmente.
  clovis
- Original Message - 
From: Desenvolvimento (Anderson) 
To: Grupo Yahoo (Delphi) 
Sent: Friday, August 18, 2006 4:48 PM
Subject: [delphi-br] Celular


Pessoal, 

será q é possível usar um celular como modem e trocar dados entre 
celulares???
Sei q existe um equipamento q faz algo parecido, q podemos ligar o celular 
no pabx para fazer ligações externas...
Eu quero trocar dados entre aparelhos mesmo. Tipo GPRS...
Vocês conhecem algo assim?

Valeu
  
  -
  O Yahoo! está de cara nova. Venha conferir!

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

   

  __ Informação do NOD32 IMON 1.1717 (20060821) __

  Esta mensagem foi verificada pelo NOD32 sistema antivírus
  http://www.eset.com.br


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: RES: [delphi-br] Remover acentos via SP

2006-08-21 Por tôpico Marcelo
Qual seria o colate então, e tem alguma opção do FB q tem q ser marcado?

Obrigado a todos.

Logos escreveu:

mas o fb, ja tem esse controle... basta usar o colate correto
- Original Message - 
From: Marcelo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, August 21, 2006 8:52 AM
Subject: Re: RES: [delphi-br] Remover acentos via SP


  

Bem quero remover os acentos visando a consulta do usuario. Por ex: No
cadastro de cliente tem Jose e José. A intenção seria ficar tudo sem
acento, para que na consulta ele apenas escreve-se Jose para realizar a
busca.

Muito obrigado.



Francisco - Mol escreveu:



mas pq vc quer remover os acentos? é em algum campo do firebird?
- Original Message - 
From: Marcelo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Friday, August 18, 2006 11:48 AM
Subject: Re: RES: [delphi-br] Remover acentos via SP




  

Rodrigo, é para Firebird. Valeu. Agradeço tb a todos que respondeu a
minha duvida.

Rodrigo O. Farias escreveu:





Primeiro vc deve dizer pra que banco essa SP será escrita, já que cada 
um
tem a sua linguagem SQL




--
Rodrigo Othávio Farias



-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] 
Em
nome de Marcelo
Enviada em: quinta-feira, 17 de agosto de 2006 09:06
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Remover acentos via SP

Amigos da lista, estou querendo aprender a trabalhar mais com SP e
gostaria de começar pelo básico. Gostaria de saber se alguém tem a
rotina de remover acento via SP e como eu faço para chamar essa SP no
Delphi?

Desde já eu agradeço a todos.






  

-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos











-- 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.11.2/422 - Release Date: 
17/08/2006









  


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos













-- 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date: 18/08/2006







  




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





RES: [delphi-br] Celular Jonatã

2006-08-21 Por tôpico Tatu-yahoogrupos
veja este site, tem uns modulos-celular que se comunicam por rs232,
inclusive creio que ate tem dll para auxiliar o desenvolvimento.
Quem utiliza muito este tipo de equipamento sao as empressas de segurança
particular, central de alarmes..etc...
Acho que deve ser o que estás necessitando.
www.informattechnology.com.br.

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Desenvolvimento (Anderson)
Enviada em: segunda-feira, 21 de agosto de 2006 09:38
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Celular  Jonatã


Meu querido, 

Quero fazer isso no delphi, logo, não é OFF TOPIC... 
eu já criei diversos protocolos para comunicar com equipamentos eletrônicos,
portanto, é até familiar o que vc me disse...
o que eu queria saber é como começar, como fazer o micro falar com o
celular, para num segundo passo, fazer o resto...
eu teria q ver isso diretamente com os fabricantes de celulares? Ou existe
um protocolo padrão?
Eles aceitam comunicação serial? Ou tem q ser via usb??? 
são essas as perguntas q preciso saber.

Obrigado.

Anderson



  - Original Message - 
  From: Jonatã Castelo Branco 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 9:18 AM
  Subject: Re: [delphi-br] Celular


  Anderson, se você quer comunicar dois celulares via GPRS, primeiro este
assunto é OFF-TOPIC, e segundo, não dá para conectar dois celulares
diretamente sem o auxílio de um terceiro componente. Deixa eu explicar.
 
A conexão GPRS funciona mais ou menos como os computadores em ums LAN.
Lembre-se que os IPs dos computadores são válidos apenas na rede interna e
sendo assim, não dá para conectar um computador que esteja fora da rede, a
um computador que esteja na rede a não ser que você mascare o computador da
rede. Sempre que os celulares se conectam a rede, TIM, OI etc, eles ganham
um IP diferente. Mas os celulares conectados a TIM estam na mesma rede,
assim como os celulares conetados a OI estão na mesma rede. Por isso, se
dois celulares estão conectados a uma mesma operadora e você souber o IP de
um deles, é possível estabelecer a conexão via TCP/IP entre eles. Mas saiba
que até onde eu sei, não é possível fazer mascaramento (se é que está
palavra existe) e os IPs são trocados toda vida que os celulares se conectão
a rede via GPRS.
 
Então, se você planeja comunicar dois celulares via GPRS, a única
solução que conheço é: dois celulares de uma mesma operadora se conectam; um
deles envia IP para um servidor criado por você e pede a conexão com o outro
celular; o servidor avisa o outro celular confirma o pedido; os dois
celulares estabelecem a conexão, pois um deles sabe o IP do outro através do
servidor (que pode ter um IP válido).
 
Está solução acarretaria na criação de um programa para o celular, no
protocolo, é claro, e no programa servidor (pode ser em delphi).
 
Espero que tenha entendido.
 
Jonatã.

  [EMAIL PROTECTED] [EMAIL PROTECTED] escreveu:
Sim é interface como a exemplo a Daruma, Neocel, Etc e faz ligações
analogicas normalmente.
  clovis
- Original Message - 
From: Desenvolvimento (Anderson) 
To: Grupo Yahoo (Delphi) 
Sent: Friday, August 18, 2006 4:48 PM
Subject: [delphi-br] Celular


Pessoal, 

será q é possível usar um celular como modem e trocar dados entre
celulares???
Sei q existe um equipamento q faz algo parecido, q podemos ligar o
celular no pabx para fazer ligações externas...
Eu quero trocar dados entre aparelhos mesmo. Tipo GPRS...
Vocês conhecem algo assim?

Valeu
  
  -
  O Yahoo! está de cara nova. Venha conferir!

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

   

  __ Informação do NOD32 IMON 1.1717 (20060821) __

  Esta mensagem foi verificada pelo NOD32 sistema antivírus
  http://www.eset.com.br


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

 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: RES: [delphi-br] Remover acentos via SP

2006-08-21 Por tôpico Logos
e so usar o colate pt_br... no fb 1.5 ou no 2.0
- Original Message - 
From: Marcelo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, August 21, 2006 9:32 AM
Subject: Re: RES: [delphi-br] Remover acentos via SP


 Qual seria o colate então, e tem alguma opção do FB q tem q ser marcado?

 Obrigado a todos.

 Logos escreveu:

mas o fb, ja tem esse controle... basta usar o colate correto
- Original Message - 
From: Marcelo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, August 21, 2006 8:52 AM
Subject: Re: RES: [delphi-br] Remover acentos via SP




Bem quero remover os acentos visando a consulta do usuario. Por ex: No
cadastro de cliente tem Jose e José. A intenção seria ficar tudo sem
acento, para que na consulta ele apenas escreve-se Jose para realizar a
busca.

Muito obrigado.



Francisco - Mol escreveu:



mas pq vc quer remover os acentos? é em algum campo do firebird?
- Original Message - 
From: Marcelo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Friday, August 18, 2006 11:48 AM
Subject: Re: RES: [delphi-br] Remover acentos via SP






Rodrigo, é para Firebird. Valeu. Agradeço tb a todos que respondeu a
minha duvida.

Rodrigo O. Farias escreveu:





Primeiro vc deve dizer pra que banco essa SP será escrita, já que cada
um
tem a sua linguagem SQL




--
Rodrigo Othávio Farias



-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em
nome de Marcelo
Enviada em: quinta-feira, 17 de agosto de 2006 09:06
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Remover acentos via SP

Amigos da lista, estou querendo aprender a trabalhar mais com SP e
gostaria de começar pelo básico. Gostaria de saber se alguém tem a
rotina de remover acento via SP e como eu faço para chamar essa SP no
Delphi?

Desde já eu agradeço a todos.








-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos











-- 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.11.2/422 - Release Date:
17/08/2006












-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos













-- 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date: 
18/08/2006












 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 Links do Yahoo! Grupos











 -- 
 No virus found in this incoming message.
 Checked by AVG Free Edition.
 Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date: 18/08/2006

 




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




[delphi-br] Grafico

2006-08-21 Por tôpico Wesley Romualdo da Silva
como faço um relatorio com grafico em delphi tipo os do excel

-
 Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora!

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: RES: [delphi-br] Remover acentos via SP

2006-08-21 Por tôpico Welson Avelar
--- Marcelo escreveu:
 Qual seria o colate então, e tem alguma opção do FB q tem q ser marcado?
 
 Obrigado a todos.
[--x--]

[Welson] Você escolhe o campo como Varchar. Escolhe o CharSet Win1252 e
coloca o collate Win_PTBR. Você pode perguntar: Pô, se eu tiver trocentos
campos VarCahr no banco de dados terei de escolher isso pra cada um !?. E é
aqui é que vem a sacada: depois de analisar o banco de dados, faço estimativas
aproximadas do tamanho dos campos VarChar e crio Domains que representam
essas estimativas.
Por exemplo: tenho um campo Nome e outro Telefone. Digamos que a média pra
um nome (nome + sobrenome) de pessoa seja de 60 caracteres e telefone é 13
(contando com os parentesis e com o hífen). Eu crio no banco de dados Um
Domain pra representar os campos Nome e afins como String65 e aqui
seleciono o CharSet Win1252 e o collate Win_PTBR. Pro campo telefone é
String13, porque tem outros campos que podem ter o mesmo tamanho dele. Ou
coloca String20, porque campos como CNPJ podem entrar nesse meio, e por aí
vai. Depende da sua criatividade e da necessidade do sistema, saca ?!

[]s.

=
O que me preocupa não é o grito dos maus. É o silêncio dos bons.
Martin Luther King.
=
Welson de Avelar Soares Filho
Analista/Programador Delphi
Gemini Sistemas
www.geminisistemas.com.br
Juiz de Fora - Minas Gerais
=



___ 
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale 
o discador agora! 
http://br.acesso.yahoo.com


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




[delphi-br] Alterar View via Delphi

2006-08-21 Por tôpico Moked - Tamara \(Brazil\)
 
 
  http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/ 

Grau de Sigilo:  Confidencial  Reservado  Interno  Amplo 
Nível de Prioridade:  Alto  Médio  Baixo
Destinatário/s: Lista de divulgação 
-
Bom dia! 
 
Pessoal, como faço para alterar uma View do meu banco Firebird via delphi?
 
Esta View é forma por um select semelhante ao q se segue:
 
Select Codigo, Numero, Nome from Pessoa where cadastro is null;
 
Preciso alterar este select para:
 
Select Codigo, Numero, Nome from Pessoa where cadastro is null and Codigo not 
in(select Codigo from Ids where Id = 'XX');

 
Como faço para alterar via programação Delphi esta View???
 
Obrigada,


Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000

Serviços prestados no Brasil na área de segurança pessoal e empresarial: 
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos | 
Auditoria e Sindicância | Software de Gestão | Help-desk 24hs 

 
O emitente da mensagem é o responsável por seu conteúdo e divulgação, proibindo 
sua reprodução sem a prévia autorização do mesmo. 
O conteúdo da presente mensagem é exclusivo para o/s destinatário/s e caso 
tenha recebido este e-mail por engano, por  favor  apaga-o e notifique o 
remetente. 
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o 
comprometimento com os custo envolvidos! 
 

 


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Alterar View via Delphi

2006-08-21 Por tôpico JJW Informática Ltda . - Roberto
DROP VIEW
CREATE VIEW...
No FB1.5 tem um novo comando chamado RECREATE VIEW

  - Original Message - 
  From: Moked - Tamara (Brazil) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 10:08 AM
  Subject: [delphi-br] Alterar View via Delphi




http://www.moked.com.br/   Tamara Clemente - Suporte Técnico
  Moked do Brasil - Consultoria de Segurança Empresarial
  Divisão MokInf de Informática
  PABX: (55-11) 5071-2748
  [EMAIL PROTECTED]
  www.moked.com.br http://www.moked.com.br/ 

  Grau de Sigilo:  Confidencial  Reservado  Interno  Amplo 
  Nível de Prioridade:  Alto  Médio  Baixo
  Destinatário/s: Lista de divulgação 
  -
  Bom dia! 

  Pessoal, como faço para alterar uma View do meu banco Firebird via delphi?

  Esta View é forma por um select semelhante ao q se segue:

  Select Codigo, Numero, Nome from Pessoa where cadastro is null;

  Preciso alterar este select para:

  Select Codigo, Numero, Nome from Pessoa where cadastro is null and Codigo not 
in(select Codigo from Ids where Id = 'XX');


  Como faço para alterar via programação Delphi esta View???

  Obrigada,


  Tamara
  A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000

  Serviços prestados no Brasil na área de segurança pessoal e empresarial: 
  Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos | 
Auditoria e Sindicância | Software de Gestão | Help-desk 24hs 


  O emitente da mensagem é o responsável por seu conteúdo e divulgação, 
proibindo sua reprodução sem a prévia autorização do mesmo. 
  O conteúdo da presente mensagem é exclusivo para o/s destinatário/s e caso 
tenha recebido este e-mail por engano, por  favor  apaga-o e notifique o 
remetente. 
  Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o 
comprometimento com os custo envolvidos! 





  [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:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




[delphi-br] Remote Debugger - Alguém sabe como Usar?

2006-08-21 Por tôpico sa_souza
Ae Galera Delphiana...
tudo blz...
espero q sim...
To precisando usar esse Remote Debugger do Delphi 7 mas naum to 
conseguindo... 
Minha aplicação é muito extensa... quando preciso resolver algo pesado 
q so acontece no cliente... tenho que instalar D7+Comp 3ºs tudo de novo 
e perco um tempão...
Se alguém souber como se usa esse Remote Debugger ou souber onde 
encontro um Tutorial do mesmo eu agradeço muito.

[]´s
e Bom Trabalho a todos...
[EMAIL PROTECTED]
msn: [EMAIL PROTECTED]






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




RES: [delphi-br] Alterar View via Delphi

2006-08-21 Por tôpico Moked - Tamara \(Brazil\)
Opa, valew... vou tentar o recreate, pq eu tentei o drop e create e ñ deu 
certo... :(
 
CREATE VIEW VW_Pessoas( Codigo, Numero, Nome) AS   Select Codigo, Numero, Nome 
from Pessoa where cadastro is null and Codigo not in(select Codigo from Ids 
where Id = 'XX');

Tem algo errado na sintaxe ai??
 
Obrigada,
 
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED] 
www.moked.com.br http://www.moked.com.br/ 




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de JJW 
Informática Ltda. - Roberto
Enviada em: segunda-feira, 21 de agosto de 2006 10:47
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Alterar View via Delphi


DROP VIEW
CREATE VIEW...
No FB1.5 tem um novo comando chamado RECREATE VIEW

  - Original Message - 
  From: Moked - Tamara (Brazil) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 10:08 AM
  Subject: [delphi-br] Alterar View via Delphi




http://www.moked.com.br/   Tamara Clemente - Suporte Técnico
  Moked do Brasil - Consultoria de Segurança Empresarial
  Divisão MokInf de Informática
  PABX: (55-11) 5071-2748
  [EMAIL PROTECTED]
  www.moked.com.br http://www.moked.com.br/ 

  Grau de Sigilo:  Confidencial  Reservado  Interno  Amplo 
  Nível de Prioridade:  Alto  Médio  Baixo
  Destinatário/s: Lista de divulgação 
  -
  Bom dia! 

  Pessoal, como faço para alterar uma View do meu banco Firebird via delphi?

  Esta View é forma por um select semelhante ao q se segue:

  Select Codigo, Numero, Nome from Pessoa where cadastro is null;

  Preciso alterar este select para:

  Select Codigo, Numero, Nome from Pessoa where cadastro is null and Codigo not 
in(select Codigo from Ids where Id = 'XX');


  Como faço para alterar via programação Delphi esta View???

  Obrigada,


  Tamara
  A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000

  Serviços prestados no Brasil na área de segurança pessoal e empresarial: 
  Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos | 
Auditoria e Sindicância | Software de Gestão | Help-desk 24hs 


  O emitente da mensagem é o responsável por seu conteúdo e divulgação, 
proibindo sua reprodução sem a prévia autorização do mesmo. 
  O conteúdo da presente mensagem é exclusivo para o/s destinatário/s e caso 
tenha recebido este e-mail por engano, por  favor  apaga-o e notifique o 
remetente. 
  Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o 
comprometimento com os custo envolvidos! 





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

   

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

 


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Remote Debugger - Alguém sabe como Usar?

2006-08-21 Por tôpico Andre Mesquita

- Instala o Remote Debugger na máquina que rodará o sistema.
- Menu Run / Attach to proccess... / indique qual o computador / verifique 
o nome da aplicação / Botão Attach

P.S.: Para a compilação
= Menu Project / Options / Aba Linker / Marque Include Remote Debugger 
Symbols / Botão OK.
= Coloque o arquivo de símbolos para o Debugger junto com o executável da 
aplicação no cliente.

- Original Message - 
From: sa_souza [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, August 21, 2006 10:53 AM
Subject: [delphi-br] Remote Debugger - Alguém sabe como Usar?


Ae Galera Delphiana...
tudo blz...
espero q sim...
To precisando usar esse Remote Debugger do Delphi 7 mas naum to
conseguindo...
Minha aplicação é muito extensa... quando preciso resolver algo pesado
q so acontece no cliente... tenho que instalar D7+Comp 3ºs tudo de novo
e perco um tempão...
Se alguém souber como se usa esse Remote Debugger ou souber onde
encontro um Tutorial do mesmo eu agradeço muito.

[]´s
e Bom Trabalho a todos...
[EMAIL PROTECTED]
msn: [EMAIL PROTECTED]






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos









-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: RES: [delphi-br] A/C Walter Alves Chagas Junior TURBO DELPHI

2006-08-21 Por tôpico Welson Avelar
--- Walter Alves Chagas Junior escreveu:
 (...)
 Mui respeitosamente ao nobre companheiro de lista
 (...)
[--x--]

[Welson] Caramba hein !? Gastou o latim agora. XD
Foi mal, mas não pude resistir !!! ^_^

[]s.

=
O que me preocupa não é o grito dos maus. É o silêncio dos bons.
Martin Luther King.
=
Welson de Avelar Soares Filho
Analista/Programador Delphi
Gemini Sistemas
www.geminisistemas.com.br
Juiz de Fora - Minas Gerais
=



___ 
O Yahoo! está de cara nova. Venha conferir! 
http://br.yahoo.com


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




RES: [delphi-br] Alterar View via Delphi

2006-08-21 Por tôpico Moked - Tamara \(Brazil\)
Roberto,
 
Eu tentei  também o Recreate View mas tb ñ deu certo o pior pelo 
IbExpert eu consigo criar e recriar numa boa... eu to achando q o problema esta 
na atribuição de valor... Ids where Id = 'XX');

 
Obrigada,
 
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED] 
www.moked.com.br http://www.moked.com.br/ 




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de JJW 
Informática Ltda. - Roberto
Enviada em: segunda-feira, 21 de agosto de 2006 10:47
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Alterar View via Delphi


DROP VIEW
CREATE VIEW...
No FB1.5 tem um novo comando chamado RECREATE VIEW

  - Original Message - 
  From: Moked - Tamara (Brazil) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 10:08 AM
  Subject: [delphi-br] Alterar View via Delphi




http://www.moked.com.br/   Tamara Clemente - Suporte Técnico
  Moked do Brasil - Consultoria de Segurança Empresarial
  Divisão MokInf de Informática
  PABX: (55-11) 5071-2748
  [EMAIL PROTECTED]
  www.moked.com.br http://www.moked.com.br/ 

  Grau de Sigilo:  Confidencial  Reservado  Interno  Amplo 
  Nível de Prioridade:  Alto  Médio  Baixo
  Destinatário/s: Lista de divulgação 
  -
  Bom dia! 

  Pessoal, como faço para alterar uma View do meu banco Firebird via delphi?

  Esta View é forma por um select semelhante ao q se segue:

  Select Codigo, Numero, Nome from Pessoa where cadastro is null;

  Preciso alterar este select para:

  Select Codigo, Numero, Nome from Pessoa where cadastro is null and Codigo not 
in(select Codigo from Ids where Id = 'XX');


  Como faço para alterar via programação Delphi esta View???

  Obrigada,


  Tamara
  A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000

  Serviços prestados no Brasil na área de segurança pessoal e empresarial: 
  Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos | 
Auditoria e Sindicância | Software de Gestão | Help-desk 24hs 


  O emitente da mensagem é o responsável por seu conteúdo e divulgação, 
proibindo sua reprodução sem a prévia autorização do mesmo. 
  O conteúdo da presente mensagem é exclusivo para o/s destinatário/s e caso 
tenha recebido este e-mail por engano, por  favor  apaga-o e notifique o 
remetente. 
  Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o 
comprometimento com os custo envolvidos! 





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

   

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

 


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Alterar View via Delphi

2006-08-21 Por tôpico JJW Informática Ltda . - Roberto
Cara, vc tem q executar assim, pro exemplo, utilizando DBExpress

SQLConnection1.Exeute('DROP VIEW TESTE');
SQLConnection1.Exeute('CREATE VIEW TESTE ');

O execute assim como o ExecSQL do TSQLDataset aceitam somente 1 comando por 
vez, nao pode colocar 2 comandos juntos q nao funciona
  - Original Message - 
  From: Moked - Tamara (Brazil) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 12:18 PM
  Subject: RES: [delphi-br] Alterar View via Delphi


  Roberto,

  Eu tentei  também o Recreate View mas tb ñ deu certo o pior pelo 
IbExpert eu consigo criar e recriar numa boa... eu to achando q o problema esta 
na atribuição de valor... Ids where Id = 'XX');


  Obrigada,

  Tamara Clemente - Suporte Técnico
  Moked do Brasil - Consultoria de Segurança Empresarial
  Divisão MokInf de Informática
  PABX: (55-11) 5071-2748
  [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] 
  www.moked.com.br http://www.moked.com.br/ 


  

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de JJW 
Informática Ltda. - Roberto
  Enviada em: segunda-feira, 21 de agosto de 2006 10:47
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Alterar View via Delphi


  DROP VIEW
  CREATE VIEW...
  No FB1.5 tem um novo comando chamado RECREATE VIEW

- Original Message - 
From: Moked - Tamara (Brazil) 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, August 21, 2006 10:08 AM
Subject: [delphi-br] Alterar View via Delphi




  http://www.moked.com.br/   Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/ 

Grau de Sigilo:  Confidencial  Reservado  Interno  Amplo 
Nível de Prioridade:  Alto  Médio  Baixo
Destinatário/s: Lista de divulgação 
-
Bom dia! 

Pessoal, como faço para alterar uma View do meu banco Firebird via delphi?

Esta View é forma por um select semelhante ao q se segue:

Select Codigo, Numero, Nome from Pessoa where cadastro is null;

Preciso alterar este select para:

Select Codigo, Numero, Nome from Pessoa where cadastro is null and Codigo 
not in(select Codigo from Ids where Id = 'XX');


Como faço para alterar via programação Delphi esta View???

Obrigada,


Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000

Serviços prestados no Brasil na área de segurança pessoal e empresarial: 
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos | 
Auditoria e Sindicância | Software de Gestão | Help-desk 24hs 


O emitente da mensagem é o responsável por seu conteúdo e divulgação, 
proibindo sua reprodução sem a prévia autorização do mesmo. 
O conteúdo da presente mensagem é exclusivo para o/s destinatário/s e caso 
tenha recebido este e-mail por engano, por  favor  apaga-o e notifique o 
remetente. 
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o 
comprometimento com os custo envolvidos! 





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

   

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





RE: [delphi-br] Formatar variavel

2006-08-21 Por tôpico Rubem Nascimento da Rocha
Qual é o tipo dessa variavel? Se for de um tipo inteiro, uma coisa é o valor 
armazenado, outra coisa é o valor exibido. Se o tipo da variável for string, 
use:

v1 := FormatFloat('0', StrToInt(v1));

Se não for nada disso, forneça mais detalhes sobre o problema.
Sds.


From: Renan [EMAIL PROTECTED]
Reply-To: delphi-br@yahoogrupos.com.br
To: Delphi Br delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Formatar variavel
Date: Mon, 21 Aug 2006 13:44:14 -0300

Como faço para formatar uma variavel string ???

tenho uma sequencia de numeros, mas estão armazenados em uma variavel 
string, e gostaria de colocar uns 0 na frente.
Ex: 01
   02

Mas na minha variavel só tem o 1 ou o 2

grato

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


_
MSN Messenger: converse com os seus amigos online. 
http://messenger.msn.com.br



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Formatar variavel

2006-08-21 Por tôpico JJW Informática Ltda . - Roberto
FormatFloat('0', 12); - '00012'
FormatFloat('0.00,', 1012.50); - '1.012,50'
  - Original Message - 
  From: Renan 
  To: Delphi Br 
  Sent: Monday, August 21, 2006 1:44 PM
  Subject: [delphi-br] Formatar variavel


  Como faço para formatar uma variavel string ???

  tenho uma sequencia de numeros, mas estão armazenados em uma variavel string, 
e gostaria de colocar uns 0 na frente. 
  Ex: 01
02

  Mas na minha variavel só tem o 1 ou o 2

  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:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





[delphi-br] Travar Sistema

2006-08-21 Por tôpico Renan
Pessoal, estou tentando travar meu sistema para só rodar a quantidade de vezes 
que eu especificar, como faço isso ??

Já me falaram no maxProtector, mas não estou conseguindo utiliza-lo, se alguem 
puder me ajudar !!!


grato
Renan
  - Original Message - 
  From: Douglas Uesato - Depto de Informática 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 9:26 AM
  Subject: RES: [delphi-br] Travar Sistema


  Renam,

Neste link http://www.maxcomponents.net/components.html você vai
  encontrar o TmxProtector. Ele vai atender a sua necessidade.

  Atenciosamente,
  Douglas Uesato




  
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Renan
  Enviada em: domingo, 20 de agosto de 2006 19:24
  Para: Delphi Br
  Assunto: [delphi-br] Travar Sistema

  Gostaria de saber como posso travar meu sistema para ele executar uma
  quantidade de vezes que definir, sem usar banco de dados. Pode ser por
  registro, ou sei la !!!

  Grato
  Renan

  [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:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] off topic - livros firebird

2006-08-21 Por tôpico Andrei Luís
Pedro Alexandro,

Tenho os livros Dominando Firebird e Firebird Essencial. O primeiro dá
pra considerar como A Bíblia do Firebird, o segundo apesar de ser
mais resumido, acho-o mais objetivo em alguns aspectos.

Não tive contato com o Firebird 2.0 - O Banco de Dados do Novo
Milênio, mas será a minha próxima aquisição.

[]
Andrei

Em 20/08/06, pedroalexandro2000[EMAIL PROTECTED] escreveu:
 Pessoal,

 Quero comprar alguns livros sobre o Firebird

 A questao é sobre o livro  Firebird 2.0 - O Banco de Dados do Novo
 Milênio do Cantu. Ele tem tambem o  Firebird Essencial . O primeiro
 engloba topicos do segundo titulo ?? ou vale a pena comprar os dois?

 Ou eu invisto direto no Dominando Firebird (Borrie, Helen)(180 reais) ?

 Agradeço antecipadamente pela dica :-)

 Pedro Alexandro.


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] off topic - livros firebird

2006-08-21 Por tôpico Delphi
Caro colega, além dos dois citados por você veja este, comprei faz 2 meses, 
achei muito bom, para dizer a verdade tenho os 3, todos
são otimos.
um abraço.
Walter

http://www.temporeal.com.br/produtos.php?id=170189

  Autor: Borrie, Helen 
  Editora: Ciência Moderna 
  ISBN: 857393493x 
  Série Promoção de Aniversário  
  Idioma Portugues 
  Páginas: 992 
  Publicação: 1 
  Edição 2006 
  Encadernação: Brochura 
  Disponibilidade: Momentaneamente sem estoque - Prazo de entrega: 6 dias  
  Peso: 1600.00 gramas 


  Descrição: 

  Dominando Firebird é uma destilação dos anos de atuação da autora Helen 
Borrie em listas de suporte, seja como aluna dos gurus ou como provedora de 
suporte para aqueles que se iniciaram depois. O livro compartilha grande 
quantidade do conhecimento da comunidade sobre o Firebird. Concentra-se no que 
é preciso fazer, não apenas para iniciar, mas também para manter o acúmulo de 
conhecimentos conforme se obtém o controle dos poderosos recursos do Firebird 
1.5. Gerenciamento de transações, integridade referencial, gatilhos multifase, 
procedimentos armazenados com saída de tabela virtual, manipulação de exceções, 
funções e tabelas externas, operação através de plataformas diversas - cada 
assunto é devidamente discutido. Ele informa a o que é e o que não é essencial 
ao desenvolver sistemas de bancos de dados com o Firebird, explorando muito 
além do superficial para descobrir o porquê. Recomenda ao leitor como abordar a 
tarefa de escrever programas de aplicações clientes, sem tentar dizer como 
escrevê-las - supondo que ele já saiba como fazer.



  Um livro essencial a todos os leitores e usuários do Firebird: aquele que 
se pode manter na cabeceira para estudar a próxima técnica não descoberta, e 
aquele que se pode deixar sobre a mesa para quando se estiver concentrado em 
detalhes importantes. Este é, com certeza, o livro em que o leitor encontrará o 
que precisa.


  Sumário:
  Parte 1: Área de Reinicialização
  Capítulo 1 - Instalação;
  Capítulo 2 - Configuração de Rede;
  Capítulo 3 - Configurando o Firebird;
  Capítulo 4 - Operações Básicas;

  Parte 2: Cliente/Servidor
  Capítulo 5 - Introdução à Arquitetura Cliente/Servidor;
  Capítulo 6 - O Servidor Firebird;
  Capítulo 7 - Clientes Firebird;

  Parte 3: Tipos de Dados e Domínios do Firebird 
  Capítulo 8 - Sobre os Tipos de Dados do Firebird;
  Capítulo 9 - Tipos Numéricos;
  Capítulo 10 - Tipos de Datas e Horários;
  Capítulo 11 - Tipos Caractere;
  Capítulo 12 - BLOBs e Matrizes;
  Capítulo 13 - Domínios;

  Parte 4: Um Banco de Dados e Seus Objetos
  Capítulo 14 - Do Esboço ao Banco de Dados;
  Capítulo 15 - Criando e Mantendo um Banco de Dados;
  Capítulo 16 - Tabelas;
  Capítulo 17 - Integridade Referencial;
  Capítulo 18 - Índices;

  Parte 5: Firebird SQL
  Capítulo 19 - Linguagem SQL do Firebird;
  Capítulo 20 - Consultas DML;
  Capítulo 21 - Expressões e Predicados;
  Capítulo 22 - Pesquisando em Múltiplas Tabelas;
  Capítulo 23 - Conjuntos Ordenados e Agregados;
  Capítulo 24 - Visões;

  Parte 6: Transações
  Capítulo 25 - Visão Geral das Transações no Firebird;
  Capítulo 26 - Configurando Transações;
  Capítulo 27 - Programando com Transações;

  Parte 7: Programação do Servidor
  Capítulo 28 - Introdução à Programação Firebird;
  Capítulo 29 - Desenvolvendo Módulos PSQL;
  Capítulo 30 - Procedimentos Armazenados;
  Capítulo 31 - Gatilhos;
  Capítulo 32 - Manipulação de Erros e Eventos;

  Parte 8: Segurança
  Capítulo 33 - Segurança no Ambiente Operacional;
  Capítulo 34 - Proteção do Servidor;
  Capítulo 35 - Segurança em Nível de Banco de Dados;
  Capítulo 36 - Configuração e Recursos Especiais;

  Parte 9: Ferramentas
  Capítulo 37 - Utilitário SQL Interativo (isql);
  Capítulo 38 - Cópia de Segurança e Restauração de Bancos de Dados (gbak);
  Capítulo 39 - Ferramenta de Manutenção (gfix);
  Capítulo 40 - Entendendo o Gerenciador de Bloqueios;

  Apêndice I: Resumo das Funções Externas;
  Apêndice II: Resolvendo Problemas de Rede;
  Apêndice III: Interfaces de Aplicações;
  Apêndice IV: Como Reparar Bancos de Dados;
  Apêndice V: Ferramentas de Administração;
  Apêndice VI: O Banco de Dados de Exemplo;
  Apêndice VII: Os Limites do Firebird;
  Apêndice VIII: Conjuntos de Caracteres e Intercalações;
  Apêndice IX: Tabelas e Visões de Sistema;
  Apêndice X: Códigos de Erro;
  Apêndice XI: Palavras Reservadas;
  Apêndice XII: Leituras e Recursos;
 

  - Original Message - 
  From: pedroalexandro2000 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Sunday, August 20, 2006 6:37 PM
  Subject: [delphi-br] off topic - livros firebird


  Pessoal,

  Quero comprar alguns livros sobre o Firebird

  A 

RES: [delphi-br] para compilar

2006-08-21 Por tôpico Rodrigo O. Farias
Vc devia ganhar um centavo cada vez que repete isso aqui na lista, ja
poderia comprar a divisão de desenvolvimento da borland com as moedinhas, em
1998 vc já respondia isso aqui na lista.  :)


Esse assunto deveria vir no rodapé das mensagens do grupo, a cada 15 dias
alguém quer descompilar alguma coisa, ou pelo menos na mensagem das regras
que é enviada quando a pessoa entra no grupo.



--
Rodrigo Othávio Farias 

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Walter Alves Chagas Junior
Enviada em: segunda-feira, 21 de agosto de 2006 10:16
Para: 'delphi-br@yahoogrupos.com.br'
Assunto: RES: [delphi-br] para compilar

Amigo, infelizmente pra voce modificar um programa gerado no Delphi, só com
os fontes mesmo. Não existe descompilador que pega o .exe e lhe retorna o
fonte e muito menos abrir o exe em um editor de programas e implementar
rotinas nele.


[]s

Walter Alves Chagas Junior
Projeto e desenvolvimento de sistemas
Telemont Engenharia de telecomunicações S/A
Belo Horizonte - MG - Brasil
[EMAIL PROTECTED]
Fone: (31) 3389-8215 Fax: (31) 3389-8200

Parabens Telemont - Somos a 8ª maior empresa do Brasil no segmento de
construção!!


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de kaduardo2001
Enviada em: sábado, 19 de agosto de 2006 17:31
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] para compilar


estou com um dificuldade mais não sei como resolver isso alguem poderia 
me ajudar fico muito agradecido, o problema é o seguinte ele faz o que 
eu quero foi feito hein delphi só que peguei o exe dele mais é um 
programa caseiro só que quero abrir este exe para mudar a configuração 
deste programa pq ele é meio fraco quero fazer umas mudanças só que não 
conheco a pessoa que fez e nein quem é então fica dificil obter o 
codigo dele então eu consigo abrir este exe no delphi ou tenho que usar 
algum programa expecifico para abrir a fazer as mudanças





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





RES: [delphi-br] Garantir gravacao de arquivo TXT

2006-08-21 Por tôpico Rodrigo O. Farias
Não entendi no que essas sugestões vão ajudar num caso de desligamento da
maquina, na verdade as suas sugestões ou vão perder todo o conteúdo ou vão
dar na mesma.


Da pra usar a o principio da idéia do Stringlist, mas a cada linha
adicionada vc chama o método savetofile, garantindo que não se perca nada. 



--
Rodrigo Othávio Farias 


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Logos
Enviada em: quarta-feira, 16 de agosto de 2006 18:15
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Garantir gravacao de arquivo TXT

vc pode fazer esse processo numa stringlist, e depois salvar no arquivo. ou
pode criar um arquivo texto temporario, e ao termino salvar o temporario
como arquivo final.
  - Original Message - 
  From: williamrocha 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, August 16, 2006 6:03 PM
  Subject: [delphi-br] Garantir gravacao de arquivo TXT


  Oi Pessoal,

 To com um problema serio.  Gravando dados em um arquivo .TXT
  caso o computador seja resetado ou desligue acidentalmente ele
  perde dados.

 To fazendo assim:

  while condicao do begin 
 ...
 AssignFile(F,'teste.txt');
 Append(F); // Sei q o arquivo existe
 WriteLn(F,dados);
 Flush(F);
 CloseFile(F);
 Memo1.Lines.Add(dados);
 Application.ProcessMessages;
 ...
  end;

 Supondo q p/ dados passei a sequencia de 1 a 100 e vou mostrando na
  tela a medida q vou gravando, tipo:
  1
  2
  3
  4
  ...
Supondo q reset a maquina quando em 50, quando abro o arquivo texto
  soh tem 47 registros.

O SO usado nas maquinas eh Windows 2000 ou XP.

Qualquer dica serah super bem vinda.

  Obrigado a todos

  William Rocha





   



--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.405 / Virus Database: 268.10.10/419 - Release Date:
15/08/2006


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





[delphi-br] Gravar data Vazia

2006-08-21 Por tôpico Ailton Branco
Tenho um campo onde eu Gravo a data de pagamento, porém na hora de 
fazer um estorno preciso limpar o conteudo da data, como faço para 
gravar a data vazia.

Exemplo
  vsSql := 'update ContasPagarParcela set 
   DataPagamento  =:DataPagamento,
   ValorPagamento =:ValorPagamento,
Where (idContasPagar =:idContasPagar) and (Parcela   
=:Parcela) 

  Qry.SQL.Add(vsSql);
  Qry.Params.ParamByName('DataPagamento').AsDateTime  := ??;
  Qry.Params.ParamByName('ValorPagamento').AsCurrency := 0 ;
  Qry.Params.ParamByName('idContasPagar').AsCurrency  := 1 ;
  Qry.Params.ParamByName('Parcela').AsCurrency:= 1 ;
  Qry.ExecSql;









-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





RES: [delphi-br] Como criar um arquivo com o tamanho já pré definido...

2006-08-21 Por tôpico Rodrigo O. Farias
Pelo que eu sei esses programas criam um arquivo dummy, com o tamanho total
mas vazio de conteúdo, provavelmente tudo zerado (binario), e vai
preenchendo com o conteúdo, pq eles não consomem muita memria no processo
nem usam arquivos temporários em outro lugar da maquina



--
Rodrigo Othávio Farias

 

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Luiz Escobar
Enviada em: sexta-feira, 18 de agosto de 2006 16:16
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Como criar um arquivo com o tamanho já pré
definido...

não... preciso dele instantaneo pois posso começar a grava dados já no 
final do arquivo. e ele vai ter 380MB
o Free Download Manager cria um arquivo de 3.5GB INSTANTANEO quem já 
usou ele para download load já viu isso...

agora preciso descobrir como fazer isso no delphi... ehheheh

Luiz Escobar





- Original Message - 


From: Andre Mesquita
To: delphi-br@yahoogrupos.com.br
Sent: Friday, August 18, 2006 3:21 PM
Subject: Re: [delphi-br] Como criar um arquivo com o tamanho já pré 
definido...


que tal criar uma thread para gerar esse arquivão em background?

- Original Message - 
From: Luiz Escobar [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Friday, August 18, 2006 2:50 PM
Subject: Re: [delphi-br] Como criar um arquivo com o tamanho já pré
definido...


 Olá Campos, bom isso eu tinha pensado, o problema é que no FDM (Free
 Download Manager) isso é instantaneo, e se for criar um arquivo de 380MB
 neste método que eu e vc pensamos, ehhehhe, vai demorar um pouquinho.

 preciso de algo mais rápido...

 Será que ALLguem pode me ajudar ??? heheheh


 Luiz Escobar



 - Original Message - 
 From: Campus
 To: delphi-br@yahoogrupos.com.br
 Sent: Friday, August 18, 2006 2:07 PM
 Subject: Re: [delphi-br] Como criar um arquivo com o tamanho já pré
 definido...


 Luiz, o que esses softs fazem é criar um arquivo temp com o tamanho do
 download, e apagam quando ele está terminado.

 em Delphi eu desconheço como fazer a gravação em linha x do arquivo (como
 em
 basic por exemplo), mas tu pode contornar fazendo um laço e gravar 'n'
 linhas de x bytes para chegar ao tamanho total.

 Por exemplo 380 MB, dariam 380 linhas de 1 MB.



 - Original Message - 
 From: Luiz Escobar [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Friday, August 18, 2006 1:20 PM
 Subject: [delphi-br] Como criar um arquivo com o tamanho já pré
 definido...


 Tipo, quando criamos um arquivo ele esta com o tamanho 0, e conforme
 vamos
 adicionando os dados ele vai crescendo...
 Quero, que quando eu cria-lo, como já sei o tamanho que ele vai ficar,
 (380MB), eu já especifique e o sistema já me reserva este tamanho, para
 que
 eu apenas vai sobrepondo os dados, como fazer isso ?
 Vi isso no FREE DOWNLOAD MANAGER, assim que vc começa o download ele cria
 o
 arquivo já com o espeço reservado, não é pra download, mas isso me
 ajudaria
 em alguns aspectos

 Luiz Escobar



 - Original Message - 
 From: Luiz Escobar
 To: delphi-br@yahoogrupos.com.br
 Sent: Friday, August 18, 2006 1:11 PM
 Subject: Re: [delphi-br] Campos Lookup, ainda existe vantagens? Vamos
 discutir?


 Se voce já sabe o código, um EDIT pode ser melhor e mais rápido do que
 procurar os clientes em um combobox, agora se vc só sabe o nome do
 cliente,
 bom ai o combobox seria melhor  cada caso é um caso

 Luiz Escobar



 - Original Message - 
 From: Fellipe Henrique
 To: delphi-br@yahoogrupos.com.br
 Sent: Thursday, August 17, 2006 6:48 PM
 Subject: [delphi-br] Campos Lookup, ainda existe vantagens? Vamos
 discutir?


 Olá amigos, vamos supor que tenho um cadastro de pedido, e nele preciso
 colocar o  cliente...

 Pois bem, como vocês fariam para o usuário colocar o cliente no cadastro?
 Um
 LookupComboBox? Um Edit pra colocar o Código?

 Gostaria de discutir com os amigos para que possamos chegar a uma
 conclusão
 sobre qual o melhor método, levando em consideração a agilidade e  carga
 de
 processamento.

 Bem, como banco de dados seria o Firebrid 1.5, mas esta questão envolve
 quaisquer bancos

 Fica aí uma discussão saudável para os amigos :o)


 []s

 -- 
 _
 Fellipe Henrique
 [EMAIL PROTECTED]

 Borland Developer Studio 2006 Certified

 Venham até a borda, ele disse.
 Eles disseram: Nós temos medo.
 Venham até a borda, ele insistiu.
 Eles foram, Ele os empurrou...
 E eles voaram.
 (Guillaume Apollinaire)


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







 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 Links do Yahoo! Grupos













 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 Links do Yahoo! Grupos









 



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as 

[delphi-br] SQL no Delphi.

2006-08-21 Por tôpico Bruno


   Pessoal , boa tarde.

 Peguei um exemplo de insert no SQL que era assim

Inset into tabela (nome) values ('Bruno')


 aí eu como iniciante pergunto : E se bruno fosse um valor num Edit, ou seja
, fosse uma variável a ser lida no ato de clicar no botão ? Como ficaria o
SQL ?


Abraços,

Bruno Santiago Arêas


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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





RES: RES: [delphi-br] Remover acentos via SP

2006-08-21 Por tôpico Rodrigo O. Farias
Ele não remove os acentos, mas quando vc fizer uma pesquisa ele não vai
considerar os acentos pra efeito de pesquisa 'José' ou 'Jose' são a mesma
palavra





--
Rodrigo Othávio Farias 

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Marcelo
Enviada em: segunda-feira, 21 de agosto de 2006 13:35
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] Remover acentos via SP

Amigos, agradeço a ajuda de todos, mas no meu não tem o Collate Pt-Br, 
então eu escolho o charset PXW_INTL850, pois eu aprendi q esse é o de 
acentuação. Porém gostaria de saber dos amigos, caso eu venha a escolher 
o Charset Pt-Br, ao dar um post ele remove os acentos??

Mais uma vez agradeco a todos.

Welson Avelar escreveu:

--- Marcelo escreveu:
  

Qual seria o colate então, e tem alguma opção do FB q tem q ser marcado?

Obrigado a todos.


[--x--]

[Welson] Você escolhe o campo como Varchar. Escolhe o CharSet Win1252 e
coloca o collate Win_PTBR. Você pode perguntar: Pô, se eu tiver
trocentos
campos VarCahr no banco de dados terei de escolher isso pra cada um !?. E
é
aqui é que vem a sacada: depois de analisar o banco de dados, faço
estimativas
aproximadas do tamanho dos campos VarChar e crio Domains que representam
essas estimativas.
Por exemplo: tenho um campo Nome e outro Telefone. Digamos que a média
pra
um nome (nome + sobrenome) de pessoa seja de 60 caracteres e telefone é 13
(contando com os parentesis e com o hífen). Eu crio no banco de dados Um
Domain pra representar os campos Nome e afins como String65 e aqui
seleciono o CharSet Win1252 e o collate Win_PTBR. Pro campo telefone é
String13, porque tem outros campos que podem ter o mesmo tamanho dele. Ou
coloca String20, porque campos como CNPJ podem entrar nesse meio, e por
aí
vai. Depende da sua criatividade e da necessidade do sistema, saca ?!

[]s.

=
O que me preocupa não é o grito dos maus. É o silêncio dos bons.
Martin Luther King.
=
Welson de Avelar Soares Filho
Analista/Programador Delphi
Gemini Sistemas
www.geminisistemas.com.br
Juiz de Fora - Minas Gerais
=


   
___ 
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale 
o discador agora! 
http://br.acesso.yahoo.com


  




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 








-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




[delphi-br] Como trabalhar com XML?

2006-08-21 Por tôpico Fellipe Henrique
Olá amigos, tenho um XML da seguinte forma:

?xml version=1.0 encoding=ISO-8859-1?
modulos
   modulo
  arquivoCrnConnDB/arquivo
  textoModulo de Conexao ao BD/texto
   /modulo
   modulo
  arquivoCrnLogin/arquivo
  textoModulo responsavel pelo Login e usuarios/texto
   /modulo

/modulos


Como faço pra trabalhar com ele no Delphi? digo, como se fosse uma Tabela..
já tentei usar o ClientDataSet, mas o XML que ele cria é um formato
proprietário do Delphi.


Desde já agradeço

[]s

-- 
_
Fellipe Henrique
[EMAIL PROTECTED]

Borland Developer Studio 2006 Certified

Venham até a borda, ele disse.
Eles disseram: Nós temos medo.
Venham até a borda, ele insistiu.
Eles foram, Ele os empurrou...
E eles voaram.
(Guillaume Apollinaire)


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] SQL no Delphi.

2006-08-21 Por tôpico Fellipe Henrique
Ola Bruno,

Existe duas maneiras:

 SQL.Add('insert into tabela (nome) values (' + QuotedStr(Edit1.Text) + ')';

ou
 SQL.Add('insert into tabela (nome) values (:param1)';
 ParamByName('param1').AsString := Edit1.Text;

A Segunda opção é a melhor...


[]s
Fellipe H.


Em 21/08/06, Bruno [EMAIL PROTECTED] escreveu:



Pessoal , boa tarde.

 Peguei um exemplo de insert no SQL que era assim

 Inset into tabela (nome) values ('Bruno')


 aí eu como iniciante pergunto : E se bruno fosse um valor num Edit, ou
 seja
 , fosse uma variável a ser lida no ato de clicar no botão ? Como ficaria o
 SQL ?


 Abraços,

 Bruno Santiago Arêas


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



 




-- 
_
Fellipe Henrique
[EMAIL PROTECTED]

Borland Developer Studio 2006 Certified

Venham até a borda, ele disse.
Eles disseram: Nós temos medo.
Venham até a borda, ele insistiu.
Eles foram, Ele os empurrou...
E eles voaram.
(Guillaume Apollinaire)


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





[delphi-br] [OFF TOPIC] Problema na Stored Procedure

2006-08-21 Por tôpico Maurici Alvarez
Bom Dia Pessoal.

Primeiramente desculpe pelo OFF TOPIC. Mas estou com um problema
sério.

 

Estou com um problema numa estored procedure.

 

CREATE PROCEDURE QAPGerarNovoQRU

@UltimaQRU Integer Output

AS

 

Update Parametros set UltimaQRU = UltimaQRU + 1

Set @UltimaQRU = (select UltimaQRU from Parametros)

GO

 

O problema é de concorrência. Algumas vezes ela me retorna um
valor igual. Já me falaram em usar LOCK, read commited, Transation. Mas eu
não sei como usar, alguém poderia me ajudar, para que essa procedure não
volte a ter problema de aceso simultâneo. E aproveitando para pedir algum
material sobre esses itens LOCK, READ COMMITED e TRANSATION.

 

Obrigado.

[]’s

Maurici Dias Alvarez 

 

 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





RES: [SPAM] [delphi-br] Gravar data Vazia

2006-08-21 Por tôpico Suporte CMAC
Boa tarde,

 

Eu utilizo o Sql Server e faço assim :

 

   Qry.Params.ParamByName('DataPagamento').Value  := Null;

 

É lógico que quando preciso mostrar esta dara tenho que tratar mas é a
melhor maneira.. pois se vc colocar 0 (zero), no sql server ele mostra
como 01/01/1900.

 


Atenciosamente, 

  _  

Emilio Córdova 
(41) 9228-7414 
[EMAIL PROTECTED]
[EMAIL PROTECTED]
[EMAIL PROTECTED] 

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Ailton Branco
Enviada em: segunda-feira, 21 de agosto de 2006 14:33
Para: delphi-br@yahoogrupos.com.br
Assunto: [SPAM] [delphi-br] Gravar data Vazia

 

Tenho um campo onde eu Gravo a data de pagamento, porém na hora de 
fazer um estorno preciso limpar o conteudo da data, como faço para 
gravar a data vazia.

Exemplo
  vsSql := 'update ContasPagarParcela set 
   DataPagamento  =:DataPagamento,
   ValorPagamento =:ValorPagamento,
Where (idContasPagar =:idContasPagar) and (Parcela   
=:Parcela) 

  Qry.SQL.Add(vsSql);
  Qry.Params.ParamByName('DataPagamento').AsDateTime  := ??;
  Qry.Params.ParamByName('ValorPagamento').AsCurrency := 0 ;
  Qry.Params.ParamByName('idContasPagar').AsCurrency  := 1 ;
  Qry.Params.ParamByName('Parcela').AsCurrency:= 1 ;
  Qry.ExecSql;







 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





[delphi-br] Ocultar Aplicação no XP

2006-08-21 Por tôpico cchirolli
Olá pessoal, tem alguma maneira de ocultar uma plicação da litas de 
aplicativos e/ou de processos do win XP ou uma maneira de impedir q a 
aplicação seja finalizada pelo gerenciador de tarefas, sem ter q 
bloquear todo o gerenciador?

Obrigado,
Carlos






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Gravar data Vazia

2006-08-21 Por tôpico JJW Informática Ltda . - Roberto
Informa NULL:

...ParamByName('DataPagamento').AsVariant := Null;

see não funcionar, faz direto no SQL

Update TABELA set CAMPO = null ...
  - Original Message - 
  From: Ailton Branco 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 2:32 PM
  Subject: [delphi-br] Gravar data Vazia


  Tenho um campo onde eu Gravo a data de pagamento, porém na hora de 
  fazer um estorno preciso limpar o conteudo da data, como faço para 
  gravar a data vazia.

  Exemplo
vsSql := 'update ContasPagarParcela set 
 DataPagamento  =:DataPagamento,
 ValorPagamento =:ValorPagamento,
  Where (idContasPagar =:idContasPagar) and (Parcela   
  =:Parcela) 

Qry.SQL.Add(vsSql);
Qry.Params.ParamByName('DataPagamento').AsDateTime  := ??;
Qry.Params.ParamByName('ValorPagamento').AsCurrency := 0 ;
Qry.Params.ParamByName('idContasPagar').AsCurrency  := 1 ;
Qry.Params.ParamByName('Parcela').AsCurrency:= 1 ;
Qry.ExecSql;







   

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




[delphi-br] MDO

2006-08-21 Por tôpico Gilson
Caros colegas,

 

Para determinar a quantidade de usuários que estão acessando a base de dados
utilizando o IBX eu usava o componente IbDataBaseInfo da seguinte maneira:

 

'Usuários Conectados: '+inttostr(dados.IbDatabaseInfo1.UserNames.Count);

 

E funcionava muito bem

 

Agora estou tentando fazer a mesma coisa utilizando o MDO com um componente
correspondente o MDODatabaseInfo desta forma:

 

'Usuários Conectados: '+inttostr(dados.MDODatabaseInfo1.UserNames.Count);

 

Mas ele não está retornando a quantidade correta de usuários conectados à
base de dados, ou seja, ele sempre mostra como se apenas um usuário
estivesse conectado apesar de haver vários!

 

Alguém poderia dar alguma dica de como posso obter a quantidade correta de
usuários que estão acessando a base de dados utilizando o MDO!!

 

Obrigado,

 

Gilson

 

 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





[delphi-br] Erro em alteração de registro.

2006-08-21 Por tôpico Rodrigo de Moura
Boa tarde amigos,

Na alteração do registro quando vou dar o applyUpdates me dá o seguinte erro:
Record not found or changed by another user.
Minha aplicação não está em rede e todas as configurações do datasetprovider 
estão
corretas também.
Em minhas telas de cadastro trabalho com controle de botões (incluir, editar, 
salvar,
excluir, cancelar) pelo OnStateChange do DataSource. O interessante é que esse 
erro
ocorre somente quando faço qualquer alteração no registro logo após a inclusão 
do mesmo.
Explicando: após incluir o registro clicando no botão salvar, se por acaso 
quiser fazer
alguma alteração, clico no botão editar e faço a alteração necessária. Quando 
clico no
botão salvar ocorre o citado erro.
Mas se eu sair da tela de cadastro e voltar nela novamente e pela tela de 
procura retornar o
registro para a tela do cadastro e fizer qualquer alteração é salvo normalmente.
Utilizo Delphi 7, DBExpress com clientDataSet, Firebird 1.5 e Driver UIB.
Qualquer ajuda será bem vinda!!

Atenciosamente,

Rodrigo de Moura

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




[delphi-br] [OFF TOPIC] Programação para coletor de dados

2006-08-21 Por tôpico Murillo Proença
Boa tarde,

estou precisando fazer um levantamento para desenvolvimento de um
sistema que terá que carregar/descarregar um coletor de dados industrial.
Onde será carregado uma lista de separação de produtos, aí o usuário
lê o código de barras do produto e o sistema verifica se o mesmo está
na lista ou não.
Bom, como dá pra ver o sistema é bem simples. Só que pelo que andei
vendo por aí, esses coletores possuem desenvolvimento em C, Basic e um
kit de desenvolvimento para windows (não sei o que é isso).
O que gostaria é sabe um pouco mais sobre o assunto, que já teve
alguma experiência deste tipo favor me enviar.


Abraço a todos

Murillo Proença






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Ocultar Aplicação no XP

2006-08-21 Por tôpico JJW Informática Ltda . - Roberto
não ?!!!
  - Original Message - 
  From: cchirolli 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 3:38 PM
  Subject: [delphi-br] Ocultar Aplicação no XP


  Olá pessoal, tem alguma maneira de ocultar uma plicação da litas de 
  aplicativos e/ou de processos do win XP ou uma maneira de impedir q a 
  aplicação seja finalizada pelo gerenciador de tarefas, sem ter q 
  bloquear todo o gerenciador?

  Obrigado,
  Carlos




   

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] MDO

2006-08-21 Por tôpico JJW Informática Ltda . - Roberto
Se vc estiver utilizando a versão CLASSIC SERVER do Firebird/Interbase não irá 
funcionar. o Classic Server cria 1 processo do fbserver.exe por vez e retorna a 
lista de usuário conectados sempre como 1. para resolver isso, utilize a versão 
Super Server
  - Original Message - 
  From: Gilson 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 3:37 PM
  Subject: [delphi-br] MDO


  Caros colegas,



  Para determinar a quantidade de usuários que estão acessando a base de dados
  utilizando o IBX eu usava o componente IbDataBaseInfo da seguinte maneira:



  'Usuários Conectados: '+inttostr(dados.IbDatabaseInfo1.UserNames.Count);



  E funcionava muito bem



  Agora estou tentando fazer a mesma coisa utilizando o MDO com um componente
  correspondente o MDODatabaseInfo desta forma:



  'Usuários Conectados: '+inttostr(dados.MDODatabaseInfo1.UserNames.Count);



  Mas ele não está retornando a quantidade correta de usuários conectados à
  base de dados, ou seja, ele sempre mostra como se apenas um usuário
  estivesse conectado apesar de haver vários!



  Alguém poderia dar alguma dica de como posso obter a quantidade correta de
  usuários que estão acessando a base de dados utilizando o MDO!!



  Obrigado,



  Gilson







  [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:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





RES: [delphi-br] Ocultar Aplicação no XP

2006-08-21 Por tôpico Elazar Dornelles Ceza
Amigo;

So da lista de aplicativos.
Da lista de processos...não (NÃO QUE EU SAIBA);

Alias a única maneira...de que imagino
Seria se voce descobrir o handle do listview e ficar dando um loop nele
e ir removendo o item que tem o nome do seu exe...

mas fazer já é outro detalhe;

Ao meu ver...se o seu programa não for um espião ou algo pra
controlar o usuario não entendo o  motivo pra fazer isto.

Atenc
Elazar;


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de cchirolli
Enviada em: segunda-feira, 21 de agosto de 2006 15:39
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Ocultar Aplicação no XP


Olá pessoal, tem alguma maneira de ocultar uma plicação da litas de 
aplicativos e/ou de processos do win XP ou uma maneira de impedir q a 
aplicação seja finalizada pelo gerenciador de tarefas, sem ter q 
bloquear todo o gerenciador?

Obrigado,
Carlos




 






___ 
Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar 
seu conhecimento? Experimente o Yahoo! Respostas !
http://br.answers.yahoo.com/


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




[delphi-br] DBCOMBOBOX - DELPHI 7

2006-08-21 Por tôpico Jean
Ola pessoal

Estou quase a nocaute por causa deste ...Box.

Eu tenho uma seleção de empresas em meu sistema que determina em qual empresa o 
usuario ira trabalhar a principio ficaria em um PANEL logo apos abaixo do 
menu com a escolha da empresa.codigo em um COMBOBOX... o problema  é que eu 
relaciono o dbcombobox a tabela e ao mostrar o valor do campo ele aparece a 
empresa 1 e ao criar na seta para selecionar outra empresa não me mostra as 
outras empresas que estão cadastradas. Eu gostaria que isto acontece-se 
automaticamente sem eu ter que adicional nos ITENS 
ufa acho que é só obrigado pela atenção
(( Não é possivel que ele não faça isto... ))) - 


- Original Message - 
  From: Rodrigo de Moura 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 4:15 PM
  Subject: [delphi-br] Erro em alteração de registro.


  Boa tarde amigos,

  Na alteração do registro quando vou dar o applyUpdates me dá o seguinte erro:
  Record not found or changed by another user.
  Minha aplicação não está em rede e todas as configurações do datasetprovider 
estão
  corretas também.
  Em minhas telas de cadastro trabalho com controle de botões (incluir, editar, 
salvar,
  excluir, cancelar) pelo OnStateChange do DataSource. O interessante é que 
esse erro
  ocorre somente quando faço qualquer alteração no registro logo após a 
inclusão do mesmo.
  Explicando: após incluir o registro clicando no botão salvar, se por acaso 
quiser fazer
  alguma alteração, clico no botão editar e faço a alteração necessária. Quando 
clico no
  botão salvar ocorre o citado erro.
  Mas se eu sair da tela de cadastro e voltar nela novamente e pela tela de 
procura retornar o
  registro para a tela do cadastro e fizer qualquer alteração é salvo 
normalmente.
  Utilizo Delphi 7, DBExpress com clientDataSet, Firebird 1.5 e Driver UIB.
  Qualquer ajuda será bem vinda!!

  Atenciosamente,

  Rodrigo de Moura

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

   


--


  Internal Virus Database is out-of-date.
  Checked by AVG Free Edition.
  Version: 7.1.405 / Virus Database: 268.10.8/415 - Release Date: 09/08/06


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: RES: [delphi-br] Remover acentos via SP

2006-08-21 Por tôpico Logos
nao, ele grava com os acentos. mas na hora que vc pesquisar ou ordenar.. ele 
vai fazer de forma correta. o ideal e usar o colate pt_br, esse e o correto 
para o portugues/brasil. e so baixar no site do firebir e instalar.
  - Original Message - 
  From: Marcelo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 1:35 PM
  Subject: Re: RES: [delphi-br] Remover acentos via SP


  Amigos, agradeço a ajuda de todos, mas no meu não tem o Collate Pt-Br, 
  então eu escolho o charset PXW_INTL850, pois eu aprendi q esse é o de 
  acentuação. Porém gostaria de saber dos amigos, caso eu venha a escolher 
  o Charset Pt-Br, ao dar um post ele remove os acentos??

  Mais uma vez agradeco a todos.

  Welson Avelar escreveu:

  --- Marcelo escreveu:

  
  Qual seria o colate então, e tem alguma opção do FB q tem q ser marcado?
  
  Obrigado a todos.
  
  
  [--x--]
  
  [Welson] Você escolhe o campo como Varchar. Escolhe o CharSet Win1252 e
  coloca o collate Win_PTBR. Você pode perguntar: Pô, se eu tiver trocentos
  campos VarCahr no banco de dados terei de escolher isso pra cada um !?. E é
  aqui é que vem a sacada: depois de analisar o banco de dados, faço 
estimativas
  aproximadas do tamanho dos campos VarChar e crio Domains que representam
  essas estimativas.
  Por exemplo: tenho um campo Nome e outro Telefone. Digamos que a média 
pra
  um nome (nome + sobrenome) de pessoa seja de 60 caracteres e telefone é 13
  (contando com os parentesis e com o hífen). Eu crio no banco de dados Um
  Domain pra representar os campos Nome e afins como String65 e aqui
  seleciono o CharSet Win1252 e o collate Win_PTBR. Pro campo telefone é
  String13, porque tem outros campos que podem ter o mesmo tamanho dele. Ou
  coloca String20, porque campos como CNPJ podem entrar nesse meio, e por aí
  vai. Depende da sua criatividade e da necessidade do sistema, saca ?!
  
  []s.
  
  =
  O que me preocupa não é o grito dos maus. É o silêncio dos bons.
  Martin Luther King.
  =
  Welson de Avelar Soares Filho
  Analista/Programador Delphi
  Gemini Sistemas
  www.geminisistemas.com.br
  Juiz de Fora - Minas Gerais
  =
  
  
  
  ___ 
  Yahoo! Acesso Grátis - Internet rápida e grátis. Instale 
  o discador agora! 
  http://br.acesso.yahoo.com
  
  

  

   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date: 18/08/2006


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





[delphi-br] Travar Sistema

2006-08-21 Por tôpico Renan
Pessoal, preciso urgente de um modo para travar o sistema, para ele não 
ultrapassar a quantidade de execuções ... 

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] [OFF TOPIC] Programação pa ra coletor de dados

2006-08-21 Por tôpico Logos
olha, a maioria dos coletores trabalham com arquivos texto. vc so fazer ler sua 
base e gerar um txt, com o cadastro, no layout que o coletor pegue. e depois o 
coletor tem um programa que le este arquivo e carrega o mesmo.

  - Original Message - 
  From: Murillo Proença 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 4:09 PM
  Subject: [delphi-br] [OFF TOPIC] Programação para coletor de dados 


  Boa tarde,

  estou precisando fazer um levantamento para desenvolvimento de um
  sistema que terá que carregar/descarregar um coletor de dados industrial.
  Onde será carregado uma lista de separação de produtos, aí o usuário
  lê o código de barras do produto e o sistema verifica se o mesmo está
  na lista ou não.
  Bom, como dá pra ver o sistema é bem simples. Só que pelo que andei
  vendo por aí, esses coletores possuem desenvolvimento em C, Basic e um
  kit de desenvolvimento para windows (não sei o que é isso).
  O que gostaria é sabe um pouco mais sobre o assunto, que já teve
  alguma experiência deste tipo favor me enviar.


  Abraço a todos

  Murillo Proença




   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date: 18/08/2006


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





RES: [delphi-br] MDO

2006-08-21 Por tôpico Gilson
Muito Obrigado!

Realmente era isso!

Valeu!

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de JJW Informática Ltda. - Roberto
Enviada em: segunda-feira, 21 de agosto de 2006 16:01
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] MDO

Se vc estiver utilizando a versão CLASSIC SERVER do Firebird/Interbase não
irá funcionar. o Classic Server cria 1 processo do fbserver.exe por vez e
retorna a lista de usuário conectados sempre como 1. para resolver isso,
utilize a versão Super Server
  - Original Message - 
  From: Gilson 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 3:37 PM
  Subject: [delphi-br] MDO


  Caros colegas,



  Para determinar a quantidade de usuários que estão acessando a base de
dados
  utilizando o IBX eu usava o componente IbDataBaseInfo da seguinte maneira:



  'Usuários Conectados: '+inttostr(dados.IbDatabaseInfo1.UserNames.Count);



  E funcionava muito bem



  Agora estou tentando fazer a mesma coisa utilizando o MDO com um
componente
  correspondente o MDODatabaseInfo desta forma:



  'Usuários Conectados: '+inttostr(dados.MDODatabaseInfo1.UserNames.Count);



  Mas ele não está retornando a quantidade correta de usuários conectados à
  base de dados, ou seja, ele sempre mostra como se apenas um usuário
  estivesse conectado apesar de haver vários!



  Alguém poderia dar alguma dica de como posso obter a quantidade correta de
  usuários que estão acessando a base de dados utilizando o MDO!!



  Obrigado,



  Gilson







  [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 


 
Links do Yahoo! Grupos




 





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Erro em alteração de registro.

2006-08-21 Por tôpico Francisco - Mol
ta comitando?
  - Original Message - 
  From: Rodrigo de Moura 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 4:15 PM
  Subject: [delphi-br] Erro em alteração de registro.


  Boa tarde amigos,

  Na alteração do registro quando vou dar o applyUpdates me dá o seguinte erro:
  Record not found or changed by another user.
  Minha aplicação não está em rede e todas as configurações do datasetprovider 
estão
  corretas também.
  Em minhas telas de cadastro trabalho com controle de botões (incluir, editar, 
salvar,
  excluir, cancelar) pelo OnStateChange do DataSource. O interessante é que 
esse erro
  ocorre somente quando faço qualquer alteração no registro logo após a 
inclusão do mesmo.
  Explicando: após incluir o registro clicando no botão salvar, se por acaso 
quiser fazer
  alguma alteração, clico no botão editar e faço a alteração necessária. Quando 
clico no
  botão salvar ocorre o citado erro.
  Mas se eu sair da tela de cadastro e voltar nela novamente e pela tela de 
procura retornar o
  registro para a tela do cadastro e fizer qualquer alteração é salvo 
normalmente.
  Utilizo Delphi 7, DBExpress com clientDataSet, Firebird 1.5 e Driver UIB.
  Qualquer ajuda será bem vinda!!

  Atenciosamente,

  Rodrigo de Moura

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

   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date: 18/08/2006


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] DBCOMBOBOX - DELPHI 7

2006-08-21 Por tôpico Paulo Sérgio de Souza
Boa tarde Jean,

Para resolver este problema, você deve dar um FetchAll logo após o Open da 
Query que está alimentando o dbcombobox.

Sds,

Paulo
Desenvovedor
BHte./MG
  - Original Message - 
  From: Jean 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 4:34 PM
  Subject: [delphi-br] DBCOMBOBOX - DELPHI 7


  Ola pessoal

  Estou quase a nocaute por causa deste ...Box.

  Eu tenho uma seleção de empresas em meu sistema que determina em qual empresa 
o usuario ira trabalhar a principio ficaria em um PANEL logo apos abaixo do 
menu com a escolha da empresa.codigo em um COMBOBOX... o problema  é que eu 
relaciono o dbcombobox a tabela e ao mostrar o valor do campo ele aparece a 
empresa 1 e ao criar na seta para selecionar outra empresa não me mostra as 
outras empresas que estão cadastradas. Eu gostaria que isto acontece-se 
automaticamente sem eu ter que adicional nos ITENS 
  ufa acho que é só obrigado pela atenção
  (( Não é possivel que ele não faça isto... ))) - 


  - Original Message - 
From: Rodrigo de Moura 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, August 21, 2006 4:15 PM
Subject: [delphi-br] Erro em alteração de registro.


Boa tarde amigos,

Na alteração do registro quando vou dar o applyUpdates me dá o seguinte 
erro:
Record not found or changed by another user.
Minha aplicação não está em rede e todas as configurações do 
datasetprovider estão
corretas também.
Em minhas telas de cadastro trabalho com controle de botões (incluir, 
editar, salvar,
excluir, cancelar) pelo OnStateChange do DataSource. O interessante é que 
esse erro
ocorre somente quando faço qualquer alteração no registro logo após a 
inclusão do mesmo.
Explicando: após incluir o registro clicando no botão salvar, se por acaso 
quiser fazer
alguma alteração, clico no botão editar e faço a alteração necessária. 
Quando clico no
botão salvar ocorre o citado erro.
Mas se eu sair da tela de cadastro e voltar nela novamente e pela tela de 
procura retornar o
registro para a tela do cadastro e fizer qualquer alteração é salvo 
normalmente.
Utilizo Delphi 7, DBExpress com clientDataSet, Firebird 1.5 e Driver UIB.
Qualquer ajuda será bem vinda!!

Atenciosamente,

Rodrigo de Moura

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

 


  --


Internal Virus Database is out-of-date.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.10.8/415 - Release Date: 09/08/06


  [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:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Gravar data Vazia

2006-08-21 Por tôpico Francisco - Mol
eu uso qry.parambaynem(data).clear
  - Original Message - 
  From: Ailton Branco 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 2:32 PM
  Subject: [delphi-br] Gravar data Vazia


  Tenho um campo onde eu Gravo a data de pagamento, porém na hora de 
  fazer um estorno preciso limpar o conteudo da data, como faço para 
  gravar a data vazia.

  Exemplo
vsSql := 'update ContasPagarParcela set 
 DataPagamento  =:DataPagamento,
 ValorPagamento =:ValorPagamento,
  Where (idContasPagar =:idContasPagar) and (Parcela   
  =:Parcela) 

Qry.SQL.Add(vsSql);
Qry.Params.ParamByName('DataPagamento').AsDateTime  := ??;
Qry.Params.ParamByName('ValorPagamento').AsCurrency := 0 ;
Qry.Params.ParamByName('idContasPagar').AsCurrency  := 1 ;
Qry.Params.ParamByName('Parcela').AsCurrency:= 1 ;
Qry.ExecSql;







   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date: 18/08/2006


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Travar Sistema

2006-08-21 Por tôpico JJW Informática Ltda . - Roberto
uses
  Forms,
  Classes,
  SysUtils,
  Windows,
  Controls,
  Psapi,
  tlhelp32;

type
  TJJWProcessInformation = record
FileName: string;
Path: string;
  end;

  TJJWProcessList = array of TJJWProcessInformation;

// retira a lista de processos de do windows 98  
procedure CreateWin9xProcessList(var AList: TJJWProcessList);
var
  hSnapShot: THandle;
  ProcInfo: TProcessEntry32;
  I: Integer;
begin
  SetLength(AList, 0);

  hSnapShot := CreateToolHelp32Snapshot(TH32CS_SNAPPROCESS, 0);
  if (hSnapShot  THandle(-1)) then
  begin
ProcInfo.dwSize := SizeOf(ProcInfo);
if (Process32First(hSnapshot, ProcInfo)) then
begin
  I := Length(AList);
  SetLength(AList, I +1);
  AList[I].FileName := ExtractFileName(ProcInfo.szExeFile);
  AList[I].Path := ExtractFilePath(ProcInfo.szExeFile);

  while (Process32Next(hSnapShot, ProcInfo)) do
  begin
I := Length(AList);
SetLength(AList, I +1);
AList[I].FileName := ExtractFileName(ProcInfo.szExeFile);
AList[I].Path := ExtractFilePath(ProcInfo.szExeFile);
  end;
end;
CloseHandle(hSnapShot);
  end;
end;

// retira a lista de processos do windows NT/2000/XP/2003
procedure CreateWinNTProcessList(var AList: TJJWProcessList);

  type
PTOKEN_USER = ^TOKEN_USER;

_TOKEN_USER = record
  User: TSidAndAttributes;
end;

TOKEN_USER = _TOKEN_USER;

  // retorna o domínio e usuário dono de um processo
  function GetUserAndDomainFromPID(ProcessId: DWORD;
var User, Domain: string): Boolean;
  var
hToken: THandle;
cbBuf: Cardinal;
ptiUser: PTOKEN_USER;
snu: SID_NAME_USE;
ProcessHandle: THandle;
UserSize, DomainSize: DWORD;
bSuccess: Boolean;
  begin
Result := False;
ProcessHandle := OpenProcess(PROCESS_QUERY_INFORMATION, False, ProcessId);
if ProcessHandle  0 then
begin
//  EnableProcessPrivilege(ProcessHandle, 'SeSecurityPrivilege', True);
  if OpenProcessToken(ProcessHandle, TOKEN_QUERY, hToken) then
  begin
bSuccess := GetTokenInformation(hToken, TokenUser, nil, 0, cbBuf);
ptiUser  := nil;
while (not bSuccess) and (GetLastError = ERROR_INSUFFICIENT_BUFFER) do
begin
  ReallocMem(ptiUser, cbBuf);
  bSuccess := GetTokenInformation(hToken, TokenUser, ptiUser, cbBuf, 
cbBuf);
end;
CloseHandle(hToken);

if not bSuccess then
  Exit;

UserSize := 0;
DomainSize := 0;
LookupAccountSid(nil, ptiUser.User.Sid, nil, UserSize, nil, DomainSize, 
snu);
if (UserSize  0) and (DomainSize  0) then
begin
  SetLength(User, UserSize);
  SetLength(Domain, DomainSize);
  if LookupAccountSid(nil, ptiUser.User.Sid, PChar(User), UserSize,
PChar(Domain), DomainSize, snu) then
  begin
Result := True;
User := StrPas(PChar(User));
Domain := StrPas(PChar(Domain));
  end;
end;

if bSuccess then
begin
  FreeMem(ptiUser);
end;
  end;
  CloseHandle(ProcessHandle);
end;
  end;

  // retorna o nome do usuário logado atualmente
  function _GetUserName : string;
  const
MAX_USER_NAME_LEN = 254;
  var
UserName: string;
UserNameLen: DWORD;
  begin
UserNameLen := MAX_USER_NAME_LEN - 1;
SetLength(UserName, MAX_USER_NAME_LEN);
if GetUserName(PChar(UserName), UserNameLen) then
  Result := Copy(UserName, 1, UserNameLen -1)
else
  Result := EmptyStr;
  end;

var
  PIDArray: array [0..1023] of DWORD;
  cb: DWORD;
  I, J: Integer;
  ProcCount: Integer;
  hMod: HMODULE;
  hProcess: THandle;
  ModuleName: array [0..300] of Char;
  User, Domain, CurrentUser: string;
begin
  CurrentUser := _GetUserName;

  EnumProcesses(@PIDArray, SizeOf(PIDArray), cb);
  ProcCount := cb div SizeOf(DWORD);
  for I := 0 to ProcCount - 1 do
  begin
hProcess := OpenProcess(PROCESS_QUERY_INFORMATION or
  PROCESS_VM_READ,
  False,
  PIDArray[I]);
if (hProcess  0) then
begin
  GetUserAndDomainFromPID(PIDArray[I], User, Domain);

  EnumProcessModules(hProcess, @hMod, SizeOf(hMod), cb);
  GetModuleFilenameEx(hProcess, hMod, ModuleName, SizeOf(ModuleName));

  if AnsiSameText(User, CurrentUser) then
  begin
J := Length(AList);
SetLength(AList, J +1);
AList[J].FileName := ExtractFileName(ModuleName);
AList[J].Path := ExtractFilePath(ModuleName);
  end;

  CloseHandle(hProcess);
end;
  end;
end;

// retira a lista de processos independente da versão do windows
procedure GetProcessList(var AList: TJJWProcessList);
var
  ovi: TOSVersionInfo;
begin
  ovi.dwOSVersionInfoSize := SizeOf(TOSVersionInfo);
  GetVersionEx(ovi);
  case ovi.dwPlatformId of
VER_PLATFORM_WIN32_WINDOWS: CreateWin9xProcessList(AList);
VER_PLATFORM_WIN32_NT: CreateWinNTProcessList(AList);
  end
end;

--- USANDO -

  

[delphi-br] OPORTUNIDADES RJ (JAVA,DOTNET, DELPHI, J2EE,ETC.)

2006-08-21 Por tôpico Bianca Teixeira
Olá Amigos  

Aproveito para divulgar as oportunidades que continuamos trabalhando  no RJ e 
espero contar com a ajuda de vcs...  :-):-)

Caso vcs tenham interesse e/ou alguém para indicar e/ou puderem repassar... :-)

  

VAGAS ABERTAS ( RJ )



 

*   ANALISTA DESENVOLVEDOR DELPHI SR

 

Experiência de 4 anos no mínimo com Delphi 

Experiência em SQL Server;

Conhecimentos em UML;

Modelagem conceitual, lógica e física de banco de dados.;

Formação superior em Analise de Sistemas.

 

Desejável

 

Clipper e Oracle

 

Currículo urgente com a experiência exigida detalhada e pretensão salarial para 
[EMAIL PROTECTED] com o nome da vaga no campo assunto DELPHI SR 

 

 

*   ANALISTA DE SISTEMAS PLENO 

 

Experiência mínima de 4 anos como Analista;

Experiência em levantamento, especificação e analise de sistemas

3º grau completo;

Conhecimento em UML;

Bom conhecimento em SQL.

 

 

Currículos com a experiência exigida e pretensão salarial para [EMAIL 
PROTECTED] com o nome da vaga no campo assunto do e-mail ANALISTA PLENO

 

 

*   ANALISTA DE SISTEMAS PLENO DOTNET 

 Mínimo 2 anos de experiência em: 

Microsoft .NET (aspx, vb.net). 

Arquitetura B/S (browser/Server) de múltiplas camadas. 

Oracle PL/SQL. 

Desenvolvimento e instalação de artefatos de software nas tecnologias acima. 

 

Currículos com a experiência exigida e pretensão salarial para [EMAIL 
PROTECTED] com o nome da vaga no campo assunto do e-mail DOTNET

 

 

*   ANALISTA DE SISTEMAS PLENO 

 

Experiência mínima de 3 anos como Analista de Sistemas 

Formação 3o grau em curso de Informática/Processamento de dados

- Conhecimentos de ambiente Linux

- Linguagem UML

- Ter participado de projetos de grande porte de desenvolvimento de 

sistemas

- Disponibilidade para viagens curtas

 

Desejável:

- Conhecimentos em gerência de projetos (PMP)

- Noções de Java

- Experiência em sistemas de automação comercial, em especial PDV.

- Sistemas de frente de loja e retaguarda.

 

Currículo urgente com a experiência exigida detalhada e pretensão salarial para 
[EMAIL PROTECTED] com o nome da vaga no campo assunto ANALISTA 

 

 

 

*   ANALISTA DE INTEGRAÇÃO -  EAI 

 

Experiência em MQSeries IBM

Broker e Adapter da IBM. 

Sólidos conhecimentos em SQL (Bancos SQLServer e Oracle).

Linux. 

Conhecimentos em ferramentas de integração (EAI)

Desejável conhecimento em Java (criação de aplicações Web com Java)

Domínio da IDE Eclipse

 

Currículos com a experiência exigida e pretensão salarial para [EMAIL 
PROTECTED] com o nome da vaga no campo assunto do e-mail EAI

 

*   ANALISTA DE SISTEMAS DA QUALIDADE PL 

 

- Metodologia e Processo de Desenvolvimento (CMMI e RUP);

- Sólidos conhecimentos em UML;

- Sólidos conhecimentos em Excel;

- Conhecimentos em Ponto de Função;

- Sólidos conhecimentos em mapeamento de processos;

- Acostumado a trabalhar com indicadores para a área de desenvolvimento de 
software (fundamental);

- Já tenha trabalhando em área de qualidade de desenvolvimento de software 
(fundamental);

- Experiência em confecção de normas/boas práticas e procedimentos de 
desenvolvimento de software;

- Experiência na geração de relatórios de acompanhamento para a área de 
qualidade;

- Tenha experiência em confecção e apresentação em workshops;

- Excelente leitura técnica inglês é fundamental;

- Pós-graduação desejada;

- Desejáveis conhecimentos em ferramentas de BI ou geração de informações 
gerenciais para níveis tático e estratégico de uma empresa;

 

 

Currículos com a experiência exigida e detalhada podem ser encaminhados para 
[EMAIL PROTECTED] com o nome da vaga no campo assunto QUALIDADE

 

*   COORDENADOR DE PROCESSOS 

 

- Mínimo de 10 anos de experiência na área de processos
- Formado há pelo menos 10 anos em : engenharia de produção, computação, 
sistemas ou eletrônica
- 3 anos de experiência em gestão de projetos (não como participante, mas como 
líder e de projetos de pelo menos 6 meses de duração) 
- Conhecimento em mapeamento de processos e respectivas ferramentas
- Conhecimento genérico de TI- visão sistêmica
- 3 anos de experiência com liderança de equipes
- Experiência em gestão de múltiplos assuntos 
- Conhecimento de varejo 
- Conhecimento de produtos 
- Conhecimento em BI para o profissional de gestão
- Conhecimento em BPM o profissional de anúncio
- Domínio do EXCEL para negociação e gestão


Projeto por tempo indeterminado

obs: Temos vagas para Analista de Processos JR (2 anos de exp.) e Pleno ( 5 
anos de exp.)

Currículos com a experiência exigida e detalhada podem ser encaminhados para 
[EMAIL PROTECTED] com o nome da vaga no campo assunto PROCESSOS

 

 

*   COORDENADOR DE PROJETOS 

 

Mínimo 5 anos de experiência em gerenciamento de projetos de Infra-Estrutura 

LAN, WAN, Servidores, Storage, etc

 

Currículos com a experiência exigida e pretensão salarial para [EMAIL 
PROTECTED] com o nome da vaga no campo assunto do e-mail COORDENADOR 

Re: [delphi-br] Erro em alteração de registro.

2006-08-21 Por tôpico Rodrigo de Moura
Olá Francisco,

Eu apenas dou o ApplyUpdates no botão salvar ... Me falaram que o próprio
clientdataset faz o commit internamente.
Agora fiquei em dúvida, preciso abrir uma transação?

Atenciosamente,

Rodrigo de Moura
- Original Message - 
From: Francisco - Mol 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, August 21, 2006 4:41 PM
Subject: Re: [delphi-br] Erro em alteração de registro.


ta comitando?
  - Original Message - 
  From: Rodrigo de Moura 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 4:15 PM
  Subject: [delphi-br] Erro em alteração de registro.


  Boa tarde amigos,

  Na alteração do registro quando vou dar o applyUpdates me dá o seguinte erro:
  Record not found or changed by another user.
  Minha aplicação não está em rede e todas as configurações do datasetprovider 
estão
  corretas também.
  Em minhas telas de cadastro trabalho com controle de botões (incluir, editar, 
salvar,
  excluir, cancelar) pelo OnStateChange do DataSource. O interessante é que 
esse erro
  ocorre somente quando faço qualquer alteração no registro logo após a 
inclusão do mesmo.
  Explicando: após incluir o registro clicando no botão salvar, se por acaso 
quiser fazer
  alguma alteração, clico no botão editar e faço a alteração necessária. Quando 
clico no
  botão salvar ocorre o citado erro.
  Mas se eu sair da tela de cadastro e voltar nela novamente e pela tela de 
procura retornar o
  registro para a tela do cadastro e fizer qualquer alteração é salvo 
normalmente.
  Utilizo Delphi 7, DBExpress com clientDataSet, Firebird 1.5 e Driver UIB.
  Qualquer ajuda será bem vinda!!

  Atenciosamente,

  Rodrigo de Moura

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

   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date: 18/08/2006


[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:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





[delphi-br] Re: Gravar data Vazia

2006-08-21 Por tôpico Murillo Proença
a única coisa que vc tem que tomar cuidado, é que se vc criou o SQL na
mão, vc tem que antes informar o tipo do parametro:
Qry.Params.ParamByName('DataPagamento').DataType:= ftDateTime;
Qry.Params.ParamByName('DataPagamento').Clear;


--- Em delphi-br@yahoogrupos.com.br, Francisco - Mol
[EMAIL PROTECTED] escreveu

 eu uso qry.parambaynem(data).clear
   - Original Message - 
   From: Ailton Branco 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Monday, August 21, 2006 2:32 PM
   Subject: [delphi-br] Gravar data Vazia
 
 
   Tenho um campo onde eu Gravo a data de pagamento, porém na hora de 
   fazer um estorno preciso limpar o conteudo da data, como faço para 
   gravar a data vazia.
 
   Exemplo
 vsSql := 'update ContasPagarParcela set 
  DataPagamento  =:DataPagamento,
  ValorPagamento =:ValorPagamento,
   Where (idContasPagar =:idContasPagar) and (Parcela   
   =:Parcela) 
 
 Qry.SQL.Add(vsSql);
 Qry.Params.ParamByName('DataPagamento').AsDateTime  := ??;
 Qry.Params.ParamByName('ValorPagamento').AsCurrency := 0 ;
 Qry.Params.ParamByName('idContasPagar').AsCurrency  := 1 ;
 Qry.Params.ParamByName('Parcela').AsCurrency:= 1 ;
 Qry.ExecSql;
 
 
 
 
 
 
 

 
 

--
 
 
   No virus found in this incoming message.
   Checked by AVG Free Edition.
   Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date:
18/08/2006
 
 
 [As partes desta mensagem que não continham texto foram removidas]








-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Travar Sistema

2006-08-21 Por tôpico Juliana Duque
Precisa ser por quantidades de execuções?
E se você estipular uma data e colocar uma chave travando?? Eu precisei travar 
o sistema e fiz dessa forma.

Juliana
  - Original Message - 
  From: Renan 
  To: Delphi Br 
  Sent: Monday, August 21, 2006 4:37 PM
  Subject: [delphi-br] Travar Sistema


  Pessoal, preciso urgente de um modo para travar o sistema, para ele não 
ultrapassar a quantidade de execuções ... 

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

   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date: 18/8/2006


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Erro em alteração de registro.

2006-08-21 Por tôpico Desenvolvimento \(Anderson\)
veja: esse erro acontece com alguma frequência no mysql, qdo usamos odbc.
Ao usar o Zeos, ele contorna o problema usando SQL puro.
uma solução meio torta que encontrei até entender exatamente o problema foi 
usar um comando cancelasse o post e logo em sequencia, rodava um comando sql, 
alterando o registro manualmente...
dava um trabalhão, mas funcionava.
depois, com mais estudo, descobri uma pequena falha no banco, quando se tratava 
de campos float.
Se por acaso o banco de dados possuísse um valor float com muitas casas 
(123,123456789 por exemplo), o odbc só lia as 5 ultimas (123,12346 pois 
arredondava). Daí, ele gerava o erro:  Não é possível salvar o registro pois o 
mesmo foi modificado por outro usuário.

Então, uma soluçao rápida é vc olhar o tipo dos campos q vc tá usando.
se puder limitar os valores decimais, pode resolver o problema.
Porém, já tem outro ponto q vc deve observar.
Digamos q vc use um comando sql para filtrar alguns registros da tabela.
Digamos q temos:

001   -  11:30   -  21/08/2006
001   -  12:00   -  21/08/2006
001   -  13:30   -  21/08/2006
001   -  15:30   -  21/08/2006
001   -  15:30   -  21/08/2006
001   -  16:30   -  21/08/2006

001 é a matrícula de um funcionário, e os outros campos são data/hora

se vc for apagando esses registros a partir de uma query (requestlive = true), 
vc vai apagar bem até o primeiro registro das 15:30. Na hora q vc for apagar o 
segundo registro de 15:30, ele vai gerar esse erro, com absoluta clareza, pois 
se a tabela só tem matricula, data e hora, não tem chave primária ou campo 
referência. Daí, em um comando de exclusão que é usado SQL, ele tbém apagará 
esse segundo 15:30...
entendeu?
Daí, uma solução pra isso é atualizar (refresh) o banco de dados após uma 
exclusão.

Isso é coisa do mysql, não sei se acontece tbém no firebird, mas deve ser 
parecido.
Se não der certo, vá no google e digite a frase com a palavra firebird em 
sequencia, q com certeza vai ter gente q teve esse problema lá..

espero ter ajudado.

[]'s 

Anderson

  - Original Message - 
  From: Francisco - Mol 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 4:41 PM
  Subject: Re: [delphi-br] Erro em alteração de registro.


  ta comitando?
- Original Message - 
From: Rodrigo de Moura 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, August 21, 2006 4:15 PM
Subject: [delphi-br] Erro em alteração de registro.


Boa tarde amigos,

Na alteração do registro quando vou dar o applyUpdates me dá o seguinte 
erro:
Record not found or changed by another user.
Minha aplicação não está em rede e todas as configurações do 
datasetprovider estão
corretas também.
Em minhas telas de cadastro trabalho com controle de botões (incluir, 
editar, salvar,
excluir, cancelar) pelo OnStateChange do DataSource. O interessante é que 
esse erro
ocorre somente quando faço qualquer alteração no registro logo após a 
inclusão do mesmo.
Explicando: após incluir o registro clicando no botão salvar, se por acaso 
quiser fazer
alguma alteração, clico no botão editar e faço a alteração necessária. 
Quando clico no
botão salvar ocorre o citado erro.
Mas se eu sair da tela de cadastro e voltar nela novamente e pela tela de 
procura retornar o
registro para a tela do cadastro e fizer qualquer alteração é salvo 
normalmente.
Utilizo Delphi 7, DBExpress com clientDataSet, Firebird 1.5 e Driver UIB.
Qualquer ajuda será bem vinda!!

Atenciosamente,

Rodrigo de Moura

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

 


  --


No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date: 18/08/2006


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

   

  __ Informação do NOD32 IMON 1.1718 (20060821) __

  Esta mensagem foi verificada pelo NOD32 sistema antivírus
  http://www.eset.com.br


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




RES: [delphi-br] Como trabalhar com XML?

2006-08-21 Por tôpico Rodrigo O. Farias
Eu sempre trabalhei com xml no delphi importando a biblioteca da MS DOMXML,
ela tem toda a API de manipulação de XML, daí é só usar o help do XML da
própria MS para saber como manipular os arquivos XML. Dessa forma vc pode
usar qualquer exemplo em VB, ASP ou qualquer outra linguagem da MS pq é
sempre igual, todas elas usam a API do DOMXML.


Para importar vc vai em Project - Import Type Library, escolhe a versão mais
atual da MicrosoftXML, vai ser gerado um .pas com a transcrição de toda a
API, daí é só declarar essa unit no seu projeto e começar a instanciar os
objetos DOM XML.





--
Rodrigo Othávio Farias 

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Fellipe Henrique
Enviada em: segunda-feira, 21 de agosto de 2006 14:43
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Como trabalhar com XML?

Olá amigos, tenho um XML da seguinte forma:

?xml version=1.0 encoding=ISO-8859-1?
modulos
   modulo
  arquivoCrnConnDB/arquivo
  textoModulo de Conexao ao BD/texto
   /modulo
   modulo
  arquivoCrnLogin/arquivo
  textoModulo responsavel pelo Login e usuarios/texto
   /modulo

/modulos


Como faço pra trabalhar com ele no Delphi? digo, como se fosse uma Tabela..
já tentei usar o ClientDataSet, mas o XML que ele cria é um formato
proprietário do Delphi.


Desde já agradeço

[]s

-- 
_
Fellipe Henrique
[EMAIL PROTECTED]

Borland Developer Studio 2006 Certified

Venham até a borda, ele disse.
Eles disseram: Nós temos medo.
Venham até a borda, ele insistiu.
Eles foram, Ele os empurrou...
E eles voaram.
(Guillaume Apollinaire)


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 








-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





RES: [delphi-br] Instância do word num form

2006-08-21 Por tôpico Rodrigo O. Farias
Vc pode usar um TOleContainer, e depois dar uma estudada no help do Word for
Aplications pra ver os metodos e propriedades disponiveis




--
Rodrigo Othávio Farias 

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de datafenix
Enviada em: sexta-feira, 18 de agosto de 2006 11:25
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Instância do word num form

Alguém sabe ou tem um exemplo de como carregar ums intância do word
dentro de um formulário? Ou se existe um controle activex para o word?






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




RES: [delphi-br] [OFF TOPIC] Programação p ara coletor de dados

2006-08-21 Por tôpico Fabio Dantas
Boa Tarde Murilo, você poderia ser mais especifico ? 
Eu já desenvolvi um sistema com coletores mas eles eram “burros” não
tinham nenhum tipo de programação ou armazenagem de dados eu
simplesmente pegava os dados deles por rs232 ou ethernet
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Murillo Proença
Enviada em: segunda-feira, 21 de agosto de 2006 16:10
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] [OFF TOPIC] Programação para coletor de dados 
 
Boa tarde,

estou precisando fazer um levantamento para desenvolvimento de um
sistema que terá que carregar/descarregar um coletor de dados
industrial.
Onde será carregado uma lista de separação de produtos, aí o usuário
lê o código de barras do produto e o sistema verifica se o mesmo está
na lista ou não.
Bom, como dá pra ver o sistema é bem simples. Só que pelo que andei
vendo por aí, esses coletores possuem desenvolvimento em C, Basic e um
kit de desenvolvimento para windows (não sei o que é isso).
O que gostaria é sabe um pouco mais sobre o assunto, que já teve
alguma experiência deste tipo favor me enviar.


Abraço a todos

Murillo Proença




 


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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





RES: [delphi-br] DBCOMBOBOX - DELPHI 7

2006-08-21 Por tôpico Elazar Dornelles Ceza
Após o comando Open;
Voce da um comando FechAll;


 DataSet.Open;
 DataSet.FetchAll;


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Jean
Enviada em: segunda-feira, 21 de agosto de 2006 17:48
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] DBCOMBOBOX - DELPHI 7


Desculpe Paulo ... pode me chamar de bu ... mais eu não entendi...
pode me dar um exemplo... não sei como fazer o fetchall.

   Original Message - 
  From: Paulo Sérgio de Souza 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 4:56 PM
  Subject: Re: [delphi-br] DBCOMBOBOX - DELPHI 7


  Boa tarde Jean,

  Para resolver este problema, você deve dar um FetchAll logo após o
Open da Query que está alimentando o dbcombobox.

  Sds,

  Paulo
  Desenvovedor
  BHte./MG
- Original Message - 
From: Jean 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, August 21, 2006 4:34 PM
Subject: [delphi-br] DBCOMBOBOX - DELPHI 7


Ola pessoal

Estou quase a nocaute por causa deste ...Box.

Eu tenho uma seleção de empresas em meu sistema que determina em
qual empresa o usuario ira trabalhar a principio ficaria em um PANEL
logo apos abaixo do menu com a escolha da empresa.codigo em um
COMBOBOX... o problema  é que eu relaciono o dbcombobox a tabela e ao
mostrar o valor do campo ele aparece a empresa 1 e ao criar na seta para
selecionar outra empresa não me mostra as outras empresas que estão
cadastradas. Eu gostaria que isto acontece-se automaticamente sem eu ter
que adicional nos ITENS 
ufa acho que é só obrigado pela atenção
(( Não é possivel que ele não faça isto... ))) - 


- Original Message - 
  From: Rodrigo de Moura 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 4:15 PM
  Subject: [delphi-br] Erro em alteração de registro.


  Boa tarde amigos,

  Na alteração do registro quando vou dar o applyUpdates me dá o
seguinte erro:
  Record not found or changed by another user.
  Minha aplicação não está em rede e todas as configurações do
datasetprovider estão
  corretas também.
  Em minhas telas de cadastro trabalho com controle de botões
(incluir, editar, salvar,
  excluir, cancelar) pelo OnStateChange do DataSource. O
interessante é que esse erro
  ocorre somente quando faço qualquer alteração no registro logo
após a inclusão do mesmo.
  Explicando: após incluir o registro clicando no botão salvar, se
por acaso quiser fazer
  alguma alteração, clico no botão editar e faço a alteração
necessária. Quando clico no
  botão salvar ocorre o citado erro.
  Mas se eu sair da tela de cadastro e voltar nela novamente e pela
tela de procura retornar o
  registro para a tela do cadastro e fizer qualquer alteração é
salvo normalmente.
  Utilizo Delphi 7, DBExpress com clientDataSet, Firebird 1.5 e
Driver UIB.
  Qualquer ajuda será bem vinda!!

  Atenciosamente,

  Rodrigo de Moura

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

   


 

--


  Internal Virus Database is out-of-date.
  Checked by AVG Free Edition.
  Version: 7.1.405 / Virus Database: 268.10.8/415 - Release Date:
09/08/06


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

 

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

   



--


  Internal Virus Database is out-of-date.
  Checked by AVG Free Edition.
  Version: 7.1.405 / Virus Database: 268.10.8/415 - Release Date:
09/08/06


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

 



___ 
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora! 
http://br.mobile.yahoo.com/mailalertas/ 
 



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





[delphi-br] unsubscribe

2006-08-21 Por tôpico rog-martins
 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Erro em alteração de registro.

2006-08-21 Por tôpico Francisco - Mol
so se vc quiser fazer controle explicito. veja no componente de conexao do 
banco, se o nivel transacional esta em read_commited
  - Original Message - 
  From: Rodrigo de Moura 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 5:24 PM
  Subject: Re: [delphi-br] Erro em alteração de registro.


  Olá Francisco,

  Eu apenas dou o ApplyUpdates no botão salvar ... Me falaram que o próprio
  clientdataset faz o commit internamente.
  Agora fiquei em dúvida, preciso abrir uma transação?

  Atenciosamente,

  Rodrigo de Moura
  - Original Message - 
  From: Francisco - Mol 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 4:41 PM
  Subject: Re: [delphi-br] Erro em alteração de registro.


  ta comitando?
- Original Message - 
From: Rodrigo de Moura 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, August 21, 2006 4:15 PM
Subject: [delphi-br] Erro em alteração de registro.


Boa tarde amigos,

Na alteração do registro quando vou dar o applyUpdates me dá o seguinte 
erro:
Record not found or changed by another user.
Minha aplicação não está em rede e todas as configurações do 
datasetprovider estão
corretas também.
Em minhas telas de cadastro trabalho com controle de botões (incluir, 
editar, salvar,
excluir, cancelar) pelo OnStateChange do DataSource. O interessante é que 
esse erro
ocorre somente quando faço qualquer alteração no registro logo após a 
inclusão do mesmo.
Explicando: após incluir o registro clicando no botão salvar, se por acaso 
quiser fazer
alguma alteração, clico no botão editar e faço a alteração necessária. 
Quando clico no
botão salvar ocorre o citado erro.
Mas se eu sair da tela de cadastro e voltar nela novamente e pela tela de 
procura retornar o
registro para a tela do cadastro e fizer qualquer alteração é salvo 
normalmente.
Utilizo Delphi 7, DBExpress com clientDataSet, Firebird 1.5 e Driver UIB.
Qualquer ajuda será bem vinda!!

Atenciosamente,

Rodrigo de Moura

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

 


  --


No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date: 18/08/2006


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



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

   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date: 18/08/2006


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] ler um arquivo do excel com várias colunas e gerar filtros /combobox

2006-08-21 Por tôpico Andre Yahoo
segue o link do exemplo de como acessar o Excel usando os Componentes ADO

http://rapidshare.de/files/30272737/TesteAdo.rar


___ 
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale 
o discador agora! 
http://br.acesso.yahoo.com


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




RE: [delphi-br] Como trabalhar com XML?

2006-08-21 Por tôpico Rubem Nascimento da Rocha
Se vc usa uma licença Enterprise do Delphi 6 ou 7, pesquise sobre 
Transformações XML. É um recurso que permite que vc mapeie a estrutura de um 
arquivo XML em arquivos chamados de arquivos de transformação (extenção 
.XTR). Esses arquivos de transformação são montados usando a ferramenta XML 
Mapper, que existe somente nas licenças Enterprise do Delphi.

Outra coisa que tb só existe nas licenças Enterprise da versão 6 ou maior do 
Delphi são componentes que permitem tratar esses arquivos .XTR na forma de 
providers para o clientdataset. Assim, é possível usar arquivos XML como se 
fossem datasets comuns.

Agora, se vc usa uma versão inferior a 6, o que me vêm a mente é vc ter que 
construir um dataset provider específico que usaria o componente 
TXMLDocument e aí sim vc poderia tb usar clientdataset pra acessar XML na 
forma de um dataset.

Tá dada a dica pra pescar o peixe! O resto é com vc! Google tá aí pra isso! 
;-)
Boa sorte!


From: Fellipe Henrique [EMAIL PROTECTED]
Reply-To: delphi-br@yahoogrupos.com.br
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Como trabalhar com XML?
Date: Mon, 21 Aug 2006 14:43:27 -0300

Olá amigos, tenho um XML da seguinte forma:

?xml version=1.0 encoding=ISO-8859-1?
modulos
modulo
   arquivoCrnConnDB/arquivo
   textoModulo de Conexao ao BD/texto
/modulo
modulo
   arquivoCrnLogin/arquivo
   textoModulo responsavel pelo Login e usuarios/texto
/modulo

/modulos


Como faço pra trabalhar com ele no Delphi? digo, como se fosse uma Tabela..
já tentei usar o ClientDataSet, mas o XML que ele cria é um formato
proprietário do Delphi.


Desde já agradeço

[]s

--
_
Fellipe Henrique
[EMAIL PROTECTED]

Borland Developer Studio 2006 Certified

Venham até a borda, ele disse.
Eles disseram: Nós temos medo.
Venham até a borda, ele insistiu.
Eles foram, Ele os empurrou...
E eles voaram.
(Guillaume Apollinaire)


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


_
MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.com



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





[delphi-br] Convertendo aplicação em serviço

2006-08-21 Por tôpico Eduardo Paci Galvão
Pessoal,

Tenho um aplicativo simples, pronto, funcionando
em 'background' no Windows.

Como converter este aplicativo em um
'serviço'? Tenho de recriá-lo, a partir do zero?

Saudações,
Eduardo Paci Galvão
Bacharel em Engenharia Elétrica - UFMG
Analista de Sistemas
www.egalvao.com.br

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Travar Sistema

2006-08-21 Por tôpico Allan
Roberto, show de bola sua dica, parabéns!!.

DEUS É PAI.
[]'s
Allan
msn [EMAIL PROTECTED]
Skype allan_gabriel
  - Original Message - 
  From: JJW Informática Ltda. - Roberto 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 5:00 PM
  Subject: Re: [delphi-br] Travar Sistema


  uses
Forms,
Classes,
SysUtils,
Windows,
Controls,
Psapi,
tlhelp32;

  type
TJJWProcessInformation = record
  FileName: string;
  Path: string;
end;

TJJWProcessList = array of TJJWProcessInformation;

  // retira a lista de processos de do windows 98  
  procedure CreateWin9xProcessList(var AList: TJJWProcessList);
  var
hSnapShot: THandle;
ProcInfo: TProcessEntry32;
I: Integer;
  begin
SetLength(AList, 0);

hSnapShot := CreateToolHelp32Snapshot(TH32CS_SNAPPROCESS, 0);
if (hSnapShot  THandle(-1)) then
begin
  ProcInfo.dwSize := SizeOf(ProcInfo);
  if (Process32First(hSnapshot, ProcInfo)) then
  begin
I := Length(AList);
SetLength(AList, I +1);
AList[I].FileName := ExtractFileName(ProcInfo.szExeFile);
AList[I].Path := ExtractFilePath(ProcInfo.szExeFile);

while (Process32Next(hSnapShot, ProcInfo)) do
begin
  I := Length(AList);
  SetLength(AList, I +1);
  AList[I].FileName := ExtractFileName(ProcInfo.szExeFile);
  AList[I].Path := ExtractFilePath(ProcInfo.szExeFile);
end;
  end;
  CloseHandle(hSnapShot);
end;
  end;

  // retira a lista de processos do windows NT/2000/XP/2003
  procedure CreateWinNTProcessList(var AList: TJJWProcessList);

type
  PTOKEN_USER = ^TOKEN_USER;

  _TOKEN_USER = record
User: TSidAndAttributes;
  end;

  TOKEN_USER = _TOKEN_USER;

// retorna o domínio e usuário dono de um processo
function GetUserAndDomainFromPID(ProcessId: DWORD;
  var User, Domain: string): Boolean;
var
  hToken: THandle;
  cbBuf: Cardinal;
  ptiUser: PTOKEN_USER;
  snu: SID_NAME_USE;
  ProcessHandle: THandle;
  UserSize, DomainSize: DWORD;
  bSuccess: Boolean;
begin
  Result := False;
  ProcessHandle := OpenProcess(PROCESS_QUERY_INFORMATION, False, ProcessId);
  if ProcessHandle  0 then
  begin
  //  EnableProcessPrivilege(ProcessHandle, 'SeSecurityPrivilege', True);
if OpenProcessToken(ProcessHandle, TOKEN_QUERY, hToken) then
begin
  bSuccess := GetTokenInformation(hToken, TokenUser, nil, 0, cbBuf);
  ptiUser  := nil;
  while (not bSuccess) and (GetLastError = ERROR_INSUFFICIENT_BUFFER) do
  begin
ReallocMem(ptiUser, cbBuf);
bSuccess := GetTokenInformation(hToken, TokenUser, ptiUser, cbBuf, 
cbBuf);
  end;
  CloseHandle(hToken);

  if not bSuccess then
Exit;

  UserSize := 0;
  DomainSize := 0;
  LookupAccountSid(nil, ptiUser.User.Sid, nil, UserSize, nil, 
DomainSize, snu);
  if (UserSize  0) and (DomainSize  0) then
  begin
SetLength(User, UserSize);
SetLength(Domain, DomainSize);
if LookupAccountSid(nil, ptiUser.User.Sid, PChar(User), UserSize,
  PChar(Domain), DomainSize, snu) then
begin
  Result := True;
  User := StrPas(PChar(User));
  Domain := StrPas(PChar(Domain));
end;
  end;

  if bSuccess then
  begin
FreeMem(ptiUser);
  end;
end;
CloseHandle(ProcessHandle);
  end;
end;

// retorna o nome do usuário logado atualmente
function _GetUserName : string;
const
  MAX_USER_NAME_LEN = 254;
var
  UserName: string;
  UserNameLen: DWORD;
begin
  UserNameLen := MAX_USER_NAME_LEN - 1;
  SetLength(UserName, MAX_USER_NAME_LEN);
  if GetUserName(PChar(UserName), UserNameLen) then
Result := Copy(UserName, 1, UserNameLen -1)
  else
Result := EmptyStr;
end;

  var
PIDArray: array [0..1023] of DWORD;
cb: DWORD;
I, J: Integer;
ProcCount: Integer;
hMod: HMODULE;
hProcess: THandle;
ModuleName: array [0..300] of Char;
User, Domain, CurrentUser: string;
  begin
CurrentUser := _GetUserName;

EnumProcesses(@PIDArray, SizeOf(PIDArray), cb);
ProcCount := cb div SizeOf(DWORD);
for I := 0 to ProcCount - 1 do
begin
  hProcess := OpenProcess(PROCESS_QUERY_INFORMATION or
PROCESS_VM_READ,
False,
PIDArray[I]);
  if (hProcess  0) then
  begin
GetUserAndDomainFromPID(PIDArray[I], User, Domain);

EnumProcessModules(hProcess, @hMod, SizeOf(hMod), cb);
GetModuleFilenameEx(hProcess, hMod, ModuleName, SizeOf(ModuleName));

if AnsiSameText(User, CurrentUser) then
begin
  J := Length(AList);
  SetLength(AList, J +1);
  

Re: [delphi-br] Re: Gravar data Vazia

2006-08-21 Por tôpico ailton Branco
Agradeço a ajuda de todos estarei testando estas opções, ainda quero pedir
desculpas, pois alguem ja havia pedido este tipo de coisa no forum a algum
tempo mas eu tentei a busca e fiquei muito tempo mas nao consequi encontrar
os topicos do assunto por isto postei novamente.

abraços


Em 21/08/06, Murillo Proença [EMAIL PROTECTED] escreveu:

  a única coisa que vc tem que tomar cuidado, é que se vc criou o SQL na
 mão, vc tem que antes informar o tipo do parametro:
 Qry.Params.ParamByName('DataPagamento').DataType:= ftDateTime;
 Qry.Params.ParamByName('DataPagamento').Clear;


 --- Em delphi-br@yahoogrupos.com.br, Francisco - Mol
 [EMAIL PROTECTED] escreveu

 
  eu uso qry.parambaynem(data).clear
- Original Message -
From: Ailton Branco
To: delphi-br@yahoogrupos.com.br
Sent: Monday, August 21, 2006 2:32 PM
Subject: [delphi-br] Gravar data Vazia
 
 
Tenho um campo onde eu Gravo a data de pagamento, porém na hora de
fazer um estorno preciso limpar o conteudo da data, como faço para
gravar a data vazia.
 
Exemplo
  vsSql := 'update ContasPagarParcela set
   DataPagamento  =:DataPagamento,
   ValorPagamento =:ValorPagamento,
Where (idContasPagar =:idContasPagar) and (Parcela
=:Parcela)
 
  Qry.SQL.Add(vsSql);
  Qry.Params.ParamByName('DataPagamento').AsDateTime  := ??;
  Qry.Params.ParamByName('ValorPagamento').AsCurrency := 0 ;
  Qry.Params.ParamByName('idContasPagar').AsCurrency  := 1 ;
  Qry.Params.ParamByName('Parcela').AsCurrency:= 1 ;
  Qry.ExecSql;
 
 
 
 
 
 
 
 
 
 
 

 --
 
 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.11.3/423 - Release Date:
 18/08/2006
 
 
  [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:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





[delphi-br] [OFF-TOPIC] Serviços e Projetos

2006-08-21 Por tôpico Rubem Nascimento da Rocha
Pessoal,

Antes de mais nada, quero me desculpar antecipadamente a todos que se 
sentirem ofendidos com o que vou escrever logo abaixo, se acharem que é 
anúncio, comercial, jabá, merchandising, ou coisa do tipo. Mas estou 
atualmente passando por necessidades de ordem financeira muito grandes 
mesmo, e não vejo melhor meio pra divulgar os trabalhos que tenho ao longo 
de minha experiência (e vendê-los para quem se interessar) do que esta 
lista. Esta será a única vez que farei este anúncio, em respeito à paciência 
e inteligência de todos.

Estou reunindo os projetos mais importantes que colecionei ao longo de minha 
experiência adquirida com Delphi e condensando-os em um pacote de dicas 
avançadas de programação em Delphi que abrangem muitas categorias: bancos de 
dados, API do Windows, informações de sistema, segurança e proteção de 
aplicações, etc. Dentre os projetos que tenho, destaco os seguintes:

. Detecção e monitoramento de operações em drives USB (pendrives);

. Exemplos de API Injection para interceptar funções da API do Windows;

. Carga dinâmica e chamada de qualquer função de qualquer DLL¹;

. Monitoramento de trabalhos de impressão;

. Refresh em datasets (exceto datasets unidirecionais) para permitir 
visualização de atualizações de dados feitas por outros programas e/ou 
usuários (Este projeto que eu fiz eu o adaptei e criei a partir dele o meu 
componente, que divulguei na lista mas muitos não acharam legal por causa do 
comercial que eu fiz!);

. Classe (não é componente) para criação rápida de relatórios, com impressão 
em matricial, laser ou jato de tinta, indentificando inclusive o tipo da 
impressora é matricial ou não (não permite uso de elementos gráficos - 
códigos de barras, imagens, etc.);

. Exemplos de implementação de dicionários de dados em aplicações para 
torná-las mais dinâmicas;

. Classe (não é componente) para tratamento de mensagens de erros em bancos 
de dados (para FireBird e Oracle). Ele interpreta a mensagem da exceção e o 
tipo da exceção que ocorreu e fornece uma mensagem amigável ao usuário;

. Como ler dados da BIOS do micro para compor uma chave única de 
identificação²;

. Como gravar dados customizados em arquivos executáveis;

. Biblioteca de código que auxilia na alteração de arquivos executáveis;

. Exemplo de uso de packages como plug-ins para a aplicação.


OBS.: (1) O exemplo atualmente serviu de base para uma implementação que 
roda hoje em linha de produção em indústria. usa DLLs estáticas, e não se 
aplica a DLLs do tipo COM; (2) Roda em Win9x, ME, NT, 2000 e XP.

Estou também atualmente trabalhando em um projeto pra fazer com que, a 
partir de uma aplicação Delphi comum, seja possível ler portas de I/O sem 
necessitar de drivers de baixo nível estilo VxD ou WDM, tanto em Win9x como 
em WinNT (NT/2000/XP). Se conseguir, também será outro projeto que estarei 
disponibilizando no pacote adicionalmente.

Enfim, gente, esses projetos são fruto dos meus mais de 10 anos atuando na 
área de desenvolvimento de sistemas de informação e também de pesquisas que 
sempre fiz pela Internet juntamente com minha experiência adquirida em 
desenvolvimento para comércio e indústria.

Esta semana procurarei compilar todo o material e testar para que tudo 
esteja redondo, e bem documentado e escrito. Quem estiver interessado, por 
favor me contactar pelo e-mail em PVT (não responderei a e-mails na lista!) 
para que eu possa reservar o pacote aos interessados. O preço eu ainda vou 
ver direito como eu vou fazer, pois como são coisas que valeram meu suor, 
fica muito difícil pra mim dar um preço agora, mas só estou fazendo isso pq 
tenho uma necessidade financeira muito grande no momento.

Quem tb precisar de desenvolvimento personalizado (mesmo que a distância) 
como freelancer, minha experiência está a disposição.

Obrigado pela paciência de todos e espero que alguém se interesse pelo meu 
trabalho e/ou projetos. Fiquem todos em paz.

Sds.,
Rubem Rocha
Manaus, AM

_
MSN Busca: fácil, rápido, direto ao ponto.  http://search.msn.com.br



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html