Re: RES: [delphi-br] Auto-Incremento

2005-05-14 Por tôpico João Paulo Linhares Gonçalves
Acredito que a opção identity tenha o desconforto citado pelo colega
Eduardo em e-mail anterior. Em uma migração, a coisa pode ficar meio
estranha.


Em 13/05/05, Wilson Valdevite[EMAIL PROTECTED] escreveu:
 se não me engano é a opção identity
  - Original Message -
  From: João Paulo Linhares Gonçalves
  To: delphi-br@yahoogrupos.com.br
  Sent: Friday, May 13, 2005 12:14 PM
  Subject: Re: RES: [delphi-br] Auto-Incremento
 
  O SQL Server possui esse tipo de recurso (sequência, generator) ?
 
  Em 13/05/05, Karkaju Karkamano[EMAIL PROTECTED] escreveu:
   Primeiro, quero declarar q é uma opnião particular minha, baseada em
   experiência:
  
   IMHO, ESQUECAM CAMPOS AUTOINCREMENTO !!!
  
   Você verá que vai dar o maior cu de boi quando vc tiver q fazer
   qualquer operação que envolva copiar registros de tabelas (como
   atualizacoes em sistemas)..
  
   Faz o seguinte:
   a) Vc usa Access ou paradox ? Esquece ! Aborte o processo !! Não são
  bancos de dados,   e sim bandos de dados...
   b) Cria um campo numerico longo na tabela
   c) Cria uma SEQUENCE, GENERATOR ou o que teu SGBD permitir
   d) Cria uma triger no teu banco pra preencher o campo criado em (b) com
 o valor de (c).. Vide (a)
   e) Corra pro abraço.
  
   Espero ter ajudado.
  
   -
( '  [EMAIL PROTECTED]
//\   ICQ 2199001
   v_/_  MSN [EMAIL PROTECTED]
  
   --
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
  
   Para ver as mensagens antigas, acesse:
   http://br.groups.yahoo.com/group/delphi-br/messages
  
   Para falar com o moderador, envie um e-mail para:
   [EMAIL PROTECTED] ou [EMAIL PROTECTED]
  
   Links do Yahoo! Grupos
  
  
  
  
  
 
  --
  João Paulo L.G.
  [EMAIL PROTECTED]
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages
 
  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
 --
  Links do Yahoo! Grupos
 
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
 
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
 
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
 do Yahoo!.
 
 --
 
  No virus found in this incoming message.
  Checked by AVG Anti-Virus.
  Version: 7.0.308 / Virus Database: 266.11.9 - Release Date: 12/05/2005
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages
 
 Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
 Links do Yahoo! Grupos
 
 
 
 
 


-- 
João Paulo L.G.
[EMAIL PROTECTED]




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




[delphi-br] DBComboBox

2005-05-14 Por tôpico carlos.maximo
 

Lords Of Delphi,

 

Quero fazer uma consulta numa tabela de produto com base no departamento
selecionado. Estou tentando usar  um DBCombobox (ligando ele a um Dataset da
tabela departamentos) mas não está dando certo, quando eu clico no
DbCombobox só me aparece o último Registro é assim mesmo? 

 

 

Desde já agradeço e desejo um bom final de semana a todos.

 

 

Carlos Alberto S Maximo

Analista de Sistemas

Freudenberg Não Tecidos Ltda  Cia

Informática

[EMAIL PROTECTED]

 

 



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

2005-05-14 Por tôpico Eneias Sousa Carvalho
Como faço para para utilizar o QRPreview, de forma que eu personaliza às minhas 
carcteristicas a janela de relatórios, gostaria da mesma indicação para o Rave.



-
Yahoo! Mail: agora com 1GB de espaço grátis. Abra sua conta!

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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: RES: RES: [delphi-br] Auto-Incremento

2005-05-14 Por tôpico João Paulo Linhares Gonçalves
Os problemas são reais e acho que por isso o Oracle implementa o
conceito de sequências. Quando se cria uma sequência pode-se dizer a
partir de qual número a geração irá começar e a geração do número não
precisa de nenhum bloqueio, é uma função otimizada dentro do banco.



Em 13/05/05, Eduardo E. J. Menoncello[EMAIL PROTECTED] escreveu:
 João Paulo,
 
 Vamos para a Importação e Exportação, nos dois casos, tanto dentro do
 mesmo BD quanto migrando ela tem problemas.
 A menos que você crie uma rotina que nosso colega sugeriu, por exemplo:
 Eu tenho um código interno de um produto de valor 350, quando eu vou
 incluir ele com auto-incremento, como posso chegar a esse número?
 Eu poderia criar uma rotina pra ir gerando até o número 350. Mas eu to
 falando de só 350, imagine se o código for 123456, imagina o tempo que
 levaria para chegar a esse número.
 Em um outro caso, se por acaso no banco de dados primeiro importar o 355
 que veio numa remessa anterior e depois chegasse o 350? Acabaria sem
 importar.
 E a pior das hipóteses seria se o código utilizado pelo cliente contiver
 letras, o que não é raro.
 
 A solução mais lógica, seria criar 2 códigos, um interno, que até pode
 ser auto-incremento, pq só existirá no banco de dados atual, e o outro o
 externo, que poderia ser alterado a vontade pelo usuário, além de poder
 conter letras. Quando você exportar, ele será o código que sairá no
 arquivo, e o interno não, será encapsulado no próprio banco.
 
 Quanto à performance, claro, tudo é relativo. Mas já trabalhei em
 sistemas que tinha um alto nível de inclusão e eles tinham um sério
 problema de performance, porque sempre que você grava no banco, ele tem
 que alterar uma variável e gravá-la também. Então, além de acabar
 gerando um tráfego a mais na rede, também tem o esquema da fila, porque
 se 1000 incluírem ao mesmo tempo, o auto-incremento irá travar até que
 seja liberado um por um.
 
 Então para solucionar o problema, e até não ter que ficar esperando o
 retorno do banco de dados com o ID, a solução seria implementar um ID
 que gere com o instante atual (em milisegundos) e ainda com um número
 aleatório grande, para você ter absoluta certeza de que não irá incluir
 o mesmo ID. E como já havia discutido na lista à um tempo atrás, o GUID
 ou algo baseado nele, percebi que é a solução mais viável.
 
 []'s
 
 Eduardo E. J. Menoncello
 
 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
 Em nome de João Paulo Linhares Gonçalves
 Enviada em: quinta-feira, 12 de maio de 2005 09:43
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: RES: [delphi-br] Auto-Incremento
 
 Olá,
 
 Que tipo de problemas de importação e exportaçãovc está falando ? Isso
 é dentro do mesmo banco de dados ou migrando de um banco para outro ?
 
 E os problemas de performance ? pq o gargalo na gravação dos dados ?
 Que tipo de auto-incremento gera tal gargalo ?
 
 Em 12/05/05, Eduardo E. J. Menoncello[EMAIL PROTECTED]
 escreveu:
  Paulo,
 
  Sinceramente, eu ainda não consegui achar as vantagens, então vou
 dizer
  as desvantagens...
  No auto-incremento, você tem problemas com importação e exportação,
 você
  terá que criar um algoritmo pra achar a tabela relacionada, pode
 ocorrer
  problemas de performance, porque se cria um gargalo na gravação dos
  dados.
 
  Sugestão:
  Como eu mesmo pedi informações por aqui, crie um campo inteiro, ou
  string, e decomponha-o,  de forma que você consiga guardar nele o
  momento atual e um número relativamente grande aleatório. Por que?
 Para
  que você não precise acessar o banco para criar a chave, ele no
 momento
  que gravar já terá uma chave única. E com isso, reduzirá e muito o
  gargalo do sistema.
 
  Abraços
 
  Eduardo E. J. Menoncello
 
  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  Em nome de Info Desenvolvimento
  Enviada em: quinta-feira, 12 de maio de 2005 09:27
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Auto-Incremento
 
  Alguém pode me responder quais as vantagens e as desvantagens em se
  trabalhar com Auto-Incremento?
 
  PAULO FERNANDES
 
  [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=12af2u49k/M=264379.5078783.6203979.1588051/D
 
 =brclubs/S=2137111264:HM/EXP=1115908131/A=2191897/R=0/SIG=10vqa2grn/*htt
  p:/br.diversao.yahoo.com/
 
 
 http://br.rd.yahoo.com/SIG=12af2u49k/M=264379.5078783.6203979.1588051/D
 
 =brclubs/S=2137111264:HM/EXP=1115908131/A=2191897/R=1/SIG=10vqa2grn/*htt
  p:/br.diversao.yahoo.com/
  São PauloRio de JaneiroCuritibaPorto AlegreBelo
  HorizonteBrasília
 
   _
 
  Links do Yahoo! Grupos
 

[delphi-br] BD em tempo de execução

2005-05-14 Por tôpico Eneias Sousa Carvalho
como faço para criar base de dados em access em tempo de execução, é mais ou 
menos assim, o programa verifica se o banco existe, caso não exista ele criará 
o banco, da mesma forma quero que funcione com as tabelas, ou seja, verifica se 
tabela x existe, caso não exista cria a tabela, caso consiga isso, gostaria tb 
de saber de que forma faria para associar os componentes da minha aplicação ao 
banco que está sendo criado em tempo de execução.
 
Eneias Sousa Carvalho.



-
Yahoo! Mail: agora com 1GB de espaço grátis. Abra sua conta!

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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: RES: [delphi-br] Auto-Incremento

2005-05-14 Por tôpico João Paulo Linhares Gonçalves
Acho que o colega não entendeu. O SQL Server possui sim a opção de
campos identity, o que pode trazer complicações em uma migração. A
menos que eu esteja enganado.



Em 13/05/05, Karkaju Karkamano[EMAIL PROTECTED] escreveu:
 Existe, sim, amigo.. So nao lembro agora qual o nome dado para ele.
 Todos os SGDBs (clientes/servidor) possuem algum objeto deste tipo.
 
 
 On 5/13/05, João Paulo Linhares Gonçalves [EMAIL PROTECTED] wrote:
  O SQL Server possui esse tipo de recurso (sequência, generator) ?
 
  Em 13/05/05, Karkaju Karkamano[EMAIL PROTECTED] escreveu:
   Primeiro, quero declarar q é uma opnião particular minha, baseada em
   experiência:
  
   IMHO, ESQUECAM CAMPOS AUTOINCREMENTO !!!
  
   Você verá que vai dar o maior cu de boi quando vc tiver q fazer
   qualquer operação que envolva copiar registros de tabelas (como
   atualizacoes em sistemas)..
  
   Faz o seguinte:
   a) Vc usa Access ou paradox ? Esquece ! Aborte o processo !! Não são
  bancos de dados,   e sim bandos de dados...
   b) Cria um campo numerico longo na tabela
   c) Cria uma SEQUENCE, GENERATOR ou o que teu SGBD permitir
   d) Cria uma triger no teu banco pra preencher o campo criado em (b) com
 o valor de (c).. Vide (a)
   e) Corra pro abraço.
  
   Espero ter ajudado.
  
 
 -
  ( '  [EMAIL PROTECTED]
  //\   ICQ 2199001
 v_/_  MSN [EMAIL PROTECTED]
 
 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages
 
 Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
 Links do Yahoo! Grupos
 
 
 
 
 


-- 
João Paulo L.G.
[EMAIL PROTECTED]




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




RES: [delphi-br] Número da semana

2005-05-14 Por tôpico Mauricio Torres Fernandes
Dê uma olhada no arquivo DateUtils.pas, que possui muitas funções para
processar datas.
 
Mauricio.


  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Francisco Thiago
Enviada em: sexta-feira, 13 de maio de 2005 17:27
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Número da semana


Obrigado Cristina, mas não era exatamente isso que eu precisava.
O que eu precisava era saber a semana do ano...

Hoje, por exemplo, estamos na semana 18.

Precisava disso para fazer um quebra por semana.

Cheiguei a seguinte conclusao

Select (extract(yearday from esto_data) / 7) as semana_ano
from tabela

Agora sim eu consigo fazer a quebra! :D

Obrigado

Francisco Thiago de Almeida
EnterPlug Informática
Divisão: Desenvolvimento e Banco de dados
MSN: [EMAIL PROTECTED]
Skype: enterplug_thiago
- Original Message - 
From: Cristina [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Friday, May 13, 2005 2:29 PM
Subject: Re: [delphi-br] Número da semana


Caro Francisco,

Você pode fazer assim:

var
DiaSemana : string;
days: array[1..7] of string;

begin
  days[1] := 'Domingo';
  days[2] := 'Segunda';
  days[3] := 'Terça';
  days[4] := 'Quarta';
  days[5] := 'Quinta';
  days[6] := 'Sexta';
  days[7] := 'Sábado';

  DiaSemana := days[DayOfWeek(Date)];

end;



  - Original Message - 
  From: Francisco Thiago
  To: delphi-br@yahoogrupos.com.br
  Sent: Friday, May 13, 2005 1:31 PM
  Subject: [delphi-br] Número da semana


  Pessoal,

  Preciso construir um relatório que tenha quebra por semana.
  Alguém ae conhece um forma de fazer isso? Estou usando QuickReport +
  Firebird


  Obrigado

  Francisco Thiago de Almeida
  EnterPlug Informática
  Divisão: Desenvolvimento e Banco de dados
  MSN: [EMAIL PROTECTED]
  Skype: enterplug_thiago




[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] Chrome: Revolução no mundo do Object Pascal

2005-05-14 Por tôpico Josir Gomes
Olá pessoal,

essa notícia é quente! Pela primeira vez, uma empresa se aventura a 
concorrer com a Borland no campo do Object Pascal.

O nome do software é Chrome e é feito pela mesma empresa que desenvolveu 
o RemObjects.

E o preço, vocês não vão acreditar: a versão Full custa 199 euros, ou 
seja, R$800,00 aproximadamente.
Como ele precisa do Visual Studio, eu não tenho idéia de qual é o custo 
da solução completa mas deve ser + barato que o Delphi Enterprise 
(R$12.000,00)
Se alguém souber o preço do Visual Studio .Net aqui no Brasil passe pra 
gente.

O software é feito para .Net mas eles dão suporte TOTAL ao Mono ou seja, 
segundo eles, roda em Linux e em Mac.

Apesar de acreditar que o Eclipse, a longo prazo, vai sobrepujar todas 
as outras IDEs, acho que a curto prazo o Chrome pode ser uma boa pedida!

Vejam o detalhamento do software em http://chromesville.com/

Quem já tiver baixado e tiver algum comentário estarei todo ouvidos!!!

Bom fim de semana a todos!
Josir.


-- 
 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] Quick Report para D2005

2005-05-14 Por tôpico Surrute - Yahoo!
Não parei, memo pq não os tenho... estou fazendo um favor para um amigo!
Ainda estou com o delphi 7.
 
Obrigado pela dica! Vou repassar pra ele.

   _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Rodrigo Othavio Farias
Enviada em: sexta-feira, 13 de maio de 2005 10:58
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Quick Report para D2005


vc ja parou pra ver o conteudo dos cds de instalaçao do Delphi 2005?


[]´s
Rodrigo O. Farias
- Original Message - 
From: Surrute - Yahoo!
To: Delphi BR ; Delphi Brasil ; Delphi no Brasil
Sent: Wednesday, May 11, 2005 3:57 PM
Subject: [delphi-br] Quick Report para D2005


Quero saber se o Quick Report vem com o D2005?

Se sim: Como faço para instalar?

Se não: Existe Quick Report para D2005?

Se sim: Como adquirir?

Obrigado!



-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.11.8 - Release Date: 10/05/2005



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
HYPERLINK
http://br.groups.yahoo.com/group/delphi-br/messageshttp://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:
HYPERLINK
http://br.groups.yahoo.com/group/delphi-br/http://br.groups.yahoo.com/grou
p/delphi-br/

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

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






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
HYPERLINK
http://br.groups.yahoo.com/group/delphi-br/messageshttp://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:
HYPERLINK
http://br.groups.yahoo.com/group/delphi-br/http://br.groups.yahoo.com/grou
p/delphi-br/
  

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

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



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



-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.11.10 - Release Date: 13/05/2005
 


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




RES: RES: RES: [delphi-br] Auto-Incremento

2005-05-14 Por tôpico Eduardo E. J. Menoncello
João Paulo,
Eu realmente não conheço a fundo o Oracle, apesar de também trabalhar
com ele.
Como eu faço um sistema orientado a objetos sem a dependência de um
banco de dados, algumas funções de determinados bancos ficam difíceis de
trabalhar.
Eu acredito que já tenham alguns bancos que trabalham dessa forma, no
meu ultimo estudo,  o Caché tinha um serviço excelente, o que pecava era
a falta de compatibilidade com o Delphi.
Mas quero salientar, que não sou contra os bancos de dados, apenas tenho
uma visão que é o cliente que tem que escolher as ferramentas que ele
vai usar. Se ele já tiver as licenças do Oracle, dificilmente ele irá
querer usar um banco gratuito como o FB, e vice e versa... então eu
realmente isolo o banco e só trabalho na camada de negocio.
 
[]’s
 
Eduardo E. J. Menoncello
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de João Paulo Linhares Gonçalves
Enviada em: sexta-feira, 13 de maio de 2005 15:55
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: RES: [delphi-br] Auto-Incremento
 
Os problemas são reais e acho que por isso o Oracle implementa o
conceito de sequências. Quando se cria uma sequência pode-se dizer a
partir de qual número a geração irá começar e a geração do número não
precisa de nenhum bloqueio, é uma função otimizada dentro do banco.



Em 13/05/05, Eduardo E. J. Menoncello[EMAIL PROTECTED]
escreveu:
 João Paulo,
 
 Vamos para a Importação e Exportação, nos dois casos, tanto dentro do
 mesmo BD quanto migrando ela tem problemas.
 A menos que você crie uma rotina que nosso colega sugeriu, por
exemplo:
 Eu tenho um código interno de um produto de valor 350, quando eu vou
 incluir ele com auto-incremento, como posso chegar a esse número?
 Eu poderia criar uma rotina pra ir gerando até o número 350. Mas eu to
 falando de só 350, imagine se o código for 123456, imagina o tempo que
 levaria para chegar a esse número.
 Em um outro caso, se por acaso no banco de dados primeiro importar o
355
 que veio numa remessa anterior e depois chegasse o 350? Acabaria sem
 importar.
 E a pior das hipóteses seria se o código utilizado pelo cliente
contiver
 letras, o que não é raro.
 
 A solução mais lógica, seria criar 2 códigos, um interno, que até pode
 ser auto-incremento, pq só existirá no banco de dados atual, e o outro
o
 externo, que poderia ser alterado a vontade pelo usuário, além de
poder
 conter letras. Quando você exportar, ele será o código que sairá no
 arquivo, e o interno não, será encapsulado no próprio banco.
 
 Quanto à performance, claro, tudo é relativo. Mas já trabalhei em
 sistemas que tinha um alto nível de inclusão e eles tinham um sério
 problema de performance, porque sempre que você grava no banco, ele
tem
 que alterar uma variável e gravá-la também. Então, além de acabar
 gerando um tráfego a mais na rede, também tem o esquema da fila,
porque
 se 1000 incluírem ao mesmo tempo, o auto-incremento irá travar até que
 seja liberado um por um.
 
 Então para solucionar o problema, e até não ter que ficar esperando o
 retorno do banco de dados com o ID, a solução seria implementar um ID
 que gere com o instante atual (em milisegundos) e ainda com um número
 aleatório grande, para você ter absoluta certeza de que não irá
incluir
 o mesmo ID. E como já havia discutido na lista à um tempo atrás, o
GUID
 ou algo baseado nele, percebi que é a solução mais viável.
 
 []'s
 
 Eduardo E. J. Menoncello
 
 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
 Em nome de João Paulo Linhares Gonçalves
 Enviada em: quinta-feira, 12 de maio de 2005 09:43
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: RES: [delphi-br] Auto-Incremento
 
 Olá,
 
 Que tipo de problemas de importação e exportaçãovc está falando ? Isso
 é dentro do mesmo banco de dados ou migrando de um banco para outro ?
 
 E os problemas de performance ? pq o gargalo na gravação dos dados ?
 Que tipo de auto-incremento gera tal gargalo ?
 
 Em 12/05/05, Eduardo E. J. Menoncello[EMAIL PROTECTED]
 escreveu:
  Paulo,
 
  Sinceramente, eu ainda não consegui achar as vantagens, então vou
 dizer
  as desvantagens...
  No auto-incremento, você tem problemas com importação e exportação,
 você
  terá que criar um algoritmo pra achar a tabela relacionada, pode
 ocorrer
  problemas de performance, porque se cria um gargalo na gravação dos
  dados.
 
  Sugestão:
  Como eu mesmo pedi informações por aqui, crie um campo inteiro, ou
  string, e decomponha-o,  de forma que você consiga guardar nele o
  momento atual e um número relativamente grande aleatório. Por que?
 Para
  que você não precise acessar o banco para criar a chave, ele no
 momento
  que gravar já terá uma chave única. E com isso, reduzirá e muito o
  gargalo do sistema.
 
  Abraços
 
  Eduardo E. J. Menoncello
 
  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED]
  Em nome de Info Desenvolvimento
  Enviada em: quinta-feira, 12 de maio de 

[delphi-br] [OFF-TOPIC] Mudança de Mail

2005-05-14 Por tôpico cartouchebr
Aos colegas da lista,

Estou me desligando da empresa e ingressando em uma nova oportunidade
de trabalho promissora que surgiu. Por conta disto, peço aos colegas
que estejam tentando entrar em contato comigo pelo e-mail
[EMAIL PROTECTED], ou que simplesmente tenham este e-mail registrado em
sua lista de endereços, que os contatos sejam direcionados para o e-
mail [EMAIL PROTECTED]

Espero que nesta semana vindoura eu já esteja com o e-mail oficial da
empresa para que os colegas possam entrar em contato comigo e
continuar contribuindo para que nossa lista continue sempre ajudando
os colegas desenvolvedores e amadurecendo nossa comunidade desta
maravilhosa ferramenta de desenvolvimento.

[]s
Rubem Rocha
Manaus, AM




-- 
 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: RES: [delphi-br][OFF TOPIC] Auto-Incremento

2005-05-14 Por tôpico ArbSis
Pra que os usuários precisam saber? É interno.
R: eles nao precisao saber, nao precisao decorar, apenas quando 
solicitado podera ser utilizado

Se eles precisam saber, então eles podem querer alterar.
R: Bloqueia a opcao de alterar o codigo, é interno, ele naum quer altera-lo

Exemplo de solicitacao

Relatorio dos Clientes com pendencias financeiras
Campos do relatorio
codigo interno, nome, cpf, valor da divida, telefone, bla, bla, bla

O usuario tem uma tela para bloqueio de clientes, nesta tela ele pode 
faze-lo atraves do cpf ou do codigo interno...
Ai te pergunto, o codigo interno tem tamanho 6 e o cpf\cnpj pode chagar 
ate 20 caracteres, vc acha que o usuario ira digitar os 20 caracteres ou 
os 6?
R: Ele ira digitar apenas os 6 caracteres do codigo interno, isso poupa 
tempo e facilita a vida do usuario

Qualuqer coisa to a disposicao


Eduardo E. J. Menoncello escreveu:

 Pra que os usuários precisam saber? É interno.
 Se eles precisam saber, então eles podem querer alterar.
 Se eles querem alterar, não pode ser auto-incremento.
 Se não pode ser auto-incremento, você tem que fazer um algoritmo pra
 satisfazer.

 Abraços

 Eduardo E. J. Menoncello

 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
 Em nome de Wilson Valdevite
 Enviada em: quinta-feira, 12 de maio de 2005 12:16
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Auto-Incremento

 particularmente eu não vejo problema nenhum nisso... eu só não libero a
 edição desse item da tabela pois em alguns momentos o usuário necessita
 saber desse valor
   - Original Message -
   From: Eduardo E. J. Menoncello
   To: delphi-br@yahoogrupos.com.br
   Sent: Thursday, May 12, 2005 10:29 AM
   Subject: RES: [delphi-br] Auto-Incremento


   Sim, esse é outro problema, porque o ideal é que existam 2 códigos. Um
   visível e outro interno, para controle do programa. Com essa
 estrutura,
   você pode deixar um código que o usuário vê e pode alterar, sem
 precisar
   se preocupar com sua chave que é o interno. Aliás, você não vai mesmo
   conseguir editar um código de auto-incremento, e por isso que eu acho
   ele problemático. O bom mesmo é que você crie uma forma que gere um
   auto-incremento ou então crie um algoritmo que resolva o problema,
 como
   eu sugeri.

   Abraços

   Eduardo

   -Mensagem original-
   De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
   Em nome de Info Desenvolvimento
   Enviada em: quinta-feira, 12 de maio de 2005 09:58
   Para: delphi-br@yahoogrupos.com.br
   Assunto: Re: [delphi-br] Auto-Incremento

   Eduardo, o meu problema é que quando vou editar um código já existente
   em vez de ele editar ele cria um novo campo.

   Porque isso?



   [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=12a0gmua8/M=264379.5078783.6203979.1588051/D

 =brclubs/S=2137111264:HM/EXP=1115909964/A=2191897/R=0/SIG=10vqa2grn/*htt
   p:/br.diversao.yahoo.com/




 http://br.rd.yahoo.com/SIG=12a0gmua8/M=264379.5078783.6203979.1588051/D

 =brclubs/S=2137111264:HM/EXP=1115909964/A=2191897/R=1/SIG=10vqa2grn/*htt
   p:/br.diversao.yahoo.com/
   São PauloRio de JaneiroCuritibaPorto AlegreBelo
   HorizonteBrasí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
   http://br.yahoo.com/info/utos.html  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:
   PUBLICIDADE

   


 
 --
   Links do Yahoo! Grupos

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




 
 --


   No virus found in this incoming message.
   Checked by AVG Anti-Virus.
   Version: 

RES: RES: [delphi-br][OFF TOPIC] Auto-Incremento

2005-05-14 Por tôpico Eduardo E. J. Menoncello
Então, aí é que entra o código externo, por exemplo para produtos.
 
Você poderá alterar a vontade, sem saber do código interno.
 
Abraços
 
Eduardo E. J. Menoncello
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de ArbSis
Enviada em: sábado, 14 de maio de 2005 10:33
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br][OFF TOPIC] Auto-Incremento
 
Pra que os usuários precisam saber? É interno.
R: eles nao precisao saber, nao precisao decorar, apenas quando 
solicitado podera ser utilizado

Se eles precisam saber, então eles podem querer alterar.
R: Bloqueia a opcao de alterar o codigo, é interno, ele naum quer
altera-lo

Exemplo de solicitacao

Relatorio dos Clientes com pendencias financeiras
Campos do relatorio
codigo interno, nome, cpf, valor da divida, telefone, bla, bla, bla

O usuario tem uma tela para bloqueio de clientes, nesta tela ele pode 
faze-lo atraves do cpf ou do codigo interno...
Ai te pergunto, o codigo interno tem tamanho 6 e o cpf\cnpj pode chagar 
ate 20 caracteres, vc acha que o usuario ira digitar os 20 caracteres ou

os 6?
R: Ele ira digitar apenas os 6 caracteres do codigo interno, isso poupa 
tempo e facilita a vida do usuario

Qualuqer coisa to a disposicao


Eduardo E. J. Menoncello escreveu:

 Pra que os usuários precisam saber? É interno.
 Se eles precisam saber, então eles podem querer alterar.
 Se eles querem alterar, não pode ser auto-incremento.
 Se não pode ser auto-incremento, você tem que fazer um algoritmo pra
 satisfazer.

 Abraços

 Eduardo E. J. Menoncello

 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
 Em nome de Wilson Valdevite
 Enviada em: quinta-feira, 12 de maio de 2005 12:16
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Auto-Incremento

 particularmente eu não vejo problema nenhum nisso... eu só não libero
a
 edição desse item da tabela pois em alguns momentos o usuário
necessita
 saber desse valor
   - Original Message -
   From: Eduardo E. J. Menoncello
   To: delphi-br@yahoogrupos.com.br
   Sent: Thursday, May 12, 2005 10:29 AM
   Subject: RES: [delphi-br] Auto-Incremento


   Sim, esse é outro problema, porque o ideal é que existam 2 códigos.
Um
   visível e outro interno, para controle do programa. Com essa
 estrutura,
   você pode deixar um código que o usuário vê e pode alterar, sem
 precisar
   se preocupar com sua chave que é o interno. Aliás, você não vai
mesmo
   conseguir editar um código de auto-incremento, e por isso que eu
acho
   ele problemático. O bom mesmo é que você crie uma forma que gere um
   auto-incremento ou então crie um algoritmo que resolva o problema,
 como
   eu sugeri.

   Abraços

   Eduardo

   -Mensagem original-
   De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED]
   Em nome de Info Desenvolvimento
   Enviada em: quinta-feira, 12 de maio de 2005 09:58
   Para: delphi-br@yahoogrupos.com.br
   Assunto: Re: [delphi-br] Auto-Incremento

   Eduardo, o meu problema é que quando vou editar um código já
existente
   em vez de ele editar ele cria um novo campo.

   Porque isso?



   [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=12a0gmua8/M=264379.5078783.6203979.1588051/D


=brclubs/S=2137111264:HM/EXP=1115909964/A=2191897/R=0/SIG=10vqa2grn/*htt
   p:/br.diversao.yahoo.com/





http://br.rd.yahoo.com/SIG=12a0gmua8/M=264379.5078783.6203979.1588051/D


=brclubs/S=2137111264:HM/EXP=1115909964/A=2191897/R=1/SIG=10vqa2grn/*htt
   p:/br.diversao.yahoo.com/
   São PauloRio de JaneiroCuritibaPorto AlegreBelo
   HorizonteBrasí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
   http://br.yahoo.com/info/utos.html  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:
   PUBLICIDADE

   




 --
   Links do Yahoo! Grupos

 a.. Para visitar o site do seu grupo na web, acesse:
  

Re: [delphi-br] Desligar Windows e executar comando

2005-05-14 Por tôpico ArbSis
{Desligar o Windows
use assim WinExit(EWX_SHUTDOWN or EWX_FORCE);



function TFVenda.WinExit(flags: integer): boolean;
  function SetPrivilege(privilegeName: string; enable: boolean): boolean;
  var
tpPrev, tp : TTokenPrivileges;
token : THandle;
dwRetLen : DWord;
  begin
result := False;
OpenProcessToken(GetCurrentProcess, TOKEN_ADJUST_PRIVILEGES or 
TOKEN_QUERY, token);
tp.PrivilegeCount := 1;
if LookupPrivilegeValue(nil, pchar(privilegeName), 
tp.Privileges[0].LUID) then
begin
  if enable then
tp.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED
  else
  tp.Privileges[0].Attributes := 0;
  dwRetLen := 0;
  result := AdjustTokenPrivileges(token, False, tp, SizeOf(tpPrev), 
tpPrev, dwRetLen);
end;
CloseHandle(token);
  end;
begin
  if SetPrivilege('SeShutdownPrivilege', true) then
  begin
ExitWindowsEx(flags, 0);
SetPrivilege('SeShutdownPrivilege', False)
  end;
end;


Wilson Valdevite escreveu:

 Como eu faço para desligar o windows via delphi e como eu faço para 
 efetuar um comando dos? Já procurei em um monte de lugar e não 
 encontrei e o qu eu encontrei não funciona em W2K...

 [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:*
 PUBLICIDADE
 http://br.rd.yahoo.com/SIG=12amng078/M=264379.5078783.6203979.1588051/D=brclubs/S=2137111264:HM/EXP=1115929294/A=2332652/R=0/id=noscript/SIG=119058f8i/*http://br.download.yahoo.com/messenger/
  



 
 *Links do Yahoo! Grupos*

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

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

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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

* 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] Retirar as letrar e deixar os números

2005-05-14 Por tôpico Catiúscia A. Barrilli da Cruz
 Boa tarde!
 
Gostaria de saber se é possível, de uma determinada palavra, retirar as
letras e deixar somente os números. Tem como fazer isso ?
 
Desde já agradeço.
 
 
Cati
...Não pense de si mesmo além do que convém... Rm 12.3
 
 

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: [delphi-br] Retirar as letrar e deixar os números

2005-05-14 Por tôpico Daniel / Tecnobyte
 Gostaria de saber se é possível, de uma determinada palavra, retirar as
 letras e deixar somente os números. Tem como fazer isso ?

E porque isto não seria possível?

function Digitos(const S: string): string;
var
  I: integer;
begin
  Result := '';
  for I := 1 to Length(S) do
if S[I] in ['0'..'9'] then
  Result := Result + S[I];
end;

Exemplo:

Edit2.Text := Digitos(Edit1.Text);

Atenciosamente.

Daniel P. Guimarães
Tecnobyte Informática
www.tecnobyte.com.br



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] 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] While ou SELECT ?

2005-05-14 Por tôpico Marcelo Silva

Pessoal... tenho a seguinte situação:


Tabela EVENTOS

OPERADORDATA_EVENTOCOD_EVENTO   DOCUMENTO

MARCELO 01/01/2005 30   01
JOAQUIM 02/01/2005 30   01
FERNANDA03/01/2005 30   01
MARCELO 02/01/2005 35   02
MARCELO 02/01/2005 30   02
JOAQUIN 03/01/2005 35   02
FERNANDA04/01/2005 35   02
MARCELO 05/01/2005 35   02
MARCELO 04/01/2005 30   03
MARCELO 05/01/2005 30   03
JOAQUIM 06/01/2005 30   03
FERNANDA07/01/2005 30   05
FERNANDA08/01/2005 30   05

Tenho que fazer uma pesquisa que me traga quem é o ultimo operador do documento.

Tipo: o documento 01 seria pago a fernanda por ela ser a ultima a entrar em 
contato com o cliente

Estou quebrando a cabeça e não cheguei a um veredito

Como montar este select ?
Existe um MAX() para campos DATA ?
Sei que existe o ORDER BY mas neste caso não vira... ou vira ?

Ou terei que fazer em um while no sistema ?

* Toda sugestão será bem vinda :-)


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

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: [delphi-br] While ou SELECT ?

2005-05-14 Por tôpico Ana Júlia Solano Rocha
Marcelo, tente assim:

SELECT EV.*
FROM EVENTOS EV
WHERE EV.DATA_EVENTO = (SELECT MAX(E.DATA_EVENTO)
  FROM EVENTOS E
  WHERE E.DOCUMENTO =
EV.DOCUMENTO)

Abraços,

Ana
- Original Message -
From: Marcelo Silva [EMAIL PROTECTED]
To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br
Sent: Saturday, May 14, 2005 1:05 PM
Subject: [delphi-br] While ou SELECT ?



Pessoal... tenho a seguinte situação:


Tabela EVENTOS

OPERADORDATA_EVENTOCOD_EVENTO   DOCUMENTO

MARCELO 01/01/2005 30   01
JOAQUIM 02/01/2005 30   01
FERNANDA03/01/2005 30   01
MARCELO 02/01/2005 35   02
MARCELO 02/01/2005 30   02
JOAQUIN 03/01/2005 35   02
FERNANDA04/01/2005 35   02
MARCELO 05/01/2005 35   02
MARCELO 04/01/2005 30   03
MARCELO 05/01/2005 30   03
JOAQUIM 06/01/2005 30   03
FERNANDA07/01/2005 30   05
FERNANDA08/01/2005 30   05

Tenho que fazer uma pesquisa que me traga quem é o ultimo operador do
documento.

Tipo: o documento 01 seria pago a fernanda por ela ser a ultima a entrar
em contato com o cliente

Estou quebrando a cabeça e não cheguei a um veredito

Como montar este select ?
Existe um MAX() para campos DATA ?
Sei que existe o ORDER BY mas neste caso não vira... ou vira ?

Ou terei que fazer em um while no sistema ?

* Toda sugestão será bem vinda :-)


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

[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








Esta mensagem foi verificada pelo E-mail Protegido Terra.
Scan engine: McAfee VirusScan / Atualizado em 13/05/2005 / Versão: 4.4.00 -
Dat 4491
Proteja o seu e-mail Terra: http://mail.terra.com.br/




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] 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] Delphi 7 e My SQL unable do load

2005-05-14 Por tôpico Jean
Olá a todos,

Gostaria de saber se alguém já passou por essa situação e como
resolveu. Estou começando a fazer uma aplicação com Delphi 7,
dbexpress e my sql 3.23.49, mas ao tentar abrir a conexão, vem a
mensagem unable to load libmysql.dll. Não importa para onde eu copie o
arquivo, a mensagem continua.

Obrigado

Jean


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