Re: [delphi-br] Delphi Prism

2010-07-13 Por tôpico Nicolas
Marcelo,

para você ter uma idéia, a faculdade onde eu leciono tem parceria com a 
Microsoft,
todos os alunos tem acesso aos produtos microsoft de desenvolvimento em versões 
oficiais e full para uso educacional.

A Embarcadero poderia fazer parcerias semelhantes com as universidades e 
faculdades, seria muito bem vindo.

Alexandre.


  - Original Message - 
  From: Fortes Marcelo 
  To: delphi-br@yahoogrupos.com.br 
  Cc: wchag...@bol.com.br 
  Sent: Saturday, July 10, 2010 3:09 AM
  Subject: Re: [delphi-br] Delphi Prism





  Esta é outra grande verdade assino embaixo Walter. Acho que se existisse um
  esforço dos representantes desse produto aqui na América Latina e outras
  localidades de fornecer o Produto sem ônus para instituições de ensino, muita
  coisa mudaria. mas eu acho que aí tem problemas de Marketing bem estruturado e
  custo ...

   

  As pessoas saem diplomadas nos cursos procurando oferta em Java por que saem
  com o canudo da faculdade e onde os professores batem com o pé no chão
  Java é o futuro!.

   

  Se há oferta grande desses profissionais, por conseguinte uma oferta de
  empresas procurando por esses profissionais também existe. 

   

  Gostaria que o grande amigo Adreano Lanusse desse uma lida nisso !

  Marcelo Fortes.

  --- Em qui, 8/7/10, Walter Chagas (Bol) wchag...@bol.com.br escreveu:

  De: Walter Chagas (Bol) wchag...@bol.com.br
  Assunto: Re: [delphi-br] Delphi Prism
  Para: delphi-br@yahoogrupos.com.br
  Data: Quinta-feira, 8 de Julho de 2010, 22:25

   

  O problema maior é que não há muita divulgação do delphi atualmente. Pra voce 
ter uma ideia, muita gente conversa comigo e fala que o Delphi foi 
descontinuado porque a Borland não o fabrica mais..

  Estas pessoas, nem sabiam da existencia da Embarcadero.

  []s

  Walter Alves Chagas Junior

  Belo Horizonte - MG - Brazil

  wchag...@bol.com.br

  http://delphitocorporerm.blogspot.com/

  http://twitter.com/wchagas

  MSN: whitesock...@hotmail.com

  SKYPE: WalterChagasJr

  - Original Message - 

  From: Eny Urias 

  To: delphi-br@yahoogrupos.com.br 

  Sent: Thursday, July 08, 2010 10:06 PM

  Subject: Res: [delphi-br] Delphi Prism

  Entrando de gaiata na conversa quero deixar registrado o que me aconteceu 
há 

  alguns dias.

  Fui contratada por uma empresa para desenvolver um sistema em Delphi... 

  Disseram, até o dia da contratação, que era difícil encontrar programador em 

  Delphi aqui no interior e bla bla bla...

  Um dia antes de começar na empresa me perguntaram se eu tinha conhecimento em 

  .Net... Ãh? Como assim??? Não era Delphi?

  Aí responderam Queremos mudar para .Net por causa de todo o respaldo que 
a 

  Microft tem. Nós não podemos arriscar a começar um sistema utilizando um 

  programa que a cada hora uma empresa é dona... Primeiro a Borland, depois A 

  CodeGear, agora a Embarcadero... E daqui um tempo? Como vai ser? Preferimos 

  mudar agora para que futuramente não sejamos pegos de surpresa...

  Tem muita empresa pensando assim...

  --

  Eny Trova Urias

  Somos o que repetitivamente fazemos, portanto, a excelência não é um feito, 
mas 

  um hábito- Aristóteles

  

  De: Fortes Marcelo marcelosoftw...@yahoo.com.br

  Para: delphi-br@yahoogrupos.com.br

  Enviadas: Quinta-feira, 8 de Julho de 2010 21:41:23

  Assunto: Re: Res: [delphi-br] Delphi Prism

  .Net infelizmente é uma tendência que quer queiramos ou não nos é imposta 

  compulssória, não se ganha nada com .Net, nada, mas é a tendência, a bola da 

  vez... Queria ver umazinha aplicação da Microsoft em .Net, uma só, se é tão 

  maravilhosa assim por que o pacote Office não é em C# por que o SQL 
Server 

  não é reescrito em .Net??? A Microsoft vai desenvolver m C++ até o fim dos 

  tempos é incrível como as pessoas não têem crítica, não pensam, aceitam tudo 
e 

  pronto é o futuro, afirmam.

  Vou te ajudar, o Prism é uma impelmentação da linguagem Object Pascal para 
.Net 

  qaue agora é inserida no Visual Studio como um plugin, para os programadores 

  Delphi que estão acostumados com a sintaxe do Object Pascal. Ele adiciona um 

  monte de outros templates e coisas a mais que o Visual Studio não tem na 
caixa 

  de projetos, Além de recusros na linguagem que o C# não tem como Class 
contracts 

  que é excelente.

  Mas a embarcadero está fazendo justamente o Jogo certo não deixando o Delphi 

  perder sua essência com o Delphi 2010 fazendo aplicações nativas. Não 
brigando 

  com a vmicrosoft de frente como a Borland no próprio jogo da Microsoft, pos 

  senão ia se ferrar como Borland se ferrou então vc tem o Delphi prism para 

  plugar no Ambiente da microsoft e programar pro framework dela e o Delphi, 

  C++Builder e RadStudio prá código nativo Win32 pegou?

  Sucesso.

  --- Em qua, 7/7/10, Ray Silva rayz...@yahoo.com.br escreveu:

  De: Ray Silva rayz...@yahoo.com.br

  Assunto: Res: [delphi-br] Delphi Prism

  Para: 

Re: [delphi-br] ajuda basica e fundamental??

2010-06-11 Por tôpico Nicolas
Você pode abrir o .DPR do projeto e lá tem todas as units com suas respectivas 
pastas.

att.

Alexandre


  - Original Message - 
  From: alessandra porto 
  To: lista-del...@yahoogrupos.com.br ; delphi-br@yahoogrupos.com.br 
  Sent: Friday, June 11, 2010 9:33 AM
  Subject: [delphi-br] ajuda basica e fundamental??



  preciso de uma dica

  em um sistema que estou mexendo
  não consigo encontrar onde estão
  determinado  forms do projeto

  pelo que percebi foram salvos 
  em diversas pastas diferentes 
  dentro do disco C:\
  e inclusas no projeto   sem colocar
  todas na pasta do projeto.

  como posso fazer para descobrir pelo
  delphi a origem (pasta de cada unit) 
  associada   a esta Bendita aplicação???

  Grata a todos que puderem  ajudar

  estou  usando   o  delphi 7

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



  

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



Re: [delphi-br] Reconhecimento de voz no delphi

2010-02-02 Por tôpico Nicolas

Neste link parece ter tudo que vc precisa:

http://www.blong.com/Conferences/DCon2002/Speech/Speech.htm

[]s

Alexandre

- Original Message - 
From: Willian Leal willian.l...@gmail.com
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, February 02, 2010 9:04 AM
Subject: Re: [delphi-br] Reconhecimento de voz no delphi


Procure por microsoft speech.

abraços.



Em 1 de fevereiro de 2010 23:46, Loreno-Yahoo- 
loren...@yahoo.com.brescreveu:



 Da uma olhada no link a seguir (é freeware)

 http://say-now.software.informer.com/

 abraços e bom proveito


 - Original Message -
 From: Allan GabrielAM 
 alla...@americamoveiseletro.com.brallanrv%40americamoveiseletro.com.br
 
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
  Sent: Monday, February 01, 2010 10:49 PM
 Subject: [ Re: [delphi-br] Reconhecimento de voz no delphi

  Olá Sr. Antônio,
  obrigado pela dica,mas na verdade acho que me expressei mal, na verdade
  quero que o programa desenvolvido em delphi ouça o que eu diga e execute
  alguma açãoe não que o programa fale alguma coisa, precisaria de algum
  componente, ou ao menos alguma luz, olha estive procurando adoidado pela
  net, e nada até agora, só encontrei programas que fazem o pc falar, mas
  quero o processo inverso.
 
  Por favor se alguém souber de algo me ajude, e olhe, acredito ser
  realmente
  difícil, pois livros a respeito não achei nada também.
 
  Atenciosamente,
  Rafael Vivan.
  - Original Message -
  From: Antonio Leandro Furstenberger Favero 
  lean...@fave.roleandro%40fave.ro
 
  To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
  Sent: Monday, February 01, 2010 2:46 PM
  Subject: Re: [delphi-br] Reconhecimento de voz no delphi
 
 
  http://www.nuance.com/naturallyspeaking/
 
  Em 1 de fevereiro de 2010 13:10, Rafa - Bem Bom 
  alla...@americamoveiseletro.com.brallanrv%40americamoveiseletro.com.br
 escreveu:
 
 
 
  Olá prezados,
  estive procurando no histórico da lista mas não encontrei nada do que 
  eu
  preciso, preciso de ajuda pra fazer um programa onde ele execute alguma
  ação
  quando um comando de voz é pronunciado pelo microfone conectado ao pc,
  por
  exemplo, dito ao microfone Explorer - ele abre o explorer, dito ao
  microfone iexplorer ele abre o navegador da internet, procurei por
  tudo,
  o
  que consegui até agora foi fazer os assistêntes do windows falarem
  somente,
  mago, merlin, spped etc, mas preciso que o pc somente entenda o que
  estou falando e não que ele pronuncie o que eu colocar num edit por
  exemplo.
 
  Por favor se alguém souber de alguma coisa que possa me ajudar 
  responda.
 
  Obrigado.
 
  Att.
  Rafael
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 
  
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
 
 
  
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 






-- 
Willian Leal
Desenvolvedor de Softwares
MSN: willian_l...@hotmail.com
Celular:(32) 8409 - 3077


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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 










Re: RES: [delphi-br] ACBR - Nfe

2009-10-01 Por tôpico Nicolas
então Thiago,

Diretamente eu não consegui usar, pois o delphi 5 tem problemas para conseguir 
assinar o xml.

Só que existe uma muleta , um programa chamado ACBrMonitorNFe que fica ativo 
e serve de intermediário
entre o seu sistema em Delphi5 e o WebService da NFe.

Estou usando ele e é muito eficiente e produtivo.

Você acha maiores informações neste link http://anfm.blogspot.com/

[]s

Alexandre

  - Original Message - 
  From: Thiago Menon 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, September 30, 2009 8:32 AM
  Subject: Re: RES: [delphi-br]  ACBR - Nfe 


Alguem sabe se esse componente vai funcionar no delphi 5?

  Thiago

  Dimas Bolognani escreveu:
   Pra mim esta funcionando perfeitamente. Muito bom.
   
   
   
   Atte.
   
   Dimas
   
   
   
   De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
   nome de Juliano Silva - Yahoo
   Enviada em: segunda-feira, 28 de setembro de 2009 13:03
   Para: delphi-br@yahoogrupos.com.br
   Assunto: [delphi-br]  ACBR - Nfe 
   
   
   
   
   
   Pessoal, boa tarde
   
   Algum desenvolvedor já utilizou o componente ACBR-Nfe? Teria algo a dizer
   sobre este componente?
   
   Atenciosamente
   
   Juliano Silva
   
   [As partes desta mensagem que não continham texto foram removidas]
   
   
   
   Nenhum vírus encontrado nessa mensagem recebida.
   Verificado por AVG - www.avgbrasil.com.br
   Versão: 8.5.409 / Banco de dados de vírus: 270.13.113/2400 - Data de
   Lançamento: 09/28/09 05:51:00
   
   
   
   [As partes desta mensagem que não continham texto foram removidas]
   
   
   
   
   
  __
  Faça ligações para outros computadores com o novo Yahoo! Messenger 
  http://br.beta.messenger.yahoo.com/ 


  

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



Re: [delphi-br] [OFF] Referente a nova lei...

2009-08-26 Por tôpico Nicolas
Como foi visto, esse assunto é uma fonte de debates inesgotável,
onde cada lado defendido tem sua razão.

O importante neste caso é: 

Esteja preparado para se adequar. 

Em TI, passamos por mudanças todo dia, estamos constantemente estudando e 
evoluindo, com diploma ou sem diploma.

Se teremos ou não um conselho que irá regulamentar ou não, se teremos que ter 
diploma ou não, se diploma é ou não sinal de competência,
são discussões que servem para aumentar a temperatura do debate mas não podemos 
esquecer que cada um vai ter que se virar e se adaptar.

E lembrem-se, esse médico que está em todas as manchetes e foi preso acusado de 
estupro e manipulação genética,
tem diploma superior e pertence a um dos conselhos profissionais mais fortes e 
corporativistas do país...e isso evitou alguma coisa ?

Então, com lei ou sei lei, o que importa é o tipo de ser humano que somos, que 
tipo de profissionais somos.

Aprovada ou não a regulamentação da profissão, a vida se encarregará de separar 
o joio do trigo.

Então, estejam apenas preparados para qualquer hipótese e pronto.

[]s

Alexandre Nicolas


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



Re: [delphi-br] NF-e Status com ACBrNFe

2009-08-17 Por tôpico Nicolas
No meu caso,

eu pedi o certificado do meu cliente, instalei no meu computador e configurei o 
Monitor e ele voltou a funcionar.

[]s

Alexandre Nicolas


  - Original Message - 
  From: Thiago Menon 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 17, 2009 1:56 PM
  Subject: Re: [delphi-br] NF-e Status com ACBrNFe


Alguem conseguiu achar uma solução para o problema relatado?

  Estou com o mesmo problema.

  
  WebService Consulta Status serviço:
  - Inativo ou Inoperante tente novamente.
  - A autoridade de certificação não é válida ou está incorreta - URL:

  https://homologacao.nfe.sefaz.rs.gov.br/ws/nfestatusservico/NfeStatusServico
  .asmx-
  SOAPAction:
  http://www.portalfiscal.inf.br/nfe/wsdl/NfeStatusServico/nfeStatusServicoNF
  

  No aguardo.

  Thiago
  msn: thime...@hotmail.com

  Nicolas escreveu:
   Comigo aconteceu isso também após instalar a última versão, 
   e nunca mais conectou, ainda não sei o que é.
   
   []s
   
   alexandre
   
   
   
   - Original Message - 
   From: Samuel M. Basso 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Wednesday, August 05, 2009 8:09 AM
   Subject: Re: [delphi-br] NF-e Status com ACBrNFe
   
   
   Ok obrigado, é que estou tentando faz uns dois dias, e ja começo a
   desconfiar que existe um outro problema , mas vou aguardar entao mais um
   pouco.
   
   2009/8/5 Dimas Bolognani di...@dbsoftinformatica.com.br
   
   
   
Bom dia,
   
Isto apenas quer dizer que o serviço do estado que vc verificou não esta
funcionado no momento. Vai tentando que já vc recebe um OK.
   
Atte.
   
Dimas
   
De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto:
delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em
nome de Samuel M. Basso
Enviada em: terça-feira, 4 de agosto de 2009 13:36
Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
Assunto: [delphi-br] NF-e Status com ACBrNFe
   
   
Olá pessoal!
   
Estou testando o envio de nota fiscal eletronica com o componente
ACBrMonitorNFe e estou tendo um problema ao verificar o status ele me
mostra
o seguinte erro:
   
WebService Consulta Status serviço:
- Inativo ou Inoperante tente novamente.
- A autoridade de certificação não é válida ou está incorreta - URL:
   

https://homologacao.nfe.sefaz.rs.gov.br/ws/nfestatusservico/NfeStatusServico
.asmx-
SOAPAction:

http://www.portalfiscal.inf.br/nfe/wsdl/NfeStatusServico/nfeStatusServicoNF
   
Verifiquei em diversos sites e me falaram sobre a cadeia de certificados
etc, já fiz tudo isso e ainda persiste o erro. Se alguem poder me ajudar
agradeço.
   
--
Atenciosamente,
   
Samuel M. Basso
Tel: (54) 3463-9114
Cel: (54) 8135-3723
E-mail/MSN: samuelba...@gmail.com samuelbasso%40gmail.com mailto:
samuelbasso%40gmail.com samuelbasso%2540gmail.com
Web site: www.samuelbasso.com
   
[As partes desta mensagem que não continham texto foram removidas]
   
Verificado por AVG - www.avgbrasil.com.br
Versão: 8.5.375 / Banco de dados de vírus: 270.13.42/2279 - Data de
Lançamento: 08/05/09 05:57:00
   
[As partes desta mensagem que não continham texto foram removidas]
   

   
   
   -- 
   Atenciosamente,
   
   Samuel M. Basso
   Tel: (54) 3463-9114
   Cel: (54) 8135-3723
   E-mail/MSN: samuelba...@gmail.com
   Web site: www.samuelbasso.com
   
   [As partes desta mensagem que não continham texto foram removidas]
   
   
   
   
   
   [As partes desta mensagem que não continham texto foram removidas]
   
   
   
   
   
  __
  Faça ligações para outros computadores com o novo Yahoo! Messenger 
  http://br.beta.messenger.yahoo.com/ 


  

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



[delphi-br] [OFF] Otimizar function SQL

2009-08-14 Por tôpico Nicolas
Pessoal, 

a function SQL (MS-SQL) abaixo é chamada de dentro de um sistema em Delphi,
é um volume grande de informações mas o cliente quer que o sistema fique mais 
rápido,
alguém tem alguma sugestão que possa otimiza-la e deixá-la mais rápida ? 


CREATE function CEstoque (@Produto Int, @Empresa Int)

returns Money

as

begin
   Declare @EntradasMoney
   Declare @Saidas  Money
   Declare @Ajustes Money
   Declare @Inicio  Money   
   Declare @DataDateTime

   Select @Saidas=(Select Sum( (Case IsNull(N.Entrada,'N') When 'S' Then I.Qtde 
Else 0 End) - (Case IsNull(N.Entrada,'N') When 'N' Then I.Qtde Else 0 End) ) 
 From NfItens I 
 Left Join Nf D On D.Nrodoc=I.Nrodoc and 
D.Serie=I.Serie and D.Empresa=I.Empresa 
 Left Join Produtos PP On PP.Codigo=I.Calitem 
 Left Join NatOper N On N.Chave=D.NatOper 
 Where (i.calit...@produto or 
IsNull(Pp.ProdutoBaixa,0)=...@produto) 
and d.empre...@empresa 
and D.DataRef=(Select Max(Data) 
From EstoqueInicio 
Where produ...@produto)),
  @Entradas=(Select Sum(I.Qtde) 
 From EntradaIte I 
 Left Join Entrada D On D.Nrodoc=I.Nrodoc and 
D.Fornece=I.Fornece 
 Where d.fili...@empresa   
 and i.mater...@produto 
 and D.Entrada=(Select Max(Data) 
 From EstoqueInicio 
 Where produ...@produto)),
  @Ajustes=(Select Sum( (Case I.ES When 'E' Then I.Qtde Else 0 End) 
- (Case I.Es When 'S' Then I.Qtde Else 0 End) ) 
   From AjusteEst I 
   Where i.codi...@produto 
   and i.fili...@empresa 
   and I.Data=(Select Max(Data) From EstoqueInicio 
Where produ...@produto)),
  @Inicio=(Select D.Qtde 
From EstoqueInicio D 
Where d.produ...@produto 
and d.empre...@empresa 
and D.Data=(Select Max(Data) From EstoqueInicio   
Where produ...@produto)) 
   From Produtos P
   Where codi...@produto

   Return 
IsNull(@Inicio,0)+IsNull(@Entradas,0)+IsNull(@Saidas,0)+IsNull(@Ajustes,0);

END



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



Re: [delphi-br] Balanca Eletronica Toledo

2009-08-13 Por tôpico Nicolas
Nuno,

Basicamente você precisa abrir a serial e enviar o comando #5
(cerquinha 5)

se o peso estiver estabilizado a balança vai enviar uma string com o peso, vc 
transforma em inteiro e divide por 1000 e vai ter o peso.

para a comunicação serial eu uso um componente free T_QCCom32

[]s

Alexandre




  - Original Message - 
  From: nunofigueir...@terra.com.br 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, August 13, 2009 2:31 PM
  Subject: [delphi-br] Balanca Eletronica Toledo


Amigos:
  estou desenvolvendo um sistema em D7 para controlar pesagem de uma
  balanca Toledo 9091 (toledobrasil.com.br).
  Esta dita balanca tem uma porta RS232 que comunica com impressoras
  ou micros.
  Infelizmente o manual da mesma é completamente omisso quanto a essa
  parte.
  Algum dos colegas tem sugestões para mim?
  Preciso de ler a pesagem e pôr na tela do micro. Não há nenhum
  metodo definido para a comunicacao serial.
  Alguem ja passou por isso e pode me dar uma luz?
  Alem disso, alguem conhece uma biblioteca para cmomunicacao serial
  no NT/XP/2000/2003?
  A que eu tinha, eu mesmo desenvolvi mas usava assembler e escrevia
  diretamente na porta ou seja, nao roda mais no NT.
  Agradeco desde ja a todos.
  abracos
  Nuno

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



  

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



Re: [delphi-br] dimensão de um formulario - help

2009-08-11 Por tôpico Nicolas
Screen.Width e Screen.Height retornam as dimensões da largura e altura 
respectivamente.

[]s

Alexandre


  - Original Message - 
  From: Leonardo Baldino 
  To: Grupo_Delphi 
  Sent: Tuesday, August 11, 2009 2:24 PM
  Subject: [delphi-br] dimensão de um formulario - help


alguem como eu faço para saber qual é dimensão do desktop de pc para eu
  poder em tempo de execução dimensionar os meus forms para caberem na dela

  tipo se o desktop for 800x600 entaum em precisava redimencionar os meus
  forms para caberem na tela quando eu chamo eles

  alguem sabe algum codigo que faz isso

  -- 
  Leonardo Carlos Baldino - The Highlander

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



  

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



Re: [delphi-br] NF-e Status com ACBrNFe

2009-08-06 Por tôpico Nicolas
Comigo aconteceu isso também após instalar a última versão, 
e nunca mais conectou, ainda não sei o que é.

[]s

alexandre



  - Original Message - 
  From: Samuel M. Basso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, August 05, 2009 8:09 AM
  Subject: Re: [delphi-br] NF-e Status com ACBrNFe


Ok obrigado, é que estou tentando faz uns dois dias, e ja começo a
  desconfiar que existe um outro problema , mas vou aguardar entao mais um
  pouco.

  2009/8/5 Dimas Bolognani di...@dbsoftinformatica.com.br

  
  
   Bom dia,
  
   Isto apenas quer dizer que o serviço do estado que vc verificou não esta
   funcionado no momento. Vai tentando que já vc recebe um OK.
  
   Atte.
  
   Dimas
  
   De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto:
   delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em
   nome de Samuel M. Basso
   Enviada em: terça-feira, 4 de agosto de 2009 13:36
   Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Assunto: [delphi-br] NF-e Status com ACBrNFe
  
  
   Olá pessoal!
  
   Estou testando o envio de nota fiscal eletronica com o componente
   ACBrMonitorNFe e estou tendo um problema ao verificar o status ele me
   mostra
   o seguinte erro:
  
   WebService Consulta Status serviço:
   - Inativo ou Inoperante tente novamente.
   - A autoridade de certificação não é válida ou está incorreta - URL:
  
   https://homologacao.nfe.sefaz.rs.gov.br/ws/nfestatusservico/NfeStatusServico
   .asmx-
   SOAPAction:
   http://www.portalfiscal.inf.br/nfe/wsdl/NfeStatusServico/nfeStatusServicoNF
  
   Verifiquei em diversos sites e me falaram sobre a cadeia de certificados
   etc, já fiz tudo isso e ainda persiste o erro. Se alguem poder me ajudar
   agradeço.
  
   --
   Atenciosamente,
  
   Samuel M. Basso
   Tel: (54) 3463-9114
   Cel: (54) 8135-3723
   E-mail/MSN: samuelba...@gmail.com samuelbasso%40gmail.com mailto:
   samuelbasso%40gmail.com samuelbasso%2540gmail.com
   Web site: www.samuelbasso.com
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   Verificado por AVG - www.avgbrasil.com.br
   Versão: 8.5.375 / Banco de dados de vírus: 270.13.42/2279 - Data de
   Lançamento: 08/05/09 05:57:00
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  -- 
  Atenciosamente,

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

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



  

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



Re: [delphi-br] NF-e Status com ACBrNFe

2009-08-06 Por tôpico Nicolas
Samuel,

como eu relatei, comigo estava acontecendo a mesma coisa,

hoje instalei o certificado A1 de um cliente e configurei no monitor o numero 
de série dele e funcionou corretamente,
conectou e testou positivamente.

[]s

alexandre

  - Original Message - 
  From: Samuel M. Basso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, August 05, 2009 8:09 AM
  Subject: Re: [delphi-br] NF-e Status com ACBrNFe


Ok obrigado, é que estou tentando faz uns dois dias, e ja começo a
  desconfiar que existe um outro problema , mas vou aguardar entao mais um
  pouco.

  2009/8/5 Dimas Bolognani di...@dbsoftinformatica.com.br

  
  
   Bom dia,
  
   Isto apenas quer dizer que o serviço do estado que vc verificou não esta
   funcionado no momento. Vai tentando que já vc recebe um OK.
  
   Atte.
  
   Dimas
  
   De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto:
   delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em
   nome de Samuel M. Basso
   Enviada em: terça-feira, 4 de agosto de 2009 13:36
   Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Assunto: [delphi-br] NF-e Status com ACBrNFe
  
  
   Olá pessoal!
  
   Estou testando o envio de nota fiscal eletronica com o componente
   ACBrMonitorNFe e estou tendo um problema ao verificar o status ele me
   mostra
   o seguinte erro:
  
   WebService Consulta Status serviço:
   - Inativo ou Inoperante tente novamente.
   - A autoridade de certificação não é válida ou está incorreta - URL:
  
   https://homologacao.nfe.sefaz.rs.gov.br/ws/nfestatusservico/NfeStatusServico
   .asmx-
   SOAPAction:
   http://www.portalfiscal.inf.br/nfe/wsdl/NfeStatusServico/nfeStatusServicoNF
  
   Verifiquei em diversos sites e me falaram sobre a cadeia de certificados
   etc, já fiz tudo isso e ainda persiste o erro. Se alguem poder me ajudar
   agradeço.
  
   --
   Atenciosamente,
  
   Samuel M. Basso
   Tel: (54) 3463-9114
   Cel: (54) 8135-3723
   E-mail/MSN: samuelba...@gmail.com samuelbasso%40gmail.com mailto:
   samuelbasso%40gmail.com samuelbasso%2540gmail.com
   Web site: www.samuelbasso.com
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   Verificado por AVG - www.avgbrasil.com.br
   Versão: 8.5.375 / Banco de dados de vírus: 270.13.42/2279 - Data de
   Lançamento: 08/05/09 05:57:00
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  -- 
  Atenciosamente,

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

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



  

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



Re: [delphi-br] Boleto santander ???? Alguem tem ??

2009-07-23 Por tôpico Nicolas
Da uma pesquisada no componente CobreBemX, é excelente e compensa o 
custo/benefício.

[]s

Alexandre

  - Original Message - 
  From: Heraldo Andrade 
  To: Grupo Delphi 
  Cc: delphi boletos 
  Sent: Wednesday, July 22, 2009 9:33 PM
  Subject: [delphi-br] Boleto santander  Alguem tem ??


Pessoal, preciso desenvolver um programa que gera o boleto do banco 
santander, alguem pode me ajudar ..

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

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



  

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



Re: [delphi-br] [OFF] Novo Sistema Operacional do Google

2009-07-14 Por tôpico Nicolas
Na minha humilde opinião...

se todos nós tivessemos que nos conformar com o que existe e não nos fosse dado 
o direito de sonhar com coisas melhores,
ainda estaríamos usando computador com válvulas, cartões perfurados (ou sequer 
teriam sido criados...já que estaríamos contentes
em usar o ábaco)

Mas ainda bem que existem os sonhadores...que a partir de sua criatividade e 
esforço tornam realidade seus sonhos.

[]s

alexandre


  - Original Message - 
  From: Rubem Rocha 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, July 13, 2009 9:15 PM
  Subject: RES: [delphi-br] [OFF] Novo Sistema Operacional do Google





  Assino embaixo, Waltão.

  De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
  nome de Walter Chagas (Bol)
  Enviada em: segunda-feira, 13 de julho de 2009 08:48
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] [OFF] Novo Sistema Operacional do Google

  Não vou muito me delongar nesta discussão, mas acredito eu, este ser mais um
  destes muitos sistemas operacionais que aparecem por aí, que chegam cheios
  de auê muitos alimentados pelos dissidentes Anti-Microsoft e que no
  dia-a-dia começam a perder força dadas suas limitações. Outro dia teve um aí
  de vida curta, o tal de BEos. E olha que nem falei no OS/2 Warp... 

  O Linux que é oriundo de um sistema operacional consolidado e confiável até
  hoje ainda não consegue impactar no mercado do Windows

  O negócio é sermos realistas ao invés de ficar sonhando com o mundo sem
  Windows e sem Burguesia e de igualdades sociais.

  []s

  Walter Alves Chagas Junior
  Belo Horizonte - MG - Brazil
  wchag...@bol.com.br mailto:wchagasj%40bol.com.br 
  http://www.geocities.com/SiliconValley/Bay/1058
  http://delphitocorporerm.blogspot.com/
  MSN: whitesock...@hotmail.com mailto:whitesockets%40hotmail.com 
  SKYPE: WalterChagasJr

  - Original Message - 
  From: embarcadelphi 
  To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
  Sent: Saturday, July 11, 2009 12:20 AM
  Subject: [delphi-br] [OFF] Novo Sistema Operacional do Google

  Desculpem o OFF, mas é uma notícia interessante que nós programadores
  devemos tomar conciência (pelo menos ficar informado)

  Para quem ainda não viu a matéria sobre o Novo Sistema Operacional que está
  deixando a Microsoft de orelha em pé, veja a história completa no link
  abaixo. Mas tenha paciência e leia devagar para compreender como tudo
  funciona. O Sistema Operacional que usamos atualmente (Linux, Windows, etc.)
  foi criado num conceito antigo e porisso sofre de falta de segurança,
  estabilidade,...
  Todo mundo já sabe que a Microsoft tem medo do Google, o caminho vai ser
  este mesmo... Quem se dedica a aprender as APIs do Google não vai se
  arrepender no futuro...

  2 LINKS (Terra):
  [url]http://tecnologia.terra.com.br/interna/0,,OI3863397-EI4801,00-Google+de
  safia+Windows+e+anuncia+sistema+operacional.html[/url]

  [url]http://tecnologia.terra.com.br/interna/0,,OI3867269-EI4801,00-Chrome+po
  de+ser+rival+verdadeiro+para+Windows.html[/url]

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



  

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



Re: [delphi-br] SQLServer

2009-07-13 Por tôpico Nicolas
Tente usar .AsFloat ou .AsCurrency ao invés .Value

alexandre


  - Original Message - 
  From: stainle2003 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, July 13, 2009 10:55 AM
  Subject: [delphi-br] SQLServer





  bom dia amigos, quando importei dados do Cobol via ODBC para o SQLServer, os 
campos que tinham a picture 9(12)v99 o SQLServer criou como tipo TBCDField e os 
que tinham picture 9(14)v99 ele criou como TFMTBCDField, e agora pelo Delphi 
quando tento compilar o programa 
  nas duas primeira linhas abaixo não aparece erro de compilação, mas na 
terceira linha apresenta um erro dizendo que não posso usar o FormatFloat,

  'CUSI = ' + FormatFloat('000,000,000.00', CDSEstoCUSI.Value) +
  'CRE = ' + FormatFloat('000,000,000.00', CDSEstoCRE.Value) +
  'CME = ' + FormatFloat('000,000,000.00', CDSEstoCME.Value) +

  alguém tem uma luz 

  Stainle



  

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



Re: [delphi-br] Screen Resolution

2009-07-02 Por tôpico Nicolas
Wilson,

basta acessar os valores das propriedades Width e Height do objeto SCREEN:

Altura := Screen.Height ;
Largura := Screen.Width ;

[]s

Alexandre Nicolas


  - Original Message - 
  From: Wilson, Stephen 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, July 02, 2009 12:04 PM
  Subject: [delphi-br] Screen Resolution





  Bom dia a todos

  lguem pode me ajudar, por favor?
  Eu preciso conhecer a resolucao da tela durante o tempo de execucao. Quero 
definir o tamanho e posicao dos controles em um form de acordo com a resolucao 
da tela.

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



  

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



Re: [delphi-br] impressora bematech dispara o papel na hora de imprimir

2009-06-16 Por tôpico Nicolas
Aconteceu comigo isso também, e o suporte da bematech me deu a dica:

Se for windows XP/NT/2000

abra as configurações da impressora 
vá em propriedades, opções
em iniciar o trabalho de impressão digite:  1BC02   (02=numero de linhas 
que deve saltar)
em finalizar trabalho de impressão : 1BC05(05=numero de 
linhas de deve saltar)

e coloque o papel como continuo alimentação sem quebra

comigo funcionou,

[]s

Alexandre




  - Original Message - 
  From: bene20032004 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, June 15, 2009 9:17 AM
  Subject: [delphi-br] impressora bematech dispara o papel na hora de imprimir





  Estou tentando imprimir em uma impressora bematech nao fiscal mp20 usando 
drives genérico só que ao final da impressão ela começa imprimir em branco sem 
parar e para parar tem que desligar ela. 
  Não posso imprimir direto na lpt1.
  Tem como resolver este problema ?



  

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



Re: [delphi-br] selecionando registros

2009-06-16 Por tôpico Nicolas
O comando está correto.

O que acontece quando você executa ?

Talvez interessante informar tambem no comando SQL por qual campo deve ser 
organizada a tabela (order by)

[]s

Alexandre



  - Original Message - 
  From: cic...@fiosecabos.ind.br 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, June 16, 2009 12:02 PM
  Subject: [delphi-br] selecionando registros







  Amigos ... estou com um pequeno problema penso q seja simples ... porem p
  kem esta iniciando  

  Antes de me mandarem procurar no Google, já revirei tudo por lá ... ok 

  Necessito selecionar os 12 'ultimo s registros de uma query  

  Já usei o

  Select top 12 * from tabels desc

  Select first 12 * from tabela desc

  Select * from tabela desc limit 12

  Enfim fiz varias tentativas sem êxito . donde apelo para ajuda de vcs, mais
  experientes  

  Meu BD 'e o DBIsam e trabalho com Delphi 7 ok 

  Desde já agradeço 

  FIOS E CABOS ENGENHARIA LTDA

  CÍCERO FERNANDES

  ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

  CREA-SC 27.958-0

  3521-2988 - 9191.6226

  http://fiosecabos.ind.br/ http://fiosecabos.ind.br -
  mailto:cic...@fiosecabos.ind.br cic...@fiosecabos.ind.br

  P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
  AMBIENTE! 

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



  

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



Re: RES: RES: [delphi-br] OFF TOPIC: Mega Projeto

2009-06-16 Por tôpico Nicolas
Faz sentido...

já pensou se todo sequestrador/Assaltante/Bandido resolver descobrir o endereço 
dos proprietários de cada carrão que passar na rua ?

tem coisas que não precisam ser ilegais, mas tem que avaliar se é Ético também.

Alexandre



  - Original Message - 
  From: Joao Henrique Levada 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, June 16, 2009 2:16 PM
  Subject: Re: RES: RES: [delphi-br] OFF TOPIC: Mega Projeto





  Li, ontem mesmo, no sítio do Detran-SP que é proibido consultar dados de um 
veículo através do número de sua placa.

  Logo, se você fornecer um meio para que isso aconteça, estará fazendo algo 
ilegal.

  Se me disser que a consulta está lá e é aberta bastando para isso o número 
do RENAVAM. Lhe respondo que este número é confidencial e, geralmente, de 
conhecimento apenas do proprietário do veículo, a quem a consulta é pertinente.

  Vejam, neste trecho extraído da página 
(http://www.detran.sp.gov.br/faq/faq.asp):

  2 - Como faço para obter informações de determinado veículo por meio da placa?
  Por questão de segurança, não é possível nenhum tipo de consulta por meio da 
placa do veículo. Essa informação é confidencial e de uso exclusivo do Detran. 
Somente o proprietário do veículo pode solicitar um extrato do veículo 
pessoalmente no órgão onde o mesmo está registrado. O Detran só fornece os 
dados mediante autorização judicial. 



  

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



Re: [delphi-br] [OFF TOPIC] Problema com browser

2009-05-08 Por tôpico Nicolas
Isso também está acontecendo comigo desde a atualização para o IE7,
cheguei a achar que era algum spyware capturando as teclas, mas não achei nada.

Então até não descobrir o que é ou sair alguma atualização, estou usando o 
Chrome que é show de bola.

[]s

alexandre


  - Original Message - 
  From: clayton 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, May 08, 2009 9:47 AM
  Subject: [delphi-br] [OFF TOPIC] Problema com browser





  Pessoal, desculpem o off topi, mas quem sabe vocês podem me ajudar.

  Trabalho em uma empresa que utiliza Windows XP, e atualmente usamos em todas
  as maquinas o InternetExplorer 7

  Desde que fizemos o upgrade para o IE7, começou a ocorrer (mas somente
  quando usamos o IE) de letras que sçao digitadas desaparecerem. É como se
  algo estivesse comendo algumas letras. Isto causa um transtorno bem grande
  na empresa. Se fizermos a digitação de cada tecla com bastante calma, as
  letras são impressas no browser, mas se digitarmos com a velocidade normal
  de digitação, as vezes letras (de forma aleatória) não são impressas.
  Novamente reforçando. Isto só ocorre no browser, qualquer outro software o
  problema não acontece.

  Quando usávamos o IE 6, este problema nunca apareceu. Testamos o IE 8, e o
  problema persiste. Testamos o Firefox e o problema não ocorre. Parece algo
  relacionado apenas com o IE 7 e superior.

  Já testei re-instalar o IE 7, mas o problema continuou. 

  Já testei desabilitar o antivírus (kaspersky), mas o problema continuou.

  Já testei abrir o IE 7, sem nenhum tipo de complemento (plugin), mas o
  problema continuou.

  Já entrei em contato com o suporte da Microsoft, e mesmo após uma hora de
  contato com o suporte no 0800 deles, não foi sanado o problema.

  Gostaria de saber se algum de vocês já teve este tipo de problema e como
  vocês o solucionaram. 

  Importante: Trocar o IE não é uma solução cabível aqui na empresa.

  Obrigado.

  Clayton Bonelli

  Tecnologia

  AGRINESS - Gestão da Informação para Suinocultura

  www.agriness.com blocked::http://www.agriness.com/ | (48) 3028-0015 |
  clay...@agriness.com 

  --
  --

  Participe da segunda edição do Melhores da Suinocultura Agriness

  www.melhoresdasuinocultura.com.br
  blocked::http://www.melhoresdasuinocultura.com.br/ 

  --
  --

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



  

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



Re: [delphi-br] Borland é vendida

2009-05-07 Por tôpico Nicolas
Nossa, será que é tão difícil entender que a tal Microfocus comprou a 
Borland e não a Embarcadero ??
O que a borland tem a ver atualmente com o delphi ??


- Original Message - 
From: Hudson Dias hudson_d...@yahoo.com.br
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, May 07, 2009 9:41 AM
Subject: Re: [delphi-br] Borland é vendida


 Ola a todos,

 Bruno damos sempre referencia para vc aqui na lista (como um contato
 principal), e gostaria de ouvir de vc ou do Andreano sobre a possição da
 Focus com relação ao Delphi???

 Ja que um mes atras a Oracle comprou a Sun e relatou em nota que o MySQL 
 não
 sera continuado como uma ferramenta open s. e sim um braço de sua 
 ferramenta
 principal e será cobrado...

 Isso já esta virando uma bagunça...

 - Original Message - 
 From: Evandro Siqueira vans...@gmail.com
 To: delphi-br@yahoogrupos.com.br
 Sent: Thursday, May 07, 2009 8:16 AM
 Subject: Re: [delphi-br] Borland é vendida


 Bruno,

 Só uma curiosidade: A Microfocus é aquela antiga detentora do famoso
 Microfocus Cobol na década de 80?

 Bruno Lichot escreveu:


 É, pelo visto vamos começar de novo com essas especulações infundadas
 fomentadas por nada

 Já que não vale a pena conversar e tentar mostrar a realidade, vamos
 esperar e ver onde vai ser o apagar das luzes...

 Eu gostaria de poder com esta oportunidade trazer um alinhamento de
 mercado melhor para que viesse a ler esta thread, mas acho que
 novamente vai ser difícil trazer um pouco de crescimento e visão de
 mercado e mais.. oportunidades...

 Quem tiver um pouco de visão neste momento vai saber das oportunidades
 e poderá ganhar dinheiro com isso.

 Minha participação nesta thred termina aqui.. quem quiser conversar de
 forma séria sobre o assunto me chame em pvt.. será um prazer ajudar.

 Abs

 BL

























 -- 
 []’s.

 Evandro Siqueira
 Programador de Sistemas
 L’essentiel Lingerie
 (79) 3254-5511 Ramal 218
 skype: evandro.lessentiel



 

 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 




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


 

 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

* Para falar com o moderador, envie um e-mail para:
delphi-br-ow...@yahoogrupos.com.br
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
delphi-br-unsubscr...@yahoogrupos.com.br

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




Re: [delphi-br] ajuda SQL

2009-05-06 Por tôpico Nicolas
Melhor tentar assim:

select * from clientes where nome like 'MARIA%' OR nome like 'JOSE%'

Se quiser que retorne com nome Maria e Jose em qualquer posição:

select * from clientes where nome like '%MARIA%' OR nome like '%JOSE%'

[]s

alexandre


  - Original Message - 
  From: Gildenor Teixeira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, May 06, 2009 12:39 PM
  Subject: Re: [delphi-br] ajuda SQL





  Se assim nao resolver, ta danado!!!
  select PROCESSO from TABELA where (AUTOR = 'maria' OR AUTOR = 'jose')

  --
  Gildenor Teixeira

  2009/5/5 Humberto Oliveira holiveira.wordpr...@gmail.com

  
  
   leite romano,
   se o segundo select é o que mais aproxima da sua solução e ainda não está
   dando certo, é porque existe algo no valor do campo AUTOR que não está
   satisfazendo a condição.
  
   Passe mais detalhes.
  
  
   2009/5/5 leite romano 
leite_rom...@yahoo.com.brleite_romano%40yahoo.com.br
   
  
   
   
oi Humberto, o segundo select que se aproxima mais do que eu preciso, mas
mesmo assim não da certo pois não retornara nada. Obrigado pela atenção
outros colegas aki da lista ja me deram uma luz, vou continuar tentando
   aki
assim que tiver uma solução eu posto aki.
   
--- Em ter, 5/5/09, Humberto Oliveira 
holiveira.wordpr...@gmail.comholiveira.wordpress%40gmail.com
   holiveira.wordpress%40gmail.com
escreveu:
   
De: Humberto Oliveira 
holiveira.wordpr...@gmail.comholiveira.wordpress%40gmail.com
   holiveira.wordpress%40gmail.com

Assunto: Re: [delphi-br] ajuda SQL
Para: delphi-br@yahoogrupos.com.br 
delphi-br%40yahoogrupos.com.brdelphi-br%
   40yahoogrupos.com.br
  
Data: Terça-feira, 5 de Maio de 2009, 14:48
   
   
select PROCESSO from TABELA where AUTOR in ('maria', 'jose')
   
ou
   
select PROCESSO from TABELA where (AUTOR = 'maria' and AUTOR = 'jose')
   
Resolve seu problema?
   
2009/5/5 leite romano leite_romano@ yahoo.com. br
   


 criterio autor = 'maria' e 'jose'

 segue a tabela

 processo cliente autor
 123 joao maria
 123 joao jose
 456 marcelo maria
 456 marcelo jose
 456 marcelo milton
 789 jose maria

 teria que retornar apenas o processo 123 pois é o unico que tem como
autor
 maria e jose somente. uso FB1.5 ibx. Delculpem pelo e-mail anterior
   bati
no
 enter sem querer e enviou




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

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



   
[As partes desta mensagem que não continham texto foram removidas]
   
Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com
   
[As partes desta mensagem que não continham texto foram removidas]
   
   
   
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  --

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



  

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



Re: [delphi-br] Como enviar um pulso de 5 volts pela serial?

2009-02-20 Por tôpico Nicolas
Esse tipo de empresa, que vende esse tipo de catraca, que após a venda deixa o 
programador ter que se virar
para descobrir como funciona, que exige peripécias mil para conseguir fazer 
algo tão simples quanto girar a catraca,
está fadada a sumir da face do planeta, em vista de um mercado cada vez
mais competitivo e que exige soluções práticas e eficazes.

Para meus clientes eu só recomendo a compra de catracas inteligentes, 
que possam ser programadas e acionadas através de suas DLLs de 
forma simples e prática.

[]s

Alexandre

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



Re: [delphi-br] Ref. Simular clique botão

2009-02-19 Por tôpico Nicolas

Bitbtn1.Click;

[]s

Alexandre



  - Original Message - 
  From: Omar Marques 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 19, 2009 10:11 AM
  Subject: [delphi-br] Ref. Simular clique botão


  Salve Delphianos,

  Alguém sabe como simular um clique do botão, ou seja, quando o botão fica 
levemente pressionada e é liberado. 
  Tem como fazer isto, sem ter de ir com o mouse e clicar sobre o botão ?

  Obrigado amigos(as)

  Abraço. 

  Omar M. Haddad
  Analista de Sistemas

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

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


  


--



  No virus found in this incoming message.
  Checked by AVG - www.avg.com 
  Version: 8.0.237 / Virus Database: 270.11.0/1959 - Release Date: 02/18/09 
20:55:00


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



Re: [delphi-br] Biometria em delphi

2009-02-18 Por tôpico Nicolas
A solução da Griaule não é tão cara assim não, além de funcionar direitinho é 
fácil de usar.

Acho que com a correria do dia-a-dia vai ser dificil encontar candidatos a 
reinventar a roda,
ainda mais num assunto tão complexo quanto biometria. E no final vc vai chegar 
a conclusão 
que as soluções prontas valem cada centavo...

mas de qquer maneira, se for encarar esse desafio, boa sorte.

[]s

Alexandre




  - Original Message - 
  From: Allan GabrielAM 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, February 17, 2009 8:36 PM
  Subject: Re: [delphi-br] Biometria em delphi


  Olá, 
  pesquisei no histórico, com certeza encontrei muitas mensagens, mas nada que 
realmente explicasse do assunto, estou tentando ler porta usb no momento, pois 
já comprei o leitor da microsoft, o modelo é DG2 0004, paguei 169,00, chega em 
dois dias, sobre a sdk, vou tentar ver o que consigo lendo porta usb, caso 
contrário terei que comprar as licenças da 
http://www.griaulebiometrics.com/page/pt-br/fingerprint_sdk que custa carro pra 
xuxu, se alguém gosta de superar desafios, com certeza essa é uma boa hora, pq 
eu também estou tentando desvendar esses mistérios da biometria através do 
delphi7.Conto com ajuda dos colaboradores mais experiêntes que eu.

  Obrigado, fico no aguardo.

  Atenciosamente,
  Rafael Vivan.
  (49) 9987-0539

  MSN: orafinhag...@hotmail.com

  - Original Message - 
  From: Jackson Gomes - ToolsComps 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, February 17, 2009 4:59 PM
  Subject: Re: [delphi-br] Biometria em delphi

   Estou aqui pela primeira vez pedindo uma ajuda a vocês. Na empresa em que 
   estagio
   estão querendo um software para leitura biometrica, gostaria de saber de 
vocês 
   se
   alguem ja fez algo do tipo.
  
   Origado pela atenção e aguardo respostas

  Uma rápida pesquisa nas mensagens antigas te dariam varias informações, pois 
  esse assunto é antigo...

  
http://br.groups.yahoo.com/group/delphi-br/msearch?date=anyDM=DD=DY=DM2=DD2=DY2=AM=containsAT=SM=containsST=MM=containsMT=Biometriacharset=utf-8

  Jackson Gomes
  ToolsComps - Controle de Usuários para Desenvolvedores CodeGear
  Web Site: http://www.toolsandcomps.com
  Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
  e-mail: jack...@toolsandcomps.com
  Fone: 27 3389 1138 - 8811 0324
  --
  http://jacklovesdelphi.blogspot.com - Delphi, Intraweb, etc
  --
  Devhost - Webhost para desenvolvedores Delphi
  http://www.devhost.com.br
  devh...@devhost.com.br 

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


  


--



  No virus found in this incoming message.
  Checked by AVG - www.avg.com 
  Version: 8.0.237 / Virus Database: 270.10.25/1957 - Release Date: 02/17/09 
07:07:00


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



Re: [delphi-br] Delphi não respeita o ShortDateFor mat, porque?

2009-02-05 Por tôpico Nicolas
eu  configuro o ShortDateFormat e o LongDateFormat com a mesma máscara e não dá 
problemas nos clientes.

faça esse teste,

[]s

Alexandre


  - Original Message - 
  From: Rubem Nascimento da Rocha 
  To: delphi-br 
  Sent: Thursday, February 05, 2009 4:29 PM
  Subject: RE: [delphi-br] Delphi não respeita o ShortDateFormat, porque?



  Explique melhor as situações onde o seu aplicativo Delphi não respeita o uso 
de ShortDateFormat. Só assim poderemos entender o q acontece.

  Sds.

  
   To: delphi-br@yahoogrupos.com.br
   From: felli...@gmail.com
   Date: Thu, 5 Feb 2009 15:39:34 -0300
   Subject: [delphi-br] Delphi não respeita o ShortDateFormat, porque?
  
  
   Amigos, estou tendo vários problemas em maquinas dos clientes, por causa das
  
   datas, cada um com um jeito diferente... pra resolver isso pensei em usar o
  
   ShortDateFormat, coloquei assim:
  
  
  
   ShortDateFormat := 'dd/mm/';
  
  
  
   Porém não respeita... continua usando o do windows... o que está levando a
  
   dar erros... como eu faço pra usar no meu sistema o formato que eu quero?
  
  
  
   Obrigado
  
   []s
  __
  Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger!
  http://www.amigosdomessenger.com.br/
  


--



  No virus found in this incoming message.
  Checked by AVG - www.avg.com 
  Version: 8.0.233 / Virus Database: 270.10.18/1935 - Release Date: 01/31/09 
20:03:00


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



Re: [delphi-br] Livro Delphi 2007...Alguem sabe?

2009-01-15 Por tôpico Nicolas
Da uma pesquisada na www.estantevirtual.com.br

sempre compro livros lá, tem novos e usados, com ótimos preços.

[]s

Alexandre

  - Original Message - 
  From: Robson Tazinaffo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, January 15, 2009 7:42 AM
  Subject: [delphi-br] Livro Delphi 2007...Alguem sabe?


  Alguém conhece e sabe onde comprar algum livro Delphi 2007??? De
  preferencia estilo A BIBLIA



   


--



  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com 
  Version: 8.0.176 / Virus Database: 270.10.7/1895 - Release Date: 15/1/2009 
07:46


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



Re: [delphi-br] Impressão em Mini Impressora de Em issão de Cupom Não Fiscal

2009-01-14 Por tôpico Nicolas
Se ela não for USB e estiver instalada como Genérico Texto você pode 
tranquilamente abrir a porta LPTn ou COMn
e enviar as linhas de impressão via WriteLn.

[]s

Alexandre

  - Original Message - 
  From: gilberto_rr 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, January 13, 2009 11:43 AM
  Subject: [delphi-br] Impressão em Mini Impressora de Emissão de Cupom Não 
Fiscal


  Galera,

  Estou iniciando na programação para impressoras não fiscais, e um
  cliente adquiriu uma Mini Impressora Elgin para emissão de cupons não
  fiscais. Sendo assim, gostaria de saber se é possível mandar a
  impressão direto para a porta em que a impressora está conectada,
  usando apenas comandos Write em um TexFile??? Ou necessito de algo
  mais??? Obrigado!



   


--



  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com 
  Version: 8.0.176 / Virus Database: 270.10.6/1889 - Release Date: 12/1/2009 
20:18


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



Re: Res: [delphi-br] DELPHI NAO FUNCIONA PARA PROJETO DE GRANDE PORTE NUM UNICO EXECUTAVEL.

2008-12-18 Por tôpico Nicolas

Concordo plenamente e

assino embaixo.

Alexandre Nicolas


  - Original Message - 
  From: José Mário Silva Guedes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, December 18, 2008 4:22 PM
  Subject: Re: Res: [delphi-br] DELPHI NAO FUNCIONA PARA PROJETO DE GRANDE 
PORTE NUM UNICO EXECUTAVEL.


  Sempre que vejo algo assim na lista eu tento, juro que tento, não me
  manifestar.

  Óbvio que não sei qual a natureza do software em questão, se é bem
  programado ou não etc etc e etc, enfim, não tenho nenhum detalhe do software
  a não ser que ele tem 51 mega... O que para mim indica uma falha de
  projeto...

  Nas empresas que trabalhei, infelizmente o costume sempre foi agregar em um
  único exe todas as funcionalidades do sistema, em geral ERPs.

  Porque? Eram empresas pequenas, com poucos programadores, que reagiam aos
  que o clientes pediam e lá vai tranqueira para o projeto.

  Mas é óbvio que um sistema não pode ser traduzido a um DPR.

  A afirmação feita pelo nosso colega, é mais uma daquelas manifestações que
  irritam os entusiatas da ferramenta e é um desrespeito àqueles sabem
  utilizar a ferramenta.

  Eu gostaria que no ano de 2009 a lista fosse mais útil ao meu dia a dia, que
  eu leia posts com o mínimo de educação (mesmo que sejam críticas ou seja lá
  o que for). Gostaria também de posts inteligentes, desafiadores.

  Não queria ver ataques ou defesas ao Delphi. O mercado tá cheio de boas
  linguagens, novas e maduras. O .NET e o Java estão com o canto da sereia em
  alto e bom tom. Quero ver discussão sobre pascal, OO, cases de sucesso, de
  insucesso e quem sabe, humildade para reconhecermos que tudo que sabemos é
  que nada sabemos.

  Ao colega Josi, digo o seguinte... Você tem um problema de projeto, não de
  ferramenta. O seu software deve ser completo, deve abranger bastante coisa.
  E eu tenho certeza que o Delphi é a melhor ferramenta que você poderia estar
  usando.

  Quem sabe, ao inves de afirmar que o Delphi não serve para projetos de
  grande porte, você postasse o seguinte:

  Amigos, tenho um projeto gigante, que tá cheio de BUGs. Algum colega tem
  alguma estratégia para eu modularizar o meu projeto?

  Não estou sendo desrespeitoso nem nada. Compreendo que você tem um baita
  problema na mão e precisa de um culpado. Sugiro que pare de procurar um
  culpado e faça uma estratégia. Só você pode responder à sua pergunta: Como
  modularizar um projeto que tem mais de 1000 arquivos .pas .

  Será que você usa componentes de terceiros? Será que todas as units são
  funcionais? Será que há muita redundância de código?

  Bom, é isso.

  Feliz 2009 e feliz código a todos!

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



   


--



  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com 
  Version: 8.0.176 / Virus Database: 270.9.19/1854 - Release Date: 17/12/2008 
19:21


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



Re: [delphi-br] Delphi doado é pirataria?

2008-12-05 Por tôpico Nicolas
Bom, nem sempre é necessário se conformar,

semana passada a Microsoft perdeu aqui no Brasil, um processo contra uma 
empresa do Sul,

que havia comprado apenas uma licença de Windows ou Office (não me recordo 
agora),

e instalado em todos os computadores da empresa.

A Microsoft acusou de pirataria, mas o juiz entendeu que não, no entendimento 
dele a empresa
não revendeu nem copiou, apenas instalou nos computadores de sua propriedade.

Acredito que isso abrirá um precedente muito importante na justiça brasileira, 
que levará as demais
grandes produtoras de soft a reverem suas politicas, se não quiserem tomar pau 
na justiça.

Então, abram o olho.

[]s

Alexandre


  - Original Message - 
  From: Ricardo César Cardoso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, December 04, 2008 9:08 PM
  Subject: Re: [delphi-br] Delphi doado é pirataria?


  InfeliZmente não há nada que se possa fazer. Nessa questão de licenÇa a 
política sempre foi essa. Não é agora que vão mudar.

  []'s
  Ricardo.

  __

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

  --- Em qui, 4/12/08, Leonardo Quinino [EMAIL PROTECTED] escreveu:
  De: Leonardo Quinino [EMAIL PROTECTED]
  Assunto: Re: [delphi-br] Delphi doado é pirataria?
  Para: delphi-br@yahoogrupos.com.br
  Data: Quinta-feira, 4 de Dezembro de 2008, 16:27

  Infelismente, a proprietária do Delphi tem uma politica nada amigável.

  Eu também sou da opinião que se a licensa é minha eu comprei, paguei, eu

  posso doar sim,

  software não é apenas serviço não, como foi colocado o serviço de um

  pedreiro, carpinteiro, ,,

  apesar de contrar o serviços desse profissional, o carpiteiro por exemplo

  fez uma mesa, um armário, o serviço eu paguei para ele, mas a mesa, o

  armário (objeto do serviço) é meu, se eu quiser ponho até fogo,, é

  meu o mesmo (na minha humilde opnião por favor,, vamos discutir de

  forma serena), funciona para softwares, eu paguei o serviço a dona do

  delphi pelo trabalho deles de produzir o software (nome bonito que colocaram

  o nome de licensa), rs :) , mas eu adquiri um produto ( só que o formato é

  digital ).

  Se o ponto de vista da embargadeiro (ahha desculpe o tracadilho,, mas isso

  é embargue comercial).. . for levada imagina só... uma empresa de software

  contrata um programador para prestar um serviço (criar um software) ao

  final de 6 meses de trabalho o software é de quem ?

  o serviço foi do programador, , mas o software quem é dona é a empresa

  Bem só quis jogar mais molho nesse assunto, que tenho certeza é de muito

  esclarecedor para muitos.

  2008/12/4 Luiz ESCobar [EMAIL PROTECTED] .com.br

   Bom na parte free, vc tem o LAZARUS (que ja tem MyDAC pra ele agora)..

   Tem o HARBOUR (programação igual CLIPPER, mas com telas graficas)

   opensource tmbm...

   Tem o PHP que agora pode ser compilado com o bcompiler que é da propria

   linguagem...

   []s

  

   Luiz Escobar - Analista/Desenvolve dor:

   WEB - HTML/JavaScript/ PHP/MySQL

   WINDOWS - Delphi/ASSEMBLY/ MySQL/xBase

   SERVIDORES - CNA IntraNetWare4. 11, LINUX-(RedHat9/ Suse11), Windows 2K/XP

   HARBOUR  - - - - - -

   Borland C++ 5.5.1 (32 bit)

   Harbour 1.0.1 Intl. (Rev. 9429)

   xHarbour Compile build 1.1.0 (Simplex)

   Harbour MiniGUI 1.5 Extended Edition (Build 57d) - 2008.10.10

    - - - - - -

  

   From: Coutinho - Yahoo

   Sent: Thursday, December 04, 2008 12:23 PM

  

   To: [EMAIL PROTECTED] os.com.br delphi-br%40yahoog rupos.com. br

   Subject: Re: [delphi-br] Delphi doado é pirataria?

  

   Pelo visto vou ter de economizar umas milhas para comprar em meu nome

   o delphi...

   Assim, ficaria na legalidade  embora ainda ache que não sou pirata...

  

   E sinceramente, acho absurda esta posição!!!

  

   Em relação aos tantos bugs relacionados, quem sabe não seja mais negócio

   realmente partir para o Lazarus, ou para fazer as coisas em PHP.

   Mais trabalho, mais dor de cabeça, mas menos achacamento!

  

   Sds

   Emanuel Coutinho

  

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

  

   

  

  -- 

  Leonardo Quinino

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











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

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



   


--



  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com 
  Version: 8.0.176 / Virus Database: 270.9.14/1829 - Release Date: 4/12/2008 
14:59


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



Re: [delphi-br] Delphi doado é pirataria?

2008-12-05 Por tôpico Nicolas
Gildenor,

o que eu escrevi sobre a ação que a Microsoft perdeu não é achismo,

como pode ser lido no link 
http://www.radiocriciuma.com.br/portal/vernoticia.php?id=8883

Eu costumo me fundamentar antes de dar alguma opinião.

Abraços !

[]s

Alexandre


  - Original Message - 
  From: Gildenor dos santos Teixeira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, December 05, 2008 9:00 AM
  Subject: Re: [delphi-br] Delphi doado é pirataria?


  Colegas,

  Vocês não estão cansados de tantos achismos bobos não? O Direito não se
  baseia em achismo muito menos a justiça que se baseia neste.
  Conjecturar sobre este tema nao os levará a absolutamente a nada. Caso haja
  alguém com medo incorrer neste crime, consulta um advogado especilizado no
  assunto e pronto, vocês ficam degladiando-se defendendo o seu ponto de
  vista (achismos) para ver quem tem razão e na verdade não vejo ninguem aqui
  capacitado(juridicamente) pra debater tal assunto.

  Acho que essa thread passou da hora de acabar, voces nao acham? Com a
  palavra o moderador.

  É minha opinião.

  Gildenor Teixeira.

  2008/12/5 Nicolas [EMAIL PROTECTED]

   Bom, nem sempre é necessário se conformar,
  
   semana passada a Microsoft perdeu aqui no Brasil, um processo contra uma
   empresa do Sul,
  
   que havia comprado apenas uma licença de Windows ou Office (não me recordo
   agora),
  
   e instalado em todos os computadores da empresa.
  
   A Microsoft acusou de pirataria, mas o juiz entendeu que não, no
   entendimento dele a empresa
   não revendeu nem copiou, apenas instalou nos computadores de sua
   propriedade.
  
   Acredito que isso abrirá um precedente muito importante na justiça
   brasileira, que levará as demais
   grandes produtoras de soft a reverem suas politicas, se não quiserem tomar
   pau na justiça.
  
   Então, abram o olho.
  
   []s
  
   Alexandre
  
  
   - Original Message -
   From: Ricardo César Cardoso
   To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Sent: Thursday, December 04, 2008 9:08 PM
   Subject: Re: [delphi-br] Delphi doado é pirataria?
  
   InfeliZmente não há nada que se possa fazer. Nessa questão de licenÇa a
   política sempre foi essa. Não é agora que vão mudar.
  
   []'s
   Ricardo.
  
   __
  
   Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!
  
   --- Em qui, 4/12/08, Leonardo Quinino [EMAIL 
PROTECTED]leonardo.quinino%40gmail.com
   escreveu:
   De: Leonardo Quinino [EMAIL PROTECTED]leonardo.quinino%40gmail.com
   
   Assunto: Re: [delphi-br] Delphi doado é pirataria?
   Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Data: Quinta-feira, 4 de Dezembro de 2008, 16:27
  
   Infelismente, a proprietária do Delphi tem uma politica nada amigável.
  
   Eu também sou da opinião que se a licensa é minha eu comprei, paguei, eu
  
   posso doar sim,
  
   software não é apenas serviço não, como foi colocado o serviço de um
  
   pedreiro, carpinteiro, ,,
  
   apesar de contrar o serviços desse profissional, o carpiteiro por exemplo
  
   fez uma mesa, um armário, o serviço eu paguei para ele, mas a mesa, o
  
   armário (objeto do serviço) é meu, se eu quiser ponho até fogo,, é
  
   meu o mesmo (na minha humilde opnião por favor,, vamos discutir de
  
   forma serena), funciona para softwares, eu paguei o serviço a dona do
  
   delphi pelo trabalho deles de produzir o software (nome bonito que
   colocaram
  
   o nome de licensa), rs :) , mas eu adquiri um produto ( só que o formato é
  
   digital ).
  
   Se o ponto de vista da embargadeiro (ahha desculpe o tracadilho,, mas isso
  
   é embargue comercial).. . for levada imagina só... uma empresa de software
  
   contrata um programador para prestar um serviço (criar um software) ao
  
   final de 6 meses de trabalho o software é de quem ?
  
   o serviço foi do programador, , mas o software quem é dona é a empresa
  
   Bem só quis jogar mais molho nesse assunto, que tenho certeza é de muito
  
   esclarecedor para muitos.
  
   2008/12/4 Luiz ESCobar [EMAIL PROTECTED] .com.br
  
Bom na parte free, vc tem o LAZARUS (que ja tem MyDAC pra ele agora)..
  
Tem o HARBOUR (programação igual CLIPPER, mas com telas graficas)
  
opensource tmbm...
  
Tem o PHP que agora pode ser compilado com o bcompiler que é da propria
  
linguagem...
  
[]s
  
   
  
Luiz Escobar - Analista/Desenvolve dor:
  
WEB - HTML/JavaScript/ PHP/MySQL
  
WINDOWS - Delphi/ASSEMBLY/ MySQL/xBase
  
SERVIDORES - CNA IntraNetWare4. 11, LINUX-(RedHat9/ Suse11), Windows
   2K/XP
  
HARBOUR  - - - - - -
  
Borland C++ 5.5.1 (32 bit)
  
Harbour 1.0.1 Intl. (Rev. 9429)
  
xHarbour Compile build 1.1.0 (Simplex)
  
Harbour MiniGUI 1.5 Extended Edition (Build 57d) - 2008.10.10

Re: [delphi-br] [OFF] Revista - Engenharia de Software

2008-12-04 Por tôpico Nicolas
Estava viajando ontem e hoje me deparei com essa dúvida sobre Revista.

Eu assino diversas revistas. Compro outras em banca.

Veja, Superinteressante, Info, etc...

Ao final de 12 meses, tenho uma pilha de revistas acumuladas num canto da casa,
muitas nunca mais vou ler.

Quer dizer, que pelo raciocínio de várias pessoas aqui da lista, se alguém me 
pedir
um exemplar da Veja, por exemplo, eu eu dar para essa pessoa, eu sou pirata ?

Minha irmã sempre pede para ler minha Superinteressante, e não é raro eu nem 
pedir de volta depois,
acaba ficando com ela. Isso é pirataria ?

Meu sobrinho de 6 anos precisava levar algumas revistas para a escolhinha para 
recortar,
eu dei várias revistas para ele. Pronto, aos 6 anos de idade ele e toda a 
escolhinha são piratas ?

Até para meu dentista já doei várias dessas revistas, para ele colocar na sala 
de espera,
então somos piratas ?

Quer dizer que o único destino viável para meu estoque anual de revistas é 
fazer uma enorme fogueira ?

Já li e reli várias vezes o email da pessoa que solicitou um exemplar da 
revista, não vi em momento algum
ele pedir um xerox da revista, ou uma versão scaneada, ou arquivo digital. Acho 
que simplesmente ele quis
dizer: Ei, se alguém tem um exemplar da revista, ao invés de jogar fora, pode 
mandar para mim ?

Uma coisa é copiar, duplicar, plagiar. Outra coisa é não querer mais o original.

Espero que alguém pelo menos nos mande o conteúdo da lei que me proiba de 
escolher um
destino para minha pilhas de revistas sem me classificar de pirata.

[]s

Alexandre


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



Re: [delphi-br] [Off] Aniversário do Rubem

2008-11-17 Por tôpico Nicolas
Acho que no dia do aniversário ele não vai achar ruim chamar de Rubens, hehehehe

Parabéns

Alexandre

  - Original Message - 
  From: Moacir - GMail 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, November 17, 2008 12:08 PM
  Subject: Re: [delphi-br] [Off] Aniversário do Rubem



  Sucesso, muito sucesso Rubens !!!

  [ ]´s
  Moacir

  Adriano Santos (Y!) escreveu:
   Ae pessoal,
  
   Hoje é aniversário de um dos caras mais antigos da lista. Gente fina, 
   camarada e que ajuda muito todo mundo. Estrassadinho de vez em quando, 
   mas normal...k
  
   Ae Rubem, parabéns, muito sucesso, alegria, felicidade e paz.
   Obrigado por sempre contriubuir.
  
   Abs
  
   


   


--



  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com 
  Version: 8.0.175 / Virus Database: 270.9.4/1794 - Release Date: 17/11/2008 
08:48


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



[delphi-br] Aceito sugestões

2008-11-14 Por tôpico Nicolas
Bom dia a todos,

tenho um sistema em Delphi desenvolvido para um cliente com banco de Dados 
MS-SQL Server.

Agora ele gostaria de que fosse criado uma aplicação WEB, para que os 
vendedores possam
lançar pedidos via internet, inclusive a partir de lan-houses.

Gostaria de sugestões de que ferramentas e tecnologias utilizar para 
desenvolver esse pedido via WEB,
de modo que ficasse bem interativo essa página.

obrigado,

Alexandre

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



Re: [delphi-br] Aceito sugestões

2008-11-14 Por tôpico Nicolas
Obrigado a todos que deram sugestões,

já estou analisando todas e vendo qual dará mais certo para o meu caso,

muito obrigado,

Alexandre

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



Re: [delphi-br] Delphi-BR Yahoo!

2008-10-31 Por tôpico Nicolas
Aliás,

o serviço de listas do yahoo está muito ruim

participo de uma lista da pós graduação que usa o google groups e é 1000% melhor

fica aqui a sugestão para migrarmos...

[]s

Alexandre

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



Re: [delphi-br] erros internos Delphi: URW e Stack Overflow no Compilador

2008-10-28 Por tôpico Nicolas
Ha muito tempo atrás vi acontecer algo parecido num projeto gigante
cujos formulários estavam todos como AutoCreate, ou seja, sobrecarregava a 
memória e não abria mais.

Se este for seu caso, deixe apenas o formulário principal como autocreate, e 
criando os demais apenas
em tempo de execução.

[]s

Alexandre Nicolas

  - Original Message - 
  From: oswaldosaraujo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, October 27, 2008 9:34 PM
  Subject: [delphi-br] erros internos Delphi: URW e Stack Overflow no Compilador


  Olá amigos

  Boa Noite!

  Faz uns 10 dias que eu tento contornar um problema no Delphi e não
  consigo. De uma hora para outra não consigo mais compilar meu
  principal projeto. 

  Ele abriu uma janela chamada Danger com uma mensagem Stack
  Overflow. Save your work and restart Delphi. e em algumas vezes
  algumas mensagens Internal Error URW com um número que varia 3237,
  depois 3235. 

  Eu já coloquei isto em 5 máquinas diferentes (um Core 2 Duo e 4 Dual
  Core) , desinstalei e reinstalei o Delphi, reinstalei o Jedi na última
  versão 3.34. Tentei criar pacotes e isolar partes do sistema. Além de
  começar a refazer o projeto do 0 umas duas vezes. Tem uns 500
  formulários no projeto. A maioria deles faz referencia à constantes
  tipadas do formulário principal, algo como o nome do escritório, um
  código de cliente atual, o usuário logado. Ele ainda usa BDE e paradox.

  Já tentei compilar direto da linha de comando para ver o que acontecia
  e dá um erro no compilador.

  Usei Delphi 6 Pro e 7 Enterprise, ambos atualizados. Retirei o que
  havia do antigo RXLIB e tirei algumas referencias múltiplas em
  formulários de busca com diversos forms chamadores, todos com
  constantes tipadas usadas como parâmetros. 

  Nada funcionou!!!

  Tentei rodar num D2007 trial, mas não foi possível porque não deu
  para instalar o Jedi. Jcl e JVCL. (o trial não roda a versão linha de
  comando para que eu saiba se o projeto ao menos compila em outra versão. 

  Já conversei com algumas pessoas, mas ainda ninguém foi capaz de dizer
  o que significam esses erros. 

  Aceito sugestões! Qualquer uma!

  Muito obrigado!

  Oswaldo dos Santos Araujo
  [EMAIL PROTECTED]
  (11) 9259-4094



   


--



  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com 
  Version: 8.0.175 / Virus Database: 270.8.4/1750 - Release Date: 27/10/2008 
18:14


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



Re: [delphi-br] Duvida - Deu Branco - Como fazer o calculo do ICMS, IPI e ISS ?

2008-10-21 Por tôpico Nicolas
Icms e IPI pode variar por produto, calculo de porcentagem simples:  IMPOSTO = 
(Unitario * Qtde) * (Imposto/100);

ISS é sempre sobre o a soma de todos os serviços da nota.

  - Original Message - 
  From: Berdam 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, October 21, 2008 8:18 AM
  Subject: Re: [delphi-br] Duvida - Deu Branco - Como fazer o calculo do ICMS, 
IPI e ISS ?


  ipi =( ValorTotal/100)*porcentagemIPi
  --
  Uberdam Cavaletti
  Formado em Tecnologia da Informação - Unoesc - Xxe
  Pós-graduado em desenvolvimento Java - Unoesc - Xxe

  http://www.curricular.com.br/berdam

  Visite
  http://passandoveneno.blogspot.com
  --

  --- Em seg, 20/10/08, Fabio Ferreira [EMAIL PROTECTED] escreveu:
  De: Fabio Ferreira [EMAIL PROTECTED]
  Assunto: [delphi-br] Duvida - Deu Branco - Como fazer o calculo do ICMS, IPI 
e ISS ?
  Para: Delphi-Brasil [EMAIL PROTECTED], delphi-br@yahoogrupos.com.br
  Data: Segunda-feira, 20 de Outubro de 2008, 19:27

  Pessoal

  Deu uma branco aqui e não estou achando as formulas.

  Alguem pode me dar uma luz sobre como é feito atualmente o calculo do ICMS,

  IPI e ISS ?

  Eles são feito Item a Item ou sobre o Total da Nota?

  Abs

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











  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail.com.
  http://br.new.mail.yahoo.com/addresses

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



   


--



  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com 
  Version: 8.0.173 / Virus Database: 270.8.2/1735 - Release Date: 20/10/2008 
14:52


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



Re: [delphi-br] Off-Topic -- Delphi / Biometria

2008-10-15 Por tôpico Nicolas
Acho q tive esse problema,

o que fiz foi instanciar logo no começo do sistema e só destruir quando sair do 
sistema,

e não ficar ativando a cada leitura.

[]s

Alexandre




  - Original Message - 
  From: Elazar Dornelles Ceza 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, October 15, 2008 3:21 PM
  Subject: Res: [delphi-br] Off-Topic -- Delphi / Biometria


  Eduardo, 

  Entendo, mas o que acontece é que temos um modulo especifico no sistema para 
este processo de identificação e cadastro de pessoal, este modulo que é criado 
somente quando á necessidade de um destes processos. Na primeira vez que é 
criado funciona blz, na segunda não roda de jeito nenhum...

  Já mandei um email hoje pela manha pra eles,até agora nada ainda...vou 
tentar postar no forum pra ver se não houver respostas...

  Atenc;
  Elazar

  - Mensagem original 
  De: Eduardo Silva dos Santos [EMAIL PROTECTED]
  Para: delphi-br@yahoogrupos.com.br
  Enviadas: Quarta-feira, 15 de Outubro de 2008 14:56:14
  Assunto: Re: [delphi-br] Off-Topic -- Delphi / Biometria

  Olá Elazar, eu baixei o SDK, instalei o leitor e só testei o demo, ainda não
  mexi no código.

  mas carregar e descarregar a dll cada vez que for usar o leitor eu não acho
  uma boa não, acaba consumindo um pouco de tempo.

  eu vou deixar como no demo deles... ao iniciar o softeware carrega a dll e
  inicializa o leitor e descarrega somente ao sair do sistema.
  acho mais interessante assim.

  posta lá no forum ou manda um e-mail que o suporte de diz algo sobre isso.

  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail.com.
  http://br.new.mail.yahoo.com/addresses

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



   


--



  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com 
  Version: 8.0.173 / Virus Database: 270.8.0/1726 - Release Date: 15/10/2008 
07:29


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



[delphi-br] Off - Vaga programador Delphi - BAURU

2008-10-09 Por tôpico Nicolas
Vaga para programador Dephi

Empresa: Quality System - Bauru (SP)
Salário inicial: Piso Programador Júnior + Unimed + Produtividade
Conhecimentos: Delphi Avançado, Firebird , MS SQL-Server

Interessados, favor enviar curriculum para:

[EMAIL PROTECTED]

[]s

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



Re: [delphi-br] Gerar Arquivo Texto

2008-09-29 Por tôpico Nicolas
bloco de notas do windows

  - Original Message - 
  From: Juliano Silva - Yahoo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, September 29, 2008 3:11 PM
  Subject: [delphi-br]  Gerar Arquivo Texto 


  Pessoal

  Preciso gerar um arquivo texto para importação em outro sistema, como um
  arquivo que a linha é muito grande, tenho que saber se a informação está
  sendo gerada na posição/coluna correta, qual programa vocês utilizam para
  verificar posicionamento de colunas em um arquivo texto, pelo Edit do MS-DOS
  não está dando mais... rsrsrrs?

  att.

  Juliano

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



   


--



  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com 
  Version: 8.0.169 / Virus Database: 270.7.5/1697 - Release Date: 29/9/2008 
07:40


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



Re: [delphi-br] Re: Mais uma dúvida Importante !

2008-09-24 Por tôpico Nicolas
sem muito tecniquês, é o seguinte:

O  last é um comando, ou seja, você está mandando se posicionar no ÚLTIMO 
registro

O eof testa se o registro é o último da tabela.

Alexandre


  - Original Message - 
  From: victor_scampini 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, September 24, 2008 7:33 AM
  Subject: [delphi-br] Re: Mais uma dúvida Importante !


  Ok amigo, vou tentar eof...Mais você pode me explicar porque se 
  possível ?...Obrigado desde já !

  Abraço !



   


--



  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com 
  Version: 8.0.169 / Virus Database: 270.7.1/1687 - Release Date: 23/9/2008 
18:32


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



Re: [delphi-br] RadioGroup ajuda basica

2008-09-15 Por tôpico Nicolas
Para desmarcar todos:

Radiogroup1.itemindex := -1 ;

[]s

Alexandre



  - Original Message - 
  From: alessandra porto 
  To: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br 
  Sent: Monday, September 15, 2008 4:32 PM
  Subject: [delphi-br] RadioGroup ajuda basica


como fazer para que ao precionar um botão deixe  desmarcado
  todos os itens de um RadioGroup

  desta forma eu  marco um

  procedure TForm1.Button1Click(Sender: TObject);
  begin
 RadioGroup1.ItemIndex:=0;
  end;

  e para desmarcar todos??

  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail.com.
  http://br.new.mail.yahoo.com/addresses

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



   


--



  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com 
  Version: 8.0.169 / Virus Database: 270.6.21/1672 - Release Date: 15/9/2008 
09:21


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



Re: [delphi-br] que duvida!!!!!

2008-09-08 Por tôpico Nicolas
Isso geralmente se chama Skin, 

há alguns componentes free e outros pagos, com alguns skins inclusos ou que 
permitem que vc crie os seus.

só cheguei a testar o demo um que era pago, o suiSkin, me pareceu muito bom.

[]s

Alexandre




  - Original Message - 
  From: Didi 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, September 08, 2008 3:24 PM
  Subject: [delphi-br] que duvida!


  Boa tarde a todos.
  Eu sei que a pergunta é um tanto fora do padrão. Mas peço permissão a 
  todos para faze-la. É que deu um branco aqui no veio. Vamos lá!
  Certa vez vi uns forms feitos em delphi que utilizavam uma ferramenta 
  que modificava a aparencias de um dbgrid e do proprio form. Inclusive 
  di bisistemMenu,biMenu,biMaximize colocando umas pequenas esferas .
  Já procurei, mas não consegui localizar este tipo de ferramenta na net.
  PERGUNTA? Alguem conhece o nome desta ferramenta?

  Obrigado
  didi



   


--



  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com 
  Version: 8.0.169 / Virus Database: 270.6.19/1659 - Release Date: 8/9/2008 
07:01


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



Re: [delphi-br] Calculo de datas

2008-08-15 Por tôpico Nicolas

para obter a data final, transforme os meses em dias e some na data inicial:

DataFinal := DataInicial + ( Meses * 30 ) ;

[]s

Alexandre



  - Original Message - 
  From: Antonio Mateus 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, August 15, 2008 8:18 AM
  Subject: [delphi-br] Calculo de datas


  Olá pessoal, sou iniciante no mundo Delphi e estou com o seguinte problema,
  eu tenho uma data inicial e o numero de meses e preciso que o sistema
  calcule e me mostre a data final a partir dessas 2 informações ja tentei no
  google mas sempre encontro calculos entre 2 datas mas nesse caso eh uma data
  e o numero de meses para mostrar a data final desse calculo, se alguem puder
  me ajudar eu ficarei muito agradecido !
  Obrigado.

  -- 
  Antonio Mateus
  Estudante de Sistemas de Informação

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



   
No virus found in this incoming message.
Checked by AVG - http://www.avg.com 
Version: 8.0.138 / Virus Database: 270.6.3/1612 - Release Date: 14/8/2008 18:03


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



Re: [delphi-br] Quickreport Duvidas

2008-08-13 Por tôpico Nicolas
O jeito mais fácil para fazer isso,

é utilizar o QrCompositeReport, está na palheta do QuickReport, é um componente 
que permite imprimir vários relatorios
do quickreport em um só.

dai ao invés de vc executar um QuickReport1.Preview, por exemplo, você vai 
executar o QrCompositeReport1.Preview,
ele se encarrega de juntar os relatorios desejados em um só, na sequencia que 
vc informar no evento OnAddReports dele.

por exemplo:

você monta seus 3 relatorios individualmente, para emitir como se fosse um só:

procedure TForm1.QRCompositeReport1AddReports(Sender: TObject);
begin
  with QrCompositeReport1.Reports do
  begin
Add(QuickReport1);
Add(QuickReport2);
Add(QuickReport3);
  end;
end;

depois para imprimir/exbir preview:

QRCompositeReport1.Preview;  

ou

QRCompositeReport1.Print;

[]s

Alexandre



  - Original Message - 
  From: [EMAIL PROTECTED] 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, August 13, 2008 8:28 AM
  Subject: [delphi-br] Quickreport Duvidas


  Bom dia a todos, trabalho com Delphi 5 e uso o quickreport nativo do 
  proprio delphi 5.
  Estou com a seguinte duvida por não tenho experiencia com quickreport:

  Queria um relatorio neste modelo:

  quero listar 3 querys em um relatorio , exemplo:

  Titulo - Tabela 1
  dados
  dados
  dados
  dados
  dados
  dados

  Titulo - Tabela 2
  dados
  dados
  dados
  dados
  dados
  dados

  Titulo - Tabela 3
  dados
  dados
  dados
  dados
  dados
  dados
  dados

  Por favor, serei grato pela ajuda, um abraço a todos.



   
No virus found in this incoming message.
Checked by AVG - http://www.avg.com 
Version: 8.0.138 / Virus Database: 270.6.2/1609 - Release Date: 13/8/2008 06:43


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



Re: [delphi-br] [DELPHI-Total] consulta lenta

2008-08-07 Por tôpico Nicolas
Esse erro normalmente acontece quando o query está retornando menos campos do 
que aqueles
definidos no Fields Editor do mesmo query.

Sugiro vc dar um duplo clique no Query, deletar os campos listados no fields 
editor, e mandar incluir novamente.

deve resolver,

[]s

Alexandre

  - Original Message - 
  From: Luis Hilário Tobler Garcia 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, August 07, 2008 11:11 AM
  Subject: Re: [delphi-br] [DELPHI-Total] consulta lenta


  Bom dia Nicolas,
  segui as dicas que você me deu, segue abaixo o código SQL que eu elaborei e 
que funcionou perfeitamente no IBConsole:

  Select 
Alu.Codigo,Alu.Nome,Alu.NomeResponsavel,Alu.RGResponsavel,Alu.CPFResponsavel,
  Alu.DataNascimento,Alu.Sexo,Alu.CEP,Alu.Nome,Ru.Nome as 
NomeRua,Alu.Numero,Alu.Complemento,
  Bai.Nome as NomeBairro,Cid.Nome as NomeCidade,Cid.UF as UFCidade,Cid.DDD as 
DDD,
  Alu.TelefoneResidencial,Alu.TelefoneComercial,Alu.TelefoneCelular,Alu.Email,
  Alu.ProximaAvaliacaoFisica,Alu.ProximoPagamento,Alu.Observacoes,Alu.Situacao,
  Alu.DataCadastro,Alu.UltimaAlteracao,Usu.F4 as Usuario From Alunos Alu
  Left Join Ruas Ru on Alu.CodigoRua = Ru.Codigo
  Left Join Bairros Bai on Ru.CodigoBairro = Bai.Codigo
  Left Join Cidades Cid on Bai.CodigoCidade = Cid.Codigo
  Left Join Usuarios Usu on Alu.CodigoUsuario = Usuarios.F1

  Porém ao tentar usar esse mesmo código dentro do Delphi 7 obtive o erro:  No 
argument for format '%s' , segue abaixo o código em pascal:

  with dtmAcademia do
  begin
  with ibqryAlunos do
  begin
  SQL.Clear;
  SQL.Add('SELECT Alu.Codigo,Alu.Nome,Alu.NomeResponsavel,Alu.RGResponsavel,');
  SQL.Add('Alu.CPFResponsavel,Alu.DataNascimento,Alu.Sexo,Alu.CEP,Alu.Nome,');
  SQL.Add('Ru.Nome AS NomeRua,Alu.Numero,Alu.Complemento,Bai.Nome AS 
NomeBairro,');
  SQL.Add('Cid.Nome AS NomeCidade,Cid.UF AS UFCidade,Cid.DDD AS DDD,');
  SQL.Add('Alu.TelefoneResidencial,Alu.TelefoneComercial,Alu.TelefoneCelular,');
  SQL.Add('Alu.Email,Alu.ProximaAvaliacaoFisica,Alu.ProximoPagamento,');
  SQL.Add('Alu.Observacoes,Alu.Situacao,Alu.DataCadastro,Alu.UltimaAlteracao,');
  SQL.Add('Usu.F4 AS Usuario FROM Alunos Alu ');
  SQL.Add('LEFT JOIN Ruas Ru ON Alu.CodigoRua = Ru.Codigo ');
  SQL.Add('LEFT JOIN Bairros Bai ON Ru.CodigoBairro = Bai.Codigo ');
  SQL.Add('LEFT JOIN Cidades Cid ON Bai.CodigoCidade = Cid.Codigo ');
  SQL.Add('LEFT JOIN Usuarios Usu ON Alu.CodigoUsuario = Usuarios.F1');
  Open;
  end;
  end;

  Estou fazendo alguma coisa errada?

  Valeu, Hilário.

  - Original Message - 
  From: Nicolas 
  To: Luis Hilário Tobler Garcia ; delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, August 05, 2008 8:26 AM
  Subject: Re: [delphi-br] [DELPHI-Total] consulta lenta

  Ok, no exemplo abaixo vou exibir o nome da rua na consulta de alunos,
  a partir dai basta você aplicar a mesma idéia para os outros relacionamentos:

  Select a.Codigo,a.Nome,r.Nome as NomeDaRua
  From Alunos a
  Left Join Ruas r on a.CodigoRua = r.Codigo 

  Veja que quando queremos fazer relacionamentos, precisamos dar um apelido 
(alias) para as tabelas.
  Neste exemplo a tabela Alunos recebeu o apelido a e a tabela Ruas o apelido 
r
  O relacionamento é feito pelo Left Join onde informamos a tabela de 
relacionamento bem como os campos que se relacionam após a cláusula on.

  Acredito que a partir deste embrião você pode fazer todos os relacionamentos 
que precisa e deixar de usar os lookups que realmente são muito lentos.

  []s

  Alexandre

  - Original Message - 
  From: Luis Hilário Tobler Garcia 
  To: Nicolas 
  Sent: Monday, August 04, 2008 8:44 PM
  Subject: Re: [delphi-br] [DELPHI-Total] consulta lenta

  Então Nicolas,
  eu só uso queries, tenho relacionamento entre as tabelas, mas não sei como 
implementar a sua sugestão, o que eu tenho que fazer para exibir, por exemplo, 
o nome da rua, no dbgrid da consulta de alunos?

  ps: segue abaixo o código SQL de minhas 4 tabelas.

  Obrigado, Hilário.

  CREATE TABLE Cidades
  (Codigo DMCodigo,
  Nome DMNomeMedio,
  UF DMUF,
  DDD DMDDD,
  UltimaAlteracao DMData,
  DataCadastro DMData,
  CodigoUsuario DMCodigo,
  PRIMARY KEY(Codigo),
  FOREIGN KEY(CodigoUsuario) REFERENCES Usuarios(F1));

  CREATE TABLE Bairros
  (Codigo DMCodigo,
  Nome DMNomeMedio,
  CodigoCidade DMCodigo,
  UltimaAlteracao DMData,
  DataCadastro DMData,
  CodigoUsuario DMCodigo,
  PRIMARY KEY(Codigo),
  FOREIGN KEY(CodigoCidade) REFERENCES Cidades(Codigo),
  FOREIGN KEY(CodigoUsuario) REFERENCES Usuarios(F1));

  CREATE TABLE Ruas
  (Codigo DMCodigo,
  Tipo DMTipoRua,
  Nome DMNomeMedio,
  CodigoBairro DMCodigo,
  UltimaAlteracao DMData,
  DataCadastro DMData,
  CodigoUsuario DMCodigo,
  PRIMARY KEY(Codigo),
  FOREIGN KEY(CodigoBairro) REFERENCES Bairros(Codigo),
  FOREIGN KEY(CodigoUsuario) REFERENCES Usuarios(F1));

  CREATE TABLE Alunos
  (Codigo DMCodigo,
  Nome DMNomeLongo,
  NomeResponsavel DMNomeLongo,
  RGResponsavel DMRG,
  CPFResponsavel DMCPF,
  DataNascimento DMData

Re: [delphi-br] [DELPHI-Total] consulta lenta

2008-08-05 Por tôpico Nicolas
Ok, no exemplo abaixo vou exibir o nome da rua na consulta de alunos,
a partir dai basta você aplicar a mesma idéia para os outros relacionamentos:


Select a.Codigo,a.Nome,r.Nome as NomeDaRua
From Alunos a
Left Join Ruas r on a.CodigoRua = r.Codigo  

Veja que quando queremos fazer relacionamentos, precisamos dar um apelido 
(alias) para as tabelas.
Neste exemplo a tabela Alunos recebeu o apelido a  e a tabela Ruas o apelido 
r
O relacionamento é feito pelo Left Join onde informamos a tabela de 
relacionamento bem como os campos que se relacionam após a cláusula on.

Acredito que a partir deste embrião você pode fazer todos os relacionamentos 
que precisa e deixar de usar os lookups que realmente são muito lentos.

[]s

Alexandre





  - Original Message - 
  From: Luis Hilário Tobler Garcia 
  To: Nicolas 
  Sent: Monday, August 04, 2008 8:44 PM
  Subject: Re: [delphi-br] [DELPHI-Total] consulta lenta


  Então Nicolas,
  eu só uso queries, tenho relacionamento entre as tabelas, mas não sei como 
implementar a sua sugestão, o que eu tenho que fazer para exibir, por exemplo, 
o nome da rua, no dbgrid da consulta de alunos?

  ps: segue abaixo o código SQL de minhas 4 tabelas.

  Obrigado, Hilário.


  CREATE TABLE Cidades
  (Codigo DMCodigo,
   Nome DMNomeMedio,
   UF DMUF,
   DDD DMDDD,
   UltimaAlteracao DMData,
   DataCadastro DMData,
   CodigoUsuario DMCodigo,
   PRIMARY KEY(Codigo),
   FOREIGN KEY(CodigoUsuario) REFERENCES Usuarios(F1));

  CREATE TABLE Bairros
  (Codigo DMCodigo,
   Nome DMNomeMedio,
   CodigoCidade DMCodigo,
   UltimaAlteracao DMData,
   DataCadastro DMData,
   CodigoUsuario DMCodigo,
   PRIMARY KEY(Codigo),
   FOREIGN KEY(CodigoCidade) REFERENCES Cidades(Codigo),
   FOREIGN KEY(CodigoUsuario) REFERENCES Usuarios(F1));

  CREATE TABLE Ruas
  (Codigo DMCodigo,
   Tipo DMTipoRua,
   Nome DMNomeMedio,
   CodigoBairro DMCodigo,
   UltimaAlteracao DMData,
   DataCadastro DMData,
   CodigoUsuario DMCodigo,
   PRIMARY KEY(Codigo),
   FOREIGN KEY(CodigoBairro) REFERENCES Bairros(Codigo),
   FOREIGN KEY(CodigoUsuario) REFERENCES Usuarios(F1));

  CREATE TABLE Alunos
  (Codigo DMCodigo,
   Nome DMNomeLongo,
   NomeResponsavel DMNomeLongo,
   RGResponsavel DMRG,
   CPFResponsavel DMCPF,
   DataNascimento DMData,
   DiaNascimento DmDia,
   Sexo DMUmCaracter,
   CEP DMCEP,
   CodigoRua DMCodigo,
   Numero DMNumero,
   Complemento DMComplemento,
   TelefoneResidencial DMTelefone,
   TelefoneComercial DMTelefone,
   TelefoneCelular DMTelefone,
   Email DMNomeMedio,
   ProximaAvaliacaoFisica DMData,
   DiadoPagamento DMDia,
   ProximoPagamento DMData,
   Observacoes DMNomeLongo,
   Situacao DMSituacao,
   UltimaAlteracao DMData,
   DataCadastro DMData,
   CodigoUsuario DMCodigo,
   PRIMARY KEY(Codigo),
   FOREIGN KEY(CodigoUsuario) REFERENCES Usuarios(F1));



- Original Message - 
From: Nicolas 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, August 04, 2008 5:41 PM
Subject: Re: [delphi-br] [DELPHI-Total] consulta lenta


Minha sugestão é deixar de usar campos lookup, e usar query com 
relacionamento entre tabelas,
dai vc cria índices para os campos de relacionamento e suas consultas irão 
ganhar velocidade.

[]s

Alexandre

- Original Message - 
From: Luis Hilário Tobler Garcia 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, August 04, 2008 4:33 PM
Subject: Re: [delphi-br] [DELPHI-Total] consulta lenta

Boa tarde pessoal,
mesmo sem nenhuma sugestão do grupo, consegui achar ONDE está o problema, 
porém ainda estou tentando achar uma boa solução, o problema está nos campos 
Lookup, segue abaixo a estrutura de dados, eu ficarei grato em receber, se 
alguém tiver alguma sugestão ou critica construtiva sobre como continuar 
disponibilizar os dados lookups do endereço no DBGrid da consulta de Alunos com 
uma velocidade de acesso aos dados razoável.

Valeu, Hilário.

CIDADES
Codigo
Nome
UF
DDD

BAIRROS
Codigo
Nome
NomeCidade (Lookup de CIDADES)
UFCidade (Lookup de CIDADES)
DDDCidade (Lookup de CIDADES)

RUAS
Codigo
Tipo
Nome
CodigoBairro
NomeBairro (Lookup de BAIRROS)
NomeCidade (Lookup de BAIRROS)
UFCidade (Lookup de BAIRROS)
DDDCidade (Lookup de BAIRROS)

ALUNOS
Codigo
Nome
NomeResponsavel
RGResponsavel
CPFResponsavel
DataNascimento
DiaNascimento
Sexo
CEP
CodigoRua
NomeRua (Lookup de RUAS)
NomeBairro (Lookup de RUAS)
NomeCidade (Lookup de RUAS)
UFCidade (Lookup de RUAS)
DDDCidade (Lookup de RUAS)
Numero
Complemento
TelefoneResidencial
TelefoneComercial
TelefoneCelular
Email
ProximaAvaliacaoFisica
DiadoPagamento
ProximoPagamento
Observacoes
Situacao

- Original Message - 
From: Luis Hilário Tobler Garcia 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, July 28, 2008 3:59 PM
Subject

Re: [delphi-br] [DELPHI-Total] consulta lenta

2008-08-04 Por tôpico Nicolas
Minha sugestão é deixar de usar campos lookup, e usar query com relacionamento 
entre tabelas,
dai vc cria índices para os campos de relacionamento e suas consultas irão 
ganhar velocidade.

[]s

Alexandre


  - Original Message - 
  From: Luis Hilário Tobler Garcia 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 04, 2008 4:33 PM
  Subject: Re: [delphi-br] [DELPHI-Total] consulta lenta


  Boa tarde pessoal,
  mesmo sem nenhuma sugestão do grupo, consegui achar ONDE está o problema, 
porém ainda estou tentando achar uma boa solução, o problema está nos campos 
Lookup, segue abaixo a estrutura de dados, eu ficarei grato em receber, se 
alguém tiver alguma sugestão ou critica construtiva sobre como continuar 
disponibilizar os dados lookups do endereço no DBGrid da consulta de Alunos com 
uma velocidade de acesso aos dados razoável.

  Valeu, Hilário.

  CIDADES
  Codigo
  Nome
  UF
  DDD

  BAIRROS
  Codigo
  Nome
  NomeCidade (Lookup de CIDADES)
  UFCidade (Lookup de CIDADES)
  DDDCidade (Lookup de CIDADES)

  RUAS
  Codigo
  Tipo
  Nome
  CodigoBairro
  NomeBairro (Lookup de BAIRROS)
  NomeCidade (Lookup de BAIRROS)
  UFCidade (Lookup de BAIRROS)
  DDDCidade (Lookup de BAIRROS)

  ALUNOS
  Codigo
  Nome
  NomeResponsavel
  RGResponsavel
  CPFResponsavel
  DataNascimento
  DiaNascimento
  Sexo
  CEP
  CodigoRua
  NomeRua (Lookup de RUAS)
  NomeBairro (Lookup de RUAS)
  NomeCidade (Lookup de RUAS)
  UFCidade (Lookup de RUAS)
  DDDCidade (Lookup de RUAS)
  Numero
  Complemento
  TelefoneResidencial
  TelefoneComercial
  TelefoneCelular
  Email
  ProximaAvaliacaoFisica
  DiadoPagamento
  ProximoPagamento
  Observacoes
  Situacao

  - Original Message - 
  From: Luis Hilário Tobler Garcia 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, July 28, 2008 3:59 PM
  Subject: [delphi-br] [DELPHI-Total] consulta lenta

  Boa tarde pessoal,
  estou tendo um problema de lentidão em BD. Faço tudo com queries e depois que 
o banco passou a ter uns 60 registros em umas 4 tabelas, para abrir uma 
consulta demora uma eternidade, em um Pentium II 400 demora uns 3 minutos para 
abrir esta janela. Alguém saberia como resolver isso?

  ps: Uso Interbase 6.5

  Valeu, Hilário

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

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



   
No virus found in this incoming message.
Checked by AVG - http://www.avg.com 
Version: 8.0.138 / Virus Database: 270.5.12/1590 - Release Date: 4/8/2008 08:09


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



Re: [delphi-br] DELHI .NET

2008-07-31 Por tôpico Nicolas
livro para Delphi .Net

veja se tem algum no www.estantevirtual.com.br

[]s

Alexandre



  - Original Message - 
  From: Ricardo César Cardoso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, July 31, 2008 2:05 PM
  Subject: Re: [delphi-br] DELHI .NET


  Eu tenho um livro do Xavier Pacheco em casa entitulado Guia do Desenvolvedor 
de Delphi for .NET.  É um bom livro. Pena que seja meio salgado o valor ( R$ 
180 em média )

  Para JAVA tem livros ótimos. Se vc estiver iniciando, recomendo o Java Como 
Programar de Paul e Harvey Deitel. Ótimo livro. Estou finalizando estudos em 
Java usando esse livro. Mais uma vez o problema é o preço ( R$ 190 em média )

  Alternativas mais baratas são revistas como a Clube Delphi que tem abordado 
bastante desenvolvimento em Delphi com .NET e a ActiveDelphi; para Java 
recomendo Java Magazine e Mundo Java.

  Atte,
  Ricardo.

  --- Em qui, 31/7/08, Marcio William [EMAIL PROTECTED] escreveu:
  De: Marcio William [EMAIL PROTECTED]
  Assunto: [delphi-br] DELHI .NET
  Para: delphi-br@yahoogrupos.com.br
  Data: Quinta-feira, 31 de Julho de 2008, 13:04

  Ola Galera,

  Alguem tem algum material de DELPHI. NET, ou sabe me indicar onde encontrar, 

  dei uma varrida no GOOGLE e somente achei algo falando sobre .NET de maneira 

  global (framework) e algum comentario sobre ASP.NET.

  Se alguem tiver algum livro bom tambem sobre DELPHI. NET e JAVA favor 

  comentar.

  Att. Marcio William 











  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail.com.
  http://br.new.mail.yahoo.com/addresses

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



   
No virus found in this incoming message.
Checked by AVG - http://www.avg.com 
Version: 8.0.138 / Virus Database: 270.5.9/1583 - Release Date: 31/7/2008 06:17


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



Re: [delphi-br] duvidas sobre strings

2008-07-25 Por tôpico Nicolas
e eu ainda acrescentaria:

if  (isnumber(Edit1.text) )  and  (Length(Edit1.text)=Edit1.MaxLenght) then
  showmessage('é igual´);


[]s

alexandre

  - Original Message - 
  From: Luciano Calenzani Simões 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, July 25, 2008 1:47 PM
  Subject: Res: [delphi-br] duvidas sobre strings


  if Length(Trim(Edit1.Tex)) = Edit1.MaxLength then
  showmessage('É igual!')

  Luciano Calenzani Simões

  - Mensagem original 
  De: Leonardo Baldino [EMAIL PROTECTED]
  Para: Grupo_Delphi delphi-br@yahoogrupos.com.br
  Enviadas: Sexta-feira, 25 de Julho de 2008 10:12:01
  Assunto: [delphi-br] duvidas sobre strings

  eu tenho um edit e eu preciso verificar se todos os espaço disponivel dentro
  do edit foi preenchido por numero inteiros, por isso eu gostaria de saber se
  alguem sabe como eu posso fazer isso

  -- 
  Leonardo Carlos Baldino - The Highlander 

  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail.com.
  http://br.new.mail.yahoo.com/addresses

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



   
No virus found in this incoming message.
Checked by AVG - http://www.avg.com 
Version: 8.0.138 / Virus Database: 270.5.6/1572 - Release Date: 25/7/2008 06:51


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



Re: [delphi-br] duvidas sobre strings

2008-07-25 Por tôpico Nicolas
Ops,

é isnumeric( )

alexandre

  - Original Message - 
  From: fabio giro 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, July 25, 2008 3:32 PM
  Subject: Re: [delphi-br] duvidas sobre strings


  Onde está a função IsNumber?

  --- Em sex, 25/7/08, Nicolas [EMAIL PROTECTED] escreveu:

  De: Nicolas [EMAIL PROTECTED]
  Assunto: Re: [delphi-br] duvidas sobre strings
  Para: delphi-br@yahoogrupos.com.br
  Data: Sexta-feira, 25 de Julho de 2008, 14:11

  e eu ainda acrescentaria:

  if (isnumber(Edit1. text) ) and (Length(Edit1. text)=Edit1. MaxLenght) then
  showmessage( 'é igual´);

  []s

  alexandre

  - Original Message - 
  From: Luciano Calenzani Simões 
  To: [EMAIL PROTECTED] os.com.br 
  Sent: Friday, July 25, 2008 1:47 PM
  Subject: Res: [delphi-br] duvidas sobre strings

  if Length(Trim( Edit1.Tex) ) = Edit1.MaxLength then
  showmessage( 'É igual!')

  Luciano Calenzani Simões

  - Mensagem original 
  De: Leonardo Baldino portaldoinferno@ gmail.com
  Para: Grupo_Delphi [EMAIL PROTECTED] os.com.br
  Enviadas: Sexta-feira, 25 de Julho de 2008 10:12:01
  Assunto: [delphi-br] duvidas sobre strings

  eu tenho um edit e eu preciso verificar se todos os espaço disponivel dentro
  do edit foi preenchido por numero inteiros, por isso eu gostaria de saber se
  alguem sabe como eu posso fazer isso

  -- 
  Leonardo Carlos Baldino - The Highlander 

  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail. com.
  http://br.new. mail.yahoo. com/addresses

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

  No virus found in this incoming message.
  Checked by AVG - http://www.avg. com 
  Version: 8.0.138 / Virus Database: 270.5.6/1572 - Release Date: 25/7/2008 
06:51

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

  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail.com.
  http://br.new.mail.yahoo.com/addresses

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



   
No virus found in this incoming message.
Checked by AVG - http://www.avg.com 
Version: 8.0.138 / Virus Database: 270.5.6/1572 - Release Date: 25/7/2008 06:51


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



Re: [delphi-br] duvidas sobre strings

2008-07-25 Por tôpico Nicolas
Desculpe pessoal,

de tanto usar já tava achando que era função nativa,

tá aqui o fonte da função:

Function IsNumeric(const s: string): boolean;
var
 i: integer;
begin
 Result := True;
 for i:=1 to length(s) do
   if not (s[i] in ['0'..'9']) then
   begin
 Result := False;
 Break;
   end;
end;

[]s

Alexandre






  - Original Message - 
  From: Rubem Nascimento da Rocha 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, July 25, 2008 3:43 PM
  Subject: RE: [delphi-br] duvidas sobre strings



  Em qual unit tá definida essa função? Já revirei o help do Delphi de cabo a 
rabo e num achei nada!
  Sds.

  
  To: delphi-br@yahoogrupos.com.br
  From: [EMAIL PROTECTED]
  Date: Fri, 25 Jul 2008 15:39:42 -0300
  Subject: Re: [delphi-br] duvidas sobre strings

  Ops,

  é isnumeric( )

  alexandre

  - Original Message -
  From: fabio giro
  To: delphi-br@yahoogrupos.com.br
  Sent: Friday, July 25, 2008 3:32 PM
  Subject: Re: [delphi-br] duvidas sobre strings

  Onde está a função IsNumber?

  --- Em sex, 25/7/08, Nicolas [EMAIL PROTECTED] escreveu:

  De: Nicolas [EMAIL PROTECTED]
  Assunto: Re: [delphi-br] duvidas sobre strings
  Para: delphi-br@yahoogrupos.com.br
  Data: Sexta-feira, 25 de Julho de 2008, 14:11

  e eu ainda acrescentaria:

  if (isnumber(Edit1. text) ) and (Length(Edit1. text)=Edit1. MaxLenght) then
  showmessage( 'é igual´);

  []s

  alexandre

  - Original Message -
  From: Luciano Calenzani Simões
  To: [EMAIL PROTECTED] os.com.br
  Sent: Friday, July 25, 2008 1:47 PM
  Subject: Res: [delphi-br] duvidas sobre strings

  if Length(Trim( Edit1.Tex) ) = Edit1.MaxLength then
  showmessage( 'É igual!')

  Luciano Calenzani Simões

  - Mensagem original 
  De: Leonardo Baldino 
  Para: Grupo_Delphi 
  Enviadas: Sexta-feira, 25 de Julho de 2008 10:12:01
  Assunto: [delphi-br] duvidas sobre strings

  eu tenho um edit e eu preciso verificar se todos os espaço disponivel dentro
  do edit foi preenchido por numero inteiros, por isso eu gostaria de saber se
  alguem sabe como eu posso fazer isso

  --
  Leonardo Carlos Baldino - The Highlander

  __
  Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver 
offline. Conheça o MSN Mobile!
  http://mobile.live.com/signup/signup2.aspx?lc=pt-br

   
No virus found in this incoming message.
Checked by AVG - http://www.avg.com 
Version: 8.0.138 / Virus Database: 270.5.6/1572 - Release Date: 25/7/2008 06:51


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



Re: [delphi-br] nao quer sair da aplicação

2008-07-23 Por tôpico Nicolas
A grosso modo, isso aconteceu porque no OnActivate o form ainda está sendo 
ativado e o sistema não vai conseguir
fechar algo que ainda não está aberto.

Uma vez passei por isso, e na pressa usei uma tática ninja:

coloquei um TTimer para ser ativado em meio segundo...mas com enabled:=false;

peguei tudo o que precisava ser executado no OnActivate, tirei de lá e coloquei 
no OnTimer desse timer.

no OnActivate do form eu mandei ativar o timer com enabled:=true;

assim, é possivel garantir que tudo será executado somente quando o form 
realmente estiver ativado, podendo dar um close normalmente.

Ah, e na primeira linha de execução dentro do timer, já desativa ele, senão vai 
ficar chamando várias vezes a mesma função.

Se ninguém sugerir algo mais prático, pode fazer assim que funciona.

[]s

Alexandre





  - Original Message - 
  From: Felipe Milagres 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, July 22, 2008 5:46 PM
  Subject: [delphi-br] nao quer sair da aplicação


  oi,
   
  eu fiz uma aplicação onde tinha um botao que ao ser clicado, fazia tudo o que 
tinha q fazer, e no final, fazia sair da aplicação ...
   
  porem , nao podia ter botao nessa aplicação, e entao eu usei a propriedade 
onActivate do form, e coloquei todo o codigo que estava no botao na nova 
procedure criada...
   
  porem agora, quando ele faz tudo o que tem que fazer, ele nao sai do form ... 
coloquei em tudo quanté possição o comando Form1.close; , mas nao faz efeito 
nenhum ...
   
  o estranho é que quando eu fui testar (usando um ShowMessage) se quando 
compilava, o delphi pulava essa parte, ele lia a parte perfeitamente ..
   
  []s,
   
  Felipe Milagres

  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail.com.
  http://br.new.mail.yahoo.com/addresses

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



   
No virus found in this incoming message.
Checked by AVG - http://www.avg.com 
Version: 8.0.138 / Virus Database: 270.5.3/1565 - Release Date: 21/7/2008 18:36


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



Re: RES: [delphi-br] Acervo sobre Programação

2008-07-18 Por tôpico Nicolas
Uma excelente opção para adquirir livros (e ética), é comprar usado em 
sebos.

Tem um excelente que já adquiri alguns livros e fiquei muito satisfeito:

www.estantevirtual.com.br

Apesar que pelo jeito até tirar xerox (q já não é muito ético) tá caro, acho 
que nem livro usado estará ao seu alcance.

E acrescento que as pessoas que se dispõem a compartilhar seus conhecimentos 
nos livros que escrevem,
também ralaram muito e tem direito a ter sua recompensa financeira, para que 
continuem produzindo para o bem de todos.

[]s e bom fim de semana

Alexandre





- Original Message - 
From: Rubem Nascimento da Rocha [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Friday, July 18, 2008 10:26 AM
Subject: RE: RES: [delphi-br] Acervo sobre Programação



Meu caro, é o seguinte! Tudo na vida tem um preço! Por mais que vc queira 
algo super-hiper-mega-ultra avançado em determinada linguagem de programação 
(sinceramente, não sei qual o nível que vc está procurando e o que 
necessariamente está englobado nesse nível que vc procura, até pq vc não 
explicou em detalhes!), tem que ralar e pesquisar muito. As melhores 
referências para programação são livros importados, mas achar um por aí 
dando sopa em PDF é pretensão demais.

Eu conheço muito sobre Delphi, apesar de ainda não ser certificado por conta 
da política (desculpa a expressão a seguir) escrota da 
Borland/CodeGear/Embarcadero/sabe-se-lá-o-que-mais/etc. sobre certificações. 
Mas lhe asseguro com todas as letras, pra chegar ao nível que tenho hj, não 
tem jeito, vc tem que investir, ou em tempo ou em dinheiro.

Em dinheiro comprando livros, quer sejam nacionais ou importados, vc 
consegue aprofundamento sobre o cerne de qualquer ferramenta, e aprende 
técnicas de desenvolvimento com autores com diferentes visões. -Mas livro 
técnico é caro!. Fazer o quê? Tudo tem seu preço meu caro. Lembro-me como 
se fosse ontem. O livro mais caro de Delphi que comprei foi o Delphi 5 Guia 
do Desenvolvedor. O melhor livro que comprei até hoje, e ainda me serve de 
referência mesmo eu usando o Delphi 7 (claro que faço adaptações de acordo 
com a versão que uso). Foram R$185,00 muito bem investidos! O melhor 
investimento que vc faz é em vc mesmo! Eu estudo Java e .NET, e não poupo 
grana pra comprar livro. Pq? Pq quero me entender no cerne da plataforma. 
Depois, se eu quiser partir pra escovar bits com C# ou VB.NET (o que, 
particularmente, prefiro fazer com Delphi), aí já é outra história. 
Portanto, a dica é essa! Faça sacrifícios e compre livros! Não espere que 
tudo quanto é livro super-hiper-mega-ultra avançado sobre VB, C#, C++ ou 
Java esteja pro aí de bobeira na internet em PDF/DOC/etc. pra vc fazer 
download. Isso é lenda! Se vc acredita nisso, ou vc quer moleza demais ou 
então é provável que vc ainda tenha esperanças de ver em pessoa o Papai Noel 
ou o Coelhinho da Páscoa!

Em tempo, pesquisando na Internet, nas mais variadas formas possíveis, é a 
forma que mais me ajudou a aprender e descobrir coisas novas sobre Dephi. Vc 
sabe ler em inglês razoavelmente? Consegue ler termos técnicos em inglês? 
Ótimo! Busque informações na Internet voltados para a linguagem que vc quer 
se aprofundar em inglês, não somente em sites americanos, mas tb de outros 
países. -Ah, mas eu não sei falar outros idiomas! Existem tradutores 
on-line pra isso! -Mas eu não sei falar inglês! Meus pêsames! Deveria 
saber, pois o inglês é o idioma que mais se fala em TI. Existem fórums aos 
montes por aí na Internet com excelentes informações técnicas, mas a maioria 
em inglês! -Pô, não tem fórums no Brasil que tenha informações técnicas 
mais aprofundadas pra me aperfeiçoar mais? Já me fiz essa pergunta, e 
sempre que procurava algo em tais fórums, com um questionamento técnico mais 
aprofundado, não obtive resposta em fórums nacionais, somente em fórums 
estrangeiros. Agradeço até hj os esforços que fiz pra aprender um pouco de 
conversação, leitura e escrita em inglês. Me ajudaram muito a obter mais 
conhecimento técnico. A prova disso é minha biblioteca escrita totalmente em 
Delphi para acessar portas de I/O sem necessidade de drivers (vide 
http://www.iprogramas.com.br/2008/detalhesProd.asp?cuoska=2636656165137189177274716187406182292350184851169587220940291882turmionkatilot=64847093701363968633472920).

Enfim, meu caro. Sua atitude é um tanto pretensiosa e diria até que 
oportunista. Por isso, o resumo da ópera pra vc é o seguinte: nada neste 
mundo vêm assim 'na faixa', '0800'. Tem que investir, seja em tempo ou em 
dinheiro. Seguindo isso, e tendo tb um “pouquinho” de criatividade e força 
de vontade, vc vai realmente chegar longe.

Boa sorte.
Sds.



To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Fri, 18 Jul 2008 10:03:53 -0300
Subject: RES: [delphi-br] Acervo sobre Programação


Pô cara... é verdade... da pra se fazer isso que vc disse também.

Mas gastar dinheiro é exatamente o que eu não queria (mesmo que seja 

Re: [delphi-br] problemas com conexão com o firebird

2008-07-08 Por tôpico Nicolas
Você pode também ver se a porta 3050 está liberada, ela é a porta usada pelo 
firebird para conectar.

[]s

Alexandre

  - Original Message - 
  From: Alison Zen 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, July 08, 2008 3:13 PM
  Subject: Re: [delphi-br] problemas com conexão com o firebird


  Opá, tudo bem Leonardo??

  Você já tentou liberar o executável do FireBird no Firewall do windows??

  Att...

  Alison

  2008/7/8 Leonardo Baldino [EMAIL PROTECTED]:
   eu tenho o firebird 1.5 instalado em um windows 2003 server e eu naum
   consigo conectar o firebird porque o firewall esta barando o firebird por
   isso eu queria saber se alguem saber como eu posso resolver este problema
  
   --
   Leonardo Carlos Baldino - The Highlander
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   

  -- 
  Atenciosamente
  Alison Zen


   
No virus found in this incoming message.
Checked by AVG - http://www.avg.com 
Version: 8.0.138 / Virus Database: 270.4.6/1540 - Release Date: 8/7/2008 06:33


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



Re: [delphi-br] Listar nomes de objetos de um Form

2008-07-07 Por tôpico Nicolas
Segue o exemplo:

Memo1.lines.clear;
for I:=0 to Main.Componentcount-1 do
Memo1.Lines.Add( Components[I].Name ) ;


[]s

Alexandre



  - Original Message - 
  From: ricshark01 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, July 07, 2008 10:14 AM
  Subject: [delphi-br] Listar nomes de objetos de um Form


  Bom dia Galera,

  Por gentileza, alguém poderia me informar como eu consigo listar em um 
  Memo,por exemplo, o nome de todos os objetos de um Form.

  Na verdade, preciso saber disso para poder habilitar/desabilitar os 
  objetos conforme o usuário ter ou não acesso as funções daquele objeto. 
  Esses acessos estarão cadastrados em uma tabela do meu banco de dados.

  Grato pela atenção,

  Ricardo.



   


--



  Internal Virus Database is out of date.
  Checked by AVG. 
  Version: 8.0.134 / Virus Database: 270.4.4/1531 - Release Date: 2/7/2008 19:02


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



Re: [delphi-br] Comsumindo WebService

2008-07-07 Por tôpico Nicolas
é Rubemnão Rubensheheheh

  - Original Message - 
  From: Alison Zen 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, July 07, 2008 4:36 PM
  Subject: Re: [delphi-br] Comsumindo WebService


  Rubens, você teria algo pra me indicar

  Estou pesquisando na internet sobre IndySopa, e os exemplos que tenho
  é muito superficial, não está me ajudando em nada.

  att..

  Alison Zen

  2008/7/7 Rubem Nascimento da Rocha [EMAIL PROTECTED]:
  
   Se fosse uma licença Enterprise (Professional não serve!) do Delphi 6 ou
   maior, daria conta do recado tranquilo. No seu caso, o Delphi 5 não tem
   ferramentas nele apropriadas pra isso. No seu caso, sugiro que vc pesquise
   sobre as seguintes alternativas:
  
   . IndySOAP;
   . PocketSOAP;
   . Microsoft SOAP Toolkit.
  
   Sds.
  
   
  
   To: delphi-br@yahoogrupos.com.br
   From: [EMAIL PROTECTED]
   Date: Mon, 7 Jul 2008 14:58:40 -0300
   Subject: [delphi-br] Comsumindo WebService
  
   Boa tarde galera, tudo bem?
  
   Seguinte, estou precisando consumir um WebService feito em JAVA, até
   ai tudo bem, o problema é que, a aplicação que vai consumir esse
   serviço é desenvolvida utilizando o Delphi 5, alguém teria algum
   exemplo, ou conhece algum componente que faça isso??
  
   --
   Atenciosamente
   Alison Zen
  
   __
   Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver
   offline. Conheça o MSN Mobile!
   http://mobile.live.com/signup/signup2.aspx?lc=pt-br
   

  -- 
  Atenciosamente
  Alison Zen


   


--



  Internal Virus Database is out of date.
  Checked by AVG. 
  Version: 8.0.134 / Virus Database: 270.4.4/1531 - Release Date: 2/7/2008 19:02


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



Re: [delphi-br] Escolher impressora

2008-07-02 Por tôpico Nicolas
Para isso eu utilizo a propriedade PrinterIndex do objeto Printer

printer.printerindex:=-1;  // impressora padrão
printer.printerindex:=n; // onde n é o índice da impressora desejada


[]s

alexandre

  - Original Message - 
  From: Maycon Sanches Amaro 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, July 02, 2008 8:30 AM
  Subject: [delphi-br] Escolher impressora


  Pessoal tenho duas impressoras instalados no meu micro, as duas estão na 
  rede tipo \\sevidor\pr001 e \\servidor\pr002. A padrão é a 001 mas 
  dependendo do formulário preciso que seja impresso na 002. Como faço pro 
  delphi já enviar direto pra impressora que não é a padrao??

  -- 
  Att.
  Maycon Sanches Amaro



   


--



  No virus found in this incoming message.
  Checked by AVG. 
  Version: 8.0.101 / Virus Database: 270.4.3/1529 - Release Date: 1/7/2008 19:23


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



Re: [delphi-br] erro no consulta Union

2008-06-26 Por tôpico Nicolas
O collate dos campos está diferente, impossibilitando a união dos mesmos...

se vc estiver usando MS-SQL vc pode resolver com esta dica:

 http://www.mcdbabrasil.com.br/modules.php?name=Newsfile=articlesid=244

alexandre


  - Original Message - 
  From: Alexsandro 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, June 26, 2008 12:16 PM
  Subject: [delphi-br] erro no consulta Union


  Boa tarde pessoal, 
  Eu fiz uma Views Union, e esta dando o erro quando eu acrescento o 
  campo 'nome'

  SELECT TipodeConta,data,nome
  FROM dbo.v_FluxPg1
  UNION ALL
  SELECT TipodeCota,data,nome
  FROM dbo.V_FluxPR1

  ERRO:
  Implicit Conversion of char value to char cannot be performed because 
  the collation of the value
  is unresolved due to a collation conflict.

  Alguem conhece esse erro?



   


--



  No virus found in this incoming message.
  Checked by AVG. 
  Version: 8.0.101 / Virus Database: 270.4.1/1519 - Release Date: 25/6/2008 
16:13


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



Re: [delphi-br] Ajuda Com ListBox

2008-06-24 Por tôpico Nicolas

Tem o SpinEdit, vc determina o numero mínimo e o máximo que ele pode aceitar e 
pronto.

[]s

Alexandre


  - Original Message - 
  From: Alexsandro 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, June 24, 2008 9:26 AM
  Subject: [delphi-br] Ajuda Com ListBox


  Bom dia Pessoal,
  Eu estou usando um listBox, para forçar o usuário a usar só os dados 
  que eu determino no itens do listbox GAMBIARRA PURA
  Ex: 1,2,3,4,5(ele só pode escolher um valor), Fechei o campo para 
  mostrar um só valor, obrigando o usuário usar a barra de rolagem, 
  para seleção.

  Até ai esta tudo blz... só que toda vez que o usuário vai selecionar 
  o valor pela barra de rolagem ele tem que clicar no valor(para 
  receber o foco), para ser transportado... . 
  Sem falar que, se o usuário selecionar um valor e rodar a barra de 
  rolagem, vai esta selecionado o 1º valor, e ele vai pensar que o 
  valor a ser escolhido e o que ele ver...

  a:=list1.ItemIndex;
  b:=List2.ItemIndex;
  labDe.Caption:=intToStr(a);

  Tem outro componente para eu fazer isso melhor ? 



   


--



  No virus found in this incoming message.
  Checked by AVG. 
  Version: 8.0.100 / Virus Database: 270.4.1/1516 - Release Date: 24/6/2008 
07:53


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



Re: [delphi-br] delphiXunion

2008-06-13 Por tôpico Nicolas
Claro que aceita !

Eu já fiz querys com mais de 8 unions...

[]s

  - Original Message - 
  From: Ioney Hotmail 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, June 13, 2008 10:32 AM
  Subject: [delphi-br] delphiXunion


  existe alguma outra maneira de unir 2 dois selects sem usar o UNION, pois o 
delphi nao aceita a uniao com mais de 2 dois selects
  ex:

  select conta, DESCRICAO ,
  sum(case when valor  0 and cd = 'D' then 0 else 0 end) valoranterior,
  sum(case when valor  0 and cd = 'D' then 0 else valor end) valordeb,
  sum(case when valor  0 and cd = 'C' then 0 else valor end) valorCred,
  sum((case when valor  0 and cd = 'D' then 0 else valor end) - (case when 
valor  0 and cd = 'C' then 0 else valor end)) valoratual
  from lancamentos l, planocontas p
  where l.codred = p.codred
  and cliente = '2'
  group by CONTA, DESCRICAO, GR
  union
  select left(conta,8), null, '4',
  sum(case when valor  0 and cd = 'D' then 0 else 0 end) valoranterior,
  sum(case when valor  0 and cd = 'D' then 0 else valor end) valordeb,
  sum(case when valor  0 and cd = 'C' then 0 else valor end) valorCred,
  sum((case when valor  0 and cd = 'D' then 0 else valor end) - (case when 
valor  0 and cd = 'C' then 0 else valor end)) valoratual
  from lancamentos l, planocontas p
  where l.codred = p.codred
  and cliente = '2'
  group by left(conta,8), null, '4'
  union
  select left(conta,5), null, '3',
  sum(case when valor  0 and cd = 'D' then 0 else 0 end) valoranterior,
  sum(case when valor  0 and cd = 'D' then 0 else valor end) valordeb,
  sum(case when valor  0 and cd = 'C' then 0 else valor end) valorCred,
  sum((case when valor  0 and cd = 'D' then 0 else valor end) - (case when 
valor  0 and cd = 'C' then 0 else valor end)) valoratual
  from lancamentos l, planocontas p
  where l.codred = p.codred
  and cliente = '2'
  group by left(conta,5), null, '3'
  union
  select left(conta,2), null, '2',
  sum(case when valor  0 and cd = 'D' then 0 else 0 end) valoranterior,
  sum(case when valor  0 and cd = 'D' then 0 else valor end) valordeb,
  sum(case when valor  0 and cd = 'C' then 0 else valor end) valorCred,
  sum((case when valor  0 and cd = 'D' then 0 else valor end) - (case when 
valor  0 and cd = 'C' then 0 else valor end)) valoratual
  from lancamentos l, planocontas p
  where l.codred = p.codred
  and cliente = '2'
  group by left(conta,2), null, '2'
  union
  select left(conta,1), null, '1',
  sum(case when valor  0 and cd = 'D' then 0 else 0 end) valoranterior,
  sum(case when valor  0 and cd = 'D' then 0 else valor end) valordeb,
  sum(case when valor  0 and cd = 'C' then 0 else valor end) valorCred,
  sum((case when valor  0 and cd = 'D' then 0 else valor end) - (case when 
valor  0 and cd = 'C' then 0 else valor end)) valoratual
  from lancamentos l, planocontas p
  where l.codred = p.codred
  and cliente = '2'
  group by left(conta,1), null, '1'

  O DELPHI NAO ACEITA A UNIAO COM MAIS DE 2 DOIS SELECTS

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



   


--



  No virus found in this incoming message.
  Checked by AVG. 
  Version: 8.0.100 / Virus Database: 270.3.0/1501 - Release Date: 13/6/2008 
06:33


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



Re: [delphi-br] criar evento dinamicamente

2008-06-09 Por tôpico Nicolas
Vc tem q consertar a declaração da função também !!


  - Original Message - 
  From: felipe govoni 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, June 09, 2008 9:31 AM
  Subject: Re: [delphi-br] criar evento dinamicamente


  blz mas agora da o seguinte erro:
  unsatisfied foward or external declaration Tfrmmonitorar.pintar

  2008/6/9 Joao Morais [EMAIL PROTECTED]:

   felipe govoni wrote:
procedure pintar(Sender: TObject);
begin
//codigo pra pintar
end;
   
e no evento on click
   
dmGeral.qryBaixa.close;
dmGeral.qryBaixa.OnCalcFields := pintar();
dmGeral.qryBaixa.open;
   
ele da o seguinte erro: not enough actual parameters, mas qual parametro
falta colocar?
  
   declare:
  
   procedure Pintar(Dataset: TDataset);
   ...
  
   e retire os parênteses da procedure ao fazer a associação:
   ...
   dmGeral.qryBaixa.OnCalcFields := Pintar;
   ...
  
   Joao Morais
   
  

  -- 
  Felipe Govoni
  -
  Programador
  Fone 8472-8718

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



   


--



  No virus found in this incoming message.
  Checked by AVG. 
  Version: 8.0.100 / Virus Database: 270.0.0/1491 - Release Date: 9/6/2008 06:52


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



Re: [delphi-br] Matemática financeira

2008-06-05 Por tôpico Nicolas
a de valor futuro:

ValorFuturo = ValorAtual * ( (1+juros) ^ periodos)




  - Original Message - 
  From: Eliza 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, June 05, 2008 9:36 AM
  Subject: [delphi-br] Matemática financeira


  Bom dia!!

  Alguém tem os cálculos de prazo médio, valor futuro usados na 
  matemática financeira? 
  Preciso fazer no delphi.

  Eliza - 

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



   


--



  No virus found in this incoming message.
  Checked by AVG. 
  Version: 8.0.100 / Virus Database: 270.0.0/1485 - Release Date: 5/6/2008 10:07


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



Re: [delphi-br] Borland anuncia venda da CodeGear para a Embarcadero Technologies

2008-05-07 Por tôpico Alexandre Nicolas
Fiquei com essa mesma impressão Andrei,

enjoei de ver aquele  vídeo do presidente da Borland acalmando os usuários, e 
agora, menos de 2 anos depois vem essa notícia...

Alexandre

  - Original Message - 
  From: Andrei Luís 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, May 07, 2008 1:05 PM
  Subject: Re: [delphi-br] Borland anuncia venda da CodeGear para a Embarcadero 
Technologies


  Curioso como o mundo dá voltas...

  A dois anos, surgiu a notícia de que a Borland venderia o Delphi.
  Muito bafafa, cada um dando o seu pitaco, até que a Borland veio e
  esclareceu que o que aconteceria é que seria criado uma outra empresa
  com foco nas ferramentas de desenvolvimento. OK.

  Agora, a CodeGear é vendida, numa negociação que começou já no ano
  passado, ou seja, um ano, um ano e pouco depois que a CodeGear foi
  criada.

  Posso estar equivocado, mas não lhes parece que a CodeGear foi criada
  já com intuito de vendê-la? E talvez só não o fizeram a dois anos
  porque a comunidade chiou? Agora foi tudo na moita, só ficamos sabendo
  depois do acontecido.

  Claro que caímos naquela coisa de que ninguém aqui é acionista da
  CodeGear/Borland, bem talvez alguns sejam, e não nos cabe ficar aqui
  apontando o que a CodeGear/Borland deve fazer ou deixar de fazer. Mas
  ao mesmo tempo, quem faz a coisa acontecer são os clientes, ou seja,
  nós.

  Sei lá, talvez um mínimo de discussão com a comunidade teria sido prudente...

  []
  Andrei

  2008/5/7 Luciano Calenzani Simões [EMAIL PROTECTED]:
   
http://idgnow.uol.com.br/mercado/2008/05/07/borland-anuncia-venda-da-codegear-para-a-embarcadero-technologies/
  
   Luciano Calenzani Simões


   

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



Re: [delphi-br] Diferença entre TXT e UTF-8

2008-04-23 Por tôpico Alexandre Nicolas
Para que um arquivo seja UTF-8 basta gravar a sequencia no começo do arquivo:

Write(Arq, #$EF+#$BB+#$BF);

[]s

Alexandre


  - Original Message - 
  From: RM Jr (uol) 
  To: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br ; [EMAIL PROTECTED] 
  Sent: Wednesday, April 23, 2008 10:07 AM
  Subject: [delphi-br] Diferença entre TXT e UTF-8


  Para a NF-Paulista o arquivo a ser gerado, ref. nf's mod. 1-A, deve estar no
  formato Text Encoding = UTF-8 (cf. portaria CAT-102/07).

  Qual a direrença entre um arquivo TXT e esse UTF-8 ? (que também é TXT !)

  Dival Zambon Junior 
  Quirius Sistemas de Informática Ltda 

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



   

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



Re: [delphi-br] SQL

2008-04-22 Por tôpico Alexandre Nicolas
Como vc montou sua pesquisa ? 

eu montaria como abaixo:

select * from Tabela where :ValorPesquisado between ValorInicial and ValorFinal

dessa maneira não tem como retornar mais de um valor.

pelo menos fazendo uma verificação mental das possibilidades de pesquisa, não 
tem como retornar mais de um registro.



  - Original Message - 
  From: Eduardo Oliveira silva 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, April 22, 2008 1:43 PM
  Subject: [delphi-br] SQL


  Boa tarde.
  Estou com o problema, tenho uma tabela no banco com 3 campos,
  ex: codigo, valorinicial, valorfinal.
  A 0 100
  B 101 200
  C 201 300

  No meu formulário do delphi tenho um campo calculado que vou passar
  como parâmetro para essa pesquisa.
  EX: se o valor do meu campo for 60 o select me retorna A
  se form 255 me retorna C

  tentei usar o betwenn, porem sem sucesso.
  quando uso o between para o valorinicial e o valor final
  ele não me traz só um resultado se o valor for abaixo de 201.
  pois se o valor for 90 por exemplo
  ele trás A, B , C.
  pois 90 está entre 0 e 300.

  alguem pode me ajudar.


   

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



Re: [delphi-br] algumas dúvidas sobre SUM() e GROUP BY...

2008-04-18 Por tôpico Alexandre Nicolas
mande a mensagem de erro tambemajuda bastante




  - Original Message - 
  From: Eduardo Oliveira silva 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, April 18, 2008 3:06 PM
  Subject: Re: [delphi-br] algumas dúvidas sobre SUM() e GROUP BY...


  Pessoal eu também estou com um problema parecido,
  só que estou usando o seguinte código no delphi.

  SQL.Add('select c.numero, sum(d.totalPatrimonio) as soma');
  SQL.Add('from tblcoop c, tblpatrimonio d');
  SQL.Add('where c.numero=d.numero');
  SQL.Add('group by c.numero');

  Mais não funciona, apresenta erro quando uso o Sum.
  Alguém sabe porque.

  To usando uma adoquery, um adotable e um ds

  Em 17/04/08, Humberto [EMAIL PROTECTED] escreveu:
  
   SELECT ID, count(NUMERO) AS NUMERO,NOME, SALARIO,(count(NUMERO) *
   SALARIO) AS TOTALSALARIO FROM Teste1 group by id, nome,salario
  
   Flavio escreveu:
   
Olá pessoal, bom dia,
   
estou com um probleminha aqui. Suponha que tenho 1 tabela com os
campos: ID, NUMERO, NOME, SALARIO. Quero fazer a seguinte consulta:
   
no resultado tem que aparecer todos esses campos + um campo indicando
o total de salario de acordo com o NUMERO, mas não deve ser agrupado o
campo NUMERO, ou seja, para cada registro que tiver o mesmo NUMERO
deve aparecer nos resultados com o campo TOTAL DE SALARIOS armazenando
o total de salários daquele NUMERO.
   
EXEMPLO: a resposta poderia ser como essa:
   
  
| NUMERO | NOME | SALARIO | TOTALSALARIOS |
1 | 1 | a | 1.00 | 3.00 |
2 | 1 | b | 2.00 | 3.00 |
3 | 2 | c | 5.00 | 5.00 |
   
É possível néh, mas como ? Alguém me ajuda ?
   
Obrigado pela atenção de todos.
Flávio.
   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento!
   
   
   
  
   
  

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



   

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



Re: [delphi-br] Cadastro operação

2008-04-17 Por tôpico Alexandre Nicolas
Informe qual a mensagem de erro, isso ajuda bastante.

[]s

Alexandre


  - Original Message - 
  From: Eduardo Oliveira silva 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, April 16, 2008 11:22 PM
  Subject: Re: [delphi-br] Cadastro operação


  boa noite alexandre.
  O exemplo do select não funcionou com o delphi, toda vez qeu coloco
  o sum da erro.

  Em 16/04/08, Alexandre Nicolas [EMAIL PROTECTED] escreveu:
  
   Isso mesmo,
  
   há 2 maneiras de obter o conteúdo de um campo de uma query:
  
   qBuscaCodigo.asstring  neste caso só funciona caso você tenha adicionado
   os campos resultandos da consulta no Fields Editor (botão direito sobre a
   query)
  
   ou
  
   qBusca.FieldByName( 'Codigo' ).AsString
  
   []s
  
   Alexandre
  
   - Original Message -
   From: Eduardo Oliveira silva
   To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Sent: Wednesday, April 16, 2008 2:01 PM
   Subject: Re: [delphi-br] Cadastro operação
  
   Beleza Alexande , valeu mesmo.
   Tenho só uma pequena dúvida no código
   Edit1.Text := qBuscaCodigo.AsString
  
   o Codigo é o nome no banco de dados?
   ou não necessariamente.
  
   Em 15/04/08, Alexandre Nicolas [EMAIL 
PROTECTED]nicolas%40qualitysystem.com.br
   escreveu:
   
vamos lá, supondo que o nome do query seja qBusca e que você já tenha
adicionado
no Fields Editor os campos resultantes da pesquisa:
   
.
.
.
qBusca.Open;
   
Edit1.Text := qBuscaCodigo.AsString; //caso seja numérico será
   convertido
para string
Edit2.Text := qBuscaNome.AsString;
Edit3.Text := qBuscaEndereco.AsString;
Edit4.Text := qBuscaCredito.DisplayText; // caso vc tenha colocado a
máscara ,0.00 na prop. DisplayFormat deste campo no Fields Editor
Edit5.Text := qBuscaEmprestimos.DisplayText; // caso vc tenha colocado a
máscara ,0.00 na prop. DisplayFormat deste campo no Fields Editor
   
[]s
   
Alexandre Nicolas
   
- Original Message -
From: Eduardo Oliveira silva
To: delphi-br@yahoogrupos.com.br 
delphi-br%40yahoogrupos.com.brdelphi-br%
   40yahoogrupos.com.br
Sent: Tuesday, April 15, 2008 4:27 PM
Subject: Re: [delphi-br] Cadastro operação
   
beleza, é isso mesmo, mais como eu faço para mostra isso em um
   formulário
em um edit por exemplo.
   
é outra dúvida que tenho, nos formulários de cadastro vai ter um botão
   de
pesquisa
viz os formularios mais não sei alimentar os edits com os campos da
   query.
pode me ajudar.
   
Em 15/04/08, Alexandre Nicolas [EMAIL 
PROTECTED]nicolas%40qualitysystem.com.br
   nicolas%40qualitysystem.com.br
escreveu:

 Bom, vejamos se entendi:

 você terá uma tabela COOPERATIVA e uma tabela EMPRESTIMOS, a ligação
entre
 as tabelas é o código da cooperativa.

 você poderá ter um query, trazendo os dados da cooperativa e a soma de
 todos os empréstimos feitos para ela.

 entao o SQL de sua query ficaria assim:

 Select c.Codigo, c.Nome, c.Endereco, c.Credito ,
   sum(e.ValorEmprestimo)
as
 SomaEmprestimos
 From COOPERATIVA c
 Left Join EMPRESTIMOS e on c.Codigo = e.CodigoCooperativa
 Where c.Codigo = :CodigoCooperativa
 Group by c.Codigo, c.Nome, c.Endereco, c.Credito

 a partir desse exemplo você pode aprimorar esse SQL conforme sua
 necessidade.

 []s

 Alexandre Nicolas

 - Original Message -
 From: Eduardo Oliveira silva
 To: delphi-br@yahoogrupos.com.br 
delphi-br%40yahoogrupos.com.brdelphi-br%
   40yahoogrupos.com.brdelphi-br%
40yahoogrupos.com.br
 Sent: Tuesday, April 15, 2008 10:34 AM
 Subject: [delphi-br] Cadastro operação

 Alguém pode me socorre.

 Pessoal estou com um problema, tenho que mostrar um protótipo de
 trabalho da faculdade na quinta feira e estou com algumas dificuldade
 em alguns pontos.

 1- tenho que cadastrar uma operação de credito onde em um formulário
 vou trazer campos de um cooperativa(nome,endereço,crédito), porém os
 campo não estão em uma só tabela, Ex. tenho que fazer o calculo se a
 cooperativa já pegou algum empréstimo e mostra o valor total na tela.
 para fazer isso tudo tenho que passar para pesquisa só o número da
 cooperativa e é o único dado que vai persistir em outra tabela, alguém
 pode me ajudar

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



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

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



   

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



Re: [delphi-br] Cadastro operação

2008-04-16 Por tôpico Alexandre Nicolas
Isso mesmo,

há 2 maneiras de obter o conteúdo de um campo de uma query:

qBuscaCodigo.asstringneste caso só funciona caso você tenha adicionado os 
campos resultandos da consulta no Fields Editor (botão direito sobre a query)

ou

qBusca.FieldByName( 'Codigo' ).AsString

[]s

Alexandre


  - Original Message - 
  From: Eduardo Oliveira silva 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, April 16, 2008 2:01 PM
  Subject: Re: [delphi-br] Cadastro operação


  Beleza Alexande , valeu mesmo.
  Tenho só uma pequena dúvida no código
  Edit1.Text := qBuscaCodigo.AsString

  o Codigo é o nome no banco de dados?
  ou não necessariamente.

  Em 15/04/08, Alexandre Nicolas [EMAIL PROTECTED] escreveu:
  
   vamos lá, supondo que o nome do query seja qBusca e que você já tenha
   adicionado
   no Fields Editor os campos resultantes da pesquisa:
  
   .
   .
   .
   qBusca.Open;
  
   Edit1.Text := qBuscaCodigo.AsString; //caso seja numérico será convertido
   para string
   Edit2.Text := qBuscaNome.AsString;
   Edit3.Text := qBuscaEndereco.AsString;
   Edit4.Text := qBuscaCredito.DisplayText; // caso vc tenha colocado a
   máscara ,0.00 na prop. DisplayFormat deste campo no Fields Editor
   Edit5.Text := qBuscaEmprestimos.DisplayText; // caso vc tenha colocado a
   máscara ,0.00 na prop. DisplayFormat deste campo no Fields Editor
  
   []s
  
   Alexandre Nicolas
  
   - Original Message -
   From: Eduardo Oliveira silva
   To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Sent: Tuesday, April 15, 2008 4:27 PM
   Subject: Re: [delphi-br] Cadastro operação
  
   beleza, é isso mesmo, mais como eu faço para mostra isso em um formulário
   em um edit por exemplo.
  
   é outra dúvida que tenho, nos formulários de cadastro vai ter um botão de
   pesquisa
   viz os formularios mais não sei alimentar os edits com os campos da query.
   pode me ajudar.
  
   Em 15/04/08, Alexandre Nicolas [EMAIL 
PROTECTED]nicolas%40qualitysystem.com.br
   escreveu:
   
Bom, vejamos se entendi:
   
você terá uma tabela COOPERATIVA e uma tabela EMPRESTIMOS, a ligação
   entre
as tabelas é o código da cooperativa.
   
você poderá ter um query, trazendo os dados da cooperativa e a soma de
todos os empréstimos feitos para ela.
   
entao o SQL de sua query ficaria assim:
   
Select c.Codigo, c.Nome, c.Endereco, c.Credito , sum(e.ValorEmprestimo)
   as
SomaEmprestimos
From COOPERATIVA c
Left Join EMPRESTIMOS e on c.Codigo = e.CodigoCooperativa
Where c.Codigo = :CodigoCooperativa
Group by c.Codigo, c.Nome, c.Endereco, c.Credito
   
a partir desse exemplo você pode aprimorar esse SQL conforme sua
necessidade.
   
[]s
   
Alexandre Nicolas
   
- Original Message -
From: Eduardo Oliveira silva
To: delphi-br@yahoogrupos.com.br 
delphi-br%40yahoogrupos.com.brdelphi-br%
   40yahoogrupos.com.br
Sent: Tuesday, April 15, 2008 10:34 AM
Subject: [delphi-br] Cadastro operação
   
Alguém pode me socorre.
   
Pessoal estou com um problema, tenho que mostrar um protótipo de
trabalho da faculdade na quinta feira e estou com algumas dificuldade
em alguns pontos.
   
1- tenho que cadastrar uma operação de credito onde em um formulário
vou trazer campos de um cooperativa(nome,endereço,crédito), porém os
campo não estão em uma só tabela, Ex. tenho que fazer o calculo se a
cooperativa já pegou algum empréstimo e mostra o valor total na tela.
para fazer isso tudo tenho que passar para pesquisa só o número da
cooperativa e é o único dado que vai persistir em outra tabela, alguém
pode me ajudar
   
[As partes desta mensagem que não continham texto foram removidas]
   
   
   
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

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



   

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



Re: [delphi-br] Programa encerra + deixa o ícone no Windows 98

2008-04-15 Por tôpico Alexandre Nicolas
Se não me engano, isso tem a ver com a propriedade BorderStyle do form 
principal do seu aplicativo,
lembro que isso aconteceu com um sistema aqui da empresa, e bastou trocar de 
borderstyle que 
resolveu.

Veja se dá certo.

[]s

Alexandre

  - Original Message - 
  From: tetraetila® 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, April 14, 2008 9:05 PM
  Subject: [delphi-br] Programa encerra + deixa o ícone no Windows 98


  O programa feito em Delphi 7 no Windows XP não apresenta problemas, porém no 
Windows 98 quando ele é encerrado deixa o ícone na barra de tarefas, clicando 
nele o mesmo desaparece, porém vai se acumulando quando é executado. Alguém 
sabe como resolver isto? Obs.: É um Screen Saver.

  Obrigado!

  Adilson

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



   

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



Re: [delphi-br] Cadastro operação

2008-04-15 Por tôpico Alexandre Nicolas
Bom, vejamos se entendi:

você terá uma tabela COOPERATIVA e uma tabela EMPRESTIMOS, a ligação entre as 
tabelas é o código da cooperativa.

você poderá ter um query, trazendo os dados da cooperativa e a soma de todos os 
empréstimos feitos para ela.

entao o SQL de sua query ficaria assim:

Select c.Codigo, c.Nome, c.Endereco, c.Credito , sum(e.ValorEmprestimo) as 
SomaEmprestimos
From COOPERATIVA c
Left Join EMPRESTIMOS e on c.Codigo = e.CodigoCooperativa
Where c.Codigo = :CodigoCooperativa
Group by c.Codigo, c.Nome, c.Endereco, c.Credito


a partir desse exemplo você pode aprimorar esse SQL conforme sua necessidade.

[]s

Alexandre Nicolas



  - Original Message - 
  From: Eduardo Oliveira silva 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, April 15, 2008 10:34 AM
  Subject: [delphi-br] Cadastro operação


  Alguém pode me socorre.

  Pessoal estou com um problema, tenho que mostrar um protótipo de
  trabalho da faculdade na quinta feira e estou com algumas dificuldade
  em alguns pontos.

  1- tenho que cadastrar uma operação de credito onde em um formulário
  vou trazer campos de um cooperativa(nome,endereço,crédito), porém os
  campo não estão em uma só tabela, Ex. tenho que fazer o calculo se a
  cooperativa já pegou algum empréstimo e mostra o valor total na tela.
  para fazer isso tudo tenho que passar para pesquisa só o número da
  cooperativa e é o único dado que vai persistir em outra tabela, alguém
  pode me ajudar


   

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



Re: [delphi-br] Cadastro operação

2008-04-15 Por tôpico Alexandre Nicolas
vamos lá, supondo que o nome do query seja qBusca e que você já tenha 
adicionado 
no Fields Editor os campos resultantes da pesquisa:

.
.
.
qBusca.Open;

Edit1.Text := qBuscaCodigo.AsString; //caso seja numérico será convertido para 
string
Edit2.Text := qBuscaNome.AsString;
Edit3.Text := qBuscaEndereco.AsString;
Edit4.Text :=  qBuscaCredito.DisplayText; // caso vc tenha colocado a máscara  
,0.00 na prop. DisplayFormat deste campo no Fields Editor
Edit5.Text :=  qBuscaEmprestimos.DisplayText; // caso vc tenha colocado a 
máscara ,0.00 na prop. DisplayFormat deste campo no Fields Editor

[]s

Alexandre Nicolas



  - Original Message - 
  From: Eduardo Oliveira silva 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, April 15, 2008 4:27 PM
  Subject: Re: [delphi-br] Cadastro operação


  beleza, é isso mesmo, mais como eu faço para mostra isso em um formulário
  em um edit por exemplo.

  é outra dúvida que tenho, nos formulários de cadastro vai ter um botão de
  pesquisa
  viz os formularios mais não sei alimentar os edits com os campos da query.
  pode me ajudar.

  Em 15/04/08, Alexandre Nicolas [EMAIL PROTECTED] escreveu:
  
   Bom, vejamos se entendi:
  
   você terá uma tabela COOPERATIVA e uma tabela EMPRESTIMOS, a ligação entre
   as tabelas é o código da cooperativa.
  
   você poderá ter um query, trazendo os dados da cooperativa e a soma de
   todos os empréstimos feitos para ela.
  
   entao o SQL de sua query ficaria assim:
  
   Select c.Codigo, c.Nome, c.Endereco, c.Credito , sum(e.ValorEmprestimo) as
   SomaEmprestimos
   From COOPERATIVA c
   Left Join EMPRESTIMOS e on c.Codigo = e.CodigoCooperativa
   Where c.Codigo = :CodigoCooperativa
   Group by c.Codigo, c.Nome, c.Endereco, c.Credito
  
   a partir desse exemplo você pode aprimorar esse SQL conforme sua
   necessidade.
  
   []s
  
   Alexandre Nicolas
  
   - Original Message -
   From: Eduardo Oliveira silva
   To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Sent: Tuesday, April 15, 2008 10:34 AM
   Subject: [delphi-br] Cadastro operação
  
   Alguém pode me socorre.
  
   Pessoal estou com um problema, tenho que mostrar um protótipo de
   trabalho da faculdade na quinta feira e estou com algumas dificuldade
   em alguns pontos.
  
   1- tenho que cadastrar uma operação de credito onde em um formulário
   vou trazer campos de um cooperativa(nome,endereço,crédito), porém os
   campo não estão em uma só tabela, Ex. tenho que fazer o calculo se a
   cooperativa já pegou algum empréstimo e mostra o valor total na tela.
   para fazer isso tudo tenho que passar para pesquisa só o número da
   cooperativa e é o único dado que vai persistir em outra tabela, alguém
   pode me ajudar
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

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



   

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



Re: [delphi-br] OFF-TOPIC - Nfe - Envio de Arquivo - ECF

2008-04-14 Por tôpico Alexandre Nicolas
Você só pode transmitir um arquivo cujo CNPJ gravado dentro do arquivo seja o 
mesmo da senha que você está usando para se logar
para a transmissão !

é isso que essa mensagem significa.

[]s

Alexandre Nicolas  - 14/04/2008 - 11:00

  - Original Message - 
  From: Cesar - Informatica 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, April 14, 2008 10:50 AM
  Subject: [delphi-br] OFF-TOPIC - Nfe - Envio de Arquivo - ECF


  Pessoal, estou tentando enviar uns arquivos para o SEFAZ/SP, referente a NF 
Paulista e está me retornando o seguinte erro ao validar o arquivo,

  ERRO : CNPJ do transmissor do lote difere do CNPJ do arquivo

  porém já fiz uma revisão geral no arquivo e não está incorreto, será que 
alguém poderia me ajudar.

  Desde já agradeço,

  César Eduardo T. Silva
  Programador
  Ober S/A - Ind. e Com.
  [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] 

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



   

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



Re: [delphi-br] ERRO FILE NOT

2008-04-14 Por tôpico Alexandre Nicolas
tenho péssimas noticias

por algum acidente o algum  formulario do seu aplicativo foi deletado 
(unit1.dfm),  só deve ter restado a unidade (unit1.pas)

talvez vc tenha q recuperar algum backup

  - Original Message - 
  From: Eduardo Oliveira silva 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, April 14, 2008 4:24 PM
  Subject: [delphi-br] ERRO FILE NOT


  Alguém pode me dizer que erro é esse, pois minha aplicação não abre mais.

  file not found: 'unit1.dmf'


   

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



Re: [delphi-br] Função que retorna número de linhas de TXT

2008-04-14 Por tôpico Alexandre Nicolas
é assim:  

TOTLINHAS := s.count-1 ;

entendeu ?






  - Original Message - 
  From: Hrq48 iG 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, April 14, 2008 5:31 PM
  Subject: Re: [delphi-br] Função que retorna número de linhas de TXT


  Eu fiz assim:

  S.LoadfromFile(arquivo.txt)

  for x=0 to s.Count -1 do Inc(TOTLINHAS)

  mas retorna um valor muito esquisito  1233488795 (???)

  Grato

  - Original Message - 
  From: Jackson Gomes - ToolsComps 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, April 14, 2008 5:21 PM
  Subject: Re: [delphi-br] Função que retorna número de linhas de TXT

   Como posso obter o número total de linhas de um arquivo TXT ? (arquivo.txt)

  Carregue pra memória com um TStringList e veja o Count do objeto (use count-1)

  Jackson Gomes
  ToolsComps - Controle de Usuários para Desenvolvedores Borland/CodeGear
  Web Site: http://www.toolsandcomps.com
  Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
  e-mail: [EMAIL PROTECTED]
  Fone: 27 3389 1138 - 8811 0324
  --
  Devhost - Webhost para desenvolvedores Borland
  http://www.devhost.com.br
  [EMAIL PROTECTED] 

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



   

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



Re: [delphi-br] ClientDataSet BMP x JPG

2008-04-07 Por tôpico Alexandre Nicolas
Se não me engano, basta colocar na cláusula uses a unit Jpeg que ele passa 
a aceitar o JPG.

PS: Tudo que respondo nessa lista demora uma eternidade para chegar no grupo...
pra vocês terem uma idéia: 
agora são 08h41 da manhã do dia 7/4...vamos ver quando essa resposta chega na 
lista...
Desse ser um problema crônico do yahoo groups...poderíamos discutir a idéia de 
migrar
o grupo para o GoogleGroups hein...está muito melhor e mais moderno que o 
yahoo...está aberta a discussão.

[]s

Alexandre NIcolas



  - Original Message - 
  From: Juliano Silva - Yahoo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, April 07, 2008 8:33 AM
  Subject: [delphi-br]  ClientDataSet BMP x JPG 


  Pessoal

  Estou fazendo a captura de imagem dos clientes (com webcam) mas o
  ClientDataSet não aceita que eu coloque no banco uma imagem no formato JPG,
  apenas BMP... como estou fazendo: 

  1. Capturo a foto da WebCam, esta é salva como BMP
  2. Converto para JPG a foto pois fica muito menor então fico com 2 imagens
  (Imagem.bmp e Imagem.jpg)
  3. Carrego o campo com a imagem JPG mas não funciona, apenas como BMP
  funciona.

  [ FUNCIONA ] edCLI_IMG_FOTO.Bitmap.LoadFromFile('Imagem.bmp');
  [ NAO FUNCIONA ] edCLI_IMG_FOTO.Bitmap.LoadFromFile('Imagem.jpg');
  [ NAO FUNCIONA ] edCLI_IMG_FOTO.LoadFromFile('Imagem.jpg');

  ** PORQUE NÃO FUNCIONA JPG ? 

  Utilizo o Firebird 1.5 o campo CLI_IMG_FOTO é do tipo BLOB 0

  att.

  Juliano Silva

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



   

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



Re: [delphi-br] Adicionar texto em campo texto

2008-04-04 Por tôpico Alexandre Nicolas
também não entendi


será que é isso q ele tá querendo :

Memo1.Lines.Add('caso sua conta de telefone');
Memo1.Lines.Add('etc...etc..etc..');



  - Original Message - 
  From: Rubem Nascimento da Rocha 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, April 04, 2008 5:31 PM
  Subject: RE: [delphi-br] Adicionar texto em campo texto




  Não entendi nada!
  Sds.

  

  To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br
  From: [EMAIL PROTECTED]
  Date: Fri, 4 Apr 2008 17:17:15 -0300
  Subject: [delphi-br] Adicionar texto em campo texto

  Aos colaboradores de plantão:

  Como inserir um texto num campo texto ?
  mais ou menos assim:

  'caso sua conta de telefone'
  'esteja cadastrada em débito automático'
  'informamos que o débito'
  'ocorrerá na data apresentada na conta'

  Grato, Bolasete

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

  __
  Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o 
Messenger! É GRÁTIS!
  http://www.msn.com.br/emoticonpack

   

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



Re: [delphi-br] Order by por mais de um campo?

2008-03-26 Por tôpico Alexandre Nicolas
É só ir separando por virgulas os campos desejados:

Order by Data,Horario


  - Original Message - 
  From: Vicente Alves 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, March 26, 2008 3:06 PM
  Subject: [delphi-br] Order by por mais de um campo?



  BOA TARDE A TODOS!

  Tenho uma consulta que ordena desta maneira:

  datamodule3.IBQ_Agenda_Salao.SQL.Add('order by DATA');

  como faço pra ela ordenar ao mesmo tempo por HORARIO_INICIO ??

  DELPHI 7

  OBRIGADO!!!
  __
  Confira vídeos com notícias do NY Times, gols direto do Lance, 
videocassetadas e muito mais no MSN Video!
  http://video.msn.com/?mkt=pt-br

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



   

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



Re: [delphi-br] Valores Monetários

2008-03-04 Por tôpico Alexandre Nicolas
Eu sempre configuro meu sistema para funcionar independentemente da 
configuração do Windows,

para isso, eu coloco no OnCreate do form principal:

DecimalSeparator:=',';
ThousandSeparator:='.';
LongDateFormat:='dd/mm/';
ShortDateFormat:='dd/mm/';

assim não importa o que o usuário configurou no Windows.

Alexandre.


  - Original Message - 
  From: Joel Alexandre 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, March 04, 2008 12:28 AM
  Subject: [delphi-br] Valores Monetários


  Senhores, boa noite.

  Deixa eu fazer uma pequena consultoria aos amigos. É o seguinte, 
  sempre tive problemas com pontuação de casas decimais. Funções como 
  StrToCurr da Sysutils funciona bem se o usuário define (. Ponto) nas 
  Configurações Regionais do Painel de controle do Windows. Se o uruário 
  define vírgula esta funçao, pelo menos comigo, já não funcionam. 
  Gostaria de perguntar aos senhores como evitar este problema ou melhor, 
  como trabalhar com este tipo de configuração que o usuario faz?

  Obrigado a todos
  Joel

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



   

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



[delphi-br] Sobre criticas construtivas.

2008-03-03 Por tôpico Alexandre Nicolas
Gostaria de saber o que é uma crítica construtiva então.

Aqui na empresa e nos cursos de delphi que já ministrei, sempre procurei 
ensinar certo logo de cara,

lembrando aos programadores para que tenham um código limpo, bem organizado, e 
que sempre

pensem em velocidade de processamento. Já fiz comparações em sistemas 
idênticos, porém um repleto de vícios de programação 

que acabam fazendo o processador trabalhar inutilmente e outro com código limpo 
e otimizado, e acreditem, com diferenças na casa de 30%

em desempenho. Uma diferença assim, num mercado concorrido, pode fazer a 
diferença entre você conquistar ou não um cliente. 

Então acredito que minha crítica foi totalmente construtiva, pois estou me 
utilizando de minha experiência para ajudar um companheiro a ter

um diferencial neste mercado.

Acho que devemos sempre estar com a mente aberta para aprender e aceitar os 
pitacos.

Uma boa semana para todos e vamos programar !

abraços.







  - Original Message - 
  From: humberto sales 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, February 29, 2008 6:17 PM
  Subject: Re: [delphi-br] Icone da barra de tarefas piscar p/ chamar a atenção


  resposta para o Alexandre do pitaco.

  alexandre, com certeza seu pitaco e muito informativo pra leigos, passei o 
codigo daquela forma pq nao conheco o nivel de informacao q ele tem do delphi 
daquela forma tenho certeza q ele vai interpretar melhor o codigo passado, ao 
inves de vc dar pitaco dê respostas construtivas pra ajuda da nosso grupo... t +




  Alexandre Nicolas [EMAIL PROTECTED] escreveu:
  Só dando um pitaco,

  fazer um if com uma comparação: T = true é chover no molhado.

  toda comparação é internamente um calculo lógico, então, se a variável já 
contem um valor lógico pode-se simplificar:

  t:=true ;

  if T then
  begin
  
  end
  else
  begin
  ...
  end ;

  - Original Message - 
  From: humberto sales 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 28, 2008 10:49 PM
  Subject: Re: [delphi-br] Icone da barra de tarefas piscar p/ chamar a atenção

  coloca um timer no form

  var
  t : boolean;

  procedure TForm1.Timer1Timer(Sender: TObject);
  begin
  t := not(t);
  if t = true then
  FlashWindow(Application.Handle ,true) ///pisca a barra de tarefas do windows
  else
  FlashWindow(Handle ,true); //pisca a barra de titulo do form 
  end;

  (leia livro Delphi Apis e Sockets (hugo S Novaes e Fabio Camara ) tem muita 
coisa a respeito)
  espero q tenha ajudado... t+

  fabio giro [EMAIL PROTECTED] escreveu:
  Veja se isto serve:

  FlashWindow(Handle, True);
  FlashWindow(Application.Handle, True);

  coloca em um timer eh pronto...

  Espero ter ajudado.

  Valdir Sola [EMAIL PROTECTED] escreveu:
  Boa tarde a todos,

  Alguém conhece algum componente que faça o icone da janela na barra de
  tarefas piscar p/ chamar a atenção, tipo messenger?

  Obrigado

  -
  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 

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

  -
  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 

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

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

  -
  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 

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



   

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



Re: [delphi-br] Icone da barra de tarefas piscar p/ ch amar a atenção

2008-02-29 Por tôpico Alexandre Nicolas
Só dando um pitaco,

fazer um if com uma comparação:  T = true  é chover no molhado.

toda comparação é internamente um calculo lógico, então, se a variável já 
contem um valor lógico pode-se simplificar:

t:=true ;

if T then
begin
  
end
else
begin
  ...
end ;


  - Original Message - 
  From: humberto sales 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 28, 2008 10:49 PM
  Subject: Re: [delphi-br] Icone da barra de tarefas piscar p/ chamar a atenção





  coloca um timer no form


  var
  t : boolean;

  procedure TForm1.Timer1Timer(Sender: TObject);
  begin
  t := not(t);
  if t = true then
  FlashWindow(Application.Handle ,true) ///pisca a barra de tarefas do windows
  else
  FlashWindow(Handle ,true); //pisca a barra de titulo do form 
  end;


  (leia livro Delphi Apis e Sockets (hugo S Novaes e Fabio Camara ) tem muita 
coisa a respeito)
  espero q tenha ajudado... t+



  fabio giro [EMAIL PROTECTED] escreveu:
  Veja se isto serve:

  FlashWindow(Handle, True);
  FlashWindow(Application.Handle, True);

  coloca em um timer eh pronto...

  Espero ter ajudado.

  Valdir Sola [EMAIL PROTECTED] escreveu:
  Boa tarde a todos,

  Alguém conhece algum componente que faça o icone da janela na barra de
  tarefas piscar p/ chamar a atenção, tipo messenger?

  Obrigado

  -
  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 

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

  -
  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 

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



   

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



Re: [delphi-br] Consulta data

2008-02-27 Por tôpico Alexandre Nicolas

use o between:

...From Ordem_Servico where Data between :D1 and :D2 

e depois passe por parametro as duas datas.

  - Original Message - 
  From: Vicente Alves 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 27, 2008 8:36 AM
  Subject: [delphi-br] Consulta data



  Bom dia tenho uma consulta assim:

  datamodule3.IBQuery_Ordem_Servico.Close; 
datamodule3.IBQuery_Ordem_Servico.SQL.Clear; 
datamodule3.IBQuery_Ordem_Servico.sql.add('select * from ORDEM_SERVICO where 
DATA=:mes'); 
datamodule3.IBQuery_Ordem_Servico.Params.ParamByName('mes').AsDate:=strtodate(edit1.Text);
 datamodule3.IBQuery_Ordem_Servico.SQL.Add('order by ID_ORDEM_SERVICO'); 
datamodule3.IBQuery_Ordem_Servico.open;

  Digito a data no edit e consulto. Como faço por exemplo pra consultar entre 
duas datas

  10/02/2008 à 20/02/2008 usando dois edits um para cada data??
  __
  Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger!
  http://www.amigosdomessenger.com.br/

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



   

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



Re: [delphi-br] Mascára para Data

2008-02-21 Por tôpico Alexandre Nicolas
Coloque no OnCreate do form principal:


  LongDateFormat:='dd/mm/';
  ShortDateFormat:='dd/mm/';

Deve resolver.

Alexandre


  - Original Message - 
  From: Tux Wi-FI 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 21, 2008 9:36 AM
  Subject: [delphi-br] Mascára para Data


  Saudações Galera,

  Estou utlizando um DataClientSet para se conectar em uma base de dados DBF.

  Nessa tabela eu tenho um campo DATA no formato (dd/mm/yy), por
  exemplo: 01/02/2008.

  Acontece que quando exibo o conteúdo desse campo ele aparece: 1/2/2008
  e preciso que fique o dia/mês com DOIS digitos, 01/02/2008.

  Coloquei MaskEdit mas nao funcionou, devo ter errado em alguma coisa.

  Alguma dica?

  Thanks

  -- 
  []´s

  CeBoLaRk
  http://www.tuxwifi.com.br
  msn: [EMAIL PROTECTED]


   

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



Re: [delphi-br] Programa precisa fechar ele mesmo

2008-02-21 Por tôpico Alexandre Nicolas
Use:

 Application.Terminate;


ao invés de Self.Close;


  - Original Message - 
  From: Diogo de Oliveira Cunha 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 21, 2008 11:09 AM
  Subject: [delphi-br] Programa precisa fechar ele mesmo


  Bom dia a todos.

  Estou desenvolvendo um programa que é chamado por uma outra aplicação. Esta
  aplicação chamará o meu software, que precisa ler algumas informações em um
  arquivo texto, e fica então esperando até meu software fechar. Coloquei no
  meu software, após a execução da tarefa de leitura do arquivo, o seguinte
  comando Self.Close;, porém ele permence aberto na memória.

  Alguém sabe me dizer como posso fazer para que um programa feche a si mesmo?

  Desde já agradeço a todos.

  -- 
  Não te esqueças de que o arado, dilacerando o solo, acaba igualmente
  desmantelado e ferido, entretanto, desse choque de forças surge o pão que te
  supre a mesa.

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



   

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



Re: [delphi-br] Delphi parou de dar erro

2008-02-20 Por tôpico Alexandre Nicolas
Bom dia,

o pior é que não tem nada diferente no sistema.

inclusive se eu compilar em outro computador, funciona normalmente as mensagens 
de erro.

por isso só posso concluir que tem a ver com alguma configuração, mas já 
comparei e até
mesmo reinstalei o delphi e nada.

no google então, nada de algo parecido...

essa é cabeluda hein pessoal...

Alexandre.


  - Original Message - 
  From: Douglas Uesato 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, February 19, 2008 3:19 PM
  Subject: RES: [delphi-br] Delphi parou de dar erro


  Alexandre,

  Será que você não colocou um ApplicationEvents na sua aplicação e no
  evento OnException esqueceu de dar um ShowMessage na string de erro?

  Atenciosamente,

  Douglas Uesato



  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Alexandre Nicolas
  Enviada em: terça-feira, 19 de fevereiro de 2008 14:15
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Delphi parou de dar erro

  boa tarde pessoal,

  vejam que interessante:

  qualquer sistema que eu compilo no meu delphi, caso aconteça algum erro
  durante a execução,
  o erro não é exibido, o sistema simplesmente ignora.

  a única maneira de descobrir qual o erro é rodar o sistema com o delphi
  aberto, ai sim é possivel descobrir qual o erro.

  já olhei todas as configurações de ambiente, editor, debugger, etc.. já
  comparei com outros computadores aqui da empresa,
  já reinstalei o delphi e nada.

  isso tá me causando problemas, pois às vezes dá algum pau no cliente e não
  tem como detectar qual erro está dando lá.

  se alguem tiver alguma dica ou já passou por situação semelhante, agradeço a
  ajuda.

  []s

  Alexandre

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




   

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



[delphi-br] Delphi parou de dar erro

2008-02-19 Por tôpico Alexandre Nicolas
boa tarde pessoal,

vejam que interessante:

qualquer sistema que eu compilo no meu delphi, caso aconteça algum erro durante 
a execução,
o erro não é exibido, o sistema simplesmente ignora.

a única maneira de descobrir qual o erro é rodar o sistema com o delphi aberto, 
ai sim é possivel descobrir qual o erro.

já olhei todas as configurações de ambiente, editor, debugger, etc.. já 
comparei com outros computadores aqui da empresa,
já reinstalei o delphi e nada.

isso tá me causando problemas, pois às vezes dá algum pau no cliente e não tem 
como detectar qual erro está dando lá.

se alguem tiver alguma dica ou já passou por situação semelhante, agradeço a 
ajuda.

[]s

Alexandre

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



Re: [delphi-br] Ajuda pra gravar informações de um for

2008-02-19 Por tôpico Alexandre Nicolas
vc pode colocar o valor inicial numa variável tambem:

inicio1 := 100 ;
inicio2:=  8 ;

for a:=inicio1 to 1000 do
  for b:=inicio2 to 500 do ...etc...

Alexandre


  - Original Message - 
  From: Fellipe Henrique 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, February 19, 2008 4:46 PM
  Subject: [delphi-br] Ajuda pra gravar informações de um for


  Olá amigos, não estou conseguindo gravar as informações de um for, vou
  tentar explicar o meu problema. Tenho uma Thread, e nela tenho vários FOR
  em cascata, que fazem um processamento matemático, este processamento demora
  muito, algo em torno de mais de 1 semana num Core2Duo.. pois é um
  processamento de probabilidades.Bom, a Thread processa rápido, mas eu quero
  poder parar a thread, salvar as posições dos FOR, pra depois poder continuar
  no dia seguinte, sem ter que deixar a máquina ligada direta, ou salvar de
  tempos em tempos, pois depois de 2 dias, deu um pique de energia e perdeu
  tudo, teve que começar do zero... bom vamos ao exemplo:

  for a := 0 to 1000 do
  for b := 5 to 500 do
  for c := 18 to 950 do
   faz alguma coisa

  este é só um exemplo, no total tenho 23 FOR, encadeado.. eu consigo pegar a
  posicao de cada FOR e gravar, mas o que nao consigo e voltar a posicao pro
  inicial na proxima numeração do FOR anterior, vamos lá...

  vamos supor que tenha parado assim: a = 500 ; b = 10 ; c = 100

  ao iniciar novamente, tenho que iniciar nesta posicao salva anteriormente..
  porem, quando o B passar pra 11 o C tem que voltar pra 18, e quando o A
  passar pra 501, o B tem que ir para 5... é isso que não to conseguindo
  fazer...

  Alguém poderia me ajudar neste probleminha? Espero ter podido exemplificar o
  mais claro possível...

  Desde já agradeço

  []s

  -- 
  _
  T.·.F.·.A.·.
  Fellipe Henrique
  [EMAIL PROTECTED]

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



   

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