from:"Marcello"

[delphi-br] Re: POO com Delphi

2008-08-04 Por tôpico Marcello Felipelli

Pelo incrível que pareça, dê uma olhada nesse site 
http://www.dofactory.com/Patterns/Patterns.aspx e tente converter 
para Delphi, um para fixar o conceito, e outra pra ir se acostumando 
com essa quebra de paradigma.

No Delphi tem ECO que é bastante interessante porque utiliza um dos 
maiores conceito que se aplica no mercado não vou chamar de 
MVC ... mas, quase isso, só que com a grande sacada do mapeamento 
objeto relacional, como Hibernate, por exemplo. MVC na prática 
mesmo, só vi ainda em Struts, por favor, me indiquem sites e 
sugestões de pesquisa, não sou perfeito.

Visto isso, clame ao grande pai Google sobre MVP, ta com cara de 
tendência no mercado.

Marcello Felipelli

--- Em delphi-br@yahoogrupos.com.br, Fabio <[EMAIL PROTECTED]> escreveu
>
> Ola amigos,
>  
> Faz 3 anos que trabalho com Delphi 7, e agora com o Delphi 2007.
> A minha programação nunca foi orientado a objetos. Mas agora quero 
programar em Delphi somente em orientação a objetos.
> Preciso de alguma ajuda ou material para começar.
>  
> Algum amigo pode me indicar algum material ou apostila?
>  
> Valeu, Binho!
> 
> 
>   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]
>

Re: RES: RES: [delphi-br] Inicio de uma nova série.....TEM COISA QUE EU NÃO POSSO GUARDAR SÓ PRA MIM

2008-07-31 Por tôpico Marcello Felipelli

Certo, certo mesmo, era ter uma consulta pra atender a uma 
necessidade específica, para evitar fullscan ou melhor tablescan, 
inclusive. Concaternar SQL eu acho tosco.

Mas tenta vislumbrar alguma forma para uma tela de pesquisa que 
procure registros por um número limitado de opções. Estamos falando 
de 5 possibilidades de consultas no máximo. Sendo que as 5 podem ser 
utilizadas pelo usuário, ou uma combinação dessas possibilidades. E 
sabemos que isso é bastante comum.

Nestes casos você coloca um TOP e usa esse tipo de estrutura que 
falei, mas sempre estou apto a aprender...


--- Em delphi-br@yahoogrupos.com.br, Yoshio <[EMAIL PROTECTED]> escreveu
>
> 2008/7/30 Marcelo Moacir Florindo <[EMAIL PROTECTED]>:
> > Olá,
> >
> > Alguns componentes de acesso ao banco geram este 1=1 para já 
inicializarem
> > a condição com
> > AND nome='xxx', etc.
> >
> > Não é uma prática muito didática, porém funciona.
> >
> > E também falo pq já vi!
> >
> > Abraços,
> >
> > Marcelo
> 
> Funcionar funciona. Mas me parece POG puro, como o outro colega 
falou.
> E isso não causa um "fullscan" desnecessário na tabela?
>

Re: RES: RES: [delphi-br] Inicio de uma nova série.....TEM COISA QUE EU NÃO POSSO GUARDAR SÓ PRA MIM

2008-07-29 Por tôpico Marcello Felipelli

É aqui que entra o conceito de classes de negócio, e grande parte do 
minha falta de conhecimento de como fazer isso em delphi.

Em C#, principalmente a partir do Framework 2.0, e agora no 3.5 com 
LINQ, o mapeamento objeto-relacional ficou extremamente mais simples 
para os desenvolvedores e melhorou muito a clareza (qualidade) do 
código.

Li alguma coisa sobre ECO, mais reconheço que preciso aprimorar meus 
conhecimentos e estudar mais sobre.

Com o isolamento de classes de negócio, e o ORM, tem-se uma série de 
recursos como sobrecarga de métodos e especialização destes, que 
viabilizam o código com melhor qualidade, mais limpo.

Para sistemas como ERP´s isolar as responsabilidades em classes de 
negócio, facilita muito a vida quando for necessária a manutenção do 
código, sem falar dos benefícios de testes unitários.

No exemplo da consulta eu poderia ter uma consulta base e através de 
sobrecarga de métodos (mesma assinatura, e objeto diferente como 
parâmetro), a consulta poderia ser manipulada de "n" formas.

Em outras linguagens, como C# e Java, isso é feito "com os pés nas 
costas", mas em Delphi, eu confesso a minha ignorancia e necessidade 
de estudar mais sobre o assunto.

--- Em delphi-br@yahoogrupos.com.br, "Guara" <[EMAIL PROTECTED]> escreveu
>
> Os parametros possuem tipo isso limitaria a pesquisa
> 
> Usando substituição no texto vc pesquisa por qq campo
> 
> Agora se vc for pesquisar sempre pelo(s) mesmo(s) campo(s) ai e 
melhor usar
> parâmetros
> 
>  
> 
>  
> 
>  
> 
>  
> 
>   _  
> 
> De: delphi-br@yahoogrupos.com.br [mailto:delphi-
[EMAIL PROTECTED] Em
> nome de Marcello Felipelli
> Enviada em: segunda-feira, 28 de julho de 2008 21:14
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: RES: [delphi-br] Inicio de uma nova série.TEM 
COISA QUE EU
> NÃO POSSO GUARDAR SÓ PRA MIM
> 
>  
> 
> Hehehehe . Guara . por favor, me desculpe, isso não existe,
> isso é POG, pra que existe parametros de consulta então?
> 
> --- Em [EMAIL PROTECTED] <mailto:delphi-br%40yahoogrupos.com.br>
> os.com.br, "Guara"  escreveu
> >
> > Pode ser que o programador fazia a substituição do 1=1 e 2=2 por 
outras
> > condições em tempo de execução
> > 
> > Isto é comum em rotinas de relatório ou pesquisa 
> > 
> > 
> > 
> > 
> > 
> > _ 
> > 
> > De: [EMAIL PROTECTED] <mailto:delphi-br%40yahoogrupos.com.br> 
os.com.br
> [mailto:[EMAIL PROTECTED] <mailto:delphi-br%40yahoogrupos.com.br>
> os.com.br] Em
> > nome de Marcello Felipelli
> > Enviada em: segunda-feira, 28 de julho de 2008 20:19
> > Para: [EMAIL PROTECTED] <mailto:delphi-br%40yahoogrupos.com.br>
> os.com.br
> > Assunto: [delphi-br] Inicio de uma nova série.TEM COISA QUE EU
> NÃO POSSO
> > GUARDAR SÓ PRA MIM
> > 
> > 
> > 
> > Senhores,
> > 
> > A série continua  TEM COISA QUE EU NÃO POSSO GUARDAR SÓ PRA 
MIM
> >  hauahuahuahau
> > 
> > Observem a query que esta dentro de um componente ADOQuery...
> > 
> > SELECT AI.*
> > FROM AliquotaIcms AS AI
> > WHERE (1=1) and (2=2)
> > ORDER BY dsc_AliqIcms
> > 
> > HUhauhauhauhauha . where (1=1) and (2=2)  quais seriam as
> > próximas condições? auhauhuahauhauhauhauh
> > 
> > É senhores  podem dar risada  pimenta no olho dos outros é
> > refresco ... mas, eu não tinha o direito de guardar isso só pra
> > mim auhauauahauhah
> > 
> > Isso é de um sistema que eu herdei, me perdoem se eu estou 
faltando
> > com a ética, mais essa. eu não tinha direito de guardar só 
pra mim
> > 
> > Marcello V Felipelli
> > Analista de Sistemas
> > Cel : + 55 21 9572-6820
> > 
> > 
> > 
> > 
> > 
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> 
>  
> 
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]
>

Re: RES: [delphi-br] Inicio de uma nova série.....TEM COISA QUE EU NÃO POSSO GUARDAR SÓ PRA MIM

2008-07-29 Por tôpico Marcello Felipelli

Hehehehe . Guara . por favor, me desculpe, isso não existe,
isso é POG, pra que existe parametros de consulta então?



--- Em delphi-br@yahoogrupos.com.br, "Guara" <[EMAIL PROTECTED]> escreveu
>
> Pode ser que o programador fazia a substituição do 1=1 e 2=2  por outras
> condições em tempo de execução
> 
> Isto é comum em rotinas de relatório ou pesquisa 
> 
>  
> 
>  
> 
>   _  
> 
> De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] Em
> nome de Marcello Felipelli
> Enviada em: segunda-feira, 28 de julho de 2008 20:19
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] Inicio de uma nova série.TEM COISA QUE EU
NÃO POSSO
> GUARDAR SÓ PRA MIM
> 
>  
> 
> Senhores,
> 
> A série continua  TEM COISA QUE EU NÃO POSSO GUARDAR SÓ PRA MIM
>  hauahuahuahau
> 
> Observem a query que esta dentro de um componente ADOQuery...
> 
> SELECT AI.*
> FROM AliquotaIcms AS AI
> WHERE (1=1) and (2=2)
> ORDER BY dsc_AliqIcms
> 
> HUhauhauhauhauha . where (1=1) and (2=2)  quais seriam as
> próximas condições? auhauhuahauhauhauhauh
> 
> É senhores  podem dar risada  pimenta no olho dos outros é
> refresco ... mas, eu não tinha o direito de guardar isso só pra
> mim auhauauahauhah
> 
> Isso é de um sistema que eu herdei, me perdoem se eu estou faltando
> com a ética, mais essa. eu não tinha direito de guardar só pra mim
> 
> Marcello V Felipelli
> Analista de Sistemas
> Cel : + 55 21 9572-6820
> 
>  
> 
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]
>

[delphi-br] Re: Saber quantos registros foram retornados em uma consulta sql!!

2008-07-29 Por tôpico Marcello Felipelli

Véio  depende do componente que vc está usando.

Se for TQuery padrãozão ... pelo incrível que pareça, vc vai ter que
mandar query1.eof e depois query1.bof  pra depois pegar o numero
de linhas... mas, isso depedende do componente que vc está usando
(antes que me xinguem aqui) rss

--- Em delphi-br@yahoogrupos.com.br, berdam <[EMAIL PROTECTED]> escreveu
>
> cara eu n sei ao certo mas tenta fazer assim,
> inteiro = query.execsql;
> 
> n tenho certeza
> 
> 
> Douglas Takahara escreveu:
> >
> > Boa noite,
> >
> > Gostaria de saber como faço para saber quantos registros foram
> > retornados em uma consulta..
> >
> > por exemplo
> > select * from table where campo1=campo1;
> >
> > gostaria de saber como faço uma condição caso ele retornar mais de 20
> > registros por exemplo;
> >
> > eu estou usando access e sqlquery...
> >
> > eu tentei
> >
> > if sqlquery.recordcount >20 then
> > begin
> >
> > ShowMessage('registros>20')
> > end else
> >
> > showMessage('registro <20')
> >
> > porém n funcionou
> >
> >  
> 
> -- 
> -
> Uberdam Cavaletti
> Formado em Tecnologia da informação - Unoesc - Xxe
> Pós graduando em Desenvolvimento Java - Unoesc - Xxe
> 
> Acesse  http://www.curricular.com.br/berdam
> Acesse  http://passandoveneno.blogspot.com
> 
> -
>

[delphi-br] Re: duvida

2008-07-28 Por tôpico Marcello Felipelli

Eu acho melhor fazer isso direto no SELECT. Manda um CAST pra varchar
e substitui no próprio SELECT (dependendo de que banco vc esta usando,
isso é mole, mole)...

Abs

Marcello Felipelli

--- Em delphi-br@yahoogrupos.com.br, "Vinicius Santos - MSI"
<[EMAIL PROTECTED]> escreveu
>
> StringReplace ???
> 
> Vinicius dos Santos
> Blog: http://tuplas.blogspot.com
> http://www.msisolucoes.com.br
> 
>   - Original Message - 
>   From: rzzanatta 
>   To: delphi-br@yahoogrupos.com.br 
>   Sent: Monday, July 28, 2008 3:10 PM
>   Subject: [delphi-br] duvida
> 
> 
>   Olá eu tenho armazenado numa query um valor qualquer tipo 19,29,
só que 
>   eu quero que ele se transforme em 19P29, ou seja quero ler o valor 
>   armazenado e no lugar da virgula colocar o P , como faço isso 
>   obrigado
> 
> 
> 
>
> 
> [As partes desta mensagem que não continham texto foram removidas]
>

[delphi-br] Inicio de uma nova série.....TEM COISA QUE EU NÃO POSSO GUARDAR SÓ PRA MIM

2008-07-28 Por tôpico Marcello Felipelli

Senhores,

A série continua  TEM COISA QUE EU NÃO POSSO GUARDAR SÓ PRA MIM
 hauahuahuahau

Observem a query que esta dentro de um componente ADOQuery...

SELECT AI.*
  FROM AliquotaIcms AS AI
WHERE (1=1) and (2=2)
ORDER BY dsc_AliqIcms

HUhauhauhauhauha  . where (1=1) and (2=2)  quais seriam as
próximas condições? auhauhuahauhauhauhauh

É senhores   podem dar risada  pimenta no olho dos outros é
refresco ... mas, eu não tinha o direito de guardar isso só pra
mim auhauauahauhah

Isso é de um sistema que eu herdei, me perdoem se eu estou faltando
com a ética, mais essa. eu não tinha direito de guardar só pra mim

Marcello V Felipelli
Analista de Sistemas
Cel : + 55 21 9572-6820

Re: [delphi-br] 3 X 0 = 1

2007-06-20 Por tôpico Marcello Santos

MAXIMO(1,XXX)


--- Alcistemas Informática <[EMAIL PROTECTED]>
wrote:

> Em um determinado select eu preciso fazer com oque 3
> X 0  Seja igual a 3:
> 
> ex:
> 
> select itens.qtd * itens.comprimento as total
> 
> Campos:
> 
> QTD = 3
> COMPRIMENTO = 0
> 
> o comprimento pode variar.. 0,1,2,3, 4 
> 
> só que quando for zero preciso que assuma o valor de
> 1 para que o total nao seja 0 e sim 3
> 
> 
> 
> [As partes desta mensagem que não continham texto
> foram removidas]
> 
> 



 

Bored stiff? Loosen up... 
Download and play hundreds of games for free on Yahoo! Games.
http://games.yahoo.com/games/front

Re: [delphi-br] 3 X 0 = 1

2007-06-20 Por tôpico Marcello Santos

ALSI E SO USA MINIMO(1,XXX)


--- Alcistemas Informática <[EMAIL PROTECTED]>
wrote:

> Em um determinado select eu preciso fazer com oque 3
> X 0  Seja igual a 3:
> 
> ex:
> 
> select itens.qtd * itens.comprimento as total
> 
> Campos:
> 
> QTD = 3
> COMPRIMENTO = 0
> 
> o comprimento pode variar.. 0,1,2,3, 4 
> 
> só que quando for zero preciso que assuma o valor de
> 1 para que o total nao seja 0 e sim 3
> 
> 
> 
> [As partes desta mensagem que não continham texto
> foram removidas]
> 
> 



 

Finding fabulous fares is fun.  
Let Yahoo! FareChase search your favorite travel sites to find flight and hotel 
bargains.
http://farechase.yahoo.com/promo-generic-14795097

Re: [delphi-br] Sistema de Emissï¿½o de Cupom Fiscal - ECF.

2006-08-24 Por tôpico Marcello Santos

ola,em relacao a icms/iss ,no ecf eÂ´ gravado o
indice=01..20 e aliquotas 12.00,17.00,05.00 ,veja que
nao tem uma ordem logica,
o ideal voce pegar as aliquotas/indice e colocar
em variavel(tipo array)
assim fica facil resolver esta questao.

--- Campus <[EMAIL PROTECTED]> wrote:

> SÃ³ uma correÃ§Ã£o, o indice nÃ£o Ã© fixo, e varia de
> acordo com a programaÃ§Ã£o da
> ECF.
> 
> o F, I e N sÃ£o fixos, mas a posiÃ§Ã£o das aliquotas
> nÃ£o
> 
> 
> 
> - Original Message - 
> From: "Logos" <[EMAIL PROTECTED]>
> To: 
> Sent: Wednesday, August 23, 2006 12:16 PM
> Subject: Re: [delphi-br] Sistema de EmissÃ£o de Cupom
> Fiscal - ECF.
> 
> 
> basta vc informar no cadastro do produto, o indice
> da aliquota de icms no
> ecf.
> tipo
> 1 no ecf e 17
> 2 e 7
> f - substituido
> e assim por diante.
>   - Original Message - 
>   From: criamabr
>   To: delphi-br@yahoogrupos.com.br
>   Sent: Wednesday, August 23, 2006 11:54 AM
>   Subject: [delphi-br] Sistema de EmissÃ£o de Cupom
> Fiscal - ECF.
> 
> 
>   OlÃ¡ pessoal!
> 
>   Estou com dÃºvidas em relaÃ§Ã£o a ECF.
>   Irei desenvolver um sistema que sÃ³ irÃ¡ Emitir
> Cupom Fiscal - ECF.
>   Preciso informar algum dado relacionado a imposto
> no cadastro de produtos?
>   Ex.: Informar IPI, ICMS, etc.
>   Se alguÃ©m jÃ¡ desenvolveu um sistema desse tipo,
> poderia orientar-me?
>   Desde jÃ¡, obrigado.
> 
>   AbraÃ§o,
> 
>   Cristiano.
> 
> 
> 
> 
> 
> 
> 
>

> --
> 
> 
>   No virus found in this incoming message.
>   Checked by AVG Free Edition.
>   Version: 7.1.405 / Virus Database: 268.11.5/425 -
> Release Date: 22/08/2006
> 
> 
> [As partes desta mensagem que nÃ£o continham texto
> foram removidas]
> 
> 
> 
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA
> MENSAGEM >
> 
> 
> 
> Links do Yahoo! Grupos
> 
> 
> 
> 
> 
> 
> 
> 


__
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com 




-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

<*> O uso que vocÃª faz do Yahoo! Grupos estÃ¡ sujeito aos:
http://br.yahoo.com/info/utos.html

RES: [delphi-br] Disco de instalação

2006-05-11 Por tôpico Marcello Felipelli




Principalmente em razão do SQLServer, além do instalador feito pelo
InnoSetup, por exemplo, você vai precisar criar um outro executável que
tenha os "links" para a instalação do MSDE e para a Instalação do seu
programa.

A instalação do MSDE tem alguns truques, que vão desde a senha de SA, forma
de autenticação, collation e uma outra série de nuances pertinentes ao SQL
Server.

Linha de comando
D:\MSDE2000\>setup.exe /settings D:\MSDE2000\setup.ini

E dentro do setup.ini
[Options]
DISABLENETWORKPROTOCOLS=0
SAPWD="password "
INSTANCENAME="myinstance"
SECURITYMODE=SQL


Mais informações
http://www.codeproject.com/database/ConfigureMSDE.asp?print=true




-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Daniel Bastos
Enviada em: quinta-feira, 11 de maio de 2006 11:00
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Disco de instalação

Da uma olhada no InnoSetup... Ele é muito bom, alem de ser grátis... mas tem
vários por ai...
outro ponto, esta instalação vai instalar o SQL Server tb? ai fica
complicado .


Em 11/05/06, Wesley Romualdo da Silva <[EMAIL PROTECTED]>
escreveu:
>
> ola pessoal, eu gostaria de criar um disco de instalação usando uma
> aplicação que fiz em delphi, esta aplicação possui banco de dados em sql
> server 2000
>
>
> -
> Abra sua conta no Yahoo! Mail - 1GB de espaço, alertas de e-mail no
> celular e anti-spam realmente eficaz.
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
>
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>


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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >


 
Links do Yahoo! Grupos




 









-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]






  




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




  
  



  




  
Links do Yahoo! Grupos

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

[delphi-br] Mercado de trabalho para o interior

2005-12-31 Por tôpico Marcello Felipelli

Isso foi assunto de familia nesses dias de festa. Será que existe 
mercado de trabalho para desenvolvedores fora dos grandes centros?

Será que existe mercado de trabalho no interior do RJ, SP ou MG? Não 
falo de São José dos Campos, Sorocapa ou Campinas, cidades desse porte, 
falo de cidades pequenas e médias.

Se alguém tiver alguma informação sobre mercado para desenvolvedores 
fora dos grandes centros, por favor entre em contato.

Marcello Felipelli
[EMAIL PROTECTED]






___ 
Yahoo! doce lar. Faça do Yahoo! sua homepage. 
http://br.yahoo.com/homepageset.html 



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

[delphi-br] Manual do Report Builder em português

2005-12-29 Por tôpico Marcello Felipelli

Senhores,


Preciso de um manual em português do Report Builder.
No site da Digital Metaphors existe somente material
em inglês.

Obrigado pela atenção,


Marcello Felipelli
[EMAIL PROTECTED]








___ 
Yahoo! doce lar. Faça do Yahoo! sua homepage. 
http://br.yahoo.com/homepageset.html 



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

[delphi-br] CreateOleObject - Invalid class string

2005-11-17 Por tôpico Marcello Felipelli



Estou com um erroao criar um objeto OLE que somente
aconcete quando o usuário não é administrador local da
maquina.

O erro acontece nesta linha :

CobreBemX :=
CreateOleObject('CobreBemX.ContaCorrente');

A dll do componente esta registrada, tanto que o
administrador da maquina consegue, nesse caso,
imprimir o boleto.

Att.

Marcello Felipelli








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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

RES: [delphi-br] Alguém já desenvolve para Pocke t-PC?

2005-11-16 Por tôpico Marcello Felipelli

Alessandro,


Eu tenho uma aplicação pronta para Pocket-PC que desenvolvi em C#, e tenho
outros projetos que também serão feitos para pocket ... qualquer coisa entre
em contato

Att.

Marcello Felipelli
[EMAIL PROTECTED]

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Alessandro Fernandes
Enviada em: quarta-feira, 16 de novembro de 2005 20:15
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Alguém já desenvolve para Pocket-PC?

Gostaria de entrar em contato com colegas que já estejam desenvolvendo,
mesmo que ainda não comercialmente, para Pocket-PC.
 
_
Alessandro Cunha Fernandes 
SoftTI - Software e Consultoria e TI. 
[EMAIL PROTECTED] 

 


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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>


 
Links do Yahoo! Grupos




 







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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

RES: [delphi-br] Off Topic - MSN Messenger

2005-11-08 Por tôpico Marcello Felipelli

Eduardo ... 

Só porque eu morei em Lençóis durante a minha infância 

Clique em Ferramentas » Geral ... e desmarque as opções Executar o Messenger
automaticamente ... e Permitir a entrada automática ...

Feche o messenger e abra-o de novo ... em seguida desmarque as opções 
  » Lembrar meu endereço
  » Lembrar minha senha
  » Entrar automaticamente

E pronto

Marcello Felipelli
[EMAIL PROTECTED]


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Eduardo Silva ®
Enviada em: terça-feira, 8 de novembro de 2005 14:19
Para: Grupo Delphi-br
Assunto: [delphi-br] Off Topic - MSN Messenger

Galera, instalei o messenger 7.5 no windows XP e sem querer deixei marcada
uma opção que falava vincular este usuário a senha do computador (ou era
algo parecido).

Agora, toda vez que clico no ícone do messenger ele já inicia com meu nome
de usuário e senha automaticamente.

Mesmo eu deixando desmarcada as opções de lembrar nome do usuário, lembrar
senha e tal, isso continua acontecendo.

O computador que eu instalei é publico e eu não quero que fique assim,
alguém sabe como resolver isso?

Obrigado.

~\\|//~
-(o o)-
o--oOOOo--(_)--oOOOo-o
||
|   Eduardo de Almeida Silva |
|   Câmara Municipal de Lençóis Paulista |
|  [EMAIL PROTECTED]  -   (14)3263-0326   |
||
|.oooO   Oooo.   |
o(   )---(   )---o
  \ ( ) /
   \_)   (_/



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>


 
Links do Yahoo! Grupos




 








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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

Re: [delphi-br] Data do Banco de Dados

2005-10-27 Por tôpico Marcello Santos


ISSO RESOLVER.

SELECT NOW()



--- HNS Informï¿½tica <[EMAIL PROTECTED]> wrote:

> Amigos, tenho minha base de dados hospedada nos
> servidores da Hostnet, um mysql, por enquanto estou
> marcando nas tabelas a data e hora do sistema local,
> ou seja, campo := date  campohora := time.. Como
> faï¿½o pra pegar a data e hora do banco de dados?
> Abraï¿½os
> 
> Charles A. Chiodi
> 
> [As partes desta mensagem que nï¿½o continham texto
> foram removidas]
> 
> 





__ 
Yahoo! Mail - PC Magazine Editors' Choice 2005 
http://mail.yahoo.com




-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

Re: [delphi-br] Image e Mysql

2005-10-18 Por tôpico Marcello Santos

ver se isto te ajuda


  Caminho : string;
  aFS : TFileStream;
  ImagJPG : TJPEGImage;
begin
   OpenPictureDialog1.Execute;
   Caminho:= OpenPictureDialog1.FileName;
   JvImage1.Picture.LoadFromFile(Caminho);
   JvImage1.Refresh;
   if empty(Caminho) then
  exit;
   aFS := TFileStream.Create(Caminho, fmOpenRead); // 
 Le imagem
   DataCus.CDSProdutoImag.Append;
   
DataCus.CDSProdutoImag.FieldByName('CD_CODPRO').AsString
  
:=DataCus.CDSLista.FieldByName('CD_CODPRO').AsString;
   DataCus.CDSProdutoImagFOTO1.LoadFromStream(aFS);
   DataCus.CDSProdutoImag.Post;
   DataCus.CDSProdutoImag.ApplyUpdates(0);
   aFS.Free; // Fecha o arquivo e libera a memoria.




--- HNS Informática <[EMAIL PROTECTED]> wrote:

> estou usando um image, assim ó:
> 
>  editimagem.Picture.LoadFromFile(open.filename);
> 
> como posso fazer a gora para a imagem que está no
> meu image ser armazenado no banco mysql?
> 
> por exemplo:  query['Imagem'] := image o que?
> 
> att. Charles Chiodi
> 
> [As partes desta mensagem que não continham texto
> foram removidas]
> 
> 
> 
> 




__ 
Yahoo! Music Unlimited 
Access over 1 million songs. Try it free.
http://music.yahoo.com/unlimited/




-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

Re: [delphi-br] Imagem no MySQL

2005-10-18 Por tôpico Marcello Santos

eu uso tipo:blob

--- HNS Informática <[EMAIL PROTECTED]> wrote:

> Pessoal, preciso armazenar imagens (bmp ou jpg) no
> meu banco de dados MySQL, qual o tipo de campo que
> eu uso e qual o codigo para procurar uma figura no
> pc e armazenar no banco:?
> 
> att. Charles Chiodi
> 
> [As partes desta mensagem que não continham texto
> foram removidas]
> 
> 
> 
> 





__ 
Yahoo! Mail - PC Magazine Editors' Choice 2005 
http://mail.yahoo.com




-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

Re: [delphi-br] acesso a arquivos em mdf

2005-10-13 Por tôpico Marcello Santos

pega o Microsoft SQL Server 2000 Desktop Engine (MSDE
2000) Release A
http://www.microsoft.com/downloads/details.aspx?FamilyID=413744D1-A0BC-479F-BAFA-E4B278EB9147&displaylang=en
com ele instalado voce pode usar esta base.




--- Francisco Carlos Andrade
<[EMAIL PROTECTED]> wrote:

> Ola a todos recebi um arquivo  de um cliente meu, em
> formato mdf, preciso
> ler e ver o que tem, fui informado que esse tipo de
> arquivo pertence ao
> SQLSERVER da MICROSOFT, alguem poderia me dar
> informacoes de como faco para
> abrir ele com o delphi, eu nunca usei o sqlserver,
> apenas trabalhei ate
> agora com o firebird, mysql e interbase, estou
> totalmente perdido com
> relacao ao sqlserver
> 
> Agradeco antecipadamente a todos que me ajudarem
> 
> Fco Carlos Andrade
> 
>   
> 
>   
>   
>
___
> 
> Promoção Yahoo! Acesso Grátis: a cada hora navegada
> você acumula cupons e concorre a mais de 500
> prêmios! Participe! http://yahoo.fbiz.com.br/
> 
> 
> 




__ 
Yahoo! Music Unlimited 
Access over 1 million songs. Try it free.
http://music.yahoo.com/unlimited/




-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

Re: [delphi-br] DsgnIntf.dcu

2005-10-13 Por tôpico Marcello Santos

veja este artigo poderar resolver.

http://www.activedelphi.com.br/modules.php?op=modload&name=News&file=article&sid=23

--

--- "info.desenvolvimento"
<[EMAIL PROTECTED]> wrote:

> Pessoal, ainda estou com baita problema que nï¿½o
> consigo resolver. Estï¿½ dando um erro:
> 
> [Fatal Error] UDataModulo.pas(82): File not found:
> 'DsgnIntf.dcu'
> 
> O que devo fazer?
> 
> Minha versï¿½o ï¿½ Delphi 5, Nï¿½o estou passando
pra
> delphi versï¿½o superior.
> Isso comeï¿½ou a ocorrer depois que eu instalei um
> componente chamado CheckDoc, para verificaï¿½ï¿½o do
> CNPJ e CPF.
> 
> PAULO FERNANDES
> PORTO ALEGRE/RS
> 
> [As partes desta mensagem que nï¿½o continham texto
> foram removidas]
> 
> 


__
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com 




-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

Re: [delphi-br] Como criar, por favor e muito importnte

2005-08-29 Por tôpico Marcello Santos

simples amigo, quando for cadastrar um novo verificar
quantos ja existem. caso ja tenha os 10 nao deixar.




--- douglas mendonca <[EMAIL PROTECTED]> wrote:

> COMO EU CRIO UM ESTRUTURA QUE PERMITIRA QUE SOMENTE
> CADASTRE 10 USUARIOS
> 
> 
> EXEMPLO:
> 
> TENHO UM CADASTRO PRINCIPAL, APOS TENHO O CADASTRO
> DE SEUS BENEFICIARIOS QUE 
> SAO DEZ, NO MAXIMO PODE SER MENOS MAS NAO MAIS COMO
> EU CRIO UMA ESTRUTURA 
> QUE NAO PERMITIRA QUE SE CADASTRE MAIS DE DEZ.
> 
>
_
> Chegou o que faltava: MSN Acesso Grátis. Instale Já!
> 
> http://www.msn.com.br/discador
> 
> 
> 
> 





Start your day with Yahoo! - make it your home page 
http://www.yahoo.com/r/hs 
 




-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

Re: [delphi-br] Visualizador de Arquivos PDB(Banco de Dados para PalmOS)

2005-02-22 Por tôpico Marcello Santos



oi  , uso esse ver atende
:http://www.evolutionary.net/palmtools.htm



--- Bruno Lichot - Micrologos
<[EMAIL PROTECTED]> wrote:

> Salve Galera Delphiana!!!
> 
> Algume conhece algum visualizador de Arquivos
> PDB(Banco de Dados para PalmOS)?
> 
> 
> 
> []´s
> Bruno Lichot
> Gerente de Novas Tecnologias - Micrologos
> Equipe ClubeDelphi.NET
> DevMedia Group
>  
> www.micrologos.com.br - www.clubedelphi.net -
> www.delphirio.assespro-rj.org.br
> 
> 
> [As partes desta mensagem que não continham texto
> foram removidas]
> 
> 





__ 
Do you Yahoo!? 
Yahoo! Mail - You care about security. So do we. 
http://promotions.yahoo.com/new_mail





-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

Re: [delphi-br] Ideia para um Controle de Pedidos

2005-02-05 Por tôpico Marcello Santos



oi amigo,

veja como e simples :

voce tem o numero do pedido , coloque ele na nota
fiscal nos itens,  assim voce tem como saber se foi
faturado, quantos falta ser , etc..




--- jmourajr2000 <[EMAIL PROTECTED]> wrote:

> 
> Caros amigos, boa noite!
> 
> Sei que é vespera de carnaval, mas me surgiu uma
> solicitação, com a 
> qual terei que pular o carnaval com ela.
> 
> Meu cliente necessita que eu crie um controle de
> pedidos de venda 
> onde:
> 
> 1) Faça a colocação dos pedidos (Itens, quantidade,
> valor unitario, 
> subtotal e totais ...). Isso eu já desenvolvi e
> funciona legal.
> 
> 2) Só que nessa colocação de pedidos ele não previa
> e também não 
> queria que fossem controlados os itens com
> pendencia, ou seja, por 
> exemplo: 
> Em uma solicitação de pedido com tem 3 itens, serão
> lançados os 
> mesmos, só que um, ou todos os itens podem não estar
> disponiveis e ai 
> é que entra o tal do controle. Pois seria controlar
> os itens que já 
> foram atendidos no pedido e atender posteriormente o
> restante. 
> 
> 3) Emissão de Nota Fiscal: Este complementa o item 1
> acima(também 
> desenvolvi e funciona legal), só que agora com essa
> alteração não sei 
> como controlar as emissões, pois o cliente quer que
> fique o mesmo 
> pedido para cada pendencia(Os Numeros de
> pedidos(Integer) vão de 1 a 
> N e cada um poderá ter ou não pendencias). 
> 
> Gente necessito de uma ideia, holofote, luz,
> lanterna, vela o que 
> puder me ajudar para desenvolver essa tarefa de uma
> maneira rapida e 
> eficaz pois o cliente necessita para ontem e como já
> disse, vou 
> passar o carnaval com essa tarefa.
> 
> Estou usando Delphi3 e Paradox
> 
> Quem puder me ajudar, agradecerei imensamente.
> 
> Grande abraço a todos.
> 
> José de Moura.
> 
> Ps: Se preferir ajudar em PVT, meu e-mail é:
> [EMAIL PROTECTED]
> 
> 
> 
> 
> 
> 




__ 
Do you Yahoo!? 
Yahoo! Mail - Helps protect you from nasty viruses. 
http://promotions.yahoo.com/new_mail





-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

RES: [delphi-br] Enviar e-mail com anexo via programacao

2004-11-25 Por tôpico Marcello


essa rotina não funcionou comigo, alguém conseguiu usa-la

  _  

De: Marcos Esteves Simao (GERIN) [mailto:[EMAIL PROTECTED] 
Enviada em: quinta-feira, 25 de novembro de 2004 10:41
Para: '[EMAIL PROTECTED]'
Assunto: RES: [delphi-br] Enviar e-mail com anexo via programacao


Creio que deva declarar a unit ShellAPI


procedure Tfrm_RCP.btn_EnviaEMAIL(Sender: TObject);
var
pEMail: String;
begin
   pEMail:= 'mailto:[EMAIL PROTECTED] da
mensagem"CAMINHO e NOME Arquivo Anexo" '

   {$ifdef win32}
   ShellExecute(Handle,'Open',pChar(pEmail),nil,nil,sw_Show);
   {$endif}

end;



Marcos Esteves Simão
Programador de Computador - Unimed Vitória
[EMAIL PROTECTED] 
GERIN - CODES

-Mensagem original-
De: Vanderlei [mailto:[EMAIL PROTECTED]
Enviada em: quinta-feira, 25 de novembro de 2004 09:24
Para: [EMAIL PROTECTED]
Assunto: [delphi-br] Enviar e-mail com anexo via programacao


Pessoal,

Preciso enviar um e-mail com anexo via programação, mas nao estou
encontrando uma rotina q faça isso, alguem
teria isso pra me enviar?


no aguardo


Vanderlei

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



--
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos








-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]




Yahoo! Grupos, um serviço oferecido por:

PUBLICIDADE
 
   

  _  

Links do Yahoo! Grupos


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

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

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




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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

[delphi-br] Criando pastas com permissão

2004-11-24 Por tôpico Marcello



 
Olá pessoal, tenho uma rotina no meu sistema que cria uma pasta num
determinado diretório do meu servidor. Bom esse diretório é um diretório
restrito e como eu sou o administrador da rede, eu consigo criar, mas eu não
sou o único que usa o sistema e o resto dos usuários não tem permissão para
criar uma pasta nesse diretório, sendo assim minha função está furada.
Existe algum jeito de se dar uma permissão somente no momento de criar essa
pasta Assim somente o sistema conseguiria criar a pasta e o usuário
sozinho não
 
Agradeço desde já qualquer ajuda.

 

Marcello A. Souza
Divisão de Tecnologia
Tel. +55 11 3262-4777 r. 223
www.grupomonteiro.com.br



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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

RES: [delphi-br] Posicionando forms!!!

2004-11-05 Por tôpico Marcello


Poxa galera, leiam as dúvidas com atenção eu já disse que o
poScreenCenter não funciona com MDI criados em tempo de execução. Nesse caso
o que o poScreenCenter faz é apenas centralizar horizontalmente, até aí ele
funciona, mas verticalmente ele não centraliza, e esse é o problema.
 
Marcello.

  _  

De: Hudson [mailto:[EMAIL PROTECTED] 
Enviada em: quarta-feira, 3 de novembro de 2004 23:06
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] Posicionando forms!!!


E muito facil..
vc muda na propriedade do Object Inspector ( Position para
>>>>poScreenCenter)
  - Original Message ----- 
  From: Marcello 
  To: [EMAIL PROTECTED] 
  Sent: Thursday, November 04, 2004 11:52 AM
  Subject: [delphi-br] Posicionando forms!!!




  Pessoal, em meu sistema uso formulários MDI. Minha dúvida é como alinhar
os
  formulários filhos para que, quando forem criados, apareçam centralizados
  dentro do form Pai. Alguém aí já conseguiu fazer isso?



  Marcello A. Souza
  Divisão de Tecnologia
  Tel. +55 11 3262-4777 r. 223
  www.grupomonteiro.com.br



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



  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   



--
  Links do Yahoo! Grupos

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



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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]




Yahoo! Grupos, um serviço oferecido por:


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


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

  _  

Links do Yahoo! Grupos


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

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

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




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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

RES: [delphi-br] Posicionando forms!!!

2004-11-04 Por tôpico Marcello


Desculpe Romário, mas isso só funciona com formulários que não são MDI.
Nesse caso o que o poScreenCenter faz é apenas centralizar horizontalmente,
até aí ele funciona, mas verticalmente ele não centraliza, e esse é o
problema.
 
Marcello.

  _  

De: Romario (Delphi) [mailto:[EMAIL PROTECTED] 
Enviada em: quinta-feira, 4 de novembro de 2004 10:19
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] Posicionando forms!!!


Basta alterar a propriedade Position do Form para poScreenCenter.

Sds,

Romario



Marcello escreveu:
> 
> Pessoal, em meu sistema uso formulários MDI. Minha dúvida é como alinhar
os
> formulários filhos para que, quando forem criados, apareçam centralizados
> dentro do form Pai. Alguém aí já conseguiu fazer isso?
> 
> Marcello A. Souza


-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]




Yahoo! Grupos, um serviço oferecido por:


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


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

  _  

Links do Yahoo! Grupos


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

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

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




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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

[delphi-br] Posicionando forms!!!

2004-11-04 Por tôpico Marcello


 

Pessoal, em meu sistema uso formulários MDI. Minha dúvida é como alinhar os
formulários filhos para que, quando forem criados, apareçam centralizados
dentro do form Pai. Alguém aí já conseguiu fazer isso?

 

Marcello A. Souza
Divisão de Tecnologia
Tel. +55 11 3262-4777 r. 223
www.grupomonteiro.com.br



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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

RES: [delphi-br] Acentuação em Pesquisa!!!

2004-10-25 Por tôpico Marcello


onde acho essa função para interbase?
 
Marcelo.

  _  

De: Felipe Pasqualotto [mailto:[EMAIL PROTECTED] 
Enviada em: sexta-feira, 22 de outubro de 2004 17:06
Para: [EMAIL PROTECTED]
Assunto: RES: [delphi-br] Acentuação em Pesquisa!!!


Existe uma UDF que faz isso:
udf_CollateBr da tbudf;

Abraços

Felipe


-Mensagem original-
De: Dimas Fernando [mailto:[EMAIL PROTECTED] 
Enviada em: sexta-feira, 22 de outubro de 2004 17:34
Para: [EMAIL PROTECTED]
Assunto: [delphi-br] Acentuação em Pesquisa!!!



Utilizo FireBird 1.0.3.queria poder pesquisar da mesma forma, ou
seja, trazer todos os nomes JOSE...José...JOSÉ..

Mas nao funciona..

Alguem consegiu ??

Ate mais



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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

Para falar com o moderador, envie um e-mail para:  [EMAIL PROTECTED]
ou [EMAIL PROTECTED]

Links do Yahoo! Grupos








---
Incoming mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.779 / Virus Database: 526 - Release Date: 19/10/2004


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.779 / Virus Database: 526 - Release Date: 19/10/2004




-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]




Yahoo! Grupos, um serviço oferecido por:


  


 
 
 

  _  

Links do Yahoo! Grupos


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

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

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




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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

RES: RES: [delphi-br] Acentuação em Pesquisa!!!

2004-10-22 Por tôpico Marcello


mas isso se eu gravar os dados no banco sem acento Danilo, o que não é meu
caso, eu quero gravar com acento...entendeu?

  _  

De: Danilo Antonio Leite [mailto:[EMAIL PROTECTED] 
Enviada em: sexta-feira, 22 de outubro de 2004 14:50
Para: [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Assunto: Re: RES: [delphi-br] Acentuação em Pesquisa!!!


Eu acho que não precisa remover os acentos no banco, mas somente pesquisar
utilizando a função na hora de comparar os dados. Por exemplo,

Locate('Nome', VarArrayOf([RemoveAcento('José da Silva')]),
[loPartialKey]);



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]




Yahoo! Grupos, um serviço oferecido por:

 
 

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


  _  

Links do Yahoo! Grupos


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

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

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




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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

RES: [delphi-br] Acentuação em Pesquisa!!!

2004-10-22 Por tôpico Marcello


legal danilo, eu já uso essa função, mas acho que vc num entendeu minha
dúvida, quero poder gravar informações no banco e depois efetuar buscas sem
problemas independente de acentos ou não, cito o exemplo que passei
novamente:
 
eu queria dar a liberdade do usuário pesqusar independente de acento por
exemplo, se ele digitasse São Paulo ou Sao Paulo, viria na Busca São Paulo
 
entendeu? mas pra eu fazer essa busca eu teria que ter uma função que
removesse acentos no banco tb.

  _  

De: Danilo Antonio Leite [mailto:[EMAIL PROTECTED] 
Enviada em: sexta-feira, 22 de outubro de 2004 13:13
Para: [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] Acentuação em Pesquisa!!!


Aí vai uma função que remove acento. Você pode acrescentar os caracteres
esperados e substituir pelos que desejar.
Espero que ajude.

function TFrmPerformanceOper.RemoveAcento(Str:String): String;
Const
ComAcento = 'àâêôûãõáéíóúçüÀÂ ÔÛÃÕÁÉÍÓÚÇÜ.,;/\()';
SemAcento = 'aaeouaoaeioucuAAEOUAOAEIOUCU1234567';
Var
x : Integer;
Begin
For x := 1 to Length(Str) do
if Pos(Str[x],ComAcento)<>0 Then
Str[x] := SemAcento[Pos(Str[x],ComAcento)];
Result := Str;
end;

Atenciosamente,

Danilo Antônio Leite
Arcadian Tecnologia SA
[EMAIL PROTECTED]
(31)3241-8228 ramal 216

  _  

 
De:  Marcello  [mailto: [EMAIL PROTECTED]
<mailto:[EMAIL PROTECTED]> .com.br] 
Enviada em: sexta-feira, 22 de outubro de 2004 13:13
Para: [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Assunto: Acentuação em Pesquisa!!!




Pessoal, qual a melhor forma de se trabalhar com pesquisas quando os dados
gravados no Banco de Dados estão acentuados? Hoje eu forço os dados a serem
gravados sem acentuação nenhuma e nas pesquisas eu limpo a acentuação antes
de pesquisar. Mas e se eu quisesse salvar os dados com acentuação, eu queria
dar a liberdade do usuário pesqusar independente de acento por exemplo, se
ele digitasse São Paulo ou Sao Paulo, viria na Busca São Paulo. Existe tb o
problema quando é maiúsculo ou minúsculo. Como vcs resolvem esse
problema Existe alguma função par IB que remova acentuação?



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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

[delphi-br] Acentuação em Pesquisa!!!

2004-10-22 Por tôpico Marcello


 

Pessoal, qual a melhor forma de se trabalhar com pesquisas quando os dados
gravados no Banco de Dados estão acentuados? Hoje eu forço os dados a serem
gravados sem acentuação nenhuma e nas pesquisas eu limpo a acentuação antes
de pesquisar. Mas e se eu quisesse salvar os dados com acentuação, eu queria
dar a liberdade do usuário pesqusar independente de acento por exemplo, se
ele digitasse São Paulo ou Sao Paulo, viria na Busca São Paulo. Existe tb o
problema quando é maiúsculo ou minúsculo. Como vcs resolvem esse
problema Existe alguma função par IB que remova acentuação?

 

Marcello A. Souza
Divisão de Tecnologia
Tel. +55 11 3262-4777 r. 223
www.grupomonteiro.com.br



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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

RES: [delphi-br] Select Urgente

2004-10-22 Por tôpico Marcello


Então já tinha tentado isso antes, mas dá na mesma, veja como fica a string:
 
select (select ARQUSUARIO.USU_ATIVO from arqcontatos left outer join
ARQUSUARIO on (ARQCONTATOS.CON_CONSULTOR = upper(ARQUSUARIO.USU_NOME))) AS
ATIVO,
ARQCONTATOS.CON_ID, ARQCONTATOS.CON_CONSULTOR
FROM ARQCONTATOS LEFT OUTER JOIN ARQUSUARIO ON (ARQCONTATOS.USU_CODIGO =
ARQUSUARIO.USU_CODIGO)
WHERE ARQCONTATOS.CON_NOME LIKE '%MARCELO%'
ORDER BY ARQCONTATOS.CON_NOME

  _  

De: FS Under [mailto:[EMAIL PROTECTED] 
Enviada em: sexta-feira, 22 de outubro de 2004 09:45
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] Select Urgente


Tenta isto,

(select ARQUSUARIO.USU_ATIVO from arqcontatos left
outer join ARQUSUARIO on
(ARQCONTATOS.CON_CONSULTOR =
upper(ARQUSUARIO.USU_NOME))) AS ATIVO

FROM ARQCONTATOS LEFT OUTER JOIN ARQUSUARIO ON
(ARQCONTATOS.USU_CODIGO =
ARQUSUARIO.USU_CODIGO) WHERE ARQCONTATOS.CON_NOME LIKE
'%MARCELO%'
ORDER BY ARQCONTATOS.CON_NOME

[]'s
Fabiano Freitas 

--- Marcello <[EMAIL PROTECTED]>
escreveu: 

-


Pessoal, não estou conseguindo resolver este problema
de SELECT. Vejam essa
parte da minha string sql que está em vermelho
referente ao meu campo que
recebe o nome de ATIVO. Bom a pessoa que fez o Banco o
definiu da seguinte
forma. o campo ARQCONTATOS.USU_CODIGO está relacionado
com
ARQUSUARIO.USU_CODIGO, mas ele não criou uma relação
para o campo
ARQCONTATOS.CON_CONSULTOR, que na verdade é a mesma
informação. Deixa eu
explicar melhor, na Tabela ARQCONTATOS e gravado o
usuário que fez a
inserção/alteração e o consultor, ambos puxados da
tabela ARQUSUARIO. Uma
hora ele age como consultor e outra como usuário,
então pode vai ter casos
em que os dois vão ter o mesmo valor e casos que eles
são diferentes. O que
preciso é saber se o consultor está ativo ou não e não
o usuário. Como essa
string está sendo usada em uma pesquisa usando o like
ele trás varios
registros na parte em vermelho, e aí dá um erro de
multiplas linhas. Bom da
forma que eu fiz essa string só funciona quando defino
um parametro para que
venha somente um registro. agora, como fazer para que
o select interno
interaja como select geral Espero que eu tenha
conseguido passar o caso
com clareza. qualquer coisa solicitem mais
informações.

SELECT ARQCONTATOS.CON_NOME AS Nome,
ARQCONTATOS.CON_ID AS Codigo,
ARQCONTATOS.CON_TEL AS TelRes,
ARQCONTATOS.CON_CONSULTOR AS Consultor,
UPPER(ARQUSUARIO.USU_NOME) AS Usuario,
(select ARQUSUARIO.USU_ATIVO from arqcontatos left
outer join ARQUSUARIO on
(ARQCONTATOS.CON_CONSULTOR =
upper(ARQUSUARIO.USU_NOME)) WHERE
ARQCONTATOS.CON_NOME LIKE '%MARCELO%') AS ATIVO
FROM ARQCONTATOS LEFT OUTER JOIN ARQUSUARIO ON
(ARQCONTATOS.USU_CODIGO =
ARQUSUARIO.USU_CODIGO) WHERE ARQCONTATOS.CON_NOME LIKE
'%MARCELO%'
ORDER BY ARQCONTATOS.CON_NOME



Marcello A. Souza
Divisão de Tecnologia
Tel. +55 11 3262-4777 r. 223
www.grupomonteiro.com.br



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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA
MENSAGEM >>>>>

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou
[EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por:  
  
São Paulo  
 Rio de Janeiro   
CuritibaPorto
AlegreBelo Horizonte  
 Brasília  
 

-
Links do Yahoo! Grupos

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

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

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



  
  

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


-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]




Yahoo! Grupos, um serviço oferecido por:

 
<http://br.rd.yahoo.com/SIG=12aa6qq7c/M=264379.5078783.6203979.1588051/D=brc
lubs/S=2137111264:HM/EXP=1098535510/A=2191897/R=0/SIG=10vqa2grn/*http://br.d
iversao.yahoo.com/> 

 
<http://br.rd.yahoo.com/SIG=12aa6qq7c/M=264379.5078783.6203979.1588051/D=brc
lubs/S=2137111264:HM/EXP=1098535510/A=2191897/R=1/SIG=10vqa2grn/*http://br.d
iversao.yahoo.com/>  
 São Paulo  Rio de Janeiro  Curitiba  Porto Alegre  Belo Horizonte  Brasília

[delphi-br] Select Urgente

2004-10-22 Por tôpico Marcello


 

Pessoal, não estou conseguindo resolver este problema de SELECT. Vejam essa
parte da minha string sql que está em vermelho referente ao meu campo que
recebe o nome de ATIVO. Bom a pessoa que fez o Banco o definiu da seguinte
forma. o campo ARQCONTATOS.USU_CODIGO está relacionado com
ARQUSUARIO.USU_CODIGO, mas ele não criou uma relação para o campo
ARQCONTATOS.CON_CONSULTOR, que na verdade é a mesma informação. Deixa eu
explicar melhor, na Tabela ARQCONTATOS e gravado o usuário que fez a
inserção/alteração e o consultor, ambos puxados da tabela ARQUSUARIO. Uma
hora ele age como consultor e outra como usuário, então pode vai ter casos
em que os dois vão ter o mesmo valor e casos que eles são diferentes. O que
preciso é saber se o consultor está ativo ou não e não o usuário. Como essa
string está sendo usada em uma pesquisa usando o like ele trás varios
registros na parte em vermelho, e aí dá um erro de multiplas linhas. Bom da
forma que eu fiz essa string só funciona quando defino um parametro para que
venha somente um registro. agora, como fazer para que o select interno
interaja como select geral Espero que eu tenha conseguido passar o caso
com clareza. qualquer coisa solicitem mais informações.

SELECT ARQCONTATOS.CON_NOME AS Nome, ARQCONTATOS.CON_ID AS Codigo,
ARQCONTATOS.CON_TEL AS TelRes,
ARQCONTATOS.CON_CONSULTOR AS Consultor,
UPPER(ARQUSUARIO.USU_NOME) AS Usuario,
(select ARQUSUARIO.USU_ATIVO from arqcontatos left outer join ARQUSUARIO on
(ARQCONTATOS.CON_CONSULTOR = upper(ARQUSUARIO.USU_NOME)) WHERE
ARQCONTATOS.CON_NOME LIKE '%MARCELO%') AS ATIVO
FROM ARQCONTATOS LEFT OUTER JOIN ARQUSUARIO ON (ARQCONTATOS.USU_CODIGO =
ARQUSUARIO.USU_CODIGO) WHERE ARQCONTATOS.CON_NOME LIKE '%MARCELO%'
ORDER BY ARQCONTATOS.CON_NOME

 

Marcello A. Souza
Divisão de Tecnologia
Tel. +55 11 3262-4777 r. 223
www.grupomonteiro.com.br



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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

RES: [delphi-br] Quickreport!!! Ajuda Novamente...

2004-10-15 Por tôpico Marcello

Eu estava fazendo quase certo, tinha um pequeno detalhe que estava errado,
eu estava mandnado liberar da memória no after preview do relatório, aí que
está o erro... Abaixo segue a forma correta de se chamar o relatório de
liberar da memória conforme nosso amigo neto mandou, acho que vc não deve
ter lido, portanto estou repassando novamente a resposta:

Marcelo,

tenta criá-lo dinamicamente. Vc não diz se já faz isso mas, se não faz, faça
da seguinte forma.

O QReport tem o componente QuickRep, certo? Crie-o com o seguinte trecho de
código:

frmRelatorioQualquer := TfrmRelatorioQualquer.create(self);
try
frmRelatorioQualquer.QuickRep1.Preview; //ou poderia ser Print, para
imprimir
finally
frmRelatorioQualquer.Free; //libera da memória
DataModule1.cds_qualquer_coisa.Close; // Nunca esqueça de fechar sua
consulta SQL após usá-la
end;

talvez vc não esteja liberando da memória o seu rpt

Sds,

Neto
MasterServ Serviços Ltda.
Brasília/DF

Marcello.

  _  

De: MOITA [mailto:[EMAIL PROTECTED] 
Enviada em: quinta-feira, 14 de outubro de 2004 22:29
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] Quickreport!!! Ajuda Novamente...

como vc resolveu ?
  - Original Message - 
  From: Marcello 
  To: [EMAIL PROTECTED] 
  Sent: Wednesday, October 13, 2004 5:35 PM
  Subject: RES: [delphi-br] Quickreport!!! Ajuda Novamente...

  valeu gente, já resolvi...

_  

  De: Gustavo Führ [mailto:[EMAIL PROTECTED] 
  Enviada em: quarta-feira, 13 de outubro de 2004 16:50
  Para: [EMAIL PROTECTED]
  Assunto: Re: [delphi-br] Quickreport!!! Ajuda Novamente...

  Como você está chamando o relatório?

  Eu uso assim:

  fQRRelatorio := TQRRelatorio.Create(Self);
  fQRRelatorio.QuickReport.Preview;
  fQRRelatorio.release;

  E não tenho este erro. Vc está usando o q ai?

  Führ

  Marcello wrote:

  > 
  >
  >Desculpem a minha insistência, mas não obtive resposta ainda
  >
  >Pessoal, será que vcs poderiam me ajudar??? Sempre que exibo um relatório
e
  >fecho ele antes de ele ter sido totalmente carregado recebo um erro de
  >exceção ao tentar abrir novamente este mesmo relatório... Como posso
evitar
  >isso.. se eu conseguisse evitar que o relatório pudesse ser fechado antes
  de
  >ter sido carregado já me ajudaria, mas como fazer isso? 
  >
  >
  >Obrigado a todos...
  >
  >
  > 
  >
  >Marcello A. Souza
  >Divisão de Tecnologia
  >Tel. +55 11 3262-4777 r. 223
  >www.grupomonteiro.com.br
  >
  >
  >
  >[As partes desta mensagem que não continham texto foram removidas]
  >
  >
  >
  >  
  >

  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

  Yahoo! Grupos, um serviço oferecido por:  

<http://br.rd.yahoo.com/SIG=12a2vhcfu/M=264379.5078783.6203979.1588051/D=brc

lubs/S=2137111264:HM/EXP=1097785217/A=2191897/R=0/SIG=10vqa2grn/*http://br.d
  iversao.yahoo.com/>   

<http://br.rd.yahoo.com/SIG=12a2vhcfu/M=264379.5078783.6203979.1588051/D=brc

lubs/S=2137111264:HM/EXP=1097785217/A=2191897/R=1/SIG=10vqa2grn/*http://br.d
  iversao.yahoo.com/>   
  São Paulo  Rio de Janeiro  Curitiba  Porto Alegre  Belo Horizonte
Brasília

_  

  Links do Yahoo! Grupos

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

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

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

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

  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

Yahoo! Grupos, um serviço oferecido por: 

--
  Links do Yahoo! Grupos

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

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

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

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

-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

RES: [delphi-br] Quickreport!!! Ajuda Novamente...

2004-10-13 Por tôpico Marcello


valeu gente, já resolvi...

  _  

De: Gustavo Führ [mailto:[EMAIL PROTECTED] 
Enviada em: quarta-feira, 13 de outubro de 2004 16:50
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] Quickreport!!! Ajuda Novamente...




Como você está chamando o relatório?

Eu uso assim:

fQRRelatorio := TQRRelatorio.Create(Self);
fQRRelatorio.QuickReport.Preview;
fQRRelatorio.release;

E não tenho este erro. Vc está usando o q ai?


Führ


Marcello wrote:

> 
>
>Desculpem a minha insistência, mas não obtive resposta ainda
>
>Pessoal, será que vcs poderiam me ajudar??? Sempre que exibo um relatório e
>fecho ele antes de ele ter sido totalmente carregado recebo um erro de
>exceção ao tentar abrir novamente este mesmo relatório... Como posso evitar
>isso.. se eu conseguisse evitar que o relatório pudesse ser fechado antes
de
>ter sido carregado já me ajudaria, mas como fazer isso? 
>
>
>Obrigado a todos...
>
>
> 
>
>Marcello A. Souza
>Divisão de Tecnologia
>Tel. +55 11 3262-4777 r. 223
>www.grupomonteiro.com.br
>
>
>
>[As partes desta mensagem que não continham texto foram removidas]
>
>
>
>  
>



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]




Yahoo! Grupos, um serviço oferecido por:

 
<http://br.rd.yahoo.com/SIG=12a2vhcfu/M=264379.5078783.6203979.1588051/D=brc
lubs/S=2137111264:HM/EXP=1097785217/A=2191897/R=0/SIG=10vqa2grn/*http://br.d
iversao.yahoo.com/> 

 
<http://br.rd.yahoo.com/SIG=12a2vhcfu/M=264379.5078783.6203979.1588051/D=brc
lubs/S=2137111264:HM/EXP=1097785217/A=2191897/R=1/SIG=10vqa2grn/*http://br.d
iversao.yahoo.com/>  
 São Paulo  Rio de Janeiro  Curitiba  Porto Alegre  Belo Horizonte  Brasília


  _  

Links do Yahoo! Grupos


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

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

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




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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

RES: [delphi-br] Quickreport!!! Ajuda Novamente...

2004-10-13 Por tôpico Marcello


Muito obrigado neto, funcionou perfeitamente.

  _  

De: Neto [mailto:[EMAIL PROTECTED] 
Enviada em: quarta-feira, 13 de outubro de 2004 16:49
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] Quickreport!!! Ajuda Novamente...


Marcelo,

tenta criá-lo dinamicamente. Vc não diz se já faz isso mas, se não faz, faça
da seguinte forma.

O QReport tem o componente QuickRep, certo? Crie-o com o seguinte trecho de
código:

frmRelatorioQualquer := TfrmRelatorioQualquer.create(self);
try
frmRelatorioQualquer.QuickRep1.Preview; //ou poderia ser Print, para
imprimir
finally
frmRelatorioQualquer.Free; //libera da memória
DataModule1.cds_qualquer_coisa.Close; // Nunca esqueça de fechar sua
consulta SQL após usá-la
end;

talvez vc não esteja liberando da memória o seu rpt

Sds,

Neto
MasterServ Serviços Ltda.
Brasília/DF


- Original Message -
From: "Marcello" <[EMAIL PROTECTED]>
To: "Grupo Delphi BR" <[EMAIL PROTECTED]>
Sent: Wednesday, October 13, 2004 3:08 PM
Subject: [delphi-br] Quickreport!!! Ajuda Novamente...





Desculpem a minha insistência, mas não obtive resposta ainda

Pessoal, será que vcs poderiam me ajudar??? Sempre que exibo um relatório e
fecho ele antes de ele ter sido totalmente carregado recebo um erro de
exceção ao tentar abrir novamente este mesmo relatório... Como posso evitar
isso.. se eu conseguisse evitar que o relatório pudesse ser fechado antes de
ter sido carregado já me ajudaria, mas como fazer isso?


Obrigado a todos...




Marcello A. Souza
Divisão de Tecnologia
Tel. +55 11 3262-4777 r. 223
www.grupomonteiro.com.br



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



--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos












-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]




Yahoo! Grupos, um serviço oferecido por:

 
<http://br.rd.yahoo.com/SIG=12a5jihjk/M=264379.5078783.6203979.1588051/D=brc
lubs/S=2137111264:HM/EXP=1097783556/A=2191897/R=0/SIG=10vqa2grn/*http://br.d
iversao.yahoo.com/> 

 
<http://br.rd.yahoo.com/SIG=12a5jihjk/M=264379.5078783.6203979.1588051/D=brc
lubs/S=2137111264:HM/EXP=1097783556/A=2191897/R=1/SIG=10vqa2grn/*http://br.d
iversao.yahoo.com/>  
 São Paulo  Rio de Janeiro  Curitiba  Porto Alegre  Belo Horizonte  Brasília


  _  

Links do Yahoo! Grupos


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

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

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




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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

[delphi-br] Quickreport!!! Ajuda Novamente...

2004-10-13 Por tôpico Marcello


 

Desculpem a minha insistência, mas não obtive resposta ainda

Pessoal, será que vcs poderiam me ajudar??? Sempre que exibo um relatório e
fecho ele antes de ele ter sido totalmente carregado recebo um erro de
exceção ao tentar abrir novamente este mesmo relatório... Como posso evitar
isso.. se eu conseguisse evitar que o relatório pudesse ser fechado antes de
ter sido carregado já me ajudaria, mas como fazer isso? 


Obrigado a todos...


 

Marcello A. Souza
Divisão de Tecnologia
Tel. +55 11 3262-4777 r. 223
www.grupomonteiro.com.br



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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

RES: [delphi-br] Quickreport

2004-10-08 Por tôpico Marcello


Então, tenho um form onde defino o meu relatório e por esse form chamo o que
contem o componete Quickrep.
 
veja o código do meu botão Preview:
 
procedure TfrmSelRelClientes.btnPreviewClick(Sender: TObject);
var
   StrLiga: String;
begin
 //Chama o form
 If frmRelClientes = Nil Then
frmRelClientes:= TfrmRelClientes.Create( Self ) ;
 
 StrLiga:= 'where ';
 
 with frmRelClientes do
 begin
  qrClientes.active:= False;
  qrClientes.SQL.Clear;
  qrClientes.SQL.Add('select CLI_CODIGO, CLI_SITUACAO, CLI_NOME,
CLI_CONSULTOR, CLI_DT_CONTRATO from ARQCLIENTES');
 
  if self.edDataIni.Text <> '' then
  begin
   qrClientes.SQL.Add(StrLiga+'CLI_DT_CONTRATO >=
:PAR_DATAINI');
   qrClientes.ParamByName('PAR_DATAINI').Value:=
StrToDate(self.edDataIni.Text);
   StrLiga:= 'and ';
  end;
 
  if self.edDataFin.Text <> '' then
  begin
   qrClientes.SQL.Add(StrLiga+'CLI_DT_CONTRATO <=
:PAR_DATAFIN');
   qrClientes.ParamByName('PAR_DATAFIN').Value:=
StrToDate(self.edDataFin.Text);
   StrLiga:= 'and ';
  end;
 
  if self.edSituacao.Text <> 'INDIFERENTE' then
  begin
   qrClientes.SQL.Add(StrLiga+'CLI_SITUACAO =
'''+self.edSituacao.Text+'''');
   StrLiga:= 'and ';
  end;
 
  if self.edConsultor.Text <> 'INDIFERENTE' then
 qrClientes.SQL.Add(StrLiga+'CLI_CONSULTOR =
'''+self.edConsultor.Text+'''');
 
  if self.rbCodigo.Checked then
 qrClientes.SQL.Add('order by CLI_CODIGO');
  if self.rbNome.Checked then
 qrClientes.SQL.Add('order by CLI_NOME');
  if self.rbData.Checked then
 qrClientes.SQL.Add('order by CLI_DT_CONTRATO');
 
  qrClientes.Active:= True;
 
  //Verifica se há registros
  if qrClientes.RecordCount < 1 then
  begin
   Application.MessageBox('Nenhum Cliente foi encontrado, favor
verificar.','Mensagem do Sistema',MB_ICONEXCLAMATION+MB_OK) ;
   exit;
  end;
 
  if (self.edDataIni.Text <> '') and (self.edDataFin.Text <> '')
then
  qrlPeriodo.caption:= 'Período: De ' + self.edDataIni.Text + '
a ' + self.edDataFin.Text;
 
  if (self.edDataIni.Text <> '') and (self.edDataFin.Text = '') then
  qrlPeriodo.caption:= 'Período: A partir de ' +
self.edDataIni.Text;
 
  if (self.edDataIni.Text = '') and (self.edDataFin.Text <> '') then
  qrlPeriodo.caption:= 'Período: Até ' + self.edDataFin.Text;
 
  if (self.edDataIni.Text = '') and (self.edDataFin.Text = '') then
  qrlPeriodo.caption:= '';
 
  QuickRep1.Preview;
 end;
end;

  _  

De: Gustavo Führ [mailto:[EMAIL PROTECTED] 
Enviada em: sexta-feira, 8 de outubro de 2004 16:11
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] Quickreport


Como você está fazendo a chamada para o relatório
Copie o código aqui


Führ


Marcello wrote:

> 
>
>Pessoal, será que vcs poderiam me ajudar??? Sempre que exibo um relatório e
>fecho ele antes de ele ter sido totalmente carregado recebo um erro de
>exceção ao tentar abrir novamente este mesmo relatório... Como posso evitar
>isso.. se eu conseguisse evitar que o relatório pudesse ser fechado antes
de
>ter sido carregado já me ajudaria, mas como fazer isso? 
>
>Obrigado a todos...
>
> 
>
>Marcello A. Souza
>Grupo Monteiro - Divisão de Tecnologia
>www.grupomonteiro.com.br  <http://www.grupomonteiro.com.br/> 
>
> 
>
>
>
>[As partes desta mensagem que não continham texto foram removidas]
>
>
>
>  
>



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]




Yahoo! Grupos, um serviço oferecido por:


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


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

  _  

Links do Yahoo! Grupos


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

*   Para sair d

RES: [delphi-br] Criar Banco Firebird ao executar o sistema pela primeira vez

2004-10-08 Por tôpico Marcello


Olá alexandre, poderia me dar um exemplo de como criar o BD da forma que vc
disse...
 
Marcello.

  _  

De: Alexandre Oliveira [mailto:[EMAIL PROTECTED] 
Enviada em: sexta-feira, 8 de outubro de 2004 15:02
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] Criar Banco Firebird ao executar o sistema pela
primeira vez


Isso.Isso.

Fazer postagem cruzada em diferentes grupos de discussão. "isto não é muito
legal segundo a netetiqueta"

Leia mais em: http://www.palm-br.com.br/smart-questions-br.htm

Alexandre Oliveira

- Original Message -
From: "Melissa Lima" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, October 08, 2004 1:52 PM
Subject: Re: [delphi-br] Criar Banco Firebird ao executar o sistema pela
primeira vez



O que é Cross-posting ? mandar para várias listas ? é esse o termo ?


  - Original Message -
  From: Eduardo Jedliczka
  To: [EMAIL PROTECTED] ; Lista-Delphi (E-mail) ;
[EMAIL PROTECTED] ; [EMAIL PROTECTED] ;
[EMAIL PROTECTED] ; [EMAIL PROTECTED] ;
Delphi-Grupos ; [EMAIL PROTECTED]
  Cc: Lista-Delphi YahooGrupos ; [EMAIL PROTECTED] ; Delphi-BR ;
[EMAIL PROTECTED] ; [EMAIL PROTECTED]
  Sent: Friday, October 08, 2004 1:12 PM
  Subject: Re: [delphi-br] Criar Banco Firebird ao executar o sistema pela
primeira vez


  bom... como você fez cross-posting, eu não deveria responder, mas acho que
vale a dica...

  Faça o seguinte:

  Co sua conexão um bloco Try..Except, e ao falhar, execute o ISQL
(ShellExecute) contendo um script.SQL responsável pela criação do banco... e
mate sua aplicação (ou se preferir, reinicie).

  há outros métodos, mas este é mais simples...

  [s]

  =
  Eduardo Jedliczka
  GeraSoft Informática
  Apucarana - PR
  =
- Original Message -
From: Raphael Fonseca
To: Lista-Delphi (E-mail) ; [EMAIL PROTECTED] ;
[EMAIL PROTECTED] ; [EMAIL PROTECTED] ;
[EMAIL PROTECTED] ; Delphi-Grupos ;
[EMAIL PROTECTED]
Cc: Lista-Delphi YahooGrupos ; [EMAIL PROTECTED] ; Delphi-BR ;
[EMAIL PROTECTED] ; [EMAIL PROTECTED]
Sent: Friday, October 08, 2004 9:11 AM
Subject: [delphi-br] Criar Banco Firebird ao executar o sistema pela
primeira vez


Caros Amigos da Lista

Estou como uma dificuldade e espero que possam me ajudar.

Estou usando o Delphi 7 + Firebird 1.5

Preciso ao executar o meu sistema que ele verifique se o banco de dados
existe.

Ex: Sistema\Dados\Frotas.fdb

Se o banco exeistir não faz nada, mas se não existir preciso criar o
Banco com o nome Frotas.fdb dentro da pasta

Sistema\Dados e as eventuais tabelas do sistema.

Alguém poderia me ajudar?

Estou precisando muito.

Desde já Agradecido
Raphael Fonseca.

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



--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]



  Yahoo! Grupos, um serviço oferecido por:







  --

Links do Yahoo! Grupos

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

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

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



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



  --
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por:








--
  Links do Yahoo! Grupos

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

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

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



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



--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos










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

[delphi-br] Quickreport

2004-10-08 Por tôpico Marcello


 

Pessoal, será que vcs poderiam me ajudar??? Sempre que exibo um relatório e
fecho ele antes de ele ter sido totalmente carregado recebo um erro de
exceção ao tentar abrir novamente este mesmo relatório... Como posso evitar
isso.. se eu conseguisse evitar que o relatório pudesse ser fechado antes de
ter sido carregado já me ajudaria, mas como fazer isso? 

Obrigado a todos...

 

Marcello A. Souza
Grupo Monteiro - Divisão de Tecnologia
www.grupomonteiro.com.br  <http://www.grupomonteiro.com.br/> 

 



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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

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

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

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

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

[delphi-br] Erro com Relatório

2004-10-06 Por tôpico Marcello


 

Galera, tenho o seguinte caso com o QuickReport, sempre que o usuário fecha
um preview antes que o relatório seja todo carregado, acontece um erro de
exceção... Como faço pra evitar esse erro de exceção? Ou existe uma maneira
de fazer com que o usuário tenha que esperar o relatório ser todo carregado?
Isso já resolveria meu problema

 

Obrigado a todos.



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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

[delphi-br] Erro QuickReport

2004-10-06 Por tôpico Marcello


Galera, tenho o seguinte caso, sempre que o usuário fecha um preview antes
que o relatório seja todo carregado, acontece um erro de exceção... Como
faço pra evitar esse erro de exceção? Ou existe uma maneira de fazer com que
o usuário tenha que esperar o relatório ser todo carregado? Isso já
resolveria meu problema

 

Obrigado a todos.



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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

44 matches

Mail list logo