[delphi-br] Off Topic - Preciso de ajuda com Excel

2005-04-07 Por tôpico Eduardo Silva ®

Galera, alguem que manja de excel poderia entrar em contato comigo em pvt
para me dar uma mão ?

Obrigado.

Qualquer coisa meu msn é [EMAIL PROTECTED]

~\\|//~
-(o o)-
o--oOOOo--(_)--oOOOo-o
||
|   Eduardo de Almeida Silva |
|   Kobra Sistemas   |
|  [EMAIL PROTECTED]  -   (14)3263-0326   |
||
|.oooO   Oooo.   |
o(   )---(   )---o
  \ ( ) /
   \_)   (_/



-- 
 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] ou [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] Mensagem muito grande - Pedido ao participantes da lista

2005-04-07 Por tôpico Filipe

É... ok... Concordo...:-)

- Original Message - 
From: Voyager Informática Ltda. [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, April 06, 2005 3:04 PM
Subject: RES: [delphi-br] Mensagem muito grande - Pedido ao participantes da 
lista




Felipe, acho que você não entendeu a idéia... Para responder a uma mensagem,
é recomendável que as mensagens anteriores sejam mantidas. O que o Luiz
queria dizer é para eliminar a parte INÚTIL da mensagem anterior, marcada
pela frase  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
, pois tudo o que vem abaixo disso é incluído pelo Yahoo em todas as
mensagens do grupo. Pode não parecer, mas quando tem muitas respostas a uma
mesma mensagem inicial, o tamanho das mensagens cai bastante.

Abraços,

Mauricio.


  _

De: Filipe [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 06 de abril de 2005 14:46
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Mensagem muito grande - Pedido ao participantes da
lista


Bom cara,  eu acho ótimo que NÃO se remova a pergunta para dar a resposta,
assim sempre sabemos a q pergunta a resposta está pertinente, ou se ja eh a
resposta da resposta

Aconselho que vc receba os emails normalmente.

- Original Message - 
From: Luiz Henrique Severo d Oliveira [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, April 06, 2005 2:26 PM
Subject: [delphi-br] Mensagem muito grande - Pedido ao participantes da
lista



 Pessoal,

 Sem querer ser chato, mas já sendo um pouco...

 Eu recebo a lista em modo Digest (normamente recebo uns 5 e-mails por dia
 com as últimas 25 mensagens do grupo), e algumas mensagens estão chegando
 muito grande, em torno de 200K.

 Isso acontece porque alguns participantes que respondem mantem respostas
 inteiras dos outros participantes na sua resposta e também não retiram o
 texto que o Yahoo coloca (este texto está abaixo da frase  FAVOR
 REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM ).
 E além do problema com o tamanho, fica muito chato ler as mensagens com
 respostas que já foram lidas anteriormente e um monte de texto inútil.

 Se não for incômodo, por favor, retirem o texto desnecessário e tentem ao
 máximo reduzir o acompanhamento do assunto com respostas antigas.


 Obrigado e desculpem se incomodei alguém.
 Luiz Henrique Severo d Oliveira
 RPG Soluçoes
 www.rpgsolucoes.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] ou [EMAIL PROTECTED]

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] ou [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] Ajuda - Erro na utilização de lookup

2005-04-07 Por tôpico Robson - Salcam

Certamente tem algum procedimento em algum evento da query que esta em loop 
infinito sobrecarregando a memoria, Verifique os eventos da query e do 
datasource em 1° lugar tem codigo executando por tras.



- Original Message - 
From: T a t y S a n t a n a [EMAIL PROTECTED]
To: Gupo de Delphi delphi-br@yahoogrupos.com.br
Sent: Saturday, July 09, 2005 12:08 AM
Subject: [delphi-br] Ajuda - Erro na utilização de lookup



Boa noite, estou desenvolvendo um sisteminha pequeno e pra ligação de campos 
que 
estou utilizando o lookup só que quando termino a confecção dos Lookups em 
todos 
os formes e tento ativar as tabelas o Delphi da o seguinte erro.

Stack overflow - save your work and restart Delphi

Já fiz de tudo, e nada de funcionar, até reistalar o Delphi 6. Alguém sabe o 
que 
pode ser ? A quando tira os lookups o sistema funciona perfeitamente.

Tatiane Santana


[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] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos











-- 
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.9.3 - Release Date: 05/04/2005




-- 
 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] ou [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: Delphi e Lotus

2005-04-07 Por tôpico Josir Gomes

É possível sim - mas é trabalhoso.
O primeiro passo é baixar o componente que faz acesso a API do Lotus Note.
Eu já testei ele nos idos do Delphi 3 e funcionava belezinha.
Você pode baixar na SuperPage ou na Torry.
Um abraço,
Josir.

_
Alguém saberia como fazer com que o Delphi mande e-mail com dados de
um formulário utilizando o Lotus Notes instalado na máquina?

Valeu










-- 
 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] ou [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] Linguagem .NET

2005-04-07 Por tôpico Leonardo Luiz

Também tem a forma de trabalhar com eventos que é muito semelhante ao 
Delphi assim como o tratamento de exceções.

Leonardo Luiz
Francisco Thiago escreveu:

 (Opinião de quem está conhecendo a coisa toda agora)
 Realmente, pelo pouco que eu vi desse C#, o que ele tem de Delphi é a 
 OOP -
 que não é um conceito exclusivo Delphiano.
 Mas algumas outras coiasas são realmente parecidas. O ADO.Net me PARECE
 muito PARECIDO (redundante???) com o Midas do Delphi... Mas não usei o ADO
 antigo para saber quem imitou quem mas se a M$ tiver mantido a 
 tradição,
 agente já sabe a resposta. hehehe

 Vendo pelo lado bom, quanto mais parecido melhor, agente só aprende um
 conceito :D

 []'s

 Thiago
 - Original Message -
 From: Walter Alves Chagas Junior [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Wednesday, April 06, 2005 6:07 PM
 Subject: RES: [delphi-br] Linguagem .NET



 Sinceramente? Não vi nada de Delphi na linguagem. Vi uma linguagem mesme é
 muito proxima do Java



 []s

 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia de telecomunicações
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200

 Pra que usar OOP, se existe Ctrl+C  Ctrl+V?



  -Mensagem original-
  De: Leonardo Luiz [mailto:[EMAIL PROTECTED]
  Enviada em: quarta-feira, 6 de abril de 2005 17:54
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Linguagem .NET
 
 
 
  Acredito que no geral a melhor opção é o C# porque foi projetado
  especificamente para a plataforma e é a linguagem padrão de
  grande parte
  das ferramentas desenvolvidas.
 
  Além de ser uma ótima linguagem possui muitas características
  do Delphi.
  Porem para manter compatibilidade com código fonte antigo
  vale o Pascal.
 
 
  Leonardo Luiz
 
  Robson - Salcam escreveu:
 
   Alguém sabe qual é a melhor linguagem para .Net / Delphi 2005
   Object Pascal, C#, C++ etc...
   Object Pascal continuará persistindo?
  
   valeu
  
  
   Robson Donisete Bento
   Salcam Internet  logística
   www.salcam.com.br
   Fone/Fax (19) 3422-2211
   Suporte (19) 3432-1818
  
   [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] ou [EMAIL PROTECTED]
  
  
  
   *Yahoo! Grupos, um serviço oferecido por:*
  
   *
  
 http://br.rd.yahoo.com/SIG=12a06ig0d/M=264105.3931087.6562589.1588051/D=brc
 lubs/S=2137111264:HM/EXP=1112825038/A=2361264/R=6/SIG=10v4acpp0/*http://br.s
 hopping.yahoo.com/*
 
 
 
  
  *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]
 
 mailto:[EMAIL PROTECTED]
 
  * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo! http://br.yahoo.com/info/utos.html.
 
 




 -- 
  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] ou [EMAIL PROTECTED]

 Links do Yahoo! Grupos









 [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] ou [EMAIL PROTECTED]

 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] ou [EMAIL PROTECTED]



 *Yahoo! Grupos, um serviço oferecido por:*
 http://br.rd.yahoo.com/SIG=12arcvh26/M=264379.5078783.6203979.1588051/D=brclubs/S=2137111264:HM/EXP=1112851342/A=2191897/R=0/SIG=10vqa2grn/*http://br.diversao.yahoo.com/
  

 http://br.rd.yahoo.com/SIG=12arcvh26/M=264379.5078783.6203979.1588051/D=brclubs/S=2137111264:HM/EXP=1112851342/A=2191897/R=1/SIG=10vqa2grn/*http://br.diversao.yahoo.com/
  
   


 
 *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]
   mailto:[EMAIL PROTECTED]

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






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as 

[delphi-br] Realmente preciso de ajuda com a logica de dependencias

2005-04-07 Por tôpico Marcelo Silva

Pessoal, voces sabem que não costumo recorrer a lista dessa maneira, mas é que 
a cabeça vai fundir :-)

Tenho uma tabela assim:

VENDEDORES
  VEN_COD (PK)
  VEN_PAI
  VEN_NOME

Atravez dessa tabela preciso montar uma rotina que me traga a descendencia 
(tipo arvore) como abaixo

CODIGO   CODIGO-PAI   NOME
001  000  MARCELO
002  001  JOAO
003  001  MARCIO
004  003  JOAQUIM
005  002  EPITAFIO
006  003  ROBERTO
007  006  FERNANDO

O resultado deve sair mais ou menos assim:

MARCELO
  JOAO
EPTAFIO
  MARCIO
JOAQUIM
 ROBERTO
  FERNANDO

Preciso montar esse treeview na mão... pois preciso calcular o ganhos de cada 
vendedor para saber quanto o superior dele tem a ganhar.

* Se estiver faltando alguma coisa na estrutura de tabelas estou atento as 
dicas do colegas




Marcelo Silva
Cel. 11 9693-4251
ICQ - 49224093
MSN [EMAIL PROTECTED]








  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.9.1 - Release Date: 01/04/2005


[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] ou [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: Dúvida OO

2005-04-07 Por tôpico Paulo


Obrigado Romário. Vou levar algum tempo pra assimiliar o que foi 
passado, depois volto a falar do assunto, se restarem dúvidas.

Abraços

Paulo

--- Em delphi-br@yahoogrupos.com.br, Romario (Listas) 
[EMAIL PROTECTED] escreveu
 Essa thread rolou entre 09 e 11 de abril de 2003. Foi um ótimo 
 aprendizado para os que acompanharam e creio que ainda será para 
muita 
 gente que pretende conhecer sobre o assunto.
 
 Não deixem de ler e dar suas opiniões.
 
 
 http://br.groups.yahoo.com/group/delphi-br/message/79676
 
 http://br.groups.yahoo.com/group/delphi-br/message/79719
 
 http://br.groups.yahoo.com/group/delphi-br/message/79795
 
 http://br.groups.yahoo.com/group/delphi-br/message/79833
 
 http://br.groups.yahoo.com/group/delphi-br/message/79841
 
 http://br.groups.yahoo.com/group/delphi-br/message/79847
 
 http://br.groups.yahoo.com/group/delphi-br/message/79857
 
 http://br.groups.yahoo.com/group/delphi-br/message/79858
 
 http://br.groups.yahoo.com/group/delphi-br/message/79869
 
 http://br.groups.yahoo.com/group/delphi-br/message/79876
 
 http://br.groups.yahoo.com/group/delphi-br/message/79878
 
 http://br.groups.yahoo.com/group/delphi-br/message/79906
 
 http://br.groups.yahoo.com/group/delphi-br/message/79945
 
 http://br.groups.yahoo.com/group/delphi-br/message/79946
 
 
 Espero ter ajudado.
 
 Sds,
 
 Romario
 
 
 
 Paulo escreveu:
  
  Sou novo em OO e nos livros que tenho lido não estou encontrando 
  respostas suficientemente claras para uma questão:
  
  Pretendo desenvolver uma aplicação usando OO em 3 camadas. Em 
qual 
  delas devo construir regras de validação para os dados de 
entrada: na 
  interface, na classe de negócio ou no banco? Se estas regras 
forem 
  definidas na classe de negócio (o que parece correto), como aviso 
a 
  interface que ocorreu um erro? 
  
  Obrigado





-- 
 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] ou [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] Linguagem .NET

2005-04-07 Por tôpico Walter Alves Chagas Junior

Tratamento de excessoes vem do C++ e do Java Try..Catch.. End..

Trabalhar com Eventos, se não me engano o Java também trabalha da mesma
forma
 
 
 []s

 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia de telecomunicações
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200
 
 Pra que usar OOP, se existe Ctrl+C  Ctrl+V?

 

 -Mensagem original-
 De: Leonardo Luiz [mailto:[EMAIL PROTECTED]
 Enviada em: quinta-feira, 7 de abril de 2005 09:20
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Linguagem .NET
 
 
 
 Também tem a forma de trabalhar com eventos que é muito semelhante ao 
 Delphi assim como o tratamento de exceções.
 
 Leonardo Luiz
 Francisco Thiago escreveu:
 
  (Opinião de quem está conhecendo a coisa toda agora)
  Realmente, pelo pouco que eu vi desse C#, o que ele tem de 
 Delphi é a 
  OOP -
  que não é um conceito exclusivo Delphiano.
  Mas algumas outras coiasas são realmente parecidas. O 
 ADO.Net me PARECE
  muito PARECIDO (redundante???) com o Midas do Delphi... Mas 
 não usei o ADO
  antigo para saber quem imitou quem mas se a M$ tiver mantido a 
  tradição,
  agente já sabe a resposta. hehehe
 
  Vendo pelo lado bom, quanto mais parecido melhor, agente só 
 aprende um
  conceito :D
 
  []'s
 
  Thiago
  - Original Message -
  From: Walter Alves Chagas Junior [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Wednesday, April 06, 2005 6:07 PM
  Subject: RES: [delphi-br] Linguagem .NET
 
 
 
  Sinceramente? Não vi nada de Delphi na linguagem. Vi uma 
 linguagem mesme é
  muito proxima do Java
 
 
 
  []s
 
  Walter Alves Chagas Junior
  Projeto e desenvolvimento
  Telemont Engenharia de telecomunicações
  [EMAIL PROTECTED]
  Fone: (31) 3389-8215 Fax: (31) 3389-8200
 
  Pra que usar OOP, se existe Ctrl+C  Ctrl+V?
 
 
 
   -Mensagem original-
   De: Leonardo Luiz [mailto:[EMAIL PROTECTED]
   Enviada em: quarta-feira, 6 de abril de 2005 17:54
   Para: delphi-br@yahoogrupos.com.br
   Assunto: Re: [delphi-br] Linguagem .NET
  
  
  
   Acredito que no geral a melhor opção é o C# porque foi projetado
   especificamente para a plataforma e é a linguagem padrão de
   grande parte
   das ferramentas desenvolvidas.
  
   Além de ser uma ótima linguagem possui muitas características
   do Delphi.
   Porem para manter compatibilidade com código fonte antigo
   vale o Pascal.
  
  
   Leonardo Luiz
  
   Robson - Salcam escreveu:
  
Alguém sabe qual é a melhor linguagem para .Net / Delphi 2005
Object Pascal, C#, C++ etc...
Object Pascal continuará persistindo?
   
valeu
   
   
Robson Donisete Bento
Salcam Internet  logística
www.salcam.com.br
Fone/Fax (19) 3422-2211
Suporte (19) 3432-1818
   
[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] ou [EMAIL PROTECTED]
   
   
   
*Yahoo! Grupos, um serviço oferecido por:*
   
*
   
  
 http://br.rd.yahoo.com/SIG=12a06ig0d/M=264105.3931087.6562589
 .1588051/D=brc
  
 lubs/S=2137111264:HM/EXP=1112825038/A=2361264/R=6/SIG=10v4acpp
 0/*http://br.s
  hopping.yahoo.com/*
  
  
  
   
 --
 --
   *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]
  
  
 mailto:[EMAIL PROTECTED]
  
   * O uso que você faz do Yahoo! Grupos está sujeito 
 aos Termos do
 Serviço do Yahoo! http://br.yahoo.com/info/utos.html.
  
  
 
 
 
 
  -- 
   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] ou [EMAIL PROTECTED]
 
  Links do Yahoo! Grupos
 
 
 
 
 
 
 
 
 
  [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] ou [EMAIL PROTECTED]
 
  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] ou [EMAIL PROTECTED]
 
 
 
  *Yahoo! Grupos, um serviço oferecido por:*
  
http://br.rd.yahoo.com/SIG=12arcvh26/M=264379.5078783.6203979.1588051/D=brc

Re: [delphi-br] Seria pirataria?

2005-04-07 Por tôpico \[ Mutuka \]

vc pode fazer o seguinte...
no arquivo de instalação do seu programa diga q
precisará de arquivos do cd de instalação de w2k
ou xp, ou nt... ai o programa de instalação pede
o arquivo e o usuario aponta onde esta o cd de
isntalação e a pasta assim a responsabilidade
passa a ser do usuario e nao sua... pois vc nao
esta distribuindo os arquivos no seu software...

--- Valfrid-Ly Silva Couto
[EMAIL PROTECTED] wrote:
-
Bom, eu acredito que seja pirataria sim, uma vez
que a
licensa do windows não permite redistribuição.

Se você irá usar esse programa, provavelmente o
seu
sistema não funcionará em Windows anteriores ao
W2000,
logo, para evitar qualquer problema, homologue-o
apenas para o W2k e WXP e use o programa que está
na
máquina que você está instalando o programa.

--- Marcos Elias [EMAIL PROTECTED] wrote:
 
 Fala galera...
  
 Vi que nas novas versões de Windows (2000,
XP...) há
 um programinha, o IEXPRESS.EXE, que fica na
pasta de
 sistema (system ou system32). Ele depende dos
 arquivos MAKECAB.EXE e WEXTRACT.EXE.
 Executando-se o iexpress ele gera um arquivo
 compactado auto-extraível, como os utilizados
em
 alguns programas de instalação e alguns
acessórios
 da própria Microsoft. Está lá, tem até uma
interface
 e salva as configurações de instalação num
arquivo,
 excelente e é para usar - mesmo que não tenha
 atalhos para ele no Windows Explorer.
  
 Pois bem... Criei um programa validador de
número
 serial, e compacto com ele... Acontece que
pretendo
 adaptar esse programa validador de número
serial e
 registro para um programa comercial, ou seja,
 distribuí-lo. Quem tem Windows 2000/XP poderia
 compactar os arquivos com esse IEXPRESS, mas e
para
 o Windows 9x/Me? Será que eu poderia colocar
esses 3
 arquivos do windows no meu programa de
instalação, e
 mandá-los juntos? Não é uma cópia muito menos
uma
 revenda, visto que vários arquivos de sistema
passar
 de windows em windows, como uns do VB (as dll
com
 funções) e o próprio msconfig, que muita gente
leva
 pro windows 2000.
  
 Preferia compactar automaticamente, mas
desconheço
 um componente gratuito que faça a
compactação...
  
 A pergunta então seria essa : posso ter algum
 problema - por exemplo, com a microsoft - se eu
 colocar esses 3 arquivos no meu programa de
 instalação para serem executados em windows
9x/me?
  
 Eh claro que a resposta não depende de vocês,
mas
 comentários e debates ajudam a tomar um
caminho...
  
 Falou pessoal!
 Marcos Elias
 [EMAIL PROTECTED]
 

__
 Converse com seus amigos em tempo real com o
Yahoo!
 Messenger 
 http://br.download.yahoo.com/messenger/ 
 
 [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] ou
 [EMAIL PROTECTED]
  
 Links do Yahoo! Grupos
 
 
 
 http://br.yahoo.com/info/utos.html
 
  
 
 
 
 

Valfrid-Ly Silva Couto
[EMAIL PROTECTED]
[EMAIL PROTECTED]
[EMAIL PROTECTED]
ICQ 15114646


  
  

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] ou
[EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
  Satilde;o 
   PauloRio
de JaneiroCuritiba   
Porto AlegreBelo 
   Horizonte   
Brasiacute;lia  
 

-
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 Termos do Serviço do Yahoo!.


   Leandro...

[ Mutuka ]  






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] ou [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] Realmente preciso de ajuda com a logica de dependencias

2005-04-07 Por tôpico Gabriel Ferrarini

Olá, Marcelo. Pelo que você passou, acho que você poderia usar uma matriz de
adjacências e fazer uma função recursiva para montar o Treeview. Seria algo
assim:

Você tem uma matriz NxN onde N é seu número de vendedores. No seu exemplo
são 7.

Então você poderia fazer o seguinte:

 - Após declarar a matriz e preencher todos os seus elementos com 0 faça o
laço abaixo.

for I := 1 to DataSet.RecordCount do
  Matriz[DataSetVEN_PAI][DataSetVEN_COD] := 1;

A matriz ficaria assim:

1 2 3 4 5 6 7
1  0 1 1 0 0 0 0
2  0 0 0 0 1 0 0
3  0 0 0 1 0 1 0
4  0 0 0 0 0 0 0
5  0 0 0 0 0 0 0
6  0 0 0 0 0 0 1
7  0 0 0 0 0 0 0

Os campos onde tem um, são os campos que indicam que o índice da linha é pai
do índice da coluna.

Daí você pode montar uma função recursiva a partir do primeiro registro
chamando-a assim:

MontaTreeView(TreeView, nil, DataSetVEN_COD.AsInteger);

Não sembro dos métodos do treeview mas creio que seja algo assim:

procedure MontaTreeView(TreeView: TTreeView; Node: TNode; Codigo: integer);
begin
//  Aqui você cria o primeiro node,
//  adiciona o primeiro código,
//  verifica se ele possui filhos fazendo um for na linha correspondente ao
número passado como parâmetro.
// Se tiver você chama a função de novo, passando o mesmo treeview, o node
criado e o código do filhos como parâmetro. Isso para cada filho
end;

Espero ter ajudado.

Flw.

Gabriel

- Original Message -
From: Marcelo Silva
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 07, 2005 9:34 AM
Subject: [delphi-br] Realmente preciso de ajuda com a logica de dependencias


Pessoal, voces sabem que não costumo recorrer a lista dessa maneira, mas é
que a cabeça vai fundir :-)

Tenho uma tabela assim:

VENDEDORES
  VEN_COD (PK)
  VEN_PAI
  VEN_NOME

Atravez dessa tabela preciso montar uma rotina que me traga a descendencia
(tipo arvore) como abaixo

CODIGO   CODIGO-PAI   NOME
001  000  MARCELO
002  001  JOAO
003  001  MARCIO
004  003  JOAQUIM
005  002  EPITAFIO
006  003  ROBERTO
007  006  FERNANDO

O resultado deve sair mais ou menos assim:

MARCELO
  JOAO
EPTAFIO
  MARCIO
JOAQUIM
 ROBERTO
  FERNANDO

Preciso montar esse treeview na mão... pois preciso calcular o ganhos de
cada vendedor para saber quanto o superior dele tem a ganhar.

* Se estiver faltando alguma coisa na estrutura de tabelas estou atento as
dicas do colegas




-- 
 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] ou [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] Dúvidas com ADO

2005-04-07 Por tôpico Eduardo Galvão

Olá,

Estou convertendo um sistema que usava BDE para ADO, e estou
com algumas dúvidas - estou usando TADOQUERY.

No BDE, no evento 'after post', eu era forçado a dar um
applyupdates na query, isto não é necessário no ADO?

No BDE, existe o objeto Tupdatesql, pelo que vi,isto não é
necessário no ADO, é isto mesmo?

Saudações,
Eduardo Paci Galvão
Engenheiro Eletricista UFMG 1990
www.egalvao.com.br
MSN: [EMAIL PROTECTED]
Skype: eduardogalvao

  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.9.4 - Release Date: 06/04/2005


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

2005-04-07 Por tôpico Filipe


 Olá!

  Tenho dois ponteiros:

  var
p: ^MeuForm;
Point: Pointer;
  begin
Point := @p^.MeuEdit;
 
Point^.Text := 'Olá'  //  --- Aki, o valor de  Point^.Text = 
'' ...
Showmessage(Point^.Text);// Aki Tb, ou seja, ele naum está 
recebendo valor!!!


  Alguém Poderia, por favor me dar uma luz e dizer porque meu Point^.Text 
naum recebe texto?

  Obrigado.



  
  Filipe Geyer
  Programador
  [EMAIL PROTECTED]
  www.bludata.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] ou [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 de retorno de DLL

2005-04-07 Por tôpico cchirolli


Primeiro obrigado pelas respostas da outra pergunta.Agora estou com o 
seguinte problema criei uma dll do delphi 2005 que possui uma função 
q retorna um valor, quando o retorno he inteiro blz, quando eu altero 
a dll para retornar uma string ele retorna mas quando dou um 
FreeLibrary(vlcCriaDll) ela da erro. Algém tem idéia do q seja. Eu so 
crio a dll no momento de utilizar.
Assim:

type
  TChamaDllTeste  = function (pPath:String):String;
  Formx:TForm
  

function ChamaDll:Integer;
var
  vlcDll:THandle;
  vlcCriaDll:TChamaDllTeste;
  vlcResult:String;
begin
   ChamaDll:=0;
   vlcDll:=LoadLibrary('Teste.dll');
  if vlcDll0 then
   begin
 if GetProcAddress(vlcDll,'ExecutaDll')nil then
begin
   vlcCriaDll:=TChamaDllLogin(GetProcAddress 
vlcDll,'ExecutaDll'));
vlcResult:=vlcCriaDll('1');
FreeLibrary(vlcDll);
  
   if vlcResult'' then
   showmessage('ok');
   else
   showmessage('Erro');
end;
   end;
end;

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] ou [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] Realmente preciso de ajuda com a logica de dependencias

2005-04-07 Por tôpico Marcelo Silva

Acho que nao me expressei direito...
Não preciso preencher um Treeview...
Coloquei um Treeview como exemplo...
O que preciso é montar essa estrutura em um Memo para a visualização.

E junto com isso fazer  o calculo de valores tipo:

MARCELO  - 100,00 (que é o % sobre quem esta abaixo dele)
  JOAO   -  50,00 (idem)
EPTAFIO  -  40,00 (idem)
  MARCIO -  30,00 (idem)
JOAQUIM  -  20,00 (idem)
 ROBERTO -  10,00 (idem)
  FERNANDO   -   0,00 (idem)

Entendeu ?
A minha dificuldade é fazer o calculo de comissões, já que quanto ao treeview 
eu posso usar um DBTreeview da suite JEDI

*Mas estou analizando sua dica, pois parece muito boa


Marcelo Silva
Cel. 11 9693-4251
ICQ - 49224093
MSN [EMAIL PROTECTED]


  - Original Message - 
  From: Gabriel Ferrarini 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, April 07, 2005 10:20 AM
  Subject: Re: [delphi-br] Realmente preciso de ajuda com a logica de 
dependencias


  Olá, Marcelo. Pelo que você passou, acho que você poderia usar uma matriz de
  adjacências e fazer uma função recursiva para montar o Treeview. Seria algo
  assim:

  Você tem uma matriz NxN onde N é seu número de vendedores. No seu exemplo
  são 7.

  Então você poderia fazer o seguinte:

  - Após declarar a matriz e preencher todos os seus elementos com 0 faça o
  laço abaixo.

  for I := 1 to DataSet.RecordCount do
Matriz[DataSetVEN_PAI][DataSetVEN_COD] := 1;

  A matriz ficaria assim:

  1 2 3 4 5 6 7
  1  0 1 1 0 0 0 0
  2  0 0 0 0 1 0 0
  3  0 0 0 1 0 1 0
  4  0 0 0 0 0 0 0
  5  0 0 0 0 0 0 0
  6  0 0 0 0 0 0 1
  7  0 0 0 0 0 0 0

  Os campos onde tem um, são os campos que indicam que o índice da linha é pai
  do índice da coluna.

  Daí você pode montar uma função recursiva a partir do primeiro registro
  chamando-a assim:

  MontaTreeView(TreeView, nil, DataSetVEN_COD.AsInteger);

  Não sembro dos métodos do treeview mas creio que seja algo assim:

  procedure MontaTreeView(TreeView: TTreeView; Node: TNode; Codigo: integer);
  begin
  //  Aqui você cria o primeiro node,
  //  adiciona o primeiro código,
  //  verifica se ele possui filhos fazendo um for na linha correspondente ao
  número passado como parâmetro.
  // Se tiver você chama a função de novo, passando o mesmo treeview, o node
  criado e o código do filhos como parâmetro. Isso para cada filho
  end;

  Espero ter ajudado.

  Flw.

  Gabriel

  - Original Message -
  From: Marcelo Silva
  To: delphi-br@yahoogrupos.com.br
  Sent: Thursday, April 07, 2005 9:34 AM
  Subject: [delphi-br] Realmente preciso de ajuda com a logica de dependencias


  Pessoal, voces sabem que não costumo recorrer a lista dessa maneira, mas é
  que a cabeça vai fundir :-)

  Tenho uma tabela assim:

  VENDEDORES
VEN_COD (PK)
VEN_PAI
VEN_NOME

  Atravez dessa tabela preciso montar uma rotina que me traga a descendencia
  (tipo arvore) como abaixo

  CODIGO   CODIGO-PAI   NOME
  001  000  MARCELO
  002  001  JOAO
  003  001  MARCIO
  004  003  JOAQUIM
  005  002  EPITAFIO
  006  003  ROBERTO
  007  006  FERNANDO

  O resultado deve sair mais ou menos assim:

  MARCELO
JOAO
  EPTAFIO
MARCIO
  JOAQUIM
   ROBERTO
FERNANDO

  Preciso montar esse treeview na mão... pois preciso calcular o ganhos de
  cada vendedor para saber quanto o superior dele tem a ganhar.

  * Se estiver faltando alguma coisa na estrutura de tabelas estou atento as
  dicas do colegas




  -- 
   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] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




--


  No virus found in this incoming message.
  Checked by AVG Anti-Virus.
  Version: 7.0.308 / Virus Database: 266.9.1 - Release Date: 01/04/2005

  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.9.1 - Release Date: 01/04/2005


[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 

[delphi-br] AO MODERADOR

2005-04-07 Por tôpico Filipe


 Naum seria legal mudar a fonte da lista para Courrier New, ou outra fonte 
que facilite a compreensão dos códigos?


  Obrigado.



  
  Filipe Geyer
  Programador
  [EMAIL PROTECTED]
  www.bludata.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] ou [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] KeyPress

2005-04-07 Por tôpico Rondinelle Lima Bispo

Olá amigos, alguem pode passar a dica de como dar um KeyPress em um IWEdit1
do IntraWeb 5.0.43
obs.. nao quero utilizar botao




-- 
 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] ou [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] Realmente preciso de ajuda com a logica de dependencias

2005-04-07 Por tôpico Gabriel Ferrarini

Bom, na função recursiva você pode ao invés de montar o TreeView, montar um 
Memo e passar também como parâmetro as porcentagens e os valores bases para 
fazer o cálculo. Não entendi mito bem o seu cálculo de comissões, mas acho que 
se você conseguir passar o valor base e o percentual recursivamente (como 
parâmetros da função), você consegue montar o Memo.

Em anexo segue um exemplo bem básico para você analisar. CLique em abrir 
dataset e depois em montar memo.

Só para constar, se você for usar o método que eu passei, seria interessante 
passar o nível do vendedor também, para você colocar espaços antes dos nomes. 
Por exemplo: Marcelo Vendedor nível 0, 0x2 espaços, João nível 1, 1x2 espaços e 
por aí vai.

Gabriel.
  - Original Message - 
  From: Marcelo Silva 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, April 07, 2005 11:05 AM
  Subject: Re: [delphi-br] Realmente preciso de ajuda com a logica de 
dependencias


  Acho que nao me expressei direito...
  Não preciso preencher um Treeview...
  Coloquei um Treeview como exemplo...
  O que preciso é montar essa estrutura em um Memo para a visualização.

  E junto com isso fazer  o calculo de valores tipo:

  MARCELO  - 100,00 (que é o % sobre quem esta abaixo dele)
JOAO   -  50,00 (idem)
  EPTAFIO  -  40,00 (idem)
MARCIO -  30,00 (idem)
  JOAQUIM  -  20,00 (idem)
   ROBERTO -  10,00 (idem)
FERNANDO   -   0,00 (idem)

  Entendeu ?
  A minha dificuldade é fazer o calculo de comissões, já que quanto ao treeview 
eu posso usar um DBTreeview da suite JEDI

  *Mas estou analizando sua dica, pois parece muito boa


  Marcelo Silva
  Cel. 11 9693-4251
  ICQ - 49224093
  MSN [EMAIL PROTECTED]


- Original Message - 
From: Gabriel Ferrarini 
To: delphi-br@yahoogrupos.com.br 
Sent: Thursday, April 07, 2005 10:20 AM
Subject: Re: [delphi-br] Realmente preciso de ajuda com a logica de 
dependencias


Olá, Marcelo. Pelo que você passou, acho que você poderia usar uma matriz de
adjacências e fazer uma função recursiva para montar o Treeview. Seria algo
assim:

Você tem uma matriz NxN onde N é seu número de vendedores. No seu exemplo
são 7.

Então você poderia fazer o seguinte:

- Após declarar a matriz e preencher todos os seus elementos com 0 faça o
laço abaixo.

for I := 1 to DataSet.RecordCount do
  Matriz[DataSetVEN_PAI][DataSetVEN_COD] := 1;

A matriz ficaria assim:

1 2 3 4 5 6 7
1  0 1 1 0 0 0 0
2  0 0 0 0 1 0 0
3  0 0 0 1 0 1 0
4  0 0 0 0 0 0 0
5  0 0 0 0 0 0 0
6  0 0 0 0 0 0 1
7  0 0 0 0 0 0 0

Os campos onde tem um, são os campos que indicam que o índice da linha é pai
do índice da coluna.

Daí você pode montar uma função recursiva a partir do primeiro registro
chamando-a assim:

MontaTreeView(TreeView, nil, DataSetVEN_COD.AsInteger);

Não sembro dos métodos do treeview mas creio que seja algo assim:

procedure MontaTreeView(TreeView: TTreeView; Node: TNode; Codigo: integer);
begin
//  Aqui você cria o primeiro node,
//  adiciona o primeiro código,
//  verifica se ele possui filhos fazendo um for na linha correspondente ao
número passado como parâmetro.
// Se tiver você chama a função de novo, passando o mesmo treeview, o node
criado e o código do filhos como parâmetro. Isso para cada filho
end;

Espero ter ajudado.

Flw.

Gabriel

- Original Message -
From: Marcelo Silva
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 07, 2005 9:34 AM
Subject: [delphi-br] Realmente preciso de ajuda com a logica de dependencias


Pessoal, voces sabem que não costumo recorrer a lista dessa maneira, mas é
que a cabeça vai fundir :-)

Tenho uma tabela assim:

VENDEDORES
  VEN_COD (PK)
  VEN_PAI
  VEN_NOME

Atravez dessa tabela preciso montar uma rotina que me traga a descendencia
(tipo arvore) como abaixo

CODIGO   CODIGO-PAI   NOME
001  000  MARCELO
002  001  JOAO
003  001  MARCIO
004  003  JOAQUIM
005  002  EPITAFIO
006  003  ROBERTO
007  006  FERNANDO

O resultado deve sair mais ou menos assim:

MARCELO
  JOAO
EPTAFIO
  MARCIO
JOAQUIM
 ROBERTO
  FERNANDO

Preciso montar esse treeview na mão... pois preciso calcular o ganhos de
cada vendedor para saber quanto o superior dele tem a ganhar.

* Se estiver faltando alguma coisa na estrutura de tabelas estou atento as
dicas do colegas




-- 
 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] ou [EMAIL PROTECTED]



  Yahoo! Grupos, um 

Re: [delphi-br] Dúvida OO

2005-04-07 Por tôpico Romario (Listas)

Você pode receber como retorno a própria mensagem de erro.

Um exemplo rápido (sem detalhes):

==
Interface:
==

Funcionario.Nome  := edt_nome.text;
Funcionario.Matricula := edt_matricula.text

msg := Funcionario.Incluir;

If msg  '' Then
   ShowMessage(msg);
Else
   ShowMessage('A inclusão foi feita com sucesso');

==
Classe:
==

Result := dtm_funcionario.Incluir(Self);


==
DataModule:
==

Function dtm_funcionario.Incluir(Funcionario: TFuncionario): String;
Begin

   msg := '';

   Try
 With dtm_funcionario do
 Begin
   cds_funcionario.Append;
   cds_funcionario.Codigo:= Funcionario.Codigo;
   cds_funcionario.Nome  := Funcionario.Nome;
   cds_funcionario.Matricula := Funcionario.Matricula;
   ...
   Except
 on E: Exception do
 msg := E.Message;
   End;

   Result := msg;

End;

=

Sds,

Romario




Clayton Bonelli escreveu:
 Duas sugestoes minhas sao:
 
 1a) Uma forma de implementacao serai voce, na interface, chamar o metodo de 
 checagem das regras de negocio, sendo que este metodo de checagem seria uma 
 funcao que retornaria uma string contendo a mensagem de erro a ser mostrada 
 para o usuario, ou NULO, caso nenhum erro tenha ocorrido.
 
 2a) Uma outra forma seria o metodo de checagem disparar uma exececao, 
 dependendo do tipo de violacao de regra de negocio ocorreu, sendo que na 
 interface voce capturaria esta mensagem de erro e faria o tratamento que 
 julgar necessario.
 
 Espero que isto ajude



-- 
 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] ou [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] AO MODERADOR

2005-04-07 Por tôpico Francisco Thiago

Concordo

- Original Message - 
From: Filipe [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 07, 2005 11:08 AM
Subject: [delphi-br] AO MODERADOR




 Naum seria legal mudar a fonte da lista para Courrier New, ou outra 
fonte que facilite a compreensão dos códigos?


  Obrigado.



  
  Filipe Geyer
  Programador
  [EMAIL PROTECTED]
  www.bludata.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] ou [EMAIL PROTECTED]

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] ou [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] Linguagem .NET

2005-04-07 Por tôpico Francisco Thiago

Existe uma apresentação na MSDN que faz um comparativo com o Dephi, feita 
pelo Mauro Santana. Só que eles usaram o Delphi 5 como comparação... E para 
vc ter uma idéia, o Mauro Santana disse que o ADO.Net se compara aos 
TUpdateSQL, só que muito melhor.

Pode até ser melhor que o uso do TUpdateSQL, só que na minha simples opinião 
de novamente em .Net, acredito que a tecnologia se assemelha mais com o 
DataSnap (Midas) do Delphi... Se é melhor, eu não sei.. ainda não usei o 
ADO.Net

[]'s

Thiago
- Original Message - 
From: Leonardo Luiz [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 07, 2005 9:19 AM
Subject: Re: [delphi-br] Linguagem .NET



 Também tem a forma de trabalhar com eventos que é muito semelhante ao
 Delphi assim como o tratamento de exceções.

 Leonardo Luiz
 Francisco Thiago escreveu:

 (Opinião de quem está conhecendo a coisa toda agora)
 Realmente, pelo pouco que eu vi desse C#, o que ele tem de Delphi é a
 OOP -
 que não é um conceito exclusivo Delphiano.
 Mas algumas outras coiasas são realmente parecidas. O ADO.Net me PARECE
 muito PARECIDO (redundante???) com o Midas do Delphi... Mas não usei o 
 ADO
 antigo para saber quem imitou quem mas se a M$ tiver mantido a
 tradição,
 agente já sabe a resposta. hehehe

 Vendo pelo lado bom, quanto mais parecido melhor, agente só aprende um
 conceito :D

 []'s

 Thiago
 - Original Message -
 From: Walter Alves Chagas Junior [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Wednesday, April 06, 2005 6:07 PM
 Subject: RES: [delphi-br] Linguagem .NET



 Sinceramente? Não vi nada de Delphi na linguagem. Vi uma linguagem mesme 
 é
 muito proxima do Java



 []s

 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia de telecomunicações
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200

 Pra que usar OOP, se existe Ctrl+C  Ctrl+V?



  -Mensagem original-
  De: Leonardo Luiz [mailto:[EMAIL PROTECTED]
  Enviada em: quarta-feira, 6 de abril de 2005 17:54
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Linguagem .NET
 
 
 
  Acredito que no geral a melhor opção é o C# porque foi projetado
  especificamente para a plataforma e é a linguagem padrão de
  grande parte
  das ferramentas desenvolvidas.
 
  Além de ser uma ótima linguagem possui muitas características
  do Delphi.
  Porem para manter compatibilidade com código fonte antigo
  vale o Pascal.
 
 
  Leonardo Luiz
 
  Robson - Salcam escreveu:
 
   Alguém sabe qual é a melhor linguagem para .Net / Delphi 2005
   Object Pascal, C#, C++ etc...
   Object Pascal continuará persistindo?
  
   valeu
  
  
   Robson Donisete Bento
   Salcam Internet  logística
   www.salcam.com.br
   Fone/Fax (19) 3422-2211
   Suporte (19) 3432-1818
  
   [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] ou [EMAIL PROTECTED]
  
  
  
   *Yahoo! Grupos, um serviço oferecido por:*
  
   *
  
 http://br.rd.yahoo.com/SIG=12a06ig0d/M=264105.3931087.6562589.1588051/D=brc
 lubs/S=2137111264:HM/EXP=1112825038/A=2361264/R=6/SIG=10v4acpp0/*http://br.s
 hopping.yahoo.com/*
 
 
 
  
  *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]
 
 mailto:[EMAIL PROTECTED]
 
  * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo! http://br.yahoo.com/info/utos.html.
 
 




 -- 
  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] ou [EMAIL PROTECTED]

 Links do Yahoo! Grupos









 [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] ou [EMAIL PROTECTED]

 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] ou [EMAIL PROTECTED]



 *Yahoo! Grupos, um serviço oferecido por:*
 http://br.rd.yahoo.com/SIG=12arcvh26/M=264379.5078783.6203979.1588051/D=brclubs/S=2137111264:HM/EXP=1112851342/A=2191897/R=0/SIG=10vqa2grn/*http://br.diversao.yahoo.com/

 

[delphi-br] [OFF TOPIC] Compactador

2005-04-07 Por tôpico Clayton Bonelli

Pessoal,

Preciso compactar, no formato ZIP, um determinado arquivo criado pelo meu 
programa Delphi 6. Esta compactacao deve ser feita de forma transparente para o 
usuario. Alguem sugere algum programa de compactacao freeware que possa ser 
ativado por um porgrama delphi? Tentei usar o PKZip, mas ele nao trabalha com 
nomes de arquivos com mais de 8 caracters.

obrigado

[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] ou [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] Realmente preciso de ajuda com a logica de dependencias

2005-04-07 Por tôpico Marcelo Silva

A lista nao aceita anexos... por favor envie para [EMAIL PROTECTED] 
  - Original Message - 
  From: Gabriel Ferrarini 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, April 07, 2005 12:22 PM
  Subject: Re: [delphi-br] Realmente preciso de ajuda com a logica de 
dependencias


  Bom, na função recursiva você pode ao invés de montar o TreeView, montar um 
Memo e passar também como parâmetro as porcentagens e os valores bases para 
fazer o cálculo. Não entendi mito bem o seu cálculo de comissões, mas acho que 
se você conseguir passar o valor base e o percentual recursivamente (como 
parâmetros da função), você consegue montar o Memo.

  Em anexo segue um exemplo bem básico para você analisar. CLique em abrir 
dataset e depois em montar memo.

  Só para constar, se você for usar o método que eu passei, seria interessante 
passar o nível do vendedor também, para você colocar espaços antes dos nomes. 
Por exemplo: Marcelo Vendedor nível 0, 0x2 espaços, João nível 1, 1x2 espaços e 
por aí vai.

  Gabriel.
- Original Message - 
From: Marcelo Silva 
To: delphi-br@yahoogrupos.com.br 
Sent: Thursday, April 07, 2005 11:05 AM
Subject: Re: [delphi-br] Realmente preciso de ajuda com a logica de 
dependencias


Acho que nao me expressei direito...
Não preciso preencher um Treeview...
Coloquei um Treeview como exemplo...
O que preciso é montar essa estrutura em um Memo para a visualização.

E junto com isso fazer  o calculo de valores tipo:

MARCELO  - 100,00 (que é o % sobre quem esta abaixo dele)
  JOAO   -  50,00 (idem)
EPTAFIO  -  40,00 (idem)
  MARCIO -  30,00 (idem)
JOAQUIM  -  20,00 (idem)
 ROBERTO -  10,00 (idem)
  FERNANDO   -   0,00 (idem)

Entendeu ?
A minha dificuldade é fazer o calculo de comissões, já que quanto ao 
treeview eu posso usar um DBTreeview da suite JEDI

*Mas estou analizando sua dica, pois parece muito boa


Marcelo Silva
Cel. 11 9693-4251
ICQ - 49224093
MSN [EMAIL PROTECTED]


  - Original Message - 
  From: Gabriel Ferrarini 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, April 07, 2005 10:20 AM
  Subject: Re: [delphi-br] Realmente preciso de ajuda com a logica de 
dependencias


  Olá, Marcelo. Pelo que você passou, acho que você poderia usar uma matriz 
de
  adjacências e fazer uma função recursiva para montar o Treeview. Seria 
algo
  assim:

  Você tem uma matriz NxN onde N é seu número de vendedores. No seu exemplo
  são 7.

  Então você poderia fazer o seguinte:

  - Após declarar a matriz e preencher todos os seus elementos com 0 faça o
  laço abaixo.

  for I := 1 to DataSet.RecordCount do
Matriz[DataSetVEN_PAI][DataSetVEN_COD] := 1;

  A matriz ficaria assim:

  1 2 3 4 5 6 7
  1  0 1 1 0 0 0 0
  2  0 0 0 0 1 0 0
  3  0 0 0 1 0 1 0
  4  0 0 0 0 0 0 0
  5  0 0 0 0 0 0 0
  6  0 0 0 0 0 0 1
  7  0 0 0 0 0 0 0

  Os campos onde tem um, são os campos que indicam que o índice da linha é 
pai
  do índice da coluna.

  Daí você pode montar uma função recursiva a partir do primeiro registro
  chamando-a assim:

  MontaTreeView(TreeView, nil, DataSetVEN_COD.AsInteger);

  Não sembro dos métodos do treeview mas creio que seja algo assim:

  procedure MontaTreeView(TreeView: TTreeView; Node: TNode; Codigo: 
integer);
  begin
  //  Aqui você cria o primeiro node,
  //  adiciona o primeiro código,
  //  verifica se ele possui filhos fazendo um for na linha correspondente 
ao
  número passado como parâmetro.
  // Se tiver você chama a função de novo, passando o mesmo treeview, o node
  criado e o código do filhos como parâmetro. Isso para cada filho
  end;

  Espero ter ajudado.

  Flw.

  Gabriel

  - Original Message -
  From: Marcelo Silva
  To: delphi-br@yahoogrupos.com.br
  Sent: Thursday, April 07, 2005 9:34 AM
  Subject: [delphi-br] Realmente preciso de ajuda com a logica de 
dependencias


  Pessoal, voces sabem que não costumo recorrer a lista dessa maneira, mas é
  que a cabeça vai fundir :-)

  Tenho uma tabela assim:

  VENDEDORES
VEN_COD (PK)
VEN_PAI
VEN_NOME

  Atravez dessa tabela preciso montar uma rotina que me traga a descendencia
  (tipo arvore) como abaixo

  CODIGO   CODIGO-PAI   NOME
  001  000  MARCELO
  002  001  JOAO
  003  001  MARCIO
  004  003  JOAQUIM
  005  002  EPITAFIO
  006  003  ROBERTO
  007  006  FERNANDO

  O resultado deve sair mais ou menos assim:

  MARCELO
JOAO
  EPTAFIO
MARCIO
  JOAQUIM
   ROBERTO
FERNANDO

  Preciso montar esse treeview na mão... 

[delphi-br] Re: Dúvida OO

2005-04-07 Por tôpico Paulo


Gosto mais da sua 2a sugestão. 

Eu teria uma Unit com a definição de uma classe TFuncionario, que, 
dentre outros, tivesse um método SetSalario(rSalario: real) que 
levantasse uma exceção quando rSalario fosse, por exemplo, negativo. 
Desta forma, a interface (ou outro cliente qualquer) que invocasse 
este método seria notificada do erro. 

Eu posso também definir na mesma unit da classe TFuncionario, tantas 
classes de exceção quantas julgue necessárias para identificar cada 
um dos erros ocorridos. 

Tô viajando ou é isso mesmo? 


--- Em delphi-br@yahoogrupos.com.br, Clayton Bonelli [EMAIL PROTECTED] 
escreveu
 Duas sugestoes minhas sao:
 
 1a) Uma forma de implementacao serai voce, na interface, chamar o 
metodo de 
 checagem das regras de negocio, sendo que este metodo de checagem 
seria uma 
 funcao que retornaria uma string contendo a mensagem de erro a ser 
mostrada 
 para o usuario, ou NULO, caso nenhum erro tenha ocorrido.
 
 2a) Uma outra forma seria o metodo de checagem disparar uma 
exececao, 
 dependendo do tipo de violacao de regra de negocio ocorreu, sendo 
que na 
 interface voce capturaria esta mensagem de erro e faria o 
tratamento que 
 julgar necessario.
 
 Espero que isto ajude
 
 
 
 - Original Message - 
 From: Paulo [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Wednesday, April 06, 2005 8:31 PM
 Subject: [delphi-br] Dúvida OO
 
 
 
 
 Sou novo em OO e nos livros que tenho lido não estou encontrando
 respostas suficientemente claras para uma questão:
 
 Pretendo desenvolver uma aplicação usando OO em 3 camadas. Em qual
 delas devo construir regras de validação para os dados de entrada: 
na
 interface, na classe de negócio ou no banco? Se estas regras forem
 definidas na classe de negócio (o que parece correto), como aviso a
 interface que ocorreu um erro?
 
 Obrigado
 
 
 
 
 
 
 
 
 
 -- 
  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] ou [EMAIL PROTECTED]
 
 Links do Yahoo! Grupos
 
 
 
 
 
 
 
 
 
 
 
 
 -- 
 No virus found in this incoming message.
 Checked by AVG Anti-Virus.
 Version: 7.0.308 / Virus Database: 266.9.3 - Release Date: 5/4/05





-- 
 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] ou [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] Re: Dúvida OO

2005-04-07 Por tôpico Clayton Bonelli

Eh isso

- Original Message - 
From: Paulo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 07, 2005 1:23 PM
Subject: [delphi-br] Re: Dúvida OO




Gosto mais da sua 2a sugestão.

Eu teria uma Unit com a definição de uma classe TFuncionario, que,
dentre outros, tivesse um método SetSalario(rSalario: real) que
levantasse uma exceção quando rSalario fosse, por exemplo, negativo.
Desta forma, a interface (ou outro cliente qualquer) que invocasse
este método seria notificada do erro.

Eu posso também definir na mesma unit da classe TFuncionario, tantas
classes de exceção quantas julgue necessárias para identificar cada
um dos erros ocorridos.

Tô viajando ou é isso mesmo?


--- Em delphi-br@yahoogrupos.com.br, Clayton Bonelli [EMAIL PROTECTED]
escreveu
 Duas sugestoes minhas sao:

 1a) Uma forma de implementacao serai voce, na interface, chamar o
metodo de
 checagem das regras de negocio, sendo que este metodo de checagem
seria uma
 funcao que retornaria uma string contendo a mensagem de erro a ser
mostrada
 para o usuario, ou NULO, caso nenhum erro tenha ocorrido.

 2a) Uma outra forma seria o metodo de checagem disparar uma
exececao,
 dependendo do tipo de violacao de regra de negocio ocorreu, sendo
que na
 interface voce capturaria esta mensagem de erro e faria o
tratamento que
 julgar necessario.

 Espero que isto ajude



 - Original Message - 
 From: Paulo [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Wednesday, April 06, 2005 8:31 PM
 Subject: [delphi-br] Dúvida OO




 Sou novo em OO e nos livros que tenho lido não estou encontrando
 respostas suficientemente claras para uma questão:

 Pretendo desenvolver uma aplicação usando OO em 3 camadas. Em qual
 delas devo construir regras de validação para os dados de entrada:
na
 interface, na classe de negócio ou no banco? Se estas regras forem
 definidas na classe de negócio (o que parece correto), como aviso a
 interface que ocorreu um erro?

 Obrigado









 -- 
  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] ou [EMAIL PROTECTED]

 Links do Yahoo! Grupos












 -- 
 No virus found in this incoming message.
 Checked by AVG Anti-Virus.
 Version: 7.0.308 / Virus Database: 266.9.3 - Release Date: 5/4/05





-- 
 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] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos












-- 
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.9.4 - Release Date: 6/4/05





-- 
 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] ou [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] Invalid Column name na consulta

2005-04-07 Por tôpico Rodrigo Brito

Boa Tarde,

Gostaria da ajuda de vcs no seguinte:

Criei uma tela de consulta  onde tenho alguns campos para filtrar
ao brir a tela  ele me traz no grid os registros cadastrados
utilizo a seguinte query para consulta   ( está query está no componente 
ADOquery)
(select * from pessoal a , cargo b, equipe c where a.ativo = 'S' and 
a.codc = b.codc and a.code = c.code)
aqui está trazendo os meus registros que estão marcados como ativo.
está OK

mas quando vou fazer algum filtro  através da procedure abaixo

procedure Tfmconspessoal.Filtrar;
begin
adoconpessoal.Active := false;
adoconpessoal.SQL.Clear;
adoconpessoal.SQL.Add ('select * from pessoal a, cargo b, equipe c where 
a.codc = b.codc and a.code = c.code and *a.ativo = s* and a.nome like 
'+ QuotedStr(edit1.Text+'%') + ' and a.sigla like 
'+QuotedStr(edit2.Text+'%') + ' and b.nome like 
'+QuotedStr(DBLookupComboBox1.Text+'%') + ' and c.nome like 
'+QuotedStr(DBLookupComboBox2.Text+'%')) ;
adoconpessoal.active := true;
and.
quando ativa o filtro  ele me da o seguinte erro *  Invalid Column name 
's'*


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

2005-04-07 Por tôpico Claudio H.Binaghi

Clayton, Boa tarde!

Use a VCLZIP,
Ela é free e vem com exemplos bons que você, com pequenas alterações podera
aproveitar.

At+
Claudio H.Binaghi
[EMAIL PROTECTED]
Fone: (011) 3289.3525 / 3289.0075





- Original Message - 
From: Clayton Bonelli [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 07, 2005 12:43 PM
Subject: [delphi-br] [OFF TOPIC] Compactador



Pessoal,

Preciso compactar, no formato ZIP, um determinado arquivo criado pelo meu
programa Delphi 6. Esta compactacao deve ser feita de forma transparente
para o usuario. Alguem sugere algum programa de compactacao freeware que
possa ser ativado por um porgrama delphi? Tentei usar o PKZip, mas ele nao
trabalha com nomes de arquivos com mais de 8 caracters.

obrigado

[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] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos











-- 
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.9.4 - Release Date: 06/04/2005




-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.9.4 - Release Date: 06/04/2005



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

2005-04-07 Por tôpico Filipe


 Olá!

  Tenho dois ponteiros:

  var
p: ^MeuForm;
Point: Pointer;
  begin
  P := @MeuForm;
Point := @p^.MeuEdit;
 
Point^.Text := 'Olá';  //  --- Aki, o valor de  Point^.Text = 
'' ...
Showmessage(Point^.Text);// Aki Tb, ou seja, ele naum está 
recebendo valor!!!


  Alguém Poderia, por favor me dar uma luz e dizer porque meu Point^.Text 
naum recebe texto?

  Obrigado.



  
  Filipe Geyer
  Programador
  [EMAIL PROTECTED]
  www.bludata.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] ou [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] Componente CodeBase Free

2005-04-07 Por tôpico Jose Carlos A Dias Filho

Pessoal Boa Tarde,
 
Estou desenvolvendo uma aplicacao que le os dados de uma Base ou diretorio e
convete para a base que desejo, isto e TXT para SQL, SQL para TXT. Bem o meu
problema aparentente e facil, so ainda nao achei. Alguem tem algum componete
free que le base CODEBASE de qualquer vaersao (Dbase 2, Dbase 3, Dbase 4,
etc)
 
Desde ja agradeço.
 
Jose Carlos A Dias Filho


  _  

De: Claudio H.Binaghi [mailto:[EMAIL PROTECTED] 
Enviada em: quinta-feira, 7 de abril de 2005 13:32
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] [OFF TOPIC] Compactador


Clayton, Boa tarde!

Use a VCLZIP,
Ela é free e vem com exemplos bons que você, com pequenas alterações podera
aproveitar.

At+
Claudio H.Binaghi
[EMAIL PROTECTED]
Fone: (011) 3289.3525 / 3289.0075





- Original Message - 
From: Clayton Bonelli [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 07, 2005 12:43 PM
Subject: [delphi-br] [OFF TOPIC] Compactador



Pessoal,

Preciso compactar, no formato ZIP, um determinado arquivo criado pelo meu
programa Delphi 6. Esta compactacao deve ser feita de forma transparente
para o usuario. Alguem sugere algum programa de compactacao freeware que
possa ser ativado por um porgrama delphi? Tentei usar o PKZip, mas ele nao
trabalha com nomes de arquivos com mais de 8 caracters.

obrigado

[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] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos











-- 
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.9.4 - Release Date: 06/04/2005




-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.9.4 - Release Date: 06/04/2005



-- 
 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] ou [EMAIL PROTECTED]




Yahoo! Grupos, um serviço oferecido por:


  http://br.i1.yimg.com/br.yimg.com/i/br/ads4/2309_lrec_yshopping2.gif


 
 
http://br.rd.yahoo.com/SIG=12aeond3o/M=264105.3931087.6562589.1588051/D=brc
lubs/S=2137111264:HM/EXP=1112898710/A=2361264/R=6/SIG=10v4acpp0/*http://br.s
hopping.yahoo.com/ 

  _  

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]
mailto:[EMAIL PROTECTED] 
  

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




[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] ou [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] Linguagem .NET

2005-04-07 Por tôpico Demian Lessa

Eu também não usei ADO.NET mas se ele seguir a mesma filosofia de 
controle de atualizações que o ADO, será muito, muito pior que qualquer 
alternativa baseada no Delphi que conheço. Muito pior ainda que outras 
alternativas do lado do servidor como o sistema de RULEs do PostgreSQL.

Sem contar que a portabilidade é inexistente...

Cordialmente,

Demian Lessa
Salvador - Brasil

Francisco Thiago wrote:
 Existe uma apresentação na MSDN que faz um comparativo com o Dephi, feita 
 pelo Mauro Santana. Só que eles usaram o Delphi 5 como comparação... E para 
 vc ter uma idéia, o Mauro Santana disse que o ADO.Net se compara aos 
 TUpdateSQL, só que muito melhor.
 
 Pode até ser melhor que o uso do TUpdateSQL, só que na minha simples opinião 
 de novamente em .Net, acredito que a tecnologia se assemelha mais com o 
 DataSnap (Midas) do Delphi... Se é melhor, eu não sei.. ainda não usei o 
 ADO.Net
 
 []'s
 
 Thiago
 - Original Message - 
 From: Leonardo Luiz [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Thursday, April 07, 2005 9:19 AM
 Subject: Re: [delphi-br] Linguagem .NET
 
 
 
Também tem a forma de trabalhar com eventos que é muito semelhante ao
Delphi assim como o tratamento de exceções.

Leonardo Luiz
Francisco Thiago escreveu:


(Opinião de quem está conhecendo a coisa toda agora)
Realmente, pelo pouco que eu vi desse C#, o que ele tem de Delphi é a
OOP -
que não é um conceito exclusivo Delphiano.
Mas algumas outras coiasas são realmente parecidas. O ADO.Net me PARECE
muito PARECIDO (redundante???) com o Midas do Delphi... Mas não usei o 
ADO
antigo para saber quem imitou quem mas se a M$ tiver mantido a
tradição,
agente já sabe a resposta. hehehe

Vendo pelo lado bom, quanto mais parecido melhor, agente só aprende um
conceito :D

[]'s

Thiago
- Original Message -
From: Walter Alves Chagas Junior [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, April 06, 2005 6:07 PM
Subject: RES: [delphi-br] Linguagem .NET



Sinceramente? Não vi nada de Delphi na linguagem. Vi uma linguagem mesme 
é
muito proxima do Java



[]s

Walter Alves Chagas Junior
Projeto e desenvolvimento
Telemont Engenharia de telecomunicações
[EMAIL PROTECTED]
Fone: (31) 3389-8215 Fax: (31) 3389-8200

Pra que usar OOP, se existe Ctrl+C  Ctrl+V?




-Mensagem original-
De: Leonardo Luiz [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 6 de abril de 2005 17:54
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Linguagem .NET



Acredito que no geral a melhor opção é o C# porque foi projetado
especificamente para a plataforma e é a linguagem padrão de
grande parte
das ferramentas desenvolvidas.

Além de ser uma ótima linguagem possui muitas características
do Delphi.
Porem para manter compatibilidade com código fonte antigo
vale o Pascal.


Leonardo Luiz

Robson - Salcam escreveu:


Alguém sabe qual é a melhor linguagem para .Net / Delphi 2005
Object Pascal, C#, C++ etc...
Object Pascal continuará persistindo?

valeu


Robson Donisete Bento
Salcam Internet  logística
www.salcam.com.br
Fone/Fax (19) 3422-2211
Suporte (19) 3432-1818

[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] ou [EMAIL PROTECTED]



*Yahoo! Grupos, um serviço oferecido por:*

*


http://br.rd.yahoo.com/SIG=12a06ig0d/M=264105.3931087.6562589.1588051/D=brc
lubs/S=2137111264:HM/EXP=1112825038/A=2361264/R=6/SIG=10v4acpp0/*http://br.s
hopping.yahoo.com/*




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


mailto:[EMAIL PROTECTED]

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






-- 
 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] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos









[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] ou [EMAIL PROTECTED]

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] ou [EMAIL PROTECTED]



*Yahoo! Grupos, um serviço 

Re: [delphi-br]

2005-04-07 Por tôpico Filipe

Demian, MeuForm é realmente a Instância do Formulário.

Tenho uma tela de consulta, que está programada para ficar referenciando ao 
Form1... mas gostaria de abri-la com o form 2

os 2 naum podem descender um do outro, fique claro isso...

entaum, os componentes deste form 1 que a tela de consulta utiliza, coloquei 
com os mesmos nomes no form 2...

Apenas, ao criar a tela de consulta pego o ponteiro(do tipo form 1) e aponto 
para o form2...  deu pra sacar?


aí naum preciso reescrever todo o código...



flw.

- Original Message - 
From: Demian Lessa [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 07, 2005 1:40 PM
Subject: Re: [delphi-br]



 Algo muito errado com seu código...

 MeuForm, para ser usado na definição var p: ^MeuForm; deve ser um
 tipo, isto é, uma definição de um type.

 Quando você atribui a P o endereço @MeuForm, o que você está querendo
 mesmo dizer??? O endereço do tipo??? Acredito que incluir parte da
 definição de MeuForm pode ajudar.

 Supondo agora, diferentemente da primeira suposição, que MeuForm é a
 instância do formulário. Então você não precisa, pra início de conversa,
 utilizar ponteiros pois objetos na verdade são referências para os dados
 e métodos do objeto em memória. Então isso é inútil.

 Tá muito louco seu código. Algumas semanas atrás postei várias
 explicações sobre ponteiros. Acho que você pode se beneficiar dessas
 mensagens.

 Cordialmente,

 Demian Lessa
 Salvador - Brasil

 Filipe wrote:

  Olá!

   Tenho dois ponteiros:

   var
 p: ^MeuForm;
 Point: Pointer;
   begin
   P := @MeuForm;
 Point := @p^.MeuEdit;

 Point^.Text := 'Olá';  //  --- Aki, o valor de 
 Point^.Text = '' ...
 Showmessage(Point^.Text);// Aki Tb, ou seja, ele naum está 
 recebendo valor!!!


   Alguém Poderia, por favor me dar uma luz e dizer porque meu 
 Point^.Text naum recebe texto?

   Obrigado.



   
   Filipe Geyer
   Programador
   [EMAIL PROTECTED]
   www.bludata.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] ou [EMAIL PROTECTED]

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

2005-04-07 Por tôpico Demian Lessa

Não vai funcionar. Você está intuitivamente tentando implementar 
polimorfismo mas, na prática, está apenas criando formulários com os 
mesmos membros- o que não caracteriza polimorfismo. A forma certa de 
fazer o que você quer é a seguinte:

1) Crie um formulário, TFormModelo, com os componentes visuais que ambos 
MeuForm1 e MeuForm2 precisam ter;

2) Crie TMeuForm1 e TMeuForm2 através de *HERANÇA VISUAL*. Se não sabe 
como fazer isso, vá em Arquivo | Novo | Guia do Seu Projeto e selecione 
o formulário FormModelo como o ancestral do seu novo form. Ah! E leia 
nos documentos do Delphi (help online e manuais) um pouco sobre o 
assunto. Declare também o seguinte:

TFormModeloClass: class of TFormModelo;

3) Na chamada a MeuForm1 e MeuForm2, basta fazer o seguinte:

procedure ChamaFormModelo(AClass: TFormModeloClass);
var
   f: TFormModelo;
begin
   f := AClass.Create(nil);
   try
 // faça o que for preciso com os componentes visuais
 // comuns aos formulários
 f.ShowModal;
   finally
 f.Free;
   end;
end;


Se não usar polimorfismo, terá que usar coisas como FindComponent e, 
possivelmente, outras coisinhas a mais.

Cordialmente,

Demian Lessa
Salvador - Brasil

Filipe wrote:
 Demian, MeuForm é realmente a Instância do Formulário.
 
 Tenho uma tela de consulta, que está programada para ficar referenciando ao 
 Form1... mas gostaria de abri-la com o form 2
 
 os 2 naum podem descender um do outro, fique claro isso...
 
 entaum, os componentes deste form 1 que a tela de consulta utiliza, coloquei 
 com os mesmos nomes no form 2...
 
 Apenas, ao criar a tela de consulta pego o ponteiro(do tipo form 1) e aponto 
 para o form2...  deu pra sacar?
 
 
 aí naum preciso reescrever todo o código...
 
 
 
 flw.


-- 
 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] ou [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] código de barras para bloqueto bancário - delphi 7 URGENTE

2005-04-07 Por tôpico José Maria


Alguem conhece algum freeware? Uso o DuckBarcode mas ele só existe 
até o Delphi 5. Se possível, me envie um exemplo em PVT.

Obrigado
Jose Maria





-- 
 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] ou [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: código de barras para bloqueto bancário - delphi 7 URGENTE

2005-04-07 Por tôpico José Maria


Tem que ser para QuickReport.

--- Em delphi-br@yahoogrupos.com.br, José Maria [EMAIL PROTECTED] 
escreveu
 
 Alguem conhece algum freeware? Uso o DuckBarcode mas ele só existe 
 até o Delphi 5. Se possível, me envie um exemplo em PVT.
 
 Obrigado
 Jose Maria





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

2005-04-07 Por tôpico Filipe

Ok, mas ainda axo que deveria funcionar, afinal de contas, tenho um ponteiro 
apontando praquele componente, e o Delphi ateh reconhece o texto dele e 
tal...



- Original Message - 
From: Demian Lessa [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 07, 2005 2:34 PM
Subject: Re: [delphi-br]



 Não vai funcionar. Você está intuitivamente tentando implementar
 polimorfismo mas, na prática, está apenas criando formulários com os
 mesmos membros- o que não caracteriza polimorfismo. A forma certa de
 fazer o que você quer é a seguinte:

 1) Crie um formulário, TFormModelo, com os componentes visuais que ambos
 MeuForm1 e MeuForm2 precisam ter;

 2) Crie TMeuForm1 e TMeuForm2 através de *HERANÇA VISUAL*. Se não sabe
 como fazer isso, vá em Arquivo | Novo | Guia do Seu Projeto e selecione
 o formulário FormModelo como o ancestral do seu novo form. Ah! E leia
 nos documentos do Delphi (help online e manuais) um pouco sobre o
 assunto. Declare também o seguinte:

 TFormModeloClass: class of TFormModelo;

 3) Na chamada a MeuForm1 e MeuForm2, basta fazer o seguinte:

 procedure ChamaFormModelo(AClass: TFormModeloClass);
 var
   f: TFormModelo;
 begin
   f := AClass.Create(nil);
   try
 // faça o que for preciso com os componentes visuais
 // comuns aos formulários
 f.ShowModal;
   finally
 f.Free;
   end;
 end;


 Se não usar polimorfismo, terá que usar coisas como FindComponent e,
 possivelmente, outras coisinhas a mais.

 Cordialmente,

 Demian Lessa
 Salvador - Brasil

 Filipe wrote:
 Demian, MeuForm é realmente a Instância do Formulário.

 Tenho uma tela de consulta, que está programada para ficar referenciando 
 ao
 Form1... mas gostaria de abri-la com o form 2

 os 2 naum podem descender um do outro, fique claro isso...

 entaum, os componentes deste form 1 que a tela de consulta utiliza, 
 coloquei
 com os mesmos nomes no form 2...

 Apenas, ao criar a tela de consulta pego o ponteiro(do tipo form 1) e 
 aponto
 para o form2...  deu pra sacar?


 aí naum preciso reescrever todo o código...



 flw.


 -- 
  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] ou [EMAIL PROTECTED]

 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] ou [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] Desabilitar Ctrl+Esc

2005-04-07 Por tôpico Fernando Faria Mariano

Estou desenvolvendo um programa pra retringir algumas funções do windows.
Alguem conhece, algum modo de desabilitar o Ctrl+Esc, ou outras teclas 
de atalho também?

Eu dei uma olhada no google, encontrei alguns códigos como este, mas não 
funcionou...
***

Para desabilitar o Ctrl+Alt+Del, o Alt+Tab e o Ctrl+Esc, utilize a 
seguinte rotina:
 
procedure TNomeDoForm.ButtonNameClick(Sender: TObject);
var
Numero : Integer;
begin
SystemParametersInfo (97, Word (True), @Numero, 0);
end;
 
E para reabilitar, utilize a rotina abaixo:
  
procedure TNomeDoForm.ButtonName2Click(Sender: TObject);
var
Numero : Integer;
begin
SystemParametersInfo(97, Word (False), @Numero, 0)

---

*Trava Contra (Alt+Tab, Ctrl+Esc, Ctrl+Alt+Del)*

var  
OldValue : LongBool;  

begin  
 {liga a trava}  
 SystemParametersInfo(97, Word(True), @OldValue, 0);  
 {desliga a trava}  
  SystemParametersInfo(97, Word(False), @OldValue, 0);  
end;  

**

Agradeço, desde ja a atenção de todos.
--
Fernando Faria Mariano
[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] ou [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] Linguagem .NET

2005-04-07 Por tôpico Walter Alves Chagas Junior

A comunidade programadora em VB, já assume que o C# será o sucessor do VB. O
curioso é que tou começando a mexer nele, e tá me parecendo muitíssimo um
java mesmo (Lembrando que o C# é oriundo mesmo do antigo J++) com algumas
particularidades.

Agora quanto as promessas, de que dá para se usar componentes de qualquer
linguagem e não sei o que e sei lá o que, isso é coisa tipicamente de
vendedores e marketeiros de software, que depois dos cartolas, são os que
mais estragam a nossa área com suas costumeiras falácias e factóides. 

 
 
 []s

 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia de telecomunicações
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200
 
 Pra que usar OOP, se existe Ctrl+C  Ctrl+V?

 

 -Mensagem original-
 De: Francisco Thiago [mailto:[EMAIL PROTECTED]
 Enviada em: quinta-feira, 7 de abril de 2005 14:58
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Linguagem .NET
 
 
 
 O Interessante do .Net é que, segundo eles prometem (Nunca 
 acredite numa 
 firma cujo nome começa com Micro e termina com Soft), dá para se usar 
 componentes de qualquer linguagem. Logo, o que está 
 disponível para o Delphi 
 estaria para C#.
 
 Mas como sempre, muito se fala, muito se promete e no 
 final. hehehe. Mas 
 por via das dúvidas estou tentando aprender C# Vai que vinga né?
 
 
 Thiago
 - Original Message - 
 From: Demian Lessa [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Thursday, April 07, 2005 1:34 PM
 Subject: Re: [delphi-br] Linguagem .NET
 
 
 
  Eu também não usei ADO.NET mas se ele seguir a mesma filosofia de
  controle de atualizações que o ADO, será muito, muito pior 
 que qualquer
  alternativa baseada no Delphi que conheço. Muito pior ainda 
 que outras
  alternativas do lado do servidor como o sistema de RULEs do 
 PostgreSQL.
 
  Sem contar que a portabilidade é inexistente...
 
  Cordialmente,
 
  Demian Lessa
  Salvador - Brasil
 
  Francisco Thiago wrote:
  Existe uma apresentação na MSDN que faz um comparativo com 
 o Dephi, feita
  pelo Mauro Santana. Só que eles usaram o Delphi 5 como 
 comparação... E 
  para
  vc ter uma idéia, o Mauro Santana disse que o ADO.Net se 
 compara aos
  TUpdateSQL, só que muito melhor.
 
  Pode até ser melhor que o uso do TUpdateSQL, só que na 
 minha simples 
  opinião
  de novamente em .Net, acredito que a tecnologia se 
 assemelha mais com o
  DataSnap (Midas) do Delphi... Se é melhor, eu não sei.. 
 ainda não usei o
  ADO.Net
 
  []'s
 
  Thiago
  - Original Message - 
  From: Leonardo Luiz [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Thursday, April 07, 2005 9:19 AM
  Subject: Re: [delphi-br] Linguagem .NET
 
 
 
 Também tem a forma de trabalhar com eventos que é muito 
 semelhante ao
 Delphi assim como o tratamento de exceções.
 
 Leonardo Luiz
 Francisco Thiago escreveu:
 
 
 (Opinião de quem está conhecendo a coisa toda agora)
 Realmente, pelo pouco que eu vi desse C#, o que ele tem 
 de Delphi é a
 OOP -
 que não é um conceito exclusivo Delphiano.
 Mas algumas outras coiasas são realmente parecidas. O 
 ADO.Net me PARECE
 muito PARECIDO (redundante???) com o Midas do Delphi... 
 Mas não usei o
 ADO
 antigo para saber quem imitou quem mas se a M$ tiver mantido a
 tradição,
 agente já sabe a resposta. hehehe
 
 Vendo pelo lado bom, quanto mais parecido melhor, agente 
 só aprende um
 conceito :D
 
 []'s
 
 Thiago
 - Original Message -
 From: Walter Alves Chagas Junior [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Wednesday, April 06, 2005 6:07 PM
 Subject: RES: [delphi-br] Linguagem .NET
 
 
 
 Sinceramente? Não vi nada de Delphi na linguagem. Vi uma 
 linguagem mesme
 é
 muito proxima do Java
 
 
 
 []s
 
 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia de telecomunicações
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200
 
 Pra que usar OOP, se existe Ctrl+C  Ctrl+V?
 
 
 
 
 -Mensagem original-
 De: Leonardo Luiz [mailto:[EMAIL PROTECTED]
 Enviada em: quarta-feira, 6 de abril de 2005 17:54
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Linguagem .NET
 
 
 
 Acredito que no geral a melhor opção é o C# porque foi projetado
 especificamente para a plataforma e é a linguagem padrão de
 grande parte
 das ferramentas desenvolvidas.
 
 Além de ser uma ótima linguagem possui muitas características
 do Delphi.
 Porem para manter compatibilidade com código fonte antigo
 vale o Pascal.
 
 
 Leonardo Luiz
 
 Robson - Salcam escreveu:
 
 
 Alguém sabe qual é a melhor linguagem para .Net / Delphi 2005
 Object Pascal, C#, C++ etc...
 Object Pascal continuará persistindo?
 
 valeu
 
 
 Robson Donisete Bento
 Salcam Internet  logística
 www.salcam.com.br
 Fone/Fax (19) 3422-2211
 Suporte (19) 3432-1818
 
 [As partes desta mensagem que não continham texto foram 
 removidas]
 
 
 
 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 Para ver as 

[delphi-br] With lock - IBO 4.2.i

2005-04-07 Por tôpico Dimas


Quem utiliza IBO 4.2.I..  que ja tenha utilizado Travamento 
Pessimista, (for update with lock)
por favor, entrar em contato comigo em particular. Estou precisando 
de alguns
exclarecimentos...
Utilizo Delphi 7 e FireBird 1.5...
 
Obrigado.
 
[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] ou [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] Linguagem .NET

2005-04-07 Por tôpico Demian Lessa

Pessoal do .NET, sugiro que leiam o artigo indicado pelo Josir ontem à 
noite. Muito bom para abrir os olhos e alertar aqueles que pretendem 
trilhar o caminho .NET- ou pior, concentrar *todos* os seus esforços 
nesse ambiente. ;)

Aqui vai o link novamente:

http://www.ddj.com/documents/s=9211/ddj050201dnn/

.NET hoje é irreal na maioria esmagadora dos ambientes.

Os programadores (não seriam usuários???) do VB jamais irão migrar em 
quantidade significativa para o C# porque o paradigma é absolutamente outro!

Quanto às linguagens, C# é baseada em vários dos pontos positivos do 
Java e tantos outros do Borland Object Pascal (entenda-se Delphi). O 
líder do projeto do C# foi o Anders Hejlsberg que, antes de mudar-se 
para a Microsoft, foi um dos engenheiros responsáveis pelo Delphi. Daí, 
tirem suas conclusões.

Cordialmente,

Demian Lessa
Salvador - Brasil

Francisco Thiago wrote:
 O Interessante do .Net é que, segundo eles prometem (Nunca acredite numa 
 firma cujo nome começa com Micro e termina com Soft), dá para se usar 
 componentes de qualquer linguagem. Logo, o que está disponível para o Delphi 
 estaria para C#.
 
 Mas como sempre, muito se fala, muito se promete e no final. hehehe. Mas 
 por via das dúvidas estou tentando aprender C# Vai que vinga né?
 
 
 Thiago
 - Original Message - 
 From: Demian Lessa [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Thursday, April 07, 2005 1:34 PM
 Subject: Re: [delphi-br] Linguagem .NET
 
 
 
Eu também não usei ADO.NET mas se ele seguir a mesma filosofia de
controle de atualizações que o ADO, será muito, muito pior que qualquer
alternativa baseada no Delphi que conheço. Muito pior ainda que outras
alternativas do lado do servidor como o sistema de RULEs do PostgreSQL.

Sem contar que a portabilidade é inexistente...

Cordialmente,

Demian Lessa
Salvador - Brasil


-- 
 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] ou [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] Linguagem .NET

2005-04-07 Por tôpico Filipe

Realmente... Malditas falácias e factóides...

hehehe...


- Original Message - 
From: Walter Alves Chagas Junior [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 07, 2005 3:10 PM
Subject: RES: [delphi-br] Linguagem .NET



A comunidade programadora em VB, já assume que o C# será o sucessor do VB. O
curioso é que tou começando a mexer nele, e tá me parecendo muitíssimo um
java mesmo (Lembrando que o C# é oriundo mesmo do antigo J++) com algumas
particularidades.

Agora quanto as promessas, de que dá para se usar componentes de qualquer
linguagem e não sei o que e sei lá o que, isso é coisa tipicamente de
vendedores e marketeiros de software, que depois dos cartolas, são os que
mais estragam a nossa área com suas costumeiras falácias e factóides.



 []s

 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia de telecomunicações
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200

 Pra que usar OOP, se existe Ctrl+C  Ctrl+V?



 -Mensagem original-
 De: Francisco Thiago [mailto:[EMAIL PROTECTED]
 Enviada em: quinta-feira, 7 de abril de 2005 14:58
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Linguagem .NET



 O Interessante do .Net é que, segundo eles prometem (Nunca
 acredite numa
 firma cujo nome começa com Micro e termina com Soft), dá para se usar
 componentes de qualquer linguagem. Logo, o que está
 disponível para o Delphi
 estaria para C#.

 Mas como sempre, muito se fala, muito se promete e no
 final. hehehe. Mas
 por via das dúvidas estou tentando aprender C# Vai que vinga né?


 Thiago
 - Original Message - 
 From: Demian Lessa [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Thursday, April 07, 2005 1:34 PM
 Subject: Re: [delphi-br] Linguagem .NET


 
  Eu também não usei ADO.NET mas se ele seguir a mesma filosofia de
  controle de atualizações que o ADO, será muito, muito pior
 que qualquer
  alternativa baseada no Delphi que conheço. Muito pior ainda
 que outras
  alternativas do lado do servidor como o sistema de RULEs do
 PostgreSQL.
 
  Sem contar que a portabilidade é inexistente...
 
  Cordialmente,
 
  Demian Lessa
  Salvador - Brasil
 
  Francisco Thiago wrote:
  Existe uma apresentação na MSDN que faz um comparativo com
 o Dephi, feita
  pelo Mauro Santana. Só que eles usaram o Delphi 5 como
 comparação... E
  para
  vc ter uma idéia, o Mauro Santana disse que o ADO.Net se
 compara aos
  TUpdateSQL, só que muito melhor.
 
  Pode até ser melhor que o uso do TUpdateSQL, só que na
 minha simples
  opinião
  de novamente em .Net, acredito que a tecnologia se
 assemelha mais com o
  DataSnap (Midas) do Delphi... Se é melhor, eu não sei..
 ainda não usei o
  ADO.Net
 
  []'s
 
  Thiago
  - Original Message - 
  From: Leonardo Luiz [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Thursday, April 07, 2005 9:19 AM
  Subject: Re: [delphi-br] Linguagem .NET
 
 
 
 Também tem a forma de trabalhar com eventos que é muito
 semelhante ao
 Delphi assim como o tratamento de exceções.
 
 Leonardo Luiz
 Francisco Thiago escreveu:
 
 
 (Opinião de quem está conhecendo a coisa toda agora)
 Realmente, pelo pouco que eu vi desse C#, o que ele tem
 de Delphi é a
 OOP -
 que não é um conceito exclusivo Delphiano.
 Mas algumas outras coiasas são realmente parecidas. O
 ADO.Net me PARECE
 muito PARECIDO (redundante???) com o Midas do Delphi...
 Mas não usei o
 ADO
 antigo para saber quem imitou quem mas se a M$ tiver mantido a
 tradição,
 agente já sabe a resposta. hehehe
 
 Vendo pelo lado bom, quanto mais parecido melhor, agente
 só aprende um
 conceito :D
 
 []'s
 
 Thiago
 - Original Message -
 From: Walter Alves Chagas Junior [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Wednesday, April 06, 2005 6:07 PM
 Subject: RES: [delphi-br] Linguagem .NET
 
 
 
 Sinceramente? Não vi nada de Delphi na linguagem. Vi uma
 linguagem mesme
 é
 muito proxima do Java
 
 
 
 []s
 
 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia de telecomunicações
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200
 
 Pra que usar OOP, se existe Ctrl+C  Ctrl+V?
 
 
 
 
 -Mensagem original-
 De: Leonardo Luiz [mailto:[EMAIL PROTECTED]
 Enviada em: quarta-feira, 6 de abril de 2005 17:54
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Linguagem .NET
 
 
 
 Acredito que no geral a melhor opção é o C# porque foi projetado
 especificamente para a plataforma e é a linguagem padrão de
 grande parte
 das ferramentas desenvolvidas.
 
 Além de ser uma ótima linguagem possui muitas características
 do Delphi.
 Porem para manter compatibilidade com código fonte antigo
 vale o Pascal.
 
 
 Leonardo Luiz
 
 Robson - Salcam escreveu:
 
 
 Alguém sabe qual é a melhor linguagem para .Net / Delphi 2005
 Object Pascal, C#, C++ etc...
 Object Pascal continuará persistindo?
 
 valeu
 
 
 Robson Donisete Bento
 Salcam Internet  logística
 

[delphi-br] Re: Table e Query, + data

2005-04-07 Por tôpico lyanagomes




   Eh soh vc ligar o o dbgrid no source do formulario q vc quer que 
abra e o source do formulario vc liga no datamodule.
  E nao esqueça de colocar no evento duplo click do dbgrid para abrir 
o formulario em forma de edição.





-- 
 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] ou [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] Fw: Servidor não existente

2005-04-07 Por tôpico Catiúscia A. Barrilli da Cruz

 Estou tendo um probleminha com o sql server 2000 e gostaria da ajuda de vcs
..
 
Tenho um sistema rodando numa concessionária de carros (feito em Delphi 7) e
hoje, quando os
usuários tentaram acessar o sistema, o sql deu essa mensagem: SERVIDOR
INEXISTENTE OU ACESO NEGADO.
O curioso é q o sistema traz todos os dados... é possível cadastrar, alterar
 excluir e emitir relatórios.
 
O sistema está rodando normalmente até hoje à tarde. Nas mákinas o sistema
operacional é XP ou 98.
 
 
Gostria de saber porque isso aconteceu... o que poderia ocasionar esse erro
?
 
Grata
 
 
Cati
 

[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] ou [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] código de barras para bloqueto bancário - delphi 7 URGENTE

2005-04-07 Por tôpico thiago castro

Oi José, eu uso esse código aqui!!! Gera em um QrImage um código de barras 
2de5intercalado Normalmente usado para bancos... Qualquer dúvida entre em 
contato em PVT...
 
Procedure TImprimeCarteirinha.CriaCodigo(Cod : String; Imagem : TCanvas);
Const
  digitos : array['0'..'9'] of string[5]= ('00110',
  '10001',
  '01001',
  '11000',
  '00101',
  '10100',
  '01100',
  '00011',
  '10010',
  '01010');
Var
  Numero : String;
  Cod1 : Array[1..1000] Of Char;
  Cod2 : Array[1..1000] Of Char;
  Codigo : Array[1..1000] Of Char;
  Digito : String;
  c1,c2 : Integer;
  x,y,z,h : LongInt;
  a,b,c,d : TPoint;
  I : Boolean;
Begin
  Numero := Cod;
  For x := 1 to 1000 Do
  Begin
Cod1 [x] := #0;
Cod2 [x] := #0;
Codigo[x] := #0;
  End;
  c1 := 1;
  c2 := 1;
  x := 1;
  For y := 1 to Length(Numero) div 2 do
  Begin
Digito := Digitos[Numero[x ]];
For z := 1 to 5 do
Begin
  Cod1[c1] := Digito[z];
  Inc(c1);
End;
Digito := Digitos[Numero[x+1]];
For z := 1 to 5 do
Begin
  Cod2[c2] := Digito[z];
  Inc(c2);
End;
Inc(x,2);
  End;
  y := 5;
  Codigo[1] := '0'; 
  Codigo[2] := '0';
  Codigo[3] := '0';
  Codigo[4] := '0'; { Inicio do Codigo }
  For x := 1 to c1-1 do
  begin
Codigo[y] := Cod1[x]; Inc(y);
Codigo[y] := Cod2[x]; Inc(y);
  end;
  Codigo[y] := '1'; Inc(y); { Final do Codigo }
  Codigo[y] := '0'; Inc(y);
  Codigo[y] := '0';
  Imagem.Pen .Width := 1;
  Imagem.Brush.Color := ClWhite;
  Imagem.Pen .Color := ClWhite;
  a.x := 1; a.y := 0;
  b.x := 1; b.y := 79;
  c.x := 2000; c.y := 79;
  d.x := 2000; d.y := 0;
  Imagem.Polygon([a,b,c,d]);
  Imagem.Brush.Color := ClBlack;
  Imagem.Pen .Color := ClBlack;
  x := 0;
  i := True;
  for y:=1 to 1000 do
  begin
If Codigo[y]  #0 Then
Begin
  If Codigo[y] = '0' then
h := 2
  Else
h := 4;
  a.x := x; a.y := 0;
  b.x := x; b.y := 79;
  c.x := x+h-1; c.y := 79;
  d.x := x+h-1; d.y := 0;
  If i Then
Imagem.Polygon([a,b,c,d]);
  i := Not(i);
  x := x + h;
End;
  end;
end;

José Maria [EMAIL PROTECTED] wrote:

Alguem conhece algum freeware? Uso o DuckBarcode mas ele só existe 
até o Delphi 5. Se possível, me envie um exemplo em PVT.

Obrigado
Jose Maria





-- 
 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] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE
 

-
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 Termos do Serviço do 
Yahoo!. 


__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

[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] ou [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] Stringlist em Banco de Dados...

2005-04-07 Por tôpico Eduardo Buffara Junior

Ola pessoal...

Estou com a seguinte duvida

Tenho um componente que gera uma stringlist com 6310 linhas...preciso colokar 
esse valor num banco de dados...ah um jeito mais facil???ou eu terei q gerar um 
laço para carregar isso numa string e assim poder colokar no banco/???

Atenciosamente

Eduardo Buffara Junior - Programador Delphi
[EMAIL PROTECTED]
(41) 9149.5756 - Paranaguá - PR

[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] ou [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 consulta Consulta

2005-04-07 Por tôpico Rodrigo Brito

Boa Tarde.
 se consulto através do componente adoquery  funciona
o query está assim:  (select * from pessoal a , cargo b, equipe c where 
a.ativo = 'S' and a.codc = b.codc and a.code = c.code)

quendo consulto através de uma procedure da erro de INVALID COLUMNS NAME 'S'

select * from pessoal a, cargo b, equipe c where a.codc = b.codc and 
a.code = c.code and a.ativo = S

alguem sabe pq?



-- 
 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] ou [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] Mandar o conteúdo dos DBEdits para um novo registro

2005-04-07 Por tôpico Pop


Meu irmào, primeiro crie um novo registro em branco (append) depois mande o 
conteudo do edit para o registro em branco (post).

Espero ter ajudado
Julio Reinecken
__Vip.Net
Multimídia

Automação Industrial, Integração eletro-eletrônica,
Projetos personalizados, programação para os principais ambientes (DOS, 
WINDOWS, LINUX E WEB)

MSN: [EMAIL PROTECTED]

Visite nosso site:  www.vipnet.fronteiradapaz.com
Conheça nossa fronteira www.fronteiradapaz.com
  - Original Message - 
  From: Walter Alves Chagas Junior 
  Sent: Wednesday, April 06, 2005 9:10 PM
  Subject: [delphi-br] Mandar o conteúdo dos DBEdits para um novo registro



  Pessoal, to com a seguinte situação aqui:

  Dei um Edit em um ClientDataset mas eu quero mandar o conteúdo dos DBEdits
  para um novo registro e não atualizar o registro atual. Há alguma maneira de
  fazer isto? Ou seja, pega os dados do registro atual e manda eles para um
  novo registro ao invés de gravá-los no registro corrente.

  Eu uso a combinação ADOQuery - TDatasetProvider - TClientDataSet -
  TDataSource.


  []s

  Walter Alves Chagas Junior
  Projeto e desenvolvimento
  Telemont Engenharia de telecomunicações
  [EMAIL PROTECTED]
  Fone: (31) 3389-8215 Fax: (31) 3389-8200

  Pra que usar OOP, se existe Ctrl+C  Ctrl+V?




  [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] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



[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] ou [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] Migrar do 3 para 5

2005-04-07 Por tôpico eduardo.sic


a princípio voce nao precisa fazer nada, somente abrir o projeto e recompilar, 
agora se voce tem componentes do Delphi 3 para o 5 ja e outra coisa.. sugestão, 
migre para o Delphi 7.



=
De:lyanagomes [EMAIL PROTECTED]
Para:delphi-br@yahoogrupos.com.br
Assunto:[delphi-br] Migrar do 3 para 5




Alguém sabe como faço para migrar um projeto do
delphi 3 para o 5





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA
MENSAGEM 

Para ver as mensagens antigas, acesse:

http://br.groups.yahoo.com/group/delphi-br/messa
ges

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

http://br.groups.yahoo.com/group/delphi-br/


http://br.yahoo.com/info/utos.html












-- 
 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] ou [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 de Esc num form

2005-04-07 Por tôpico Omar Marques


Salve...
 
Galera..
 
Estou passando por um problema e tenho quase absoluta certeza que se refere a 
código. 
 
Abro um form de Vendas. O foco vai direto para um combobox de pesquisa.
 
Mas quando teclo ESC para sair do form, o sistema perde o foco e a barra 
Iniciar do windows é ativada, como se eu tivesse pressionado a tecla do 
windows. Algo estranho. Parece-me algum efeto colateral..
 
Alguém já passou por isso ?
 
Tenho código que desabilita o Alt+Tab, Ctrl+Esc, etc. mas até desabilitei este 
código e testei para ver se o bug desaparecia e nada resolvido.
 
Geralmente, este defeito surge depois de eu entrar uma ou duas vezes no form e 
sair com esc.

Obrigado a compreensão
Omar



-
Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador 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] ou [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] Proteção contra a pirataria

2005-04-07 Por tôpico Paulo Cassiano


Salve!

[Talvez alguns já tenham lido esta dúvida em algum forum, ou mesmo aqui].

Gostaria de saber como proteger meu software contra a pirataria. Tenho
lido sobre o assunto, e já sei que é possível, por exemplo, criar um
arquivo/diretório no HD para verificação; Obter o serial do HD/BIOS
etc.

O que ainda não entendi é como esses recursos podem, por exemplo,
impedir que um determinado usuário duplique o CD do programa e
instale em outros micros (Duplicar a mídia nem é O problema, e sim
instalar em outro micro...).

Aliás, essa é a minha principal dúvida: que tipo de verificação de
segurança posso implementar para que meu software só rode em um
determinado micro?

Aguardo um retorno do grupo. Dicas de livros e links também são bem vindas.

Atenciosamente,

Paulo Cassiano.





-- 
 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] ou [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] COTA DE IMPRESSÃO

2005-04-07 Por tôpico Fernanda Forbici


Acho que é meio complicado desenvolver um sistema como esse, mas um caminho
seria vc verificar a pasta de spool da impressora de tempos em tempos, e
verificar quais arquivos estao na fila d impressão e de que usuário é esse
arquivo.

Fernanda Forbici
- Original Message -
From: Marcelo Rodrigues [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, April 06, 2005 10:47 AM
Subject: [delphi-br] COTA DE IMPRESSÃO



 Olá,

 Já fiz algumas buscas no Google sem sucesso, por acaso alguém sabe como
 contabilizar a quantidade de vezes que um usuário do Windows envia um
 documento para a fila de impressão? Como pegar estar informações?

 Preciso desenvolver um sistema para gerenciar as cotas de impressão de
 usuários.

 Qualquer ajuda será bem vinda!


 []`s

 Marcelo




 --
  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] ou [EMAIL PROTECTED]

 Links do Yahoo! Grupos












 --
 No virus found in this incoming message.
 Checked by AVG Anti-Virus.
 Version: 7.0.308 / Virus Database: 266.9.3 - Release Date: 05/04/2005





-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.9.4 - Release Date: 06/04/2005






-- 
 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] ou [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] Mandar o conteúdo dos DBEdits para um novo registro

2005-04-07 Por tôpico Walter Alves Chagas Junior

É de DBEdit e não de Edit. Se voce der um append no banco, os DBEdits todos
ficam em branco.

 
 
 []s

 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia de telecomunicações
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200
 
 Pra que usar OOP, se existe Ctrl+C  Ctrl+V?

 

 -Mensagem original-
 De: Pop [mailto:[EMAIL PROTECTED]
 Enviada em: quarta-feira, 6 de abril de 2005 21:37
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Mandar o conteúdo dos DBEdits para um novo
 registro
 
 
 
 
 Meu irmào, primeiro crie um novo registro em branco (append) 
 depois mande o conteudo do edit para o registro em branco (post).
 
 Espero ter ajudado
 Julio Reinecken
 __Vip.Net
 Multimídia
 
 Automação Industrial, Integração eletro-eletrônica,
 Projetos personalizados, programação para os principais 
 ambientes (DOS, WINDOWS, LINUX E WEB)
 
 MSN: [EMAIL PROTECTED]
 
 Visite nosso site:  www.vipnet.fronteiradapaz.com
 Conheça nossa fronteira www.fronteiradapaz.com
   - Original Message - 
   From: Walter Alves Chagas Junior 
   Sent: Wednesday, April 06, 2005 9:10 PM
   Subject: [delphi-br] Mandar o conteúdo dos DBEdits para um 
 novo registro
 
 
 
   Pessoal, to com a seguinte situação aqui:
 
   Dei um Edit em um ClientDataset mas eu quero mandar o 
 conteúdo dos DBEdits
   para um novo registro e não atualizar o registro atual. Há 
 alguma maneira de
   fazer isto? Ou seja, pega os dados do registro atual e 
 manda eles para um
   novo registro ao invés de gravá-los no registro corrente.
 
   Eu uso a combinação ADOQuery - TDatasetProvider - 
 TClientDataSet -
   TDataSource.
 
 
   []s
 
   Walter Alves Chagas Junior
   Projeto e desenvolvimento
   Telemont Engenharia de telecomunicações
   [EMAIL PROTECTED]
   Fone: (31) 3389-8215 Fax: (31) 3389-8200
 
   Pra que usar OOP, se existe Ctrl+C  Ctrl+V?
 
 
 
 
   [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] ou [EMAIL PROTECTED]
 
 
 
 Yahoo! Grupos, um serviço oferecido por: 
  
  
   
  

 
 
 --
 
   Links do Yahoo! Grupos
 
 a.. Para visitar o site do seu grupo na web, acesse:
 http://br.groups.yahoo.com/group/delphi-br/
   
 b.. Para sair deste grupo, envie um e-mail para:
 [EMAIL PROTECTED]
   
 c.. O uso que você faz do Yahoo! Grupos está sujeito aos 
 Termos do Serviço do Yahoo!. 
 
 
 
 [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] ou [EMAIL PROTECTED]
  
 Links do Yahoo! Grupos
 
 
 
 
  
 
 
 


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

2005-04-07 Por tôpico gracieli_ribeiro



Olá queridos,
Boa Tarde, gostaria de saber se alguém poderia me ajudar.É o
seguinte:
Preciso capturar todos os dados visíveis ao comando IPCONFIG no MS-
DOS...Alguém saberia qual comando uso no delphi para pegar essas 
informações?ou teria algum artigo ou documentação q falasse
sobre 
isso?

Obrigada , Gracieli








-- 
 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] ou [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] Gerar os SQL's do IBDataset em tempo de execução.....

2005-04-07 Por tôpico thiagoalvesdelima


e ae rapaziada, blz
uso os componentes do interbase no Delphi 7, e uso o componente 
IBDataSet para fazer inserção, alteração, e deleção no banco... 
o que eu gostaria de saber é se é possível gerar os Sql's de 
inserção, alteração, e deleção em tempo de execução automaticamente, 
como se clica-se em botão direito, DataSet Editor/Generate SQL, 
pq estou criando as querys em tempo de execução...

obrigao...

[]'s Thiago







-- 
 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] ou [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] Gerar os SQL's do IBDataset em tempo de execução.....

2005-04-07 Por tôpico thiagoalvesdelima


e ae rapaziada, blz
uso os componentes do interbase no Delphi 7, e uso o componente 
IBDataSet para fazer inserção, alteração, e deleção no banco... 
o que eu gostaria de saber é se é possível gerar os Sql's de 
inserção, alteração, e deleção em tempo de execução automaticamente, 
como se clica-se em botão direito, DataSet Editor/Generate SQL, 
pq estou criando as querys em tempo de execução...

obrigao...

[]'s Thiago







-- 
 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] ou [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] Enviar Email - com Indy

2005-04-07 Por tôpico Elcio Domingos Ramos

Boa tarde galera
 
Tenho uma rotina para enviar e-mails com components Indy funciona muito bem 
para e-mails internos, porem externos não consegue enviar por causa da 
autenticação, o protocolo aqui e o GSSAPI e pelo que entendi na pagina os 
componentes Indy não tem suporte para este protocolo.
Alguém já passou por isso ou sabe de algum componente FREE que eu possa usar 
para este protocolo?
 
Elcio Domingos Ramos mailto:[EMAIL PROTECTED] 
DEMAG Cranes  Components Ltda.
Planejamento Industrial 
Fone: (11)2145-7823 - Fax : (11)2145-7910
 


[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] ou [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] Dúivida com Data

2005-04-07 Por tôpico Rodrigo Brito

Boa Tarde,

Tenho uma tabela que tem o campo Data  está como DateTime
quado gravo dados nesse campo faço assim:

adocadregistros.FieldByName('data').Value := DateTimePicker1.Date;

só que está gravando com a hora tb..
como posso fazer para a hora não aparecer?


-- 
 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] ou [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] Stringlist em Banco de Dados...

2005-04-07 Por tôpico Oséias Ferreira

-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1

Grava num Blob, ou text.

- --
Oséias Ferreira.

Eduardo Buffara Junior escreveu:
 Ola pessoal...
 
 Estou com a seguinte duvida
 
 Tenho um componente que gera uma stringlist com 6310 linhas...

 preciso colokar esse valor num banco de dados...ah um jeito mais facil???ou 
 eu terei q gerar um laço para carregar isso numa string e assim poder colokar 
 no banco/???

-BEGIN PGP SIGNATURE-
Version: GnuPG v1.4.1 (MingW32)

iD8DBQFCVZuMHKYDdGAIQkURAkiaAJ9noR50o+HVgXYbsvsSVkKFxlHuOACcCK6c
oJWiaPFkqnVmY9O0WkWprVw=
=T3LM
-END PGP SIGNATURE-



-- 
 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] ou [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] Mandar o conteúdo dos DBEdits para um novo registro

2005-04-07 Por tôpico Filipe

grave em variáveis...

ou numa tabela temporaria, de append, recupere os dados, Post.

- Original Message - 
From: Walter Alves Chagas Junior [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 07, 2005 4:17 PM
Subject: RES: [delphi-br] Mandar o conteúdo dos DBEdits para um novo 
registro



É de DBEdit e não de Edit. Se voce der um append no banco, os DBEdits todos
ficam em branco.



 []s

 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia de telecomunicações
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200

 Pra que usar OOP, se existe Ctrl+C  Ctrl+V?



 -Mensagem original-
 De: Pop [mailto:[EMAIL PROTECTED]
 Enviada em: quarta-feira, 6 de abril de 2005 21:37
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Mandar o conteúdo dos DBEdits para um novo
 registro




 Meu irmào, primeiro crie um novo registro em branco (append)
 depois mande o conteudo do edit para o registro em branco (post).

 Espero ter ajudado
 Julio Reinecken
 __Vip.Net
 Multimídia

 Automação Industrial, Integração eletro-eletrônica,
 Projetos personalizados, programação para os principais
 ambientes (DOS, WINDOWS, LINUX E WEB)

 MSN: [EMAIL PROTECTED]

 Visite nosso site:  www.vipnet.fronteiradapaz.com
 Conheça nossa fronteira www.fronteiradapaz.com
   - Original Message - 
   From: Walter Alves Chagas Junior
   Sent: Wednesday, April 06, 2005 9:10 PM
   Subject: [delphi-br] Mandar o conteúdo dos DBEdits para um
 novo registro



   Pessoal, to com a seguinte situação aqui:

   Dei um Edit em um ClientDataset mas eu quero mandar o
 conteúdo dos DBEdits
   para um novo registro e não atualizar o registro atual. Há
 alguma maneira de
   fazer isto? Ou seja, pega os dados do registro atual e
 manda eles para um
   novo registro ao invés de gravá-los no registro corrente.

   Eu uso a combinação ADOQuery - TDatasetProvider -
 TClientDataSet -
   TDataSource.


   []s

   Walter Alves Chagas Junior
   Projeto e desenvolvimento
   Telemont Engenharia de telecomunicações
   [EMAIL PROTECTED]
   Fone: (31) 3389-8215 Fax: (31) 3389-8200

   Pra que usar OOP, se existe Ctrl+C  Ctrl+V?




   [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] ou [EMAIL PROTECTED]



 Yahoo! Grupos, um serviço oferecido por:







 --
 
   Links do Yahoo! Grupos

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

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

 c.. O uso que você faz do Yahoo! Grupos está sujeito aos
 Termos do Serviço do Yahoo!.



 [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] ou [EMAIL PROTECTED]

 Links do Yahoo! Grupos










[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] ou [EMAIL PROTECTED]

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] ou [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] verificar se uma tabela esta em um formulario

2005-04-07 Por tôpico Fabio Antonelli

Boa noite a todos.
 
Estou construindo um componente de codigo de barras e preciso verificar se em 
um determinado formulario existe uma tabela, coisa que não estou conseguindo.
Alguém pode me ajudar.
Desde já agradeço a atenção.
Saudações,
Bill.

__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

[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] ou [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] [Fwd: Dúivida com Data]

2005-04-07 Por tôpico Rodrigo Brito

Boa Tarde,

Tenho uma tabela que tem o campo Data  está como DateTime
quado gravo dados nesse campo faço assim:

adocadregistros.FieldByName('data').Value := DateTimePicker1.Date;

só que está gravando com a hora tb..
como posso fazer para a hora não aparecer?




-- 
 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] ou [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] Ordenando pelo GRID

2005-04-07 Por tôpico Rodrigo Brito

Através de uma query os registros aparecem no grid , como faço para 
ordenar através do grid

ex:  no grid   tenhonome e cargo
se clicar em nome a ordenação se dar por nome se em cargo ordena pelo cargo
att,

Rodrigo Brito


-- 
 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] ou [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] [Fwd: Dúivida com Data]

2005-04-07 Por tôpico Demian Lessa

Algumas alternativas:

   usar Trunc(DateTimePicker1.Date)
   usar uma máscara de exibição no campo que não exiba a hora
   usar um campo no banco que não tenha hora, apenas data

Qual o melhor? Eu utilizaria a máscara de exibição e deixaria gravando a 
hora...

Cordialmente,

Demian Lessa
Salvador - Brasil


Rodrigo Brito wrote:
 Boa Tarde,
 
 Tenho uma tabela que tem o campo Data  está como DateTime
 quado gravo dados nesse campo faço assim:
 
 adocadregistros.FieldByName('data').Value := DateTimePicker1.Date;
 
 só que está gravando com a hora tb..
 como posso fazer para a hora não aparecer?
 
 
 
 


-- 
 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] ou [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] Gravando dados binarios no registro do windows

2005-04-07 Por tôpico Fernando Faria Mariano

Olá pessoal tudo bem?

Estou tentando gravar um dado binario no registro do windows. O código é 
o que segue abaixo:

procedure TForm1.Button2Click(Sender: TObject);
var
reg: TRegistry;
dado: string[69];
begin
reg:=TRegistry.Create;
dado:='00,00,00,00,00,00,00,00,03,00,00,00,00,00,5b,e0,00,00,5c,e0,\00,00,00';
reg.RootKey:=HKEY_LOCAL_MACHINE;
reg.OpenKey('\Software\Teste',true);
reg.WriteBinaryData('Dados',dado,Sizeof(dado));

Ele está dando a seguinte mensagem de erro na hora da compilação:

Imcompatibles types: 'Tbytes' and 'ShorString'

Agradeço desde ja a atenção de todos.
--
Fernando Faria Mariano
[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] ou [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] AO MODERADOR

2005-04-07 Por tôpico Marcelo Almeida

Filipe wrote:

 Naum seria legal mudar a fonte da lista para Courrier New, ou outra fonte 
 que facilite a compreensão dos códigos?
  


1 - nem todos os computadores possuem fonte currier new.
2 - não tem como o moderador mudar isto.
3 - isto não é problema da lista, é problema do leitor de email.





-- 
 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] ou [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] Mandar o conteúdo dos DBEdits para um novo registro

2005-04-07 Por tôpico Rodrigo Othavio Farias


Walter, vc quer uma rotina generica para fazer isso?

Pq automatico nao tem nada pronto, uma ideia seria criar uma outra instancia 
TTable ou TQuery (nao sei o que vc ta usando) dai vc teria duas instancias 
da mesma tabela, dai é só fazer um loop nos campos ja que a ordem deles é a 
mesma nas duas instancias e gravar o registro novo, daria pra montar uma 
função generica pra fazer isso, passa o teu Dataset como parametro, dentro 
da funcao ele cria outra instancia do dataset e é feito insert e na 
sequencia a leitura dos campos e atribuição no registro, o post, mata a 
instancia temporaria e no final refresh no dataset original pros dados 
aparecerem .

é uma ideia...


[]´s
Rodrigo O. Farias
- Original Message - 
From: Walter Alves Chagas Junior
To: 'delphi-br@yahoogrupos.com.br'
Sent: Thursday, April 07, 2005 4:17 PM
Subject: RES: [delphi-br] Mandar o conteúdo dos DBEdits para um novo 
registro


É de DBEdit e não de Edit. Se voce der um append no banco, os DBEdits todos
ficam em branco.



[]s

Walter Alves Chagas Junior
Projeto e desenvolvimento
Telemont Engenharia de telecomunicações
[EMAIL PROTECTED]
Fone: (31) 3389-8215 Fax: (31) 3389-8200

Pra que usar OOP, se existe Ctrl+C  Ctrl+V?



 -Mensagem original-
 De: Pop [mailto:[EMAIL PROTECTED]
 Enviada em: quarta-feira, 6 de abril de 2005 21:37
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Mandar o conteúdo dos DBEdits para um novo
 registro




 Meu irmào, primeiro crie um novo registro em branco (append)
 depois mande o conteudo do edit para o registro em branco (post).

 Espero ter ajudado
 Julio Reinecken
 __Vip.Net
 Multimídia

 Automação Industrial, Integração eletro-eletrônica,
 Projetos personalizados, programação para os principais
 ambientes (DOS, WINDOWS, LINUX E WEB)

 MSN: [EMAIL PROTECTED]

 Visite nosso site:  www.vipnet.fronteiradapaz.com
 Conheça nossa fronteira www.fronteiradapaz.com
   - Original Message - 
   From: Walter Alves Chagas Junior
   Sent: Wednesday, April 06, 2005 9:10 PM
   Subject: [delphi-br] Mandar o conteúdo dos DBEdits para um
 novo registro



   Pessoal, to com a seguinte situação aqui:

   Dei um Edit em um ClientDataset mas eu quero mandar o
 conteúdo dos DBEdits
   para um novo registro e não atualizar o registro atual. Há
 alguma maneira de
   fazer isto? Ou seja, pega os dados do registro atual e
 manda eles para um
   novo registro ao invés de gravá-los no registro corrente.

   Eu uso a combinação ADOQuery - TDatasetProvider -
 TClientDataSet -
   TDataSource.


   []s

   Walter Alves Chagas Junior
   Projeto e desenvolvimento
   Telemont Engenharia de telecomunicações
   [EMAIL PROTECTED]
   Fone: (31) 3389-8215 Fax: (31) 3389-8200

   Pra que usar OOP, se existe Ctrl+C  Ctrl+V?




   [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] ou [EMAIL PROTECTED]



 Yahoo! Grupos, um serviço oferecido por:







 --
 
   Links do Yahoo! Grupos

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

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

 c.. O uso que você faz do Yahoo! Grupos está sujeito aos
 Termos do Serviço do Yahoo!.



 [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] ou [EMAIL PROTECTED]

 Links do Yahoo! Grupos










[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] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por:








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 Termos do Serviço do 
Yahoo!. 






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

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

* 

[delphi-br] Re: Erro consulta Consulta

2005-04-07 Por tôpico Roberto Figueiredo



Boa Tarde.

Você deve usar assim ''S'' e não S

Ok!


--- Em delphi-br@yahoogrupos.com.br, Rodrigo Brito [EMAIL PROTECTED] 
escreveu
 Boa Tarde.
  se consulto através do componente adoquery  funciona
 o query está assim:  (select * from pessoal a , cargo b, equipe c 
where 
 a.ativo = 'S' and a.codc = b.codc and a.code = c.code)
 
 quendo consulto através de uma procedure da erro de INVALID COLUMNS 
NAME 'S'
 
 select * from pessoal a, cargo b, equipe c where a.codc = b.codc 
and 
 a.code = c.code and a.ativo = S
 
 alguem sabe pq?








-- 
 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] ou [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: Invalid Column name na consulta

2005-04-07 Por tôpico Roberto Figueiredo



Boa tarde,

Eu prefiro carregar a querys assim:

adoconpessoal.SQL.Text:= 
'select * from pessoal a, cargo b, equipe c '+
'  where a.codc = b.codc and a.code = c.code and '+
'a.ativo = '+#39+'S'+#39+' and a.nome like '+ 
// #39 = '

Dá um pouco de trabalho mas o efeito, para documentação, acho bem 
melhor...


[]'s


--- Em delphi-br@yahoogrupos.com.br, Rodrigo Brito [EMAIL PROTECTED] 
escreveu
 Boa Tarde,
 
 Gostaria da ajuda de vcs no seguinte:
 
 Criei uma tela de consulta  onde tenho alguns campos para filtrar
 ao brir a tela  ele me traz no grid os registros cadastrados
 utilizo a seguinte query para consulta   ( está query está no 
componente 
 ADOquery)
 (select * from pessoal a , cargo b, equipe c where a.ativo = 'S' 
and 
 a.codc = b.codc and a.code = c.code)
 aqui está trazendo os meus registros que estão marcados como 
ativo.
 está OK
 
 mas quando vou fazer algum filtro  através da procedure abaixo
 
 procedure Tfmconspessoal.Filtrar;
 begin
 adoconpessoal.Active := false;
 adoconpessoal.SQL.Clear;
 adoconpessoal.SQL.Add ('select * from pessoal a, cargo b, equipe c 
where 
 a.codc = b.codc and a.code = c.code and *a.ativo = s* and a.nome 
like 
 '+ QuotedStr(edit1.Text+'%') + ' and a.sigla like 
 '+QuotedStr(edit2.Text+'%') + ' and b.nome like 
 '+QuotedStr(DBLookupComboBox1.Text+'%') + ' and c.nome like 
 '+QuotedStr(DBLookupComboBox2.Text+'%')) ;
 adoconpessoal.active := true;
 and.
 quando ativa o filtro  ele me da o seguinte erro *  Invalid Column 
name 
 's'*








-- 
 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] ou [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] Dúivida com Data

2005-04-07 Por tôpico Rodrigo Othavio Farias


Se o campo é DateTime ele sempre vai gravar uma hora junto, mesmo que seja 
00:00:00h

O seu problema é formatar a mascara de exibição desse campo para nao mostrar 
a hora, sugiro uma lida na propriedade dysplayformat do objeto Tfield




[]´s
Rodrigo O. Farias


- Original Message - 
From: Rodrigo Brito
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 07, 2005 5:27 PM
Subject: [delphi-br] Dúivida com Data


Boa Tarde,

Tenho uma tabela que tem o campo Data  está como DateTime
quado gravo dados nesse campo faço assim:

adocadregistros.FieldByName('data').Value := DateTimePicker1.Date;

só que está gravando com a hora tb..
como posso fazer para a hora não aparecer?


-- 
 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] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por:

 São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília





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 Termos do Serviço do 
Yahoo!. 






-- 
 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] ou [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] Ordenando pelo GRID

2005-04-07 Por tôpico robson

Olá é facil ordenar o grid!!

Entre no evento OnTitleClick do Grid e digite Query1.Sort := ('nome')
 onde nome é o campo da query.
Apartir dai vc pode construir suas verificações e outras ordenaçoes
simultaneas

Robson
[EMAIL PROTECTED]




 Através de uma query os registros aparecem no grid , como faço para
 ordenar através do grid

 ex:  no grid   tenhonome e cargo
 se clicar em nome a ordenação se dar por nome se em cargo ordena pelo
 cargo
 att,

 Rodrigo Brito


 --
  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] ou [EMAIL PROTECTED]

 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] ou [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] Consulta SQL data

2005-04-07 Por tôpico luiz_csp


Olá,

Estou precisando fazer duas consultas SQL em um campo do tipo data. A 
primeira precisa retornar todos os dias da semana atual e a segunda 
consulta tem que retornar todos os dias da semana seguinte. Alguem 
pode me ajudar?Obrigado.

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