RES: [delphi-br] Grid Zebrado nao funciona

2006-11-06 Por tôpico Celito Alves Tonial
Nao use RecNo. 
Declare uma variável, inicie ela com algum valor e vá incrementando de 1 em
1 a cada laço da iteração.
Daí vc vai testar EOF pra saber quando não houver mais registros. Não
esqueça de andar no dataset (dataset.Next).  

i:=0
while not ds.eof do
begin
if odd(i) then
pinta a grid
ds.next
inc(i)
end


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Jeanne
Enviada em: segunda-feira, 6 de novembro de 2006 14:22
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Grid Zebrado nao funciona

oi pessoal, estou tentando deixar um grid Zebrado. O banco que estou
utilizando eh o Firebird e to utilizando um TQuery como dataset. 

A função que estou utilizando eh a seguinte:

   if not odd(TDBGrid(Sender).DataSource.DataSet.RecNo) then
  if not (gdSelected in State) then
  begin
   with TDbGrid(Sender) do
   begin
Canvas.Brush.Color := $00FFEFDF;
Canvas.FillRect(Rect);
DefaultDrawDataCell(rect,Column.Field,State);
   end;

  end;

O problema é que o valor desse TDBGrid(Sender).DataSource.DataSet.RecNo é
sempre -1. Alguem sabe porque acontece isso?

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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 



RES: [delphi-br] Dúvidas com datas

2006-11-03 Por tôpico Celito Alves Tonial
Datas podem ser somadas normalmente, pois datas são variáveis do tipo double
no Delphi. 

a, b, c: Tdatetime;
a := b+c;

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Tatiana
Enviada em: sexta-feira, 3 de novembro de 2006 09:05
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Dúvidas com datas

OBRIGADA PELA DICA.
  - Original Message -
  From: Gabriel Filho
  To: delphi-br@yahoogrupos.com.br
  Sent: Friday, November 03, 2006 10:48 AM
  Subject: Re: [delphi-br] Dúvidas com datas


  Qual delphi esta usando, se for o 7, use as funcoes DateUtils, mas se
  anterior não sei se tera mesma.

  Em 03/11/06, tatianajvieira [EMAIL PROTECTED] escreveu:
  
   Olá,
   tenho os seguintes dados com datas:
   ultima manutenção
   período = anual ou semestral
   proxima manutenção:= ultima manutenção + perodo
   Será que alguém pode me ajudar, não sei fazer cálculos com datas?
   Desde já agrdeço a atenção.
   Obrigada.
  
  
  
  


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

   

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 



RES: [delphi-br] Campo INT com 5 caracteres

2006-10-26 Por tôpico Celito Alves Tonial
Pq vc precisa disso ? Qual o BD ?
Pra ficar assim, acho que só sendo string mesmo.
Ou deixar int no BD e dentro do Delhpi vc faz um FormatFloat.

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Igor Alexandre
Enviada em: quinta-feira, 26 de outubro de 2006 15:30
Para: Delphi-Br; Delphi-Total
Assunto: [delphi-br] Campo INT com 5 caracteres

Como criar um campo INT na tabela que fique com 5 caracters. por
exemplo: ao invés de 7 ficaria 7;

   desde já obrigado.

-- 



 Igor Alexandre.


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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 



RES: [delphi-br] Comando SQL para veirifcar se a tabela existe no banco

2006-10-24 Por tôpico Celito Alves Tonial
Coloca um select 1 from Tablea where 1=0 dentro de uma seção try..except.
Se cair no except é que a tabela não existe.


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Tavares1
Enviada em: terça-feira, 24 de outubro de 2006 08:10
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Comando SQL para veirifcar se a tabela existe no banco
Prioridade: Alta

Bom dia!

Alguem pode me informar qual comando SQL utilizo para verificar se a tabela
existe no banco de dados. Dessa forma evito erro ao tentar abrir uma tabela
que nao exista.

Obrigado

Tavares



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 



RES: [delphi-br] Comando SQL para veirifcar se a tabela existe no banco

2006-10-24 Por tôpico Celito Alves Tonial
Além da maneira que eu falei no meil anterior vc tb usar, se for MSSQL ou
SYBASE, a tabela sysobjects usando Tupe = 'U' (user table).


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Tavares1
Enviada em: terça-feira, 24 de outubro de 2006 08:10
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Comando SQL para veirifcar se a tabela existe no banco
Prioridade: Alta

Bom dia!

Alguem pode me informar qual comando SQL utilizo para verificar se a tabela
existe no banco de dados. Dessa forma evito erro ao tentar abrir uma tabela
que nao exista.

Obrigado

Tavares



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 



RES: [delphi-br] Calcular nro. dias entre duas datas

2006-10-24 Por tôpico Celito Alves Tonial
TDatetime é um double, a parte inteira significa número de dias, a parte
fracionária indica as frações de um dia.
Se vc simplesmente fizer subtração funciona.


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Gabriel Filho
Enviada em: terça-feira, 24 de outubro de 2006 14:36
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Calcular nro. dias entre duas datas

se for Delphi7


  DaysBetween();

não sei se tem nas versoes anteriores

Em 24/10/06, João S. Araújo [EMAIL PROTECTED] escreveu:

 Boa tarde pessoal,

 como é que eu faço pra calcular o nro. de dias entre duas datas no delphi?


 João


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

 



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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 



RES: [delphi-br] programadores

2006-10-18 Por tôpico Celito Alves Tonial
Amigão, aprenda a escrever. 


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de KLEITON
Enviada em: terça-feira, 17 de outubro de 2006 18:35
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] programadores


ola outra vez
  Caro Frizzo, sua opinião eh muito relevante mas vale tanto qt tichika de
galinha ja fui condenado a prestar serviços comunitarios mas isso eh
outra história. se tivesse q ensinar minas adolescentes iria ensinar outras
coisas menos delphi. ñ tenho culpa do desfavorecimento educacional, vote no
Geraldo se eh tão solidário
   
  PS.: ñ so seu amigo.
   
  Fabiano Frizzo [EMAIL PROTECTED] escreveu:
  Primeiramente quero pedir Desculpas aos Colegas que não tem o por que ler
o que escrevi...  Mas isso me indigna...
Sei pouco de delphi mas no que posso ajudo os colegas e recebo muitas
ajudas...

Mas agora gostaria de dizer ao amigo  Kleiton B. Santos ja que ele esta
disponivel a dar cursos por que não faz um trabalho comunitario onde você
mora aposto que tem muitas jovens e Adolescentes querendo apreender um pouco
mas não tem condições de pagar um faculdade ou algum curso

MAs uma vez desculpa aos colegas que não mereciam perde o seu tempo lendo
isto mas não pude evitar

Fabiano Frizzo
FFRizzo Sistemas
Desenvolvedor: Delphi  Java
  - Original Message -
  From: Daniel Bastos
  To: delphi-br@yahoogrupos.com.br
  Sent: Monday, October 16, 2006 11:29 PM
  Subject: Re: [delphi-br] programadores


  Irmão, essa foi um comentário muito Infeliz da sua parte.
  Ninguem aqui é pago para responder perguntas da lista. Ninguem aqui ganha
1
  centavo com a lista, mas, mesmo com a correria do dia-a-dia, muitos de nos
  dão uma olhadinha e perdem seu tempo pra ajudar um outro colega de
  profissão.

  Como gratificação, recebemos um post como este

  Em 16/10/06, KLEITON [EMAIL PROTECTED] escreveu:
  
   ola pessoal, sera q tem alguem aki q saiba programar em delphi alem de
   mim, eh claro fiz so 2 perguntas e niguem sobe responde..
  
 quem quise curso to disponivel
  
  
  
 Kleiton B. Santos
  
  
   -
   Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu
celular.
   Registre seu aparelho agora!
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
  


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

   


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

 



  Kleiton B. Santos


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

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 



RES: [delphi-br] Dificuldade em Select

2006-10-16 Por tôpico Celito Alves Tonial
Primeiro vc precisa definir o que caracteriza último movimento. Data mais
atual ? Tipo = E ?


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de WILLER
Enviada em: segunda-feira, 16 de outubro de 2006 11:14
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Dificuldade em Select

Estou usando o FireBird e Delphi 7. Preciso fazer um select na minha tabela,
que tem uma extrutura mais ou menos assim:

cod - tipo
778 - E
750 - S
778 - S
750 - E


O tipo define se é entrada ou saída, e o código identifica a pessoa. O meu
select deveria trazer o último movimento de cada um dos códigos. Por
exemplo, na tabela acima deveria me trazer:
 778 - E
 750 - S
Alguém sabe se é possível fazer isso? Tentei algumas coisas, mas meus
conhecimentos em firebird não são muito amplos.






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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 



RES: [delphi-br] Dificuldade em Select

2006-10-16 Por tôpico Celito Alves Tonial
Aí não vai dar, pois vai trazer a última data de cada tipo.


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Gabriel Filho
Enviada em: segunda-feira, 16 de outubro de 2006 17:05
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Dificuldade em Select

SQL SERVER 2000 eu faria assim:


SELECT cod, tipo
FROM Tabela as T1
WHERE data = (SELECT MAX(data) FROM Tabela as T2 WHERE T2.cod = T1.cod)



Em 16/10/06, WILLER [EMAIL PROTECTED] escreveu:

 Ok, eu realmente não fui claro. O que estou implementando é um sistema 
 de acesso que utiliza catracas. Esse último movimento é o último 
 acesso de determinada pessoa, para isso tem um campo data. Eu 
 precisaria que o meu select retornasse esse último movimento de cada
pessoa.
 cod - tipo - data/hora
 778 - E-12:00
 750 - S-11:00
 778 - S-13:00
 750 - E-17:00

 -deveria me retornar
 - 778 - S - 13:00
 - 750 - E - 17:00

   - Original Message -
   From: Celito Alves Tonial
   To: delphi-br@yahoogrupos.com.br
   Sent: Monday, October 16, 2006 2:19 PM
   Subject: RES: [delphi-br] Dificuldade em Select


   Primeiro vc precisa definir o que caracteriza último movimento. 
 Data mais
   atual ? Tipo = E ?


   -Mensagem original-
   De: delphi-br@yahoogrupos.com.br 
 [mailto:[EMAIL PROTECTED]
 Em
   nome de WILLER
   Enviada em: segunda-feira, 16 de outubro de 2006 11:14
   Para: delphi-br@yahoogrupos.com.br
   Assunto: [delphi-br] Dificuldade em Select

   Estou usando o FireBird e Delphi 7. Preciso fazer um select na minha 
 tabela,
   que tem uma extrutura mais ou menos assim:

   cod - tipo
   778 - E
   750 - S
   778 - S
   750 - E


   O tipo define se é entrada ou saída, e o código identifica a pessoa. 
 O meu
   select deveria trazer o último movimento de cada um dos códigos. Por
   exemplo, na tabela acima deveria me trazer:
   778 - E
   750 - S
   Alguém sabe se é possível fazer isso? Tentei algumas coisas, mas meus
   conhecimentos em firebird não são muito amplos.






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



   --
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

   Links do Yahoo! Grupos






   __ Informação do NOD32 1.1804 (20061015) __

   Esta mensagem foi verificada pelo NOD32 Sistema Antivírus
   http://www.nod32.com.br


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

 



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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 



RES: [delphi-br] Select dentre de Select com UNION

2006-10-13 Por tôpico Celito Alves Tonial
Tente remover a sub-query, colocando as tabelas usadas nela para o FROM
principal.
Exemplo: fazer 2) ao invés de 1)

1)
Select b.Cod, (select n.Nome 
from NomeDoBla n
where n.Cod = b.Cod
union
   select l.Nome
from BiluBilu l
where l.Cod = b.Cod)
From Bla b
Where b.Cod = 1

 Isso aí de cima nem deve funcionar 
2)
Select b.Cod, (select n.Nome 
from NomeDoBla n
where n.Cod = b.Cod
From Bla b, NomeDoBla n, BiluBilu l
Where b.Cod = 1
And ((n.Cod = b.Cod) or (l.Cod = b.Cod))

Não sei se ficou claro. Mas vc pode tentar tb com outer joins.



-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Luizcm_jr
Enviada em: sexta-feira, 13 de outubro de 2006 13:49
Para: FireBase; delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Select dentre de Select com UNION

Boa Tarde...


Será que alguém poderia me ajudar a resolver uma consulta??

Estou fazendo uma consulta na banco e utilizo um select dentro de outro, o
meu problema está sendo em juntar dentro deste segundo select o union.

ex. tenho os produtos e quero trazer os clientes que adquiriram um produto
especifico. mas os clientes podem ser fisicos ou juridicos. então dentro do
select para saber o nome do cliente eu tenho que fazer union entre fisicos e
juridicos.

Não sei bem se fui claro!

mas alguém saberia me dizer como fazer isso.

Junior - Araraquara/SP

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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 



RES: [delphi-br] Select dentre de Select com UNION

2006-10-13 Por tôpico Celito Alves Tonial
Errei, pressa do copy  paste :D

2)

Select b.Cod,n.Nome
From Bla b, NomeDoBla n
Where b.Cod = 1
And n.Cod = b.Cod

Union all

Select b.Cod,l.Nome
From Bla b, BiluBilu l
Where b.Cod = 1
And n.Cod = l.Cod

Atenciosamente,
Celito Alves Tonial
MPS Informática Ltda. 


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Celito Alves Tonial
Enviada em: sexta-feira, 13 de outubro de 2006 14:24
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Select dentre de Select com UNION

Tente remover a sub-query, colocando as tabelas usadas nela para o FROM
principal.
Exemplo: fazer 2) ao invés de 1)

1)
Select b.Cod, (select n.Nome 
from NomeDoBla n
where n.Cod = b.Cod
union
   select l.Nome
from BiluBilu l
where l.Cod = b.Cod)
From Bla b
Where b.Cod = 1

 Isso aí de cima nem deve funcionar 
2)
Select b.Cod, (select n.Nome 
from NomeDoBla n
where n.Cod = b.Cod
From Bla b, NomeDoBla n, BiluBilu l
Where b.Cod = 1
And ((n.Cod = b.Cod) or (l.Cod = b.Cod))

Não sei se ficou claro. Mas vc pode tentar tb com outer joins.



-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Luizcm_jr Enviada em: sexta-feira, 13 de outubro de 2006 13:49
Para: FireBase; delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Select dentre de Select com UNION

Boa Tarde...


Será que alguém poderia me ajudar a resolver uma consulta??

Estou fazendo uma consulta na banco e utilizo um select dentro de outro, o
meu problema está sendo em juntar dentro deste segundo select o union.

ex. tenho os produtos e quero trazer os clientes que adquiriram um produto
especifico. mas os clientes podem ser fisicos ou juridicos. então dentro do
select para saber o nome do cliente eu tenho que fazer union entre fisicos e
juridicos.

Não sei bem se fui claro!

mas alguém saberia me dizer como fazer isso.

Junior - Araraquara/SP

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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* 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] Warning de Compilação

2006-10-05 Por tôpico Celito Alves Tonial
Vc está comparando um tipo sem sinal com um tipo que possui sinal (pode ser
negativo).

Troque a declaração da sua variável sem sinal para uma com sinal.


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de tranquilog12
Enviada em: quinta-feira, 5 de outubro de 2006 15:44
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Warning de Compilação

Boa tarde, alguém sabe como se resolve o seguinte warning:


[Warning] Comparing signed and unsigned types - widened both operands


Um abraço!





--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




RES: [delphi-br] SO PRA FICAR INDIGNADO!!!! É DE ARR EPIAR

2006-10-05 Por tôpico Celito Alves Tonial
Caros, vamos nos focar no escopo da lista ?
Existem outros locais para falarmos de política. 


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Fabio Dantas
Enviada em: quinta-feira, 5 de outubro de 2006 16:16
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] SO PRA FICAR INDIGNADO É DE ARREPIAR

Nenhum político é 100% confiável mas eu não duvido que o lula invente um
financiamento pro papai Noel não  e é isso ai lula com a força do
dinheiro do povo
 
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Alceu Egewarth
Enviada em: quinta-feira, 5 de outubro de 2006 16:07
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] SO PRA FICAR INDIGNADO É DE ARREPIAR
 
Anderson..
   
  Só  pra te ajudar...faltou na sua lista...a liberaçào de dinheiro que LULA
fez para as entregas do papai-noel e os ovos do coelhinho da páscoa...
   
   
  Vai se catar meu...
   
   
  É LULA de novo com a força do povo

Desenvolvimento (Anderson) [EMAIL PROTECTED] escreveu:
  disfarça...
fazê o quê???



  - Original Message -
  From: Walter Alves Chagas Junior
  To: 'delphi-br@yahoogrupos.com.br' 
  Sent: Wednesday, October 04, 2006 10:11 AM
  Subject: RES: [delphi-br] SO PRA FICAR INDIGNADO É DE ARREPIAR


  O cara é tão retardado mental que até pro E-Mail do noreplay do Orkut e
pro
  E-Mail do Antispam do Uol ele mandou...

  []s

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

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


  -Mensagem original-
  De: Spadinha [mailto:[EMAIL PROTECTED]
  Enviada em: quarta-feira, 4 de outubro de 2006 09:55
  Para: [EMAIL PROTECTED]; [EMAIL PROTECTED]; Vitinho; vila
  rica; vamol; [EMAIL PROTECTED]; [EMAIL PROTECTED];
  vagner love moreirinha; [EMAIL PROTECTED]; Tribunal Superior
  Eleitoral; [EMAIL PROTECTED]; tiago vaz; [EMAIL PROTECTED]; Thais
  L. Rodrigues; tertec; Tecnica Fingersec; [EMAIL PROTECTED]; takei;
  [EMAIL PROTECTED]; [EMAIL PROTECTED]; Suporte Hardware
  Bematech; [EMAIL PROTECTED]; [EMAIL PROTECTED]; Stevan
  Machado; [EMAIL PROTECTED]; Spadinha; [EMAIL PROTECTED];
  [EMAIL PROTECTED]; Spadão marcatto; somopar; simbal;
  [EMAIL PROTECTED]; [EMAIL PROTECTED];
  [EMAIL PROTECTED]; sh maraba; [EMAIL PROTECTED];
  Rodrigo Dziura; rodrigo; Ricardo Lucca; [EMAIL PROTECTED];
  Ricardo; [EMAIL PROTECTED]; [EMAIL PROTECTED];
  [EMAIL PROTECTED]; [EMAIL PROTECTED];
  [EMAIL PROTECTED]; Rafael Trindade; Rafael marcatto;
  [EMAIL PROTECTED]; Rafael Amado; [EMAIL PROTECTED];
  [EMAIL PROTECTED]; [EMAIL PROTECTED]; qmovi;
  [EMAIL PROTECTED]; premiatta; [EMAIL PROTECTED]; poquema;
  Pcart - Terra; [EMAIL PROTECTED]; [EMAIL PROTECTED]; niroflex;
  nicioli; [EMAIL PROTECTED]; [EMAIL PROTECTED]; multiflex;
  MSN; movelim; moveispar; moveis lachi; moveis casa blanca; moveis belo;
  moveis albatroz; moveara; moval; molufan; mobiscal; mempra; max royal;
  matrix; [EMAIL PROTECTED]; marcio silva; marcio rufini; marcio
  rufini; majoka; Maikel Takata; Maikel; [EMAIL PROTECTED]; maicon
  hieber; magnifika; madetec; Luiz Rafael Culik Guimaraes; Luiz Rafael
  Culik Guimaraes; Luciano; Loja20 - Arapongas; [EMAIL PROTECTED];
  [EMAIL PROTECTED]; [EMAIL PROTECTED]; linea
  brasil; Leonimer; Leonice Garbin Brahim; Leonice Brahim; lellus moveis;
  Leandro Ferreira; [EMAIL PROTECTED]; kyk moveis; kits parana;
  kamila esper; [EMAIL PROTECTED]; [EMAIL PROTECTED];
  [EMAIL PROTECTED]; [EMAIL PROTECTED]; juliana souza; JULIANA
  MAHFOUD; josi fornazieri; Josi - CPD; Josiane Marques;
  [EMAIL PROTECTED]; [EMAIL PROTECTED]; jessica
  conti; [EMAIL PROTECTED]; jandaia; [EMAIL PROTECTED];
  Isadora Piccini; [EMAIL PROTECTED]; incorplac; [EMAIL PROTECTED]; hb
  moveis; [EMAIL PROTECTED]; grappa; Grafica Uirapuru; gorriao;
  [EMAIL PROTECTED]; [EMAIL PROTECTED]; from @lmir;
  frazotto; [EMAIL PROTECTED]; [EMAIL PROTECTED]; Fernando
  (LEUCO do Brasil); Fernando; [EMAIL PROTECTED]; Fale Conosco
  Itaucard SPOBF; [EMAIL PROTECTED]; Fale Conosco;
  [EMAIL PROTECTED]; [EMAIL PROTECTED]; estrela; estofados ladd;
  estoara; Espanhol; [EMAIL PROTECTED];
  [EMAIL PROTECTED]; [EMAIL PROTECTED];
  [EMAIL PROTECTED]; Edilene; [EMAIL PROTECTED]; Douglas
  Ausech; dmonegatto; dj moveis; [EMAIL PROTECTED];
  [EMAIL PROTECTED]; demobile;
  delphi-br@yahoogrupos.com.br; Daniel Polastri; daniel pe de cabra;
  [EMAIL PROTECTED]; Contato; [EMAIL PROTECTED];
  [EMAIL PROTECTED];
  [EMAIL PROTECTED]; [EMAIL PROTECTED]; colorado;
  colibri; [EMAIL PROTECTED]; [EMAIL PROTECTED];
  [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED];
  [EMAIL PROTECTED]; cedro moveis; [EMAIL PROTECTED]; Carolina
  Garbin Spadão Marcatto; [EMAIL PROTECTED]; [EMAIL PROTECTED];
  [EMAIL PROTECTED]; 

RES: [delphi-br] SO PRA FICAR INDIGNADO!!!! É DE ARR EPIAR

2006-10-05 Por tôpico Celito Alves Tonial
Tá, eu sei que o foco da lista não é esse, apenas uma informação sobre a
ONG do mail do Felipe Henrique. Essa suposta ONG foi inventada por um
jornalista irresponsável em um jornaleco, só que internauta acredita em tudo
que lê sem antes investigar.
Abaixo segue o relato dele se desculpando pela cagada.

Só da pra ver pelo google cache, pq soh tem as colunas de ontem e hoje no
site...

http://66.249.93.104/search?q=cache:JknQCkNcNZIJ:www.tribuna.inf.br/coluna.a
sp%3Fcoluna%3Dchagas+Sociedade+dos+Amigos+de+Plut%C3%A3ohl=enct=clnkcd=4
client=firefox-a


Retratação

Metáforas fazem parte da crônica política. Já escrevi que as oposições
contrataram Sherlock Holmes para investigar a participação de José Dirceu no
mensalão. Contei a passagem do genial detetive por Brasília.
Nem o ex-chefe da Casa Civil sentiu-se agravado, muito menos os descendentes
de Connan Doyle preocuparam-se com o uso indevido do personagem.

Com freqüência, apelando para a ficção, costumo trazer à realidade nacional
mortos ilustres como Getúlio Vargas, Ulysses Guimarães e Tancredo Neves, que
comentam e até participam de lances conturbados da política. Para não falar
na intromissão de Napoleão, Maquiavel, Alexandre o Grande, Pedro Álvares
Cabral e personagens da História instalados pela minha parca imaginação nas
avenidas e palácios da capital federal. Nenhum protesto, até agora.

A 29 de agosto, enveredei pela mesma trilha, diante da desclassificação de
Plutão de planeta para asteróide. Por conta da proliferação de ONGs fajutas
mamando nas tetas do governo, uma delas, que a imprensa divulgara ser
dirigida por um ex-líder sindicalista, imaginei outra, a Sociedade dos
Amigos de Plutão.

Ao descrever suas atividades, obviamente fictícias, não resisti à tentação
de apresentá-la como da mesma forma presidida por líder sindical, suposto
amigo do presidente, claro que inexistente, por isso jamais fulanizado. A
ONG teria sede na Esplanada dos Ministérios e seus diretores empreenderiam
farta e luxuosa viagem ao redor do mundo, pregando a imprescindível
reabilitação de Plutão.
Esclarecendo dúvidas

Simples metáfora, mas, reconheço, sem a caracterização explícita. Como no
período eleitoral que agora se encerra andam exasperadas as emoções, houve
quem supusesse naquela crônica uma agressão ao PT, às lideranças sindicais,
ao presidente e à Esplanada dos Ministérios.
Penitencio-me, para que não haja dúvidas. A ONG Sociedade dos Amigos de
Plutão não existe. Pelo menos, ainda não foi criada.

Para evitar a repetição de um problema que já relato, lembro a Lei de
Imprensa, dispondo de uma figura denominada retratação. Quando, no mesmo
espaço, na mesma página, um jornalista se retrata, reconhecendo o erro,
cessa ou nem se inicia a respectiva ação penal. Por que esse cuidado? Porque
não faz um mês o comitê de campanha de Geraldo Alckmin denunciou-me à
Justiça Eleitoral como tendo ofendido o candidato, ao chamar de burra e
ofensiva à inteligência nacional a estratégia de ficar agredindo Lula em vez
de anunciar seus programas.

No TSE, em nome da liberdade de imprensa, o ministro-relator recomendou o
arquivamento da ação, acompanhado em seguida pelo plenário. Seria no mínimo
inusitado, na mesma eleição, ser processado pelos dois lados, mas faz tempo
que de quatro em quatro anos a história se repete. Estará a virtude no
meio?...  



-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Fellipe Henrique
Enviada em: quinta-feira, 5 de outubro de 2006 16:17
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] SO PRA FICAR INDIGNADO É DE ARREPIAR

Me desculpe, mas tem sempre uns bestas, por isto que o Brasil está como
está

Sabe a mais nova!? uma tal de ONG pra Plutão...  procurem nas sites de
noticias.. nosso querido governo soltou quase 2mi pra eles... é foda não é!?
Enquanto o Brasil tiver pessoas assim não vai pra frente... Lula!? que se
exploda

Me descilpe, mas tive que entrar na conversa...


[]s
Fellipe H.

Em 05/10/06, Alceu Egewarth [EMAIL PROTECTED] escreveu:

 Anderson..

   Só  pra te ajudar...faltou na sua lista...a liberaçào de dinheiro 
 que LULA fez para as entregas do papai-noel e os ovos do coelhinho da
páscoa...


   Vai se catar meu...


   É LULA de novo com a força do povo

 Desenvolvimento (Anderson) [EMAIL PROTECTED] escreveu:
   disfarça...
 fazê o quê???



   - Original Message -
   From: Walter Alves Chagas Junior
   To: 'delphi-br@yahoogrupos.com.br'
   Sent: Wednesday, October 04, 2006 10:11 AM
   Subject: RES: [delphi-br] SO PRA FICAR INDIGNADO É DE ARREPIAR


   O cara é tão retardado mental que até pro E-Mail do noreplay do 
 Orkut e pro
   E-Mail do Antispam do Uol ele mandou...

   []s

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

   Parabens Telemont - Somos a 8ª maior empresa do 

RES: [delphi-br] Re: Como parar e retornar uma apl icação de porta serial via Delphi

2006-10-03 Por tôpico Celito Alves Tonial
Ae amigão, já tentou apertar F1 ? Sem ser desrespeitoso nem nada, mas acho
que ensinar a usar o/programar com Delphi não seja o propósito desta
agremiação.
Aperte F1, vá em Help Topics e leia sobre o TaskKill que o Gabriel citou.


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de xsalada
Enviada em: terça-feira, 3 de outubro de 2006 13:15
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Re: Como parar e retornar uma aplicação de porta serial
via Delphi

Será que alguém pode me ajudar a fazer isso usando DELPHI

Att,

LF

--- Em delphi-br@yahoogrupos.com.br, Gabriel Filho
[EMAIL PROTECTED] escreveu

 se nesta maquina tiver instalado o winxp, consulte sobre o comando
taskkill,
 ele sever para matar tarefas
 
 
 Em 03/10/06, xsalada [EMAIL PROTECTED] escreveu:
 
  Ta...
 
  iai... como eu faço isso???
 
  att,
 
  LF
 
  -- Em delphi-br@yahoogrupos.com.br, Gabriel Filho
  [EMAIL PROTECTED] escreveu
  
   não sei se seria correto, mas vc poderia parar a aplicação, e
  executala de
   dentro de seu aplicativo e fecha-lo
  
  
   Em 03/10/06, xsalada [EMAIL PROTECTED] escreveu:
   
Olá a todos e bom dia!
   
Tenho um cliente para o qual estou desenvolvendo um sistema que 
precisa se comunicar através da porta serial. Porém ele tem um
outro
aplicativo que roda na máquina dele e fica monitorando a porta
serial
constantemente. Eu precisava, portanto, parar este aplicativo,
rodar o
meu e, após o término da minha comunicação (que deve demorar
no máximo
5 minutos), retornar a aplicação que foi parada à sua execução
normal.
   
Alguém poderia me dar um forcinha?
   
Att,
   
LF
   
   
   
   
   
  
  
   [As partes desta mensagem que não continham texto foram removidas]
  
 
 
 
 
  
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]







--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




RES: [delphi-br] Re: Como parar e retornar uma apl icação de porta serial via Del

2006-10-03 Por tôpico Celito Alves Tonial
Ah entendi agora.
Desculpe-me.
 

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de xsalada
Enviada em: terça-feira, 3 de outubro de 2006 14:42
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Re: Como parar e retornar uma aplicação de porta
serial via Del


acho q vc não entendeu... eu não quero usar o taskkill, porque segundo o
Gabriel, ele é somente XP e minha aplicação não irá rodar somente em XP... 

vou além, dizendo que não quero aprender a usar o programa com o Delphi, mas
sim aprender a parar uma aplicação que está rodando e depois voltar a
executá-la via Delphi. Se não tem nenhuma forma conhecida de fazer isso
usando delphi ou nenhuma API que o faça, tudo bem...

e, só para seu conhecimento, eu apertei f1 e fucei sobre o taskkill...
e se ele existir no 98 e no NT (2000) tb, tudo bem... deve funcionar...

Att,

LF


--- Em delphi-br@yahoogrupos.com.br, Celito Alves Tonial
[EMAIL PROTECTED] escreveu

 Ae amigão, já tentou apertar F1 ? Sem ser desrespeitoso nem nada,
mas acho
 que ensinar a usar o/programar com Delphi não seja o propósito desta 
 agremiação.
 Aperte F1, vá em Help Topics e leia sobre o TaskKill que o Gabriel
citou.
 
 
 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] Em
 nome de xsalada
 Enviada em: terça-feira, 3 de outubro de 2006 13:15
 Para: delphi-br@yahoogrupos.com.br
 Assunto: [delphi-br] Re: Como parar e retornar uma aplicação de
porta serial
 via Delphi
 
 Será que alguém pode me ajudar a fazer isso usando DELPHI
 
 Att,
 
 LF
 
 --- Em delphi-br@yahoogrupos.com.br, Gabriel Filho
 [EMAIL PROTECTED] escreveu
 
  se nesta maquina tiver instalado o winxp, consulte sobre o comando
 taskkill,
  ele sever para matar tarefas
  
  
  Em 03/10/06, xsalada [EMAIL PROTECTED] escreveu:
  
   Ta...
  
   iai... como eu faço isso???
  
   att,
  
   LF
  
   -- Em delphi-br@yahoogrupos.com.br, Gabriel Filho
   [EMAIL PROTECTED] escreveu
   
não sei se seria correto, mas vc poderia parar a aplicação, e
   executala de
dentro de seu aplicativo e fecha-lo
   
   
Em 03/10/06, xsalada [EMAIL PROTECTED] escreveu:

 Olá a todos e bom dia!

 Tenho um cliente para o qual estou desenvolvendo um sistema 
 que precisa se comunicar através da porta serial. Porém ele 
 tem um
 outro
 aplicativo que roda na máquina dele e fica monitorando a porta
 serial
 constantemente. Eu precisava, portanto, parar este aplicativo,
 rodar o
 meu e, após o término da minha comunicação (que deve demorar
 no máximo
 5 minutos), retornar a aplicação que foi parada à sua execução
 normal.

 Alguém poderia me dar um forcinha?

 Att,

 LF





   
   
[As partes desta mensagem que não continham texto foram 
removidas]
   
  
  
  
  
   
  
  
  
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 
 
 
 
 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
  
 Links do Yahoo! Grupos







--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




RES: [delphi-br] Somando Data

2006-09-28 Por tôpico Celito Alves Tonial
Do help do Delphi (TDateTime):

Most VCL objects represent date and time values using the TDateTime type.
The integral part of a TDateTime value is the number of days that have
passed since 12/30/1899.

Ou seja, pra adicionar um dia basta vc somar 1 a uma variável do tipo
TDateTime. 


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Marcelo
Enviada em: quinta-feira, 28 de setembro de 2006 17:07
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Somando Data

Caros da lista, mais uma vez solicito a ajuda de vcs. Estou com o seguinte
problema:

Como eu faço para somar a data atual mais 1.
Ex1: HOJE = 28/10/2006 então teria que somar essa data mais um = 29/10/2006
Ex2: HOJE= 31/12/2006 então teria que somar essa data mais um = 01/01/2007

e por ai vai.

Desde já agradeço a todos pela atenção.
 




--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





RES: [delphi-br] LOCK - OFF TOPIC

2006-09-22 Por tôpico Celito Alves Tonial
Bem observado, Juliano. Na maioria dos casos algo simples resolve quase
todas as situações.
Anderson, apenas como curiosidade, quanto custa uma licença do seu software
? 


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Juliano Carvalho - Folhamatic
Enviada em: quinta-feira, 21 de setembro de 2006 13:51
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] LOCK - OFF TOPIC

Otimo ponto de vista!
Todo sistema é burlável. Mas as vezes uma trava simples resolve 99% dos
problemas A questão esta nos objetivos e publico-alvo do bloqueio.
Enquanto milhões de pessoas pagam ou não usam, uma meia duzia de hackers
consegue destravar até lá vc já ficou rico :-)
  - Original Message -
  From: Desenvolvimento (Anderson)
  To: delphi-br@yahoogrupos.com.br
  Sent: Thursday, September 21, 2006 1:34 PM
  Subject: Re: [delphi-br] LOCK - OFF TOPIC


  isso é uma boa coisa...
  mas veja: o publico q quis atingir com esse aplicativo são pais de filhos
adolescentes...

  eu fui em bh mês passado por motivos de saúde...
  daí, conversando por lá, um pai veio me contar uma historia q tinha
acontecido há alguns dias antes...
  Ele tem um filho de 8 e outro de 13 anos... 
  O filho mais novo tava na net quando chegou o irmão mais velho e uns
amigos... Daí, um amigo do mais velho falou ao mais novinho: Ei, acessa a
sandrinha.com (não to fazendo divulgação disso, pois particularmente
prefiro ao vivo.. rsrsrs)
  Daí, o rapazinho de 8 anos abriu, e viu aquela babozeira toda... Chamou o
pai dele pra mostrar, pois nunca tinha visto
  O pai dele quase deu um trosso rsrs
  Quase bateu no amigo do filho mais velho...
  Então, como o filho mais novo ficou viciadinho em ver xererecas... ele
tirou a internet da casa... Daí, qdo ficou sabendo do meu programinha,
comprou logo 2 cópias... um para o mais novo e a outra pro escritório
dele...
  Essa história é verídica, e em pvt posso até passar o email para vcs
confirmarem...
  É esse publico que quero atingir.
  Mas me surpreende a quantidade de empresas que estão interessadas nisso. 
  Uma solução para as empresas seria instalar um proxy. Mas dependendo da
quantidade de máquinas, o custo é alto.
  Daí elas estão preferindo usar meu aplicativo...

  Logo, vem a história... 

  você usa o winzip ou pkzip? Winrar ou rar?  Norton ou NOD ?
  Pra q usar winzip se o windows tem já o compactador/descompactador nativo?

  Cada caso vai ser um caso... 
  e amém a liberdade!!!

  Valeu amigos!


- Original Message - 
From: Alisson Yahoo 
To: delphi-br@yahoogrupos.com.br 
Sent: Thursday, September 21, 2006 12:28 PM
Subject: Re: [delphi-br] LOCK - OFF TOPIC


Bem, eu não compraria esse tipo de programa, pois acho que é muito
limitado. Mas, já que você perguntou se tenho alguma sugestão... Eu já fiz
um programa parecido que roda como serviço e aparece no gerenciador de
tarefas com o mesmo nome de um serviço do Windows. O programa não bloqueia o
acesso aos programas, o que ele faz é gravar uma imagem de tempos em tempos
em uma pasta oculta. Essa imagem só pode ser vista com um exe específico.
Assim dá pra monitorar o que a pessoa tá fazendo no computador. 



Amigo,

você deve realmente entender bastante de informática, mas não entendeu
bem a
filosofia do meu programa.
Pois esse aplicativo, assim como qualquer outro, pode ser desinstalado
em
modo de segurança.
Aí, fica o critério de quem entende o que significa modo de segurança,
conhece bem o registro desinstalar o aplicativo.
Qualquer aplicação pode ser desinstalada desse modo!! :P Você tem alguma
sugestão?

Anderson


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




 

__ Informação do NOD32 IMON 1.1765 (20060920) __

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


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

   

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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





RES: [delphi-br] Adicionar Fields em Query Run-Time ...

2006-09-22 Por tôpico Celito Alves Tonial
Dá uma lida no Help do TQuery, quase cereteza que tem um AddField lá. 



-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de gustavohenriquephn
Enviada em: sexta-feira, 22 de setembro de 2006 09:52
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Adicionar Fields em Query Run-Time ...

Pessoal normalmente quando faço a Query das minhas aplicações vou até o
datamodule adiciono uma Query coloco em sql select * from
c:\sistemas\teste\aaa.DBF depois clico duas vezes sobre a tquery e vou em
add all fields
 
preciso criar em tempo de execução, uma forma que passando o SQL tenho q
criar os campos automaticamente neste TQuery alguém imagina alguma forma ?






--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





RES: [delphi-br] Erro ao compilar

2006-09-22 Por tôpico Celito Alves Tonial
Acontece aqui tb.
Única solução até hoje encontrada é reiniciar o delphi ou o PC mesmo.
Aqui temos executáveis de todos os tamanhos. O problema acontece até mesmo
em projetos pequenos, mas com pouca frequência. Usamos D5 e D7.

Para diminuir o tamanho do executável dê uma olhada na parte de gerar BPL's.
Separar o projeto em BPL's + executável.


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Leonardo Felipe de Oliveira
Enviada em: sexta-feira, 22 de setembro de 2006 09:57
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Erro ao compilar

Pessoal,

O sistema aqui da empresa é muito grande. Para ter uma idéia, o executável
tem 22MB.
As vezes, quando compilamos o projeto da o seguinte erro no Delphi: 
Access violation at address 0B4FA39E in module 'RLINK32.DLL'. Read of
address 0C6383C0.
E ai tem que reiniciar o Delphi e as vezes até reiniciar o computador.

Sempre achei que esse erro era de falta de memória, pois o sistema é muito
grande. Mas já aumentamos as memórias dos micros para 512MB e mesmo assim
continua dando o erro.

Alguém já teve este problema ou sabe como solucionar?

Utilizo Delphi 6 no Windows 2000.

Abraços,
Leonardo

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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 








-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




RES: [delphi-br] LOCK - OFF TOPIC

2006-09-21 Por tôpico Celito Alves Tonial
Sem me meter na aplicação do nobre colega. Que aliás tb gostei. Apenas
sugerindo.
Não poderia ser feito em forma de um serviço ao invés de um executável ?
Apenas Administradores da estação podem retirar/parar serviços (eu acho).


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Desenvolvimento (Anderson)
Enviada em: quinta-feira, 21 de setembro de 2006 09:00
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] LOCK - OFF TOPIC

Amigo,

você deve realmente entender bastante de informática, mas não entendeu bem a
filosofia do meu programa.
Pois esse aplicativo, assim como qualquer outro, pode ser desinstalado em
modo de segurança.
Aí, fica o critério de quem entende o que significa modo de segurança,
conhece bem o registro desinstalar o aplicativo.
Qualquer aplicação pode ser desinstalada desse modo!! :P Você tem alguma
sugestão?

Anderson


  - Original Message -
  From: Alisson Yahoo
  To: delphi-br@yahoogrupos.com.br
  Sent: Wednesday, September 20, 2006 1:48 PM
  Subject: Re: [delphi-br] LOCK - OFF TOPIC


  Sem querer falar mal do aplicativo, mas já falando: O mesmo é muito fácil
de burlar, basta entrar em modo de segurança e desinstalar.



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




   

  __ Informação do NOD32 IMON 1.1764 (20060920) __

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


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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





RES: [delphi-br] LOCK - OFF TOPIC

2006-09-21 Por tôpico Celito Alves Tonial
Sobre o comentário infeliz que deram ao seu programa: a idéia não é limitar
o uso da internet como um todo e sim apenas em situações específicas. O
sujeito que escreveu aquilo não pensou nisso. 

Tem que existir uma maneira de tornar o software não-desinstalável por
qualquer usuário. Já sabemos que não pode ser via registro, que pode ser
modificado via prompt após um boot por disquete (exemplo). Talvez um
diretório inacessivel, ou requerendo uma chave encriptada.

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Desenvolvimento (Anderson)
Enviada em: quinta-feira, 21 de setembro de 2006 10:03
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] LOCK - OFF TOPIC

Obrigado Walter pelo complemento.
Esse tipo de crítica eu recebi tbém no superdownloads

teve um rapaz lá, muito anti-profissional, que deu uma nota péssima para meu
programa...

tive 9 indicações, sendo 8 ótimas ou execelentes e 1 péssima.

Veja o comentário:


 'O PROGRAMA CUMPRE O QUE PROMETE... MAS... '
estou de saco cheio de tanto programa que fica limitando o uso da internet.
A internet é livre. Temos que navegar sem restrições. Acho que logo a
internet vai perder seu número de usuários por conta disso

Você acha que o comentário acima é sobre meu programa? Claro que não! É
sobre a idéia do programa... 
Pedi para os diretores do site para tirarem esse comentário e eles falaram
que não podiam. Então falei: COLOQUE ENTÃO ESSE COMENTÁRIO VISÍVEL, PRA QUE
TODOS VEJAM A INJUSTIÇA.

Sabe, só quero trabalhar. Tenho filhos, esposa. Não quero partir para o lado
negro... rsrsrsrs (peguei pesado) Se gostaram do programa, beleza, nem peço
q elogiem aqui ou lá... Apenas adquira, caso seja útil. Se nao gostaram,
falem o que tá errado e dê a sugestão pra melhorar. Mas criticar falando que
o programa não é bom e q tem falhas não é a melhor ajuda...
Fazer isso é o mesmo que eu dizer: cara, o delphi é bom, mas tem um
problema muito grande, a interface podia ser melhor ... Tudo bem que podia
ser melhor, mas como? O que podia ser melhor? Os componentes soltos, à
esquerda? Direita? Horizontal, vertical? Escondidos?? 
Não tem isso na frase, logo, é uma crítica que deve ser ignorada, pois não
tem embasamento.

Desculpe pelo grito de um simples programador, e mais uma vez, obrigado
pelos mais de 1100 downloads em 1 dia não esperava tanto.

Anderson



  - Original Message -
  From: Walter Alves Chagas Junior
  To: 'delphi-br@yahoogrupos.com.br' 
  Sent: Thursday, September 21, 2006 9:35 AM
  Subject: RES: [delphi-br] LOCK - OFF TOPIC


  Com o mais profundo respeito ao nobrissíssimo companheiro de lista, e sem
  querer puxar o saco do Anderson, mas esta crítica sua não serve de
parametro
  para tal.

  Qualquer programa pode ser desinstalado pelo Modo de segurança. E se você
  ainda assim bloquear o modo de segurança para o usuário, ele pode
  perfeitamente dar um boot via disquete, entra no HD apaga a pasta do
  programa, executa o regedit (O regedit roda em modo DOS) já com uma
  instrução de linha de comando visando apagar os rastros do programa.
Pronto.
  Dá um novo boot normal e pronto. Já vi nego dar boot via disquete em
  servidor NT, entra nele, muda as propriedades de sua conta via regedit e
  reinicia. Pronto! O usuário pé de chinelo agora tem direitos de
  administrador na rede. O cara me mostrou isto.

  Não é que o programa do Anderson não tenha segurança mas todo e qualquer
  aplicativo está a merce das falhas do SO E É ATRAVÉS DESTAS FALHAS QUE OS
  ENXERIDOS ENTRAM NA SUA MAQUINA.

  Agora querer que o programador fique cercando tudo quanto é probabilidade
  também não dá né. É muita coisa que tá sempre aparecendo a nível de falhas
  no Windows.


  []s

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

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




- Original Message - 
From: Alisson Yahoo 
To: delphi-br@yahoogrupos.com.br 
Sent: Wednesday, September 20, 2006 1:48 PM
Subject: Re: [delphi-br] LOCK - OFF TOPIC


Sem querer falar mal do aplicativo, mas já falando: O mesmo é muito
fácil
  de burlar, basta entrar em modo de segurança e desinstalar.



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




 

__ Informação do NOD32 IMON 1.1764 (20060920) __

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


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



  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



  Links do Yahoo! Grupos









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

   

  __ Informação do NOD32 IMON 1.1765 (20060920) __

  Esta mensagem foi verificada pelo NOD32 sistema