RE: [delphi-br] Campo BOOLEAN no Firebird

2006-01-30 Por tôpico Rubem Nascimento da Rocha

O FireBird não possui um tipo de dados BOOLEAN nativo que permita ser 
naturalmente reconhecido pelo Delphi como um TBooleanField.

Sds.

>From: "Leandro" <[EMAIL PROTECTED]>
>Reply-To: delphi-br@yahoogrupos.com.br
>To: 
>CC: <[EMAIL PROTECTED]>
>Subject: [delphi-br] Campo BOOLEAN no Firebird
>Date: Mon, 30 Jan 2006 09:12:14 -0300
>
>Pessoal,
>
>Tem algum tipo de campo no Firebird que o delphi reconheça como
>TBooleanField?
>Preciso disso para compatibilidade com códigos antigos, da época do 
>Paradox.
>
>obrigado,
>
>Leandro
>

_
MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.com



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

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

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

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

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

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

 




[delphi-br] [URGENTE] applyupdates no delphi 2006 nao funciona!

2006-01-30 Por tôpico Rafael Jorge
eu tinha uma aplicacao usando IBO mas por via de necessidades tive que
trocar por clientdataset.
estou usando assim um sqlconnection -> sqldataset -> datasetprovider ->
clientdataset (ou seja a estrutura do dbexpress padrao),
quando eu edito, insiro ou excluo um registro esta tudo beleza. mas se eu
der um applyupdates ele dis que a tabela estqa perdida.
nao entendo pois eu abro aquery. adiciono os fields e tudo. o erro é "
raised exception class Edatabaseerror with message 'Database server error:
table unknown   ".
ja nao sei mais o que fazer. essa tabela abre. mostra na grid. e editavel
localmente e tudo mas se eu der um applyupdates já era. da erro. e meu prezo
estourou e nao vejo solucao para isso. me ajudem por favor.
obrigado.

--
Rafael jorge alves
www.itrecife.com -> para verem meus artigos e trabalhos
t+


[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]
 
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] VCL SKIN plz!!!

2006-01-30 Por tôpico eduardo.sic
é simples, é só comprar o componente..heheheh

rapaz. se vc praciso do mesmo compra. se nao tem condições procura um free.



=
>De:"Leonardo Mascarenhas" <[EMAIL PROTECTED]>
>Para:"Delphi" 
>Assunto:[delphi-br] VCL SKIN plz!!!
>
>Alguem sabe como tirar o titulo "vclskin Demo"
>que fica em todas as janelas???
>
>[As partes desta mensagem que não continham
>texto foram removidas]
>
>
>
>-- 
>< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA
>MENSAGEM >
>
>http://br.groups.yahoo.com/group/delphi-br/messa
>ges
>
>[EMAIL PROTECTED]
> 
>Links do Yahoo! Grupos
>
>http://br.groups.yahoo.com/group/delphi-br/
>
>
>http://br.yahoo.com/info/utos.html









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

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

<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
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] Proteção anti-cópias

2006-01-30 Por tôpico Anderson Carlos
Boa Luciano essa sim é a dica eu uso a do hd pq é um sistema simples, 
monousuário sem muitas pretenções, mas é claro que numa aplicação de grande 
porte o sistema de bloqueio tem que ser maior.

Luciano-User-BA <[EMAIL PROTECTED]> escreveu:  
Utilizo em meu sistema
um conjunto de informações
Fabricante Processador + Frequecia Processador + Numero IP + Serial HD + 
ID do proprietário

hummm... Tá aí um problem pros crackers resolverem :)
Ou vão para debugar em assembler para trocar os JUMPS da funções
ou então o bicho pega...

Tá bom...
Podemos dificultar um pouco a ação dos crackers :)
Nada de mensagens (apenas dá um tempo e fecha o programa)
Timers diferente para fazer checagens periódicas das funções ... etc.

Basicamente o sistema ao iniciar lê os dados da máquina...
Compara com os dados da máquina cadastrada na base de dados
(encriptado lógico :).
Se checar tudo beleza...
Aqui e ali...
Num menu... ou num timer uma nova checadinha...
E pronto...
Sem telinhas de aviso...
Apenas um HALT(0)... um Application.Terminate ali e pronto :)

Deixa o cliente questionar do suporte a causa do problema...
Pede para ele enviar o numero encriptado que é gerado
com base no hardware em execução e pronto.
Se ele tiver como me convencer ...
Eu gero e libero com uma contra-chave...
senão (MAIS UMA MÁQUINA - MAIS UMA LICENÇA).

Clonar HD é fácil...
Portanto serial de HD só se for o do Fabricante
(hummm... Só isso também já dificulta muito a pirataria :)

Serial do HD ...
Pega um ghost da vida ...
clona o o HD + o Serial e de quebra o seu sistema :)

Hummm... Sistema em IP fixo eu gosto muito :)
2 Serias de HD´s clonados em rede
funcionam que é uma beleza...
Mas 2 IP fixo com números iguais...
Quero ver a mágica.

Se o cara tem sub-redes aí pode entrar
um ID extra para identificar o proprietário :)
Neste caso pode ter IP iguais acessando o BD
mas os IDs terão que ser diferentes.

É isto...
Acho que o que vale mesmo são idéias.

Só queria deixar mais uma sugestão.
Abraços
Luciano-User-BA

Walter Alves Chagas Junior escreveu:

> Uma dica interessante, é você pegar a data de criação de um diretório
> qualquer no sistema. O ideal é você criar este diretório na instalação do
> seu sistema, pega a data e a hora da geração do supra-citado e com 
> ela, você
> faz a chave (além de pegar outros dados no sistema). Mas essa dica de 
> pegar
> o volume no HD, é mais furada que tabuleiro de pirulito...
>
> []s
>
> Walter Alves Chagas Junior
> Projeto e desenvolvimento
> Telemont Engenharia de telecomunicações
> Belo Horizonte - MG - Brazil
> [EMAIL PROTECTED]
> Fone: (31) 3389-8215 Fax: (31) 3389-8200
>
>
> -Mensagem original-
> De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
> nome de Emerson Moreno
> Enviada em: segunda-feira, 30 de janeiro de 2006 14:25
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: RES: [delphi-br] Proteção anti-cópias
>
>
> O que acontece é que a função GetVolumeInformation retorna o numero do
> volume do hd, isso significa que toda vez que o hd for formatado o numero
> irá mudar. Pois a cada formatação o numero de volume é alterado. vc poder
> fazer o teste usando essa mesma função porém indicando o drive A, ou 
> seja, o
> disquete, anote o numero, formate e depois rode a função novamente e
> contatará que o numero muda. Mas existe uma função que realmente lê o 
> numero
> físico do HD. Procure na net que irá achar.
>
> Espero ter esclarecido essa dúvida.
>
> Agora para bloquear a cópia de seus sistema, use a criatividade. cada 
> um faz
> de forma diferente, tem gente que copia arquivos ocultos verificando se os
> arquivos estão lá. tem gente que coloca no registro do windows, entres
> outras coisas. Mas ai fica por conta de sua criatividade e de sua real
> necessidade.
>
>
>
> Em 30/01/06, Marcio Cruz <[EMAIL PROTECTED]> escreveu:
> >
> > Quando se copia um CD, com um copiador melhor, tipo CloneCD, o programa
> > copiador não copia inclusive o número de série?
> >
> > Elazar escreveu:
> > > Anderson Carlos
> > >
> > > Boa Tarde;
> > >
> > > Aproveitando a deixa para tirar uma duvida.
> > >
> > > um tempo atraz (inclusive ja postei a duvida) tentei fazer algo
> > > utilizando exatamente esta dica ai abaixo, mas com um CD, 
> permitindo que
> > > o usuario utilizase o programa em varios micros, mas somente uma copia
> > > por vez baseado no serial do Cd, so que a funcao abaixo retorna 
> numeros
> > > diferentes para cada versao de sistema operacional...
> > >
> > >
> > > A questao que ficou no ar é pq com o Win XP o serial de um CD é
> > > - no
> > >  Win98  e
> > > -
> > >   2000
> > > -
> > >
> > > o que tem de diferente?? alguem sabe responder?
> > >
> > > Atend.
> > > Elazar
> > >
> > >
> > > ---
> > > Eu uso essa função, que pega o nº de série do HD, eu gravo em uma 
> tabela
> > > o resultado e quando eu abro o sistema a 1º coisa que testo é o número
> > > de série do HD se

RES: [delphi-br] Proteção anti-cópias

2006-01-30 Por tôpico Luciano-User-BA

Utilizo em meu sistema
um conjunto de informações
Fabricante Processador + Frequecia Processador + Numero IP + Serial HD + 
ID do proprietário

hummm... Tá aí um problem pros crackers resolverem :)
Ou vão para debugar em assembler para trocar os JUMPS da funções
ou então o bicho pega...

Tá bom...
Podemos dificultar um pouco a ação dos crackers :)
Nada de mensagens (apenas dá um tempo e fecha o programa)
Timers diferente para fazer checagens periódicas das funções ... etc.

Basicamente o sistema ao iniciar lê os dados da máquina...
Compara com os dados da máquina cadastrada na base de dados
(encriptado lógico :).
Se checar tudo beleza...
Aqui e ali...
Num menu... ou num timer uma nova checadinha...
E pronto...
Sem telinhas de aviso...
Apenas um HALT(0)... um Application.Terminate ali e pronto :)

Deixa o cliente questionar do suporte a causa do problema...
Pede para ele enviar o numero encriptado que é gerado
com base no hardware em execução e pronto.
Se ele tiver como me convencer ...
Eu gero e libero com uma contra-chave...
senão (MAIS UMA MÁQUINA - MAIS UMA LICENÇA).

Clonar HD é fácil...
Portanto serial de HD só se for o do Fabricante
(hummm... Só isso também já dificulta muito a pirataria :)

Serial do HD ...
Pega um ghost da vida ...
clona o o HD + o Serial e de quebra o seu sistema :)

Hummm... Sistema em IP fixo eu gosto muito :)
2 Serias de HD´s clonados em rede
funcionam que é uma beleza...
Mas 2 IP fixo com números iguais...
Quero ver a mágica.

Se o cara tem sub-redes aí pode entrar
um ID extra para identificar o proprietário :)
Neste caso pode ter IP iguais acessando o BD
mas os IDs terão que ser diferentes.

É isto...
Acho que o que vale mesmo são idéias.

Só queria deixar mais uma sugestão.
Abraços
Luciano-User-BA

Walter Alves Chagas Junior escreveu:

> Uma dica interessante, é você pegar a data de criação de um diretório
> qualquer no sistema. O ideal é você criar este diretório na instalação do
> seu sistema, pega a data e a hora da geração do supra-citado e com 
> ela, você
> faz a chave (além de pegar outros dados no sistema). Mas essa dica de 
> pegar
> o volume no HD, é mais furada que tabuleiro de pirulito...
>
> []s
>
> Walter Alves Chagas Junior
> Projeto e desenvolvimento
> Telemont Engenharia de telecomunicações
> Belo Horizonte - MG - Brazil
> [EMAIL PROTECTED]
> Fone: (31) 3389-8215 Fax: (31) 3389-8200
>
>
> -Mensagem original-
> De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
> nome de Emerson Moreno
> Enviada em: segunda-feira, 30 de janeiro de 2006 14:25
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: RES: [delphi-br] Proteção anti-cópias
>
>
> O que acontece é que a função GetVolumeInformation retorna o numero do
> volume do hd, isso significa que toda vez que o hd for formatado o numero
> irá mudar. Pois a cada formatação o numero de volume é alterado. vc poder
> fazer o teste usando essa mesma função porém indicando o drive A, ou 
> seja, o
> disquete, anote o numero, formate e depois rode a função novamente e
> contatará que o numero muda. Mas existe uma função que realmente lê o 
> numero
> físico do HD. Procure na net que irá achar.
>
> Espero ter esclarecido essa dúvida.
>
> Agora para bloquear a cópia de seus sistema, use a criatividade. cada 
> um faz
> de forma diferente, tem gente que copia arquivos ocultos verificando se os
> arquivos estão lá. tem gente que coloca no registro do windows, entres
> outras coisas. Mas ai fica por conta de sua criatividade e de sua real
> necessidade.
>
>
>
> Em 30/01/06, Marcio Cruz <[EMAIL PROTECTED]> escreveu:
> >
> > Quando se copia um CD, com um copiador melhor, tipo CloneCD, o programa
> > copiador não copia inclusive o número de série?
> >
> > Elazar escreveu:
> > > Anderson Carlos
> > >
> > > Boa Tarde;
> > >
> > > Aproveitando a deixa para tirar uma duvida.
> > >
> > > um tempo atraz (inclusive ja postei a duvida) tentei fazer algo
> > > utilizando exatamente esta dica ai abaixo, mas com um CD, 
> permitindo que
> > > o usuario utilizase o programa em varios micros, mas somente uma copia
> > > por vez baseado no serial do Cd, so que a funcao abaixo retorna 
> numeros
> > > diferentes para cada versao de sistema operacional...
> > >
> > >
> > > A questao que ficou no ar é pq com o Win XP o serial de um CD é
> > > - no
> > >  Win98  e
> > > -
> > >   2000
> > > -
> > >
> > > o que tem de diferente?? alguem sabe responder?
> > >
> > > Atend.
> > > Elazar
> > >
> > >
> > > ---
> > > Eu uso essa função, que pega o nº de série do HD, eu gravo em uma 
> tabela
> > > o resultado e quando eu abro o sistema a 1º coisa que testo é o número
> > > de série do HD se este for diferente do que eu gravei eu travo o
> > > sistema.
> > >   Espero que possa te ajudar.
> > >
> > >   Function TFrmPrincipal.SerialNum(FDrive:String) :String;
> > > var
> > >   Serial: DWord;
> > >   DirLen, Flags: DWord;
> > >   DL

Re: RES: [delphi-br] Proteção anti-cópias

2006-01-30 Por tôpico Anderson Carlos
Que com certeza naum deve ser uma operação tão simples.
   
   
  Anderson Carlos
  Softdados Informatica Ltda
  Programador Cobol - Net Express/ Delphi 7.0

Anderson Carlos <[EMAIL PROTECTED]> escreveu:
  1° O Camarada terá que descobrir que meu sistema pega o número do volume do 
HD para depois tentar fazer esta operação.

Walter Alves Chagas Junior <[EMAIL PROTECTED]> escreveu:  E se o camarada pegar 
o numero de serie deste HD, levar pra outro computador
e, chegando lá, modificá-lo com o Debug do DOS ou com o Norton Disk Edit?

[]s

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


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Anderson Carlos
Enviada em: domingo, 29 de janeiro de 2006 22:52
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Proteção anti-cópias


Eu uso essa função, que pega o nº de série do HD, eu gravo em uma tabela o
resultado e quando eu abro o sistema a 1º coisa que testo é o número de
série do HD se este for diferente do que eu gravei eu travo o sistema.
  Espero que possa te ajudar.
   
  Function TFrmPrincipal.SerialNum(FDrive:String) :String;
var
  Serial: DWord;
  DirLen, Flags: DWord;
  DLabel : Array[0..11] of Char;
begin
  Try

GetVolumeInformation(PChar(FDrive+':\'),dLabel,12,@Serial,DirLen,Flags,nil,0
);
   Result := IntToHex(Serial,8);
Except
   Result := '';
  end;
end;

Anderson Carlos
  Programador Cobol - NetExpress 3.1 / Delphi 7.0
  Softdados Informática Ltda
   
  leonardo302021 <[EMAIL PROTECTED]> escreveu:
  Olá galera!

Alguém poderia me indicar um método de proteção para evitar que seu 
sistema seja copiado indevidamente por terceiros?
Não precisa ser muito complexo, mas é bom que seja eficaz :)
Só mais uma coisa: como eu pretendo vender meu sistema pela internet 
seria interessante evitar soluções em que seja necessário minha 
presença física ao instalar o sistema para o cliente, mas de qulquer 
forma, qualquer idéia é bem vinda!

Grato pela atenção

Leonardo Leite





-- 


-
Yahoo! doce lar. Faça do Yahoo! sua homepage.

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



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



Links do Yahoo! Grupos








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



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





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

  
-
  Links do Yahoo! Grupos

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

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

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





-
Yahoo! doce lar. Faça do Yahoo! sua homepage.

-
Yahoo! doce lar. Faça do Yahoo! sua homepage.

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



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





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

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

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

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

  



-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

[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]
 
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] [OFF TOPIC] Oportunidade (Espírito Santo)

2006-01-30 Por tôpico Romario (Listas)
Gostaria de entrar em contato com colegas do Espírito Santo que 
trabalhem como free-lancer para configurar dois servidores Windows 2003 
Server e aproximadamente umas 60 máquinas que terão regras de acesso 
controladas por esses servidores.

Enviarei maiores detalhes do serviço aos interessados e informo que 
preciso de um orçamento até às 18:00 horas de hoje (31/01/2006).

Para não tumultuar a lista, só responderei aos e-mails que me forem 
enviados em particular (rbr_vix_es arroba yahoo ponto com ponto br).

Peço desculpas aos moderadores e nobres colegas pelo tópico fora do 
escopo da lista.

Sds,

Romario





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



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

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

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

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

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

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

 




Re: RES: [delphi-br] Proteção anti-cópias

2006-01-30 Por tôpico Anderson Carlos
1° O Camarada terá que descobrir que meu sistema pega o número do volume do HD 
para depois tentar fazer esta operação.

Walter Alves Chagas Junior <[EMAIL PROTECTED]> escreveu:  E se o camarada pegar 
o numero de serie deste HD, levar pra outro computador
e, chegando lá, modificá-lo com o Debug do DOS ou com o Norton Disk Edit?

[]s

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


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Anderson Carlos
Enviada em: domingo, 29 de janeiro de 2006 22:52
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Proteção anti-cópias


Eu uso essa função, que pega o nº de série do HD, eu gravo em uma tabela o
resultado e quando eu abro o sistema a 1º coisa que testo é o número de
série do HD se este for diferente do que eu gravei eu travo o sistema.
  Espero que possa te ajudar.
   
  Function TFrmPrincipal.SerialNum(FDrive:String) :String;
var
  Serial: DWord;
  DirLen, Flags: DWord;
  DLabel : Array[0..11] of Char;
begin
  Try

GetVolumeInformation(PChar(FDrive+':\'),dLabel,12,@Serial,DirLen,Flags,nil,0
);
   Result := IntToHex(Serial,8);
Except
   Result := '';
  end;
end;

Anderson Carlos
  Programador Cobol - NetExpress 3.1 / Delphi 7.0
  Softdados Informática Ltda
   
  leonardo302021 <[EMAIL PROTECTED]> escreveu:
  Olá galera!

Alguém poderia me indicar um método de proteção para evitar que seu 
sistema seja copiado indevidamente por terceiros?
Não precisa ser muito complexo, mas é bom que seja eficaz :)
Só mais uma coisa: como eu pretendo vender meu sistema pela internet 
seria interessante evitar soluções em que seja necessário minha 
presença física ao instalar o sistema para o cliente, mas de qulquer 
forma, qualquer idéia é bem vinda!

Grato pela atenção

Leonardo Leite





-- 


-
Yahoo! doce lar. Faça do Yahoo! sua homepage.

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



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



Links do Yahoo! Grupos








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



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





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

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

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

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





-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

[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]
 
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] Proteção anti-có pias

2006-01-30 Por tôpico Anderson Carlos
Comigo o número de série já vem funcionando a um ano ainda naum tive problemas 
com ela, se vc parar para pensar um pouco ninguem vai ficar formatando uma 
maquina a cada 30 dias nâo é mesmo? O único e exclusivo problema de pegar o 
número de volume e não o de série do HD . Agora vamos analizar a sua idéia, se 
por acaso a suposta máquina for formatada e esse diretório, do qual vc pegou a 
data de criação, tb for apagado como ele ´fará a consistência?
   
  Falar é muito fácil... 

Walter Alves Chagas Junior <[EMAIL PROTECTED]> escreveu:
  Uma dica interessante, é você pegar a data de criação de um diretório
qualquer no sistema. O ideal é você criar este diretório na instalação do
seu sistema, pega a data e a hora da geração do supra-citado e com ela, você
faz a chave (além de pegar outros dados no sistema). Mas essa dica de pegar
o volume no HD, é mais furada que tabuleiro de pirulito...

[]s

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


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Emerson Moreno
Enviada em: segunda-feira, 30 de janeiro de 2006 14:25
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] Proteção anti-cópias


O que acontece é que a função GetVolumeInformation retorna o numero do
volume do hd, isso significa que toda vez que o hd for formatado o numero
irá mudar. Pois a cada formatação o numero de volume é alterado. vc poder
fazer o teste usando essa mesma função porém indicando o drive A, ou seja, o
disquete, anote o numero, formate e depois rode a função novamente e
contatará que o numero muda. Mas existe uma função que realmente lê o numero
físico do HD. Procure na net que irá achar.

Espero ter esclarecido essa dúvida.

Agora para bloquear a cópia de seus sistema, use a criatividade. cada um faz
de forma diferente, tem gente que copia arquivos ocultos verificando se os
arquivos estão lá. tem gente que coloca no registro do windows, entres
outras coisas. Mas ai fica por conta de sua criatividade e de sua real
necessidade.



Em 30/01/06, Marcio Cruz <[EMAIL PROTECTED]> escreveu:
>
> Quando se copia um CD, com um copiador melhor, tipo CloneCD, o programa
> copiador não copia inclusive o número de série?
>
> Elazar escreveu:
> > Anderson Carlos
> >
> > Boa Tarde;
> >
> > Aproveitando a deixa para tirar uma duvida.
> >
> > um tempo atraz (inclusive ja postei a duvida) tentei fazer algo
> > utilizando exatamente esta dica ai abaixo, mas com um CD, permitindo que
> > o usuario utilizase o programa em varios micros, mas somente uma copia
> > por vez baseado no serial do Cd, so que a funcao abaixo retorna numeros
> > diferentes para cada versao de sistema operacional...
> >
> >
> > A questao que ficou no ar é pq com o Win XP o serial de um CD é
> > - no
> >  Win98  e
> > -
> >   2000
> > -
> >
> > o que tem de diferente?? alguem sabe responder?
> >
> > Atend.
> > Elazar
> >
> >
> > ---
> > Eu uso essa função, que pega o nº de série do HD, eu gravo em uma tabela
> > o resultado e quando eu abro o sistema a 1º coisa que testo é o número
> > de série do HD se este for diferente do que eu gravei eu travo o
> > sistema.
> >   Espero que possa te ajudar.
> >
> >   Function TFrmPrincipal.SerialNum(FDrive:String) :String;
> > var
> >   Serial: DWord;
> >   DirLen, Flags: DWord;
> >   DLabel : Array[0..11] of Char;
> > begin
> >   Try
> >
> > GetVolumeInformation(PChar(FDrive+':\'),dLabel,12,@Serial,DirLen,Flags,n
> > il,0);
> >Result := IntToHex(Serial,8);
> > Except
> >Result := '';
> >   end;
> > end;
>
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
>
>
>   *Yahoo! Grupos, um serviço oferecido por:*   PUBLICIDADE
>

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


--
[]'s

Emerson Moreno
O grande sábio aprende por ensinar!


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



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



Links do Yahoo! Grupos









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



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





Y

[delphi-br] Registrar OCX para ser usando em projento VCL.Net

2006-01-30 Por tôpico Elÿffffeddio Brito Santana
Estou trabalhando num projeto VCL.Net Delphi 2005 e preciso usar o PDF.OCX e 
não consigo importar este componente.
   
  Consegui importar pra Win 32.
   
  Alguém sabe como faço para importar um componente OCX para ser usado em 
projetos Delphi 2005 - VCL.Net???
   
  Obrigado


-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

[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]
 
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] OFF - Delphi 2006 PRO por R$ 2750,00

2006-01-30 Por tôpico Robson
Para quem tiver interesse, segue o link da promoção:

http://www.activedelphi.com.br/modules.php?op=modload&name=News&file=article&sid=320&mode=thread&order=0&thold=0

Abraços,
Robson Souza 



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

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

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

2006-01-30 Por tôpico Moacir (gmail)

>
> Nivaldo,
>
> Acredito que sim, basta vc baixar a versao 9:
>
> http://www.indyproject.org/Sockets/Download/Files/Indy9.en.iwp
>
> [ ]´s
> Moacir
>
>
> Nivaldo Stainle escreveu:
>> Eu uso o DELPHI 5, tenho o 7, será que é só compilar o que tenho no 5 e 
>> acrescentar o INDY ?
>>
>>   Stainle
>>
>> "Moacir (gmail)" <[EMAIL PROTECTED]> escreveu:
>>   Usando o Indy 9 !!
>>
>> With  IdSMTP
>> begin
>>   HeloName := 'UsuarioSMTP';
>>   Host := 'ServidorSMTP';
>>   Password := 'SenhaSMTP';
>>   Username := 'UsuarioSMTP';
>> end
>>
>> [ ]´s
>> Moacir
>>
>> stainle2003 escreveu:
>>   
>>> Alguem sabe como faço para declarar o PASSWORD neste componente, 
>>> só consigo enviar se escrever a senha e não sei onde posso fazer.
>>>
>>>
>>> Grato
>>>
>>> Stainle
>>>
>>>
>>>
>>>
>>>
>>>   
>>> 
>>
>>
>>
>>   
>



-- 
< 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: RES: [delphi-br] Proteção anti -cópias

2006-01-30 Por tôpico Walter Alves Chagas Junior
Uma dica interessante, é você pegar a data de criação de um diretório
qualquer no sistema. O ideal é você criar este diretório na instalação do
seu sistema, pega a data e a hora da geração do supra-citado e com ela, você
faz a chave (além de pegar outros dados no sistema). Mas essa dica de pegar
o volume no HD, é mais furada que tabuleiro de pirulito...

[]s

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


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Emerson Moreno
Enviada em: segunda-feira, 30 de janeiro de 2006 14:25
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] Proteção anti-cópias


O que acontece é que a função GetVolumeInformation retorna o numero do
volume do hd, isso significa que toda vez que o hd for formatado o numero
irá mudar. Pois a cada formatação o numero de volume é alterado. vc poder
fazer o teste usando essa mesma função porém indicando o drive A, ou seja, o
disquete, anote o numero, formate e depois rode a função novamente e
contatará que o numero muda. Mas existe uma função que realmente lê o numero
físico do HD. Procure na net que irá achar.

Espero ter esclarecido essa dúvida.

Agora para bloquear a cópia de seus sistema, use a criatividade. cada um faz
de forma diferente, tem gente que copia arquivos ocultos verificando se os
arquivos estão lá. tem gente que coloca no registro do windows, entres
outras coisas. Mas ai fica por conta de sua criatividade e de sua real
necessidade.



Em 30/01/06, Marcio Cruz <[EMAIL PROTECTED]> escreveu:
>
> Quando se copia um CD, com um copiador melhor, tipo CloneCD, o programa
> copiador não copia inclusive o número de série?
>
> Elazar escreveu:
> > Anderson Carlos
> >
> > Boa Tarde;
> >
> > Aproveitando a deixa para tirar uma duvida.
> >
> > um tempo atraz (inclusive ja postei a duvida) tentei fazer algo
> > utilizando exatamente esta dica ai abaixo, mas com um CD, permitindo que
> > o usuario utilizase o programa em varios micros, mas somente uma copia
> > por vez baseado no serial do Cd, so que a funcao abaixo retorna numeros
> > diferentes para cada versao de sistema operacional...
> >
> >
> > A questao que ficou no ar é pq com o Win XP o serial de um CD é
> > - no
> >  Win98  e
> > -
> >   2000
> > -
> >
> > o que tem de diferente?? alguem sabe responder?
> >
> > Atend.
> > Elazar
> >
> >
> > ---
> > Eu uso essa função, que pega o nº de série do HD, eu gravo em uma tabela
> > o resultado e quando eu abro o sistema a 1º coisa que testo é o número
> > de série do HD se este for diferente do que eu gravei eu travo o
> > sistema.
> >   Espero que possa te ajudar.
> >
> >   Function TFrmPrincipal.SerialNum(FDrive:String) :String;
> > var
> >   Serial: DWord;
> >   DirLen, Flags: DWord;
> >   DLabel : Array[0..11] of Char;
> > begin
> >   Try
> >
> > GetVolumeInformation(PChar(FDrive+':\'),dLabel,12,@Serial,DirLen,Flags,n
> > il,0);
> >Result := IntToHex(Serial,8);
> > Except
> >Result := '';
> >   end;
> > end;
>
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
>
>
>   *Yahoo! Grupos, um serviço oferecido por:*   PUBLICIDADE
>

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


--
[]'s

Emerson Moreno
O grande sábio aprende por ensinar!


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



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


 
Links do Yahoo! Grupos




 




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



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

<*> 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] Oportunidade de trabalho

2006-01-30 Por tôpico Walter Alves Chagas Junior
Aline,

Poste esta mensagem também na lista delphi-empregos

[EMAIL PROTECTED]


[]s

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


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Aline Ferraresi Nascimento
Enviada em: segunda-feira, 30 de janeiro de 2006 12:40
Para: Aline Ferraresi Nascimento
Assunto: [delphi-br] Oportunidade de trabalho



Procuramos um profissional para trabalhar em Campinas/SP. 
Conhecimentos necessários: 
- Java 
- DB2 
- SQL Server 
- Oracle 
Desejável: 
Visual Basic 
ASP 
Enviar CV para [EMAIL PROTECTED] com o código SSTSR

Aline Nascimento
SST it solutions
Building the Wireless Age
Admin Staff
[EMAIL PROTECTED]









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



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


 
Links do Yahoo! Grupos




 




[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]
 
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] Proteção anti-cópi as

2006-01-30 Por tôpico Walter Alves Chagas Junior
E se o camarada pegar o numero de serie deste HD, levar pra outro computador
e, chegando lá, modificá-lo com o Debug do DOS ou com o Norton Disk Edit?

[]s

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


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Anderson Carlos
Enviada em: domingo, 29 de janeiro de 2006 22:52
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Proteção anti-cópias


Eu uso essa função, que pega o nº de série do HD, eu gravo em uma tabela o
resultado e quando eu abro o sistema a 1º coisa que testo é o número de
série do HD se este for diferente do que eu gravei eu travo o sistema.
  Espero que possa te ajudar.
   
  Function TFrmPrincipal.SerialNum(FDrive:String) :String;
var
  Serial: DWord;
  DirLen, Flags: DWord;
  DLabel : Array[0..11] of Char;
begin
  Try
 
GetVolumeInformation(PChar(FDrive+':\'),dLabel,12,@Serial,DirLen,Flags,nil,0
);
   Result := IntToHex(Serial,8);
 Except
   Result := '';
  end;
end;

Anderson Carlos
  Programador Cobol - NetExpress 3.1 / Delphi 7.0
  Softdados Informática Ltda
   
  leonardo302021 <[EMAIL PROTECTED]> escreveu:
  Olá galera!

Alguém poderia me indicar um método de proteção para evitar que seu 
sistema seja copiado indevidamente por terceiros?
Não precisa ser muito complexo, mas é bom que seja eficaz :)
Só mais uma coisa: como eu pretendo vender meu sistema pela internet 
seria interessante evitar soluções em que seja necessário minha 
presença física ao instalar o sistema para o cliente, mas de qulquer 
forma, qualquer idéia é bem vinda!

Grato pela atenção

Leonardo Leite





-- 


-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

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



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


 
Links do Yahoo! Grupos




 



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



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

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

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

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

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

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

 




RE: [delphi-br] Problemas em instalar o componente Zeos no Delphi 7

2006-01-30 Por tôpico Marcos André
Dê mais detalhes sobre o erro...

 
Um Abraço
 
  ____
 /  \ /| |'-.
.\__/ || |   |
 _ /  `._ \|_|_.-'
| /  \__.`=._) (_   Marcos André
|/ ._/  |"| 
|'.  `\ | | Analista de Sistema 
;"""/ / | | Easy Corporation
 ) /_/| |.---.| www.e-easy.com.br 
'  `-` ' "   "  msn: [EMAIL PROTECTED]
Desenvolvimento e hospedagem de sites apartir de R$ 4,99
Planos profissionais com qualidade.
consulte nossos planos, click aqui
-Original Message-
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On
Behalf Of analistarmr
Sent: segunda-feira, 30 de janeiro de 2006 10:30
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Problemas em instalar o componente Zeos no Delphi 7

Bom dia !

Baixei o componente Zeos, segui todos os passos e mesmo assim não 
consigo instalar. Uso o Delphi 7 !

Alguem pode me dar uma luz !!

Desde já agradeço

Rafael
[EMAIL PROTECTED]
[EMAIL PROTECTED]





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

 





[delphi-br] aleatoriedade binaria

2006-01-30 Por tôpico alxeng2002
Caros Colegas


 Gostaria de dicas (e/ ou alguma teoria matematica/estatistica) de
como posso prever em uma sequencia binaria (0 e 1) qual será o
proximo, 0 ou 1?!!!  

 Qualquer dica será útil..

  Grato,
   
   Alex..





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

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

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

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

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

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

 




Re: [delphi-br] Impedir Caracteres Indesejados

2006-01-30 Por tôpico Marcio Cruz
OnKeyPress

if not (Key in ['0'..'9', #8]) then Key := #0;

Cleiton escreveu:
> Olá pessoal...
>
> Como fazer para impedir que usuário digite números em um campo que 
> deveria aceitar apenas letras e como impedir que o usuário digite 
> letras em um campo que deveria aceitar apenas números?
>
> abraços
>
> Cleiton
> -- 
> Esta mensagem foi verificada pelo sistema de antivírus e
> acredita-se estar livre de perigo.



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

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

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

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

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

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

 




[delphi-br] OFF TOPIC - Script para Diminuir Fotos

2006-01-30 Por tôpico Alfredo Brandes
ola pessoal

alguem conhece algum script (em Delphi, ou mesmo em VBS ou outro cualquer) 
que diminua o tamanho (em Bytes) de todas as fotos contidas em uma pasta?
Tenho mais de 100 thumbnails 70 x 50 que tem em torno de 9 KB cada uma e eu 
preciso diminuir a cualidade dessas fotos para que elas fiquem mais leves

alguem pode me ajudar?
agradeço desde ja

Alfredo Brandes 



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

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

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

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

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

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

 




[delphi-br] VCL SKIN plz!!!

2006-01-30 Por tôpico Leonardo Mascarenhas
Alguem sabe como tirar o titulo "vclskin Demo" que fica em todas as janelas???

[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]
 
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] Porta Serial

2006-01-30 Por tôpico Haylo Silva

Olá pessoal,

Estou com uma dúvida crucial:

Tem um dispositivo conectado na porta serial, sendo que o mesmo precisa 
receber informações em pacotes do tipo:
7E    0001 ,  etc

Tenho diversos componente para porta serial, porém todos trabalham 
somente com envio de String.

Alguém pode me ajudar ?

Abraço,

Haylo Neto




-- 
< 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: RES: RES: [delphi-br] Proteção anti-cópias

2006-01-30 Por tôpico Elazar
Valfrid;

Me refiro ao CD (disco).

Atenc.
Elazar

_
Você está falando em número físico do CD ou da Unidade???

Se for da Unidade, acho que não rola, afinal, se ela pifar, o cara troca
e o programa não funciona mais???

Elazar <[EMAIL PROTECTED]> escreveu: Marcio Cruz, e Emerson Moreno

Testei com o Nero, Easy Cd Creator e nao consegui obter o mesmo
numero de serie tirando uma copia do cd.

Levo em consideração que o numero de serie do Cd seria apenas uma parte
da chave anti copia
(usar a criatividade sabe...) mas facilita quando o cara quer mais uma
licenca ele me paga por mais um cd chave...rs..(me custa R$ 1,00 se
comparado com uns R$ 300,00 ou mais da proteck ou similares sem falar
que quando eu quiser modificar alguma coisa vai por minha conta (vai
sabe o que se colocam nos nossos executaveis...rs..))

O que eu consegui observar em relacao a usar as chaves com cds

1) o numero de serie muda de uma versao do sistema operacional 
2) o numero de serie muda no win 98 a cada vez que reabro e adiciono inf
ao cd (mesmo que formatar um disquete)
3) esta e mais uma pergunta do que uma obervacao. Esta funcao que pega o
numero fisico do HD (ja vi em algum site) funciona com algum CD? (acho
que nao...e ainda nao fiz teste..rs..)

-> a pergunta permanece. alguem conhece mais alguma inf. de como pegar o
serial de um CD, HD
de forma mais confiante e absoluta?

-> nao fiz testes instalando mais de uma versao de SO no mesmo HD(alguem
da lista tem??? consegue nos dizer se tem o mesmo numero nos dois?);

Atenc.
Elazar


---
O que acontece é que a função GetVolumeInformation retorna o numero do
volume do hd, isso significa que toda vez que o hd for formatado o
numero
irá mudar. Pois a cada formatação o numero de volume é alterado. vc
poder
fazer o teste usando essa mesma função porém indicando o drive A, ou
seja, o
disquete, anote o numero, formate e depois rode a função novamente e
contatará que o numero muda. Mas existe uma função que realmente lê o
numero
físico do HD. Procure na net que irá achar.

Espero ter esclarecido essa dúvida.

Agora para bloquear a cópia de seus sistema, use a criatividade. cada um
faz
de forma diferente, tem gente que copia arquivos ocultos verificando se
os
arquivos estão lá. tem gente que coloca no registro do windows, entres
outras coisas. Mas ai fica por conta de sua criatividade e de sua real
necessidade.
__

Quando se copia um CD, com um copiador melhor, tipo CloneCD, o programa 
copiador não copia inclusive o número de série?

Elazar escreveu:
> Anderson Carlos
>
> Boa Tarde;
>
> Aproveitando a deixa para tirar uma duvida.
>
> um tempo atraz (inclusive ja postei a duvida) tentei fazer algo
> utilizando exatamente esta dica ai abaixo, mas com um CD, permitindo
que
> o usuario utilizase o programa em varios micros, mas somente uma copia
> por vez baseado no serial do Cd, so que a funcao abaixo retorna
numeros
> diferentes para cada versao de sistema operacional...
>
>
> A questao que ficou no ar é pq com o Win XP o serial de um CD é
> - no
>  Win98  e
> -
>   2000
> -
>
> o que tem de diferente?? alguem sabe responder?
>
> Atend.
> Elazar
>
>
> ---
> Eu uso essa função, que pega o nº de série do HD, eu gravo em uma
tabela
> o resultado e quando eu abro o sistema a 1º coisa que testo é o número
> de série do HD se este for diferente do que eu gravei eu travo o
> sistema.
>   Espero que possa te ajudar.
>   
>   Function TFrmPrincipal.SerialNum(FDrive:String) :String;
> var
>   Serial: DWord;
>   DirLen, Flags: DWord;
>   DLabel : Array[0..11] of Char;
> begin
>   Try
>
>
GetVolumeInformation(PChar(FDrive+':\'),dLabel,12,@Serial,DirLen,Flags,n
> il,0);
>Result := IntToHex(Serial,8);
> Except
>Result := '';
>   end;
> end;



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





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





Links do Yahoo! Grupos

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





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



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



Links do Yahoo! Grupos











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

-
Yahoo! doce lar. Faça do Yahoo! sua homepage.

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



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





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




Links do Yahoo! Grupos

Para visitar o site do seu grupo na 

RES: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)

2006-01-30 Por tôpico Jose Carlos A Dias Filho
Senhore Boa tarde,
 
Aproveitando o embalo como seria no SQL ?
 
Desde ja agradeco
 
Carlos

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Rubem Nascimento da Rocha
Enviada em: segunda-feira, 30 de janeiro de 2006 16:28
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)
Prioridade: Alta



Com FireBird é FIRST, e não TOP!
Sds.

>From: Gabriel Filho <[EMAIL PROTECTED]>
>Reply-To: delphi-br@yahoogrupos.com.br
>To: delphi-br@yahoogrupos.com.br
>Subject: Re: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)
>Date: Mon, 30 Jan 2006 16:55:19 -0200
>
>Bom acredito que funcione assim:
>
>
>SELECT TOP 8500 * FROM Tabela
>
>SQLServer 2000, mas teste ai derepente é a mesma sintaxe.
>
>Em 30/01/06, Emerson Moreno <[EMAIL PROTECTED]> escreveu:
> >
> > Obrigado amigo, mas uso o FireBird 1.5. Como posso fazer?
> >
> > Em 30/01/06, Eduardo Alves <[EMAIL PROTECTED]> escreveu:
> > >
> > > No mysql use limit 8500 (numero da linha)
> > > No oracle na clausula where coloque rowid = 8500
> > >
> > > Eduardo
> > >
> > > -Original Message-
> > > From: delphi-br@yahoogrupos.com.br 
>[mailto:[EMAIL PROTECTED]
> > > On Behalf Of Emerson Moreno
> > > Sent: segunda-feira, 30 de janeiro de 2006 14:48
> > > To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br
> > > Subject: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)
> > >
> > > Caros amigos programadores, peço-lhe desculpas pelo OFF mas estou
> > > precisando de uma ajudinha. Vamos lá:
> > >
> > >   Tenho uma tabela com 8500 registros. Como faço para trazer um
> > > registro especificado por mim, sendo de o campo é indexado por
> > > dd/mm/yy hh:mm.
> > > e pode ter vários registro na base. Porém eu quero determinar o qual
> > > quero trazer.
> > >
> > > Mais ou menos assim
> > >
> > > SELECT COUNT(*) FROM TABELA
> > >
> > > irá retornar 8512 registros
> > >
> > > Quero dar um select que me traga o registro 8510 por exemplo.
> > >
> > > Não sei como fazer aguardo resposta.
> > >
> > > Muito obrigado a todos.
> > >
> > > --
> > > []'s
> > >
> > > Emerson Moreno
> > > O grande sábio aprende por ensinar!
> > >
> > >
> > > --
> > > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> > >
> > >
> > >
> > > Links do Yahoo! Grupos
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > > --
> > > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> > >
> > >
> > >
> > >
> > >
> > >   *Yahoo! Grupos, um serviço oferecido por:*   PUBLICIDADE
> > > <
> > 
>http://br.ard.yahoo.com/SIG=12f6l316o/M=393477.7870451.8719931.2369893/D=br
clubs/S=2137111264:HM/Y=BR/EXP=1138650773/A=3254979/R=0/id=noscript/SIG=12k5
j3olb/*http://www.momentumquiz.com.br/index.php?md5ref=372BBEE98E9544bd8B2F9
E87847EEEBE_3
> > >
> > > --
> > > *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]<
> > [EMAIL PROTECTED]>
> > >
> > >- O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
> > >Serviço do Yahoo! .
> > >
> > >
> >
> >
> > --
> > []'s
> >
> > Emerson Moreno
> > O grande sábio aprende por ensinar!
> >
> >
> > [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]
>

_
MSN Busca: fácil, rápido, direto ao ponto.  http://search.msn.com.br



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






Yahoo! Grupos, um serviço oferecido por:

PUBLICIDADE
 
  

  _  

Links do Yahoo! Grupos


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

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

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




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



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

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

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

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

<*> Par

Re: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)

2006-01-30 Por tôpico Emerson Moreno
Obrigado a todos que responderam!

Em 30/01/06, Elazar <[EMAIL PROTECTED]> escreveu:
>
> Emersom
>
> No FB
>
> select first 1 skip 8500 * from cliente
>
> --
>
> No mysql use limit 8500 (numero da linha)
> No oracle na clausula where coloque rowid = 8500
>
> Eduardo
>
> -Original Message-
> From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
> On Behalf Of Emerson Moreno
> Sent: segunda-feira, 30 de janeiro de 2006 14:48
> To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br
> Subject: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)
>
> Caros amigos programadores, peço-lhe desculpas pelo OFF mas estou
> precisando de uma ajudinha. Vamos lá:
>
>   Tenho uma tabela com 8500 registros. Como faço para trazer um
> registro especificado por mim, sendo de o campo é indexado por
> dd/mm/yy hh:mm.
> e pode ter vários registro na base. Porém eu quero determinar o qual
> quero trazer.
>
> Mais ou menos assim
>
> SELECT COUNT(*) FROM TABELA
>
> irá retornar 8512 registros
>
> Quero dar um select que me traga o registro 8510 por exemplo.
>
> Não sei como fazer aguardo resposta.
>
> Muito obrigado a todos.
>
> --
> []'s
>
> Emerson Moreno
> O grande sábio aprende por ensinar!
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
>
>
> Yahoo! Grupos, um serviço oferecido por:
> PUBLICIDADE
>
>
>
>
>
> Links do Yahoo! Grupos
>
> Para visitar o site do seu grupo na web, acesse:
> http://br.groups.yahoo.com/group/delphi-br/
>
> Para sair deste grupo, envie um e-mail para:
> [EMAIL PROTECTED]
>
> O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço
> do Yahoo!.
>
>
>
>
>
>
> ___
> Yahoo! doce lar. Faça do Yahoo! sua homepage.
> http://br.yahoo.com/homepageset.html
>
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
>
>
>   *Yahoo! Grupos, um serviço oferecido por:*   PUBLICIDADE
> 
> --
> *Links do Yahoo! Grupos*
>
>- Para visitar o site do seu grupo na web, acesse:
>http://br.groups.yahoo.com/group/delphi-br/
>
>- Para sair deste grupo, envie um e-mail para:
>[EMAIL PROTECTED]<[EMAIL PROTECTED]>
>
>- O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
>Serviço do Yahoo! .
>
>


--
[]'s

Emerson Moreno
O grande sábio aprende por ensinar!


[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]
 
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] Proteção anti-có pias

2006-01-30 Por tôpico Valfrid-Ly Silva Couto
Você está falando em número físico do CD ou da Unidade???

Se for da Unidade, acho que não rola, afinal, se ela pifar, o cara troca e o 
programa não funciona mais???

Elazar <[EMAIL PROTECTED]> escreveu: Marcio Cruz, e Emerson Moreno

Testei com o Nero, Easy Cd Creator e nao consegui obter o mesmo
numero de serie tirando uma copia do cd.

Levo em consideração que o numero de serie do Cd seria apenas uma parte
da chave anti copia
(usar a criatividade sabe...) mas facilita quando o cara quer mais uma
licenca ele me paga por mais um cd chave...rs..(me custa R$ 1,00 se
comparado com uns R$ 300,00 ou mais da proteck ou similares sem falar
que quando eu quiser modificar alguma coisa vai por minha conta (vai
sabe o que se colocam nos nossos executaveis...rs..))

O que eu consegui observar em relacao a usar as chaves com cds

1) o numero de serie muda de uma versao do sistema operacional 
2) o numero de serie muda no win 98 a cada vez que reabro e adiciono inf
ao cd (mesmo que formatar um disquete)
3) esta e mais uma pergunta do que uma obervacao. Esta funcao que pega o
numero fisico do HD (ja vi em algum site) funciona com algum CD? (acho
que nao...e ainda nao fiz teste..rs..)

-> a pergunta permanece. alguem conhece mais alguma inf. de como pegar o
serial de um CD, HD
de forma mais confiante e absoluta?

-> nao fiz testes instalando mais de uma versao de SO no mesmo HD(alguem
da lista tem??? consegue nos dizer se tem o mesmo numero nos dois?);

Atenc.
Elazar


---
O que acontece é que a função GetVolumeInformation retorna o numero do
volume do hd, isso significa que toda vez que o hd for formatado o
numero
irá mudar. Pois a cada formatação o numero de volume é alterado. vc
poder
fazer o teste usando essa mesma função porém indicando o drive A, ou
seja, o
disquete, anote o numero, formate e depois rode a função novamente e
contatará que o numero muda. Mas existe uma função que realmente lê o
numero
físico do HD. Procure na net que irá achar.

Espero ter esclarecido essa dúvida.

Agora para bloquear a cópia de seus sistema, use a criatividade. cada um
faz
de forma diferente, tem gente que copia arquivos ocultos verificando se
os
arquivos estão lá. tem gente que coloca no registro do windows, entres
outras coisas. Mas ai fica por conta de sua criatividade e de sua real
necessidade.
__

Quando se copia um CD, com um copiador melhor, tipo CloneCD, o programa 
copiador não copia inclusive o número de série?

Elazar escreveu:
> Anderson Carlos
>
> Boa Tarde;
>
> Aproveitando a deixa para tirar uma duvida.
>
> um tempo atraz (inclusive ja postei a duvida) tentei fazer algo
> utilizando exatamente esta dica ai abaixo, mas com um CD, permitindo
que
> o usuario utilizase o programa em varios micros, mas somente uma copia
> por vez baseado no serial do Cd, so que a funcao abaixo retorna
numeros
> diferentes para cada versao de sistema operacional...
>
>
> A questao que ficou no ar é pq com o Win XP o serial de um CD é
> - no
>  Win98  e
> -
>   2000
> -
>
> o que tem de diferente?? alguem sabe responder?
>
> Atend.
> Elazar
>
>
> ---
> Eu uso essa função, que pega o nº de série do HD, eu gravo em uma
tabela
> o resultado e quando eu abro o sistema a 1º coisa que testo é o número
> de série do HD se este for diferente do que eu gravei eu travo o
> sistema.
>   Espero que possa te ajudar.
>   
>   Function TFrmPrincipal.SerialNum(FDrive:String) :String;
> var
>   Serial: DWord;
>   DirLen, Flags: DWord;
>   DLabel : Array[0..11] of Char;
> begin
>   Try
>
>
GetVolumeInformation(PChar(FDrive+':\'),dLabel,12,@Serial,DirLen,Flags,n
> il,0);
>Result := IntToHex(Serial,8);
> Except
>Result := '';
>   end;
> end;



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





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




Links do Yahoo! Grupos

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


 

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



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


 
Links do Yahoo! Grupos




 






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

-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

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

Re: [delphi-br] NMSMTP

2006-01-30 Por tôpico Nivaldo Stainle
Eu uso o DELPHI 5, tenho o 7, será que é só compilar o que tenho no 5 e 
acrescentar o INDY ?
   
  Stainle

"Moacir (gmail)" <[EMAIL PROTECTED]> escreveu:
  Usando o Indy 9 !!

With  IdSMTP
begin
  HeloName := 'UsuarioSMTP';
  Host := 'ServidorSMTP';
  Password := 'SenhaSMTP';
  Username := 'UsuarioSMTP';
end

[ ]´s
Moacir

stainle2003 escreveu:
> Alguem sabe como faço para declarar o PASSWORD neste componente, 
> só consigo enviar se escrever a senha e não sei onde posso fazer.
>
>
> Grato
>
> Stainle
>
>
>
>
>
>   



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





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

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

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

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

  



-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

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

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

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

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

 




RES: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)

2006-01-30 Por tôpico Elazar
Emersom

No FB

select first 1 skip 8500 * from cliente

--

No mysql use limit 8500 (numero da linha)
No oracle na clausula where coloque rowid = 8500

Eduardo

-Original Message-
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
On Behalf Of Emerson Moreno
Sent: segunda-feira, 30 de janeiro de 2006 14:48
To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br
Subject: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)

Caros amigos programadores, peço-lhe desculpas pelo OFF mas estou
precisando de uma ajudinha. Vamos lá:

  Tenho uma tabela com 8500 registros. Como faço para trazer um
registro especificado por mim, sendo de o campo é indexado por
dd/mm/yy hh:mm.
e pode ter vários registro na base. Porém eu quero determinar o qual
quero trazer.

Mais ou menos assim

SELECT COUNT(*) FROM TABELA

irá retornar 8512 registros

Quero dar um select que me traga o registro 8510 por exemplo.

Não sei como fazer aguardo resposta.

Muito obrigado a todos.

--
[]'s

Emerson Moreno
O grande sábio aprende por ensinar!


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



Links do Yahoo! Grupos









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





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




Links do Yahoo! Grupos

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






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



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

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

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

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

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

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

 





Re: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)

2006-01-30 Por tôpico Rubem Nascimento da Rocha

Com FireBird é FIRST, e não TOP!
Sds.

>From: Gabriel Filho <[EMAIL PROTECTED]>
>Reply-To: delphi-br@yahoogrupos.com.br
>To: delphi-br@yahoogrupos.com.br
>Subject: Re: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)
>Date: Mon, 30 Jan 2006 16:55:19 -0200
>
>Bom acredito que funcione assim:
>
>
>SELECT TOP 8500 * FROM Tabela
>
>SQLServer 2000, mas teste ai derepente é a mesma sintaxe.
>
>Em 30/01/06, Emerson Moreno <[EMAIL PROTECTED]> escreveu:
> >
> > Obrigado amigo, mas uso o FireBird 1.5. Como posso fazer?
> >
> > Em 30/01/06, Eduardo Alves <[EMAIL PROTECTED]> escreveu:
> > >
> > > No mysql use limit 8500 (numero da linha)
> > > No oracle na clausula where coloque rowid = 8500
> > >
> > > Eduardo
> > >
> > > -Original Message-
> > > From: delphi-br@yahoogrupos.com.br 
>[mailto:[EMAIL PROTECTED]
> > > On Behalf Of Emerson Moreno
> > > Sent: segunda-feira, 30 de janeiro de 2006 14:48
> > > To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br
> > > Subject: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)
> > >
> > > Caros amigos programadores, peço-lhe desculpas pelo OFF mas estou
> > > precisando de uma ajudinha. Vamos lá:
> > >
> > >   Tenho uma tabela com 8500 registros. Como faço para trazer um
> > > registro especificado por mim, sendo de o campo é indexado por
> > > dd/mm/yy hh:mm.
> > > e pode ter vários registro na base. Porém eu quero determinar o qual
> > > quero trazer.
> > >
> > > Mais ou menos assim
> > >
> > > SELECT COUNT(*) FROM TABELA
> > >
> > > irá retornar 8512 registros
> > >
> > > Quero dar um select que me traga o registro 8510 por exemplo.
> > >
> > > Não sei como fazer aguardo resposta.
> > >
> > > Muito obrigado a todos.
> > >
> > > --
> > > []'s
> > >
> > > Emerson Moreno
> > > O grande sábio aprende por ensinar!
> > >
> > >
> > > --
> > > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> > >
> > >
> > >
> > > Links do Yahoo! Grupos
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > > --
> > > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> > >
> > >
> > >
> > >
> > >
> > >   *Yahoo! Grupos, um serviço oferecido por:*   PUBLICIDADE
> > > <
> > 
>http://br.ard.yahoo.com/SIG=12f6l316o/M=393477.7870451.8719931.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1138650773/A=3254979/R=0/id=noscript/SIG=12k5j3olb/*http://www.momentumquiz.com.br/index.php?md5ref=372BBEE98E9544bd8B2F9E87847EEEBE_3
> > >
> > > --
> > > *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]<
> > [EMAIL PROTECTED]>
> > >
> > >- O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
> > >Serviço do Yahoo! .
> > >
> > >
> >
> >
> > --
> > []'s
> >
> > Emerson Moreno
> > O grande sábio aprende por ensinar!
> >
> >
> > [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]
>

_
MSN Busca: fácil, rápido, direto ao ponto.  http://search.msn.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]
 
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] Programação OO duvida..

2006-01-30 Por tôpico Thiago Oliveira
Mas ainda não deu certo,

Acho que não expliquei direito, o erro não ocorre quando a objeto é
creado... Mas sim quando chamo essa função:


procedure TCadastro_Banco.Get_Values;
begin
  FCodigo.AsInteger  := DataSet.FieldByName('CODIGO').AsInteger;
  FNome.AsString := DataSet.FieldByName('NOME').AsString;
  FEndereco.AsString := DataSet.FieldByName('ENDERECO').AsString;
  FBairro.AsString   := DataSet.FieldByName('BAIRRO').AsString;
  FCidade.AsString   := DataSet.FieldByName('CIDADE').AsString;
  FCep.AsString  := DataSet.FieldByName('CEP').AsString;
end;

Obrigado a todos pelas ajudas...

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]
 
Links do Yahoo! Grupos

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

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

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

 




RE: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)

2006-01-30 Por tôpico Rubem Nascimento da Rocha

O mais importante vc esqueceu de mencionar. Qual o banco de dados que vc 
está usando?
Sds.

>From: Emerson Moreno <[EMAIL PROTECTED]>
>Reply-To: delphi-br@yahoogrupos.com.br
>To: [EMAIL PROTECTED], delphi-br@yahoogrupos.com.br
>Subject: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)
>Date: Mon, 30 Jan 2006 14:47:38 -0300
>
>Caros amigos programadores, peço-lhe desculpas pelo OFF mas estou
>precisando de uma ajudinha. Vamos lá:
>
>   Tenho uma tabela com 8500 registros. Como faço para trazer um
>registro especificado por mim, sendo de o campo é indexado por
>dd/mm/yy hh:mm.
>e pode ter vários registro na base. Porém eu quero determinar o qual
>quero trazer.
>
>Mais ou menos assim
>
>SELECT COUNT(*) FROM TABELA
>
>irá retornar 8512 registros
>
>Quero dar um select que me traga o registro 8510 por exemplo.
>
>Não sei como fazer aguardo resposta.
>
>Muito obrigado a todos.
>
>--
>[]'s
>
>Emerson Moreno
>O grande sábio aprende por ensinar!

_
MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.com



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

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

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

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

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

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

 




Re: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)

2006-01-30 Por tôpico Emerson Moreno
Obrigado a todos que me responderam, com o exemplo do José Henrique coneguir
resolver meu problema. Muito obrigado a todos.

Em 30/01/06, Gabriel Filho <[EMAIL PROTECTED]> escreveu:
>
> Bom acredito que funcione assim:
>
>
> SELECT TOP 8500 * FROM Tabela
>
> SQLServer 2000, mas teste ai derepente é a mesma sintaxe.
>
> Em 30/01/06, Emerson Moreno <[EMAIL PROTECTED]> escreveu:
> >
> > Obrigado amigo, mas uso o FireBird 1.5. Como posso fazer?
> >
> > Em 30/01/06, Eduardo Alves <[EMAIL PROTECTED]> escreveu:
> > >
> > > No mysql use limit 8500 (numero da linha)
> > > No oracle na clausula where coloque rowid = 8500
> > >
> > > Eduardo
> > >
> > > -Original Message-
> > > From: delphi-br@yahoogrupos.com.br [mailto:
> [EMAIL PROTECTED]
> > > On Behalf Of Emerson Moreno
> > > Sent: segunda-feira, 30 de janeiro de 2006 14:48
> > > To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br
> > > Subject: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)
> > >
> > > Caros amigos programadores, peço-lhe desculpas pelo OFF mas estou
> > > precisando de uma ajudinha. Vamos lá:
> > >
> > >   Tenho uma tabela com 8500 registros. Como faço para trazer um
> > > registro especificado por mim, sendo de o campo é indexado por
> > > dd/mm/yy hh:mm.
> > > e pode ter vários registro na base. Porém eu quero determinar o qual
> > > quero trazer.
> > >
> > > Mais ou menos assim
> > >
> > > SELECT COUNT(*) FROM TABELA
> > >
> > > irá retornar 8512 registros
> > >
> > > Quero dar um select que me traga o registro 8510 por exemplo.
> > >
> > > Não sei como fazer aguardo resposta.
> > >
> > > Muito obrigado a todos.
> > >
> > > --
> > > []'s
> > >
> > > Emerson Moreno
> > > O grande sábio aprende por ensinar!
> > >
> > >
> > > --
> > > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> > >
> > >
> > >
> > > Links do Yahoo! Grupos
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > > --
> > > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> > >
> > >
> > >
> > >
> > >
> > >   *Yahoo! Grupos, um serviço oferecido por:*   PUBLICIDADE
> > > <
> >
> http://br.ard.yahoo.com/SIG=12f6l316o/M=393477.7870451.8719931.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1138650773/A=3254979/R=0/id=noscript/SIG=12k5j3olb/*http://www.momentumquiz.com.br/index.php?md5ref=372BBEE98E9544bd8B2F9E87847EEEBE_3
> > >
> > > --
> > > *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]<
> > [EMAIL PROTECTED]
> >
> > >
> > >- O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
> > >Serviço do Yahoo! .
> > >
> > >
> >
> >
> > --
> > []'s
> >
> > Emerson Moreno
> > O grande sábio aprende por ensinar!
> >
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
> > --
> > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> >
> >
> >
> > Links do Yahoo! Grupos
> >
> >
> >
> >
> >
> >
> >
> >
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
>
>
>   *Yahoo! Grupos, um serviço oferecido por:*   PUBLICIDADE
> 
> --
> *Links do Yahoo! Grupos*
>
>- Para visitar o site do seu grupo na web, acesse:
>http://br.groups.yahoo.com/group/delphi-br/
>
>- Para sair deste grupo, envie um e-mail para:
>[EMAIL PROTECTED]<[EMAIL PROTECTED]>
>
>- O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
>Serviço do Yahoo! .
>
>


--
[]'s

Emerson Moreno
O grande sábio aprende por ensinar!


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

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

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

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

 




Re: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)

2006-01-30 Por tôpico Gabriel Filho
Bom acredito que funcione assim:


SELECT TOP 8500 * FROM Tabela

SQLServer 2000, mas teste ai derepente é a mesma sintaxe.

Em 30/01/06, Emerson Moreno <[EMAIL PROTECTED]> escreveu:
>
> Obrigado amigo, mas uso o FireBird 1.5. Como posso fazer?
>
> Em 30/01/06, Eduardo Alves <[EMAIL PROTECTED]> escreveu:
> >
> > No mysql use limit 8500 (numero da linha)
> > No oracle na clausula where coloque rowid = 8500
> >
> > Eduardo
> >
> > -Original Message-
> > From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
> > On Behalf Of Emerson Moreno
> > Sent: segunda-feira, 30 de janeiro de 2006 14:48
> > To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br
> > Subject: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)
> >
> > Caros amigos programadores, peço-lhe desculpas pelo OFF mas estou
> > precisando de uma ajudinha. Vamos lá:
> >
> >   Tenho uma tabela com 8500 registros. Como faço para trazer um
> > registro especificado por mim, sendo de o campo é indexado por
> > dd/mm/yy hh:mm.
> > e pode ter vários registro na base. Porém eu quero determinar o qual
> > quero trazer.
> >
> > Mais ou menos assim
> >
> > SELECT COUNT(*) FROM TABELA
> >
> > irá retornar 8512 registros
> >
> > Quero dar um select que me traga o registro 8510 por exemplo.
> >
> > Não sei como fazer aguardo resposta.
> >
> > Muito obrigado a todos.
> >
> > --
> > []'s
> >
> > Emerson Moreno
> > O grande sábio aprende por ensinar!
> >
> >
> > --
> > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> >
> >
> >
> > Links do Yahoo! Grupos
> >
> >
> >
> >
> >
> >
> >
> >
> >
> > --
> > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> >
> >
> >
> >
> >
> >   *Yahoo! Grupos, um serviço oferecido por:*   PUBLICIDADE
> > <
> http://br.ard.yahoo.com/SIG=12f6l316o/M=393477.7870451.8719931.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1138650773/A=3254979/R=0/id=noscript/SIG=12k5j3olb/*http://www.momentumquiz.com.br/index.php?md5ref=372BBEE98E9544bd8B2F9E87847EEEBE_3
> >
> > --
> > *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]<
> [EMAIL PROTECTED]>
> >
> >- O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
> >Serviço do Yahoo! .
> >
> >
>
>
> --
> []'s
>
> Emerson Moreno
> O grande sábio aprende por ensinar!
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>


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



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

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

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

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

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

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

 




Re: RES: RES: [delphi-br] Proteção anti-có pias

2006-01-30 Por tôpico Anderson Carlos
Eu também quero uma função dessas, pois com certeza essa sim seria a chave 
ideal.

Elazar <[EMAIL PROTECTED]> escreveu:  Marcio Cruz, e Emerson Moreno

Testei com o Nero, Easy Cd Creator e nao consegui obter o mesmo
numero de serie tirando uma copia do cd.

Levo em consideração que o numero de serie do Cd seria apenas uma parte
da chave anti copia
(usar a criatividade sabe...) mas facilita quando o cara quer mais uma
licenca ele me paga por mais um cd chave...rs..(me custa R$ 1,00 se
comparado com uns R$ 300,00 ou mais da proteck ou similares sem falar
que quando eu quiser modificar alguma coisa vai por minha conta (vai
sabe o que se colocam nos nossos executaveis...rs..))

O que eu consegui observar em relacao a usar as chaves com cds

1) o numero de serie muda de uma versao do sistema operacional 
2) o numero de serie muda no win 98 a cada vez que reabro e adiciono inf
ao cd (mesmo que formatar um disquete)
3) esta e mais uma pergunta do que uma obervacao. Esta funcao que pega o
numero fisico do HD (ja vi em algum site) funciona com algum CD? (acho
que nao...e ainda nao fiz teste..rs..)

-> a pergunta permanece. alguem conhece mais alguma inf. de como pegar o
serial de um CD, HD
de forma mais confiante e absoluta?

-> nao fiz testes instalando mais de uma versao de SO no mesmo HD(alguem
da lista tem??? consegue nos dizer se tem o mesmo numero nos dois?);

Atenc.
Elazar


---
O que acontece é que a função GetVolumeInformation retorna o numero do
volume do hd, isso significa que toda vez que o hd for formatado o
numero
irá mudar. Pois a cada formatação o numero de volume é alterado. vc
poder
fazer o teste usando essa mesma função porém indicando o drive A, ou
seja, o
disquete, anote o numero, formate e depois rode a função novamente e
contatará que o numero muda. Mas existe uma função que realmente lê o
numero
físico do HD. Procure na net que irá achar.

Espero ter esclarecido essa dúvida.

Agora para bloquear a cópia de seus sistema, use a criatividade. cada um
faz
de forma diferente, tem gente que copia arquivos ocultos verificando se
os
arquivos estão lá. tem gente que coloca no registro do windows, entres
outras coisas. Mas ai fica por conta de sua criatividade e de sua real
necessidade.
__

Quando se copia um CD, com um copiador melhor, tipo CloneCD, o programa 
copiador não copia inclusive o número de série?

Elazar escreveu:
> Anderson Carlos
>
> Boa Tarde;
>
> Aproveitando a deixa para tirar uma duvida.
>
> um tempo atraz (inclusive ja postei a duvida) tentei fazer algo
> utilizando exatamente esta dica ai abaixo, mas com um CD, permitindo
que
> o usuario utilizase o programa em varios micros, mas somente uma copia
> por vez baseado no serial do Cd, so que a funcao abaixo retorna
numeros
> diferentes para cada versao de sistema operacional...
>
>
> A questao que ficou no ar é pq com o Win XP o serial de um CD é
> - no
>  Win98  e
> -
>   2000
> -
>
> o que tem de diferente?? alguem sabe responder?
>
> Atend.
> Elazar
>
>
> ---
> Eu uso essa função, que pega o nº de série do HD, eu gravo em uma
tabela
> o resultado e quando eu abro o sistema a 1º coisa que testo é o número
> de série do HD se este for diferente do que eu gravei eu travo o
> sistema.
>   Espero que possa te ajudar.
>   
>   Function TFrmPrincipal.SerialNum(FDrive:String) :String;
> var
>   Serial: DWord;
>   DirLen, Flags: DWord;
>   DLabel : Array[0..11] of Char;
> begin
>   Try
>
>
GetVolumeInformation(PChar(FDrive+':\'),dLabel,12,@Serial,DirLen,Flags,n
> il,0);
>Result := IntToHex(Serial,8);
> Except
>Result := '';
>   end;
> end;



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





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





Links do Yahoo! Grupos

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


  

  

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



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





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

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

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

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





-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

Re: RES: [delphi-br] Uso de DVD

2006-01-30 Por tôpico anderson.silva
1- sim

2- sim

-- 
Petroserv Macae (http://www.petroservmacae.com.br)

-- Original Message ---
From: "Anderson - BR3" <[EMAIL PROTECTED]> 
To:  
Sent: Mon, 30 Jan 2006 15:06:20 -0200 
Subject: RES: [delphi-br] Uso de DVD 

> Sim
> Sim
> 
> -Mensagem original-
> De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
> Em nome de André Luis de Oliveira
> Enviada em: quinta-feira, 19 de janeiro de 2006 09:45
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: [delphi-br] Uso de DVD
> 
> 1 - Não
> 2 - Sim
> 
> - Original Message - 
> From: "Welson Avelar" <[EMAIL PROTECTED]>
> To: 
> Sent: Thursday, January 19, 2006 9:09 AM
> Subject: Re: [delphi-br] Uso de DVD
> 
> 1 - Não.
>   2 - Sim.
> 
> Andreano Lanusse escreveu:
>   Olá pessoal,
> 
> eu gostaria de saber fazer duas perguntas
> 
> 1 - Quantos aqui já tem acesso a DVD em seus respectivos computadores...
> , 
> somente leitura de DVD
> 2 - Quantos tem acesso banda larga
> 
> []'s
> Andreano Lanusse
> System Engineer
> Borland Latin America
> 
> =
> "Nunca ande pelo caminho traçado, pois ele conduz somente até onde os
> outros 
> já foram."
> Alexander Graham Bell
> =
> Welson de Avelar Soares Filho
> Programador Delphi
> Gemini Sistemas
> 
> Juiz de Fora - Minas Gerais
> =
> 
> -
> Yahoo! doce lar. Faça do Yahoo! sua homepage.
> 
> [As partes desta mensagem que não continham texto foram removidas]
> 
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> 
> Links do Yahoo! Grupos
> 
>   
> 
>   
>     
> ___ 
> Yahoo! doce lar. Faça do Yahoo! sua homepage. 
> http://br.yahoo.com/homepageset.html 
> 
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> 
> Links do Yahoo! Grupos
> 
>   
> 
>   
>     
> ___ 
> Yahoo! doce lar. Faça do Yahoo! sua homepage. 
> http://br.yahoo.com/homepageset.html 
> 
> 
> 
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> 
> 
> 
> 
>

Yahoo! Grupos, um serviço oferecido por:

PUBLICIDADE
>  
> 
---
Links do Yahoo! Grupos
> 

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

--- End of Original Message ---



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

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

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

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

 




RES: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)

2006-01-30 Por tôpico Zote
Select first 1 skip [qual queres - 1, ex: 8509] * from tabela order by
[campo]

http://forums.devshed.com/firebird-sql-development-61/how-to-use-first-n-and
-skip-n-68124.html

--
José Henrique (Zote)

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Emerson Moreno
Enviada em: segunda-feira, 30 de janeiro de 2006 16:10
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)

Obrigado amigo, mas uso o FireBird 1.5. Como posso fazer?

Em 30/01/06, Eduardo Alves <[EMAIL PROTECTED]> escreveu:
>
> No mysql use limit 8500 (numero da linha)
> No oracle na clausula where coloque rowid = 8500
>
> Eduardo
>
> -Original Message-
> From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
> On Behalf Of Emerson Moreno
> Sent: segunda-feira, 30 de janeiro de 2006 14:48
> To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br
> Subject: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)
>
> Caros amigos programadores, peço-lhe desculpas pelo OFF mas estou
> precisando de uma ajudinha. Vamos lá:
>
>   Tenho uma tabela com 8500 registros. Como faço para trazer um
> registro especificado por mim, sendo de o campo é indexado por
> dd/mm/yy hh:mm.
> e pode ter vários registro na base. Porém eu quero determinar o qual
> quero trazer.
>
> Mais ou menos assim
>
> SELECT COUNT(*) FROM TABELA
>
> irá retornar 8512 registros
>
> Quero dar um select que me traga o registro 8510 por exemplo.
>
> Não sei como fazer aguardo resposta.
>
> Muito obrigado a todos.
>
> --
> []'s
>
> Emerson Moreno
> O grande sábio aprende por ensinar!
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
>
>
>   *Yahoo! Grupos, um serviço oferecido por:*   PUBLICIDADE
>

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


--
[]'s

Emerson Moreno
O grande sábio aprende por ensinar!


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



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


 
Links do Yahoo! Grupos




 


Received: (qmail 80118 invoked by uid 0); 30 Jan 2006 16:11:46 -0200
Received: from 66.94.237.53 by poseidon.bludata.com.br (envelope-from
<[EMAIL PROTECTED]
>, uid 0) with qmail-scanner-1.25 
 (clamdscan: 0.85/974. spamassassin: 3.0.2.  
 Clear:RC:0(66.94.237.53):SA:0(-2.4/5.0):. 
 Processed in 5.050731 secs); 30 Jan 2006 18:11:46 -
X-Qmail-Scanner-Mail-From:
[EMAIL PROTECTED]
via poseidon.bludata.com.br
X-Qmail-Scanner: 1.25 (Clear:RC:0(66.94.237.53):SA:0(-2.4/5.0):. Processed
in 5.050731 secs)
Received: from unknown (HELO n24.bullet.scd.yahoo.com) (66.94.237.53)
  by poseidon.bludata.com.br with SMTP; 30 Jan 2006 16:11:41 -0200
Comment: DomainKeys? See http://antispam.yahoo.com/domainkeys
DomainKey-Signature: a=a-sha1; q=s; c=fws; s=tel; d=hoogrupos.com.br;

b=EY0CnwGtrLcoR8B6MYUzrvHw2dqqUxPljKLU/wUn0Sc6if50Ze6xoGYKcpiAShQxuqwrUHC3LQ
qi8L3eMHuo/XPw71V4Ortd4bvBot6/7JVnYYfWahwO84WA8Fqv1I;
Received: from [66.218.66.58] by n24.bullet.scd.yahoo.com with NNFMP; 30 Jan
2006 18:11:17 -
Received: from [66.218.66.61] by t7.bullet.scd.yahoo.com with NNFMP; 30 Jan
2006 18:11:17 -
X-Yahoo-Newman-Property: groups-email
X-Sender: [EMAIL PROTECTED]
X-Apparently-To: delphi-br@yahoogrupos.com.br
Received: (qmail 41736 invoked from network); 30 Jan 2006 18:11:11 -
Received: from unknown (66.218.66.217)
  by m35.grp.scd.yahoo.com with QMQP; 30 Jan 2006 18:11:10 -
Received: from unknown (HELO wproxy.gmail.com) (64.233.184.205)
  by mta2.grp.scd.yahoo.com with SMTP; 30 Jan 2006 18:11:10 -
Received: by wproxy.gmail.com with SMTP id i21so1186037wra
for ; Mon, 30 Jan 2006 10:10:05 -0800
(PST)
Received: by 10.65.150.19 with SMTP id c19mr1010164qbo;
Mon, 30 Jan 2006 10:10:05 -0800 (PST)
Received: by 10.64.220.10 with HTTP; Mon, 30 Jan 2006 10:10:05 -0800 (PST)
Message-ID: <[EMAIL PROTECTED]>
To: delphi-br@yahoogrupos.com.br
In-Reply-To:
<[EMAIL PROTECTED]>
References:
<[EMAIL PROTECTED]>
X-Originating-IP: 64.233.184.205
X-eGroups-Msg-Info: 2:4:8:0
From: Emerson Moreno <[EMAIL PROTECTED]>
X-Yahoo-Profile: ecie_bahia
Sender: delphi-br@yahoogrupos.com.br
MIME-Version: 1.0
Mailing-List: list delphi-br@yahoogrupos.com.br; contact
[EMAIL PROTE

Re: [delphi-br] NMSMTP

2006-01-30 Por tôpico Moacir (gmail)
Usando o Indy 9 !!

With  IdSMTP
begin
  HeloName := 'UsuarioSMTP';
  Host := 'ServidorSMTP';
  Password := 'SenhaSMTP';
  Username := 'UsuarioSMTP';
end

[ ]´s
Moacir

stainle2003 escreveu:
> Alguem sabe como faço para declarar o PASSWORD neste componente, 
> só consigo enviar se escrever a senha e não sei onde posso fazer.
>
>
> Grato
>
> Stainle
>
>
>
>
>
>   



-- 
< 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] dbExpressError: Operation not supported

2006-01-30 Por tôpico Marcelo Miranda Silva
Não deve ser pq a maquina foi formatada e instalado o D7 e já foi dando o erro.

 

 

 

Marcelo Miranda 

 

 



De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Oséias 
Ferreira
Enviada em: quinta-feira, 26 de janeiro de 2006 12:39
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] dbExpressError: Operation not supported

 

-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1

Marcelo Miranda Silva escreveu:
> Pessoal,
> Tenho uma aplicação feita em d6 agora que instalei o D7 está dando o erro 
> dbExpressError: Operation not supported 
> Quando executo o comando  dmUSUARIOS.cdsUSUARIOS.Open;

Veja as dlls do dbexpress. Provavelmente ainda está usando dlls do
delphi mais antigo.

- --
Oséias Ferreira.oseiasferreira (arroba) yahoo.com.br
  Linux counter #333243
  GPG/PGP: 0x60084245
  fingerprint: B1A2 81EF 0560 66D3 8B22 1BC0 1CA6 0374 6008 4245

-BEGIN PGP SIGNATURE-
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org

iD8DBQFD2N7tHKYDdGAIQkURAqgIAKCzP3Ue6UDBh9TccFSzADW5ej3SDgCgg3O5
ybpdIBXPZVF88knIIfKcTxE=
=oad8
-END PGP SIGNATURE-

  

  

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



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







Yahoo! Grupos, um serviço oferecido por:

PUBLICIDADE
 

 

 



Links do Yahoo! Grupos

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



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






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

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

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

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

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

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

 




RES: RES: [delphi-br] Proteção anti-cópias

2006-01-30 Por tôpico Elazar
Marcio Cruz, e Emerson Moreno

Testei com o Nero, Easy Cd Creator e nao consegui obter o mesmo
numero de serie tirando uma copia do cd.

Levo em consideração que o numero de serie do Cd seria apenas uma parte
da chave anti copia
(usar a criatividade sabe...) mas facilita quando o cara quer mais uma
licenca ele me paga por mais um cd chave...rs..(me custa R$ 1,00 se
comparado com uns R$ 300,00 ou mais da proteck ou similares sem falar
que quando eu quiser modificar alguma coisa vai por minha conta (vai
sabe o que se colocam nos nossos executaveis...rs..))

O que eu consegui observar em relacao a usar as chaves com cds

1) o numero de serie muda de uma versao do sistema operacional 
2) o numero de serie muda no win 98 a cada vez que reabro e adiciono inf
ao cd (mesmo que formatar um disquete)
3) esta e mais uma pergunta do que uma obervacao. Esta funcao que pega o
numero fisico do HD (ja vi em algum site) funciona com algum CD? (acho
que nao...e ainda nao fiz teste..rs..)

-> a pergunta permanece. alguem conhece mais alguma inf. de como pegar o
serial de um CD, HD
de forma mais confiante e absoluta?

-> nao fiz testes instalando mais de uma versao de SO no mesmo HD(alguem
da lista tem??? consegue nos dizer se tem o mesmo numero nos dois?);

Atenc.
Elazar


---
O que acontece é que a função GetVolumeInformation retorna o numero do
volume do hd, isso significa que toda vez que o hd for formatado o
numero
irá mudar. Pois a cada formatação o numero de volume é alterado. vc
poder
fazer o teste usando essa mesma função porém indicando o drive A, ou
seja, o
disquete, anote o numero, formate e depois rode a função novamente e
contatará que o numero muda. Mas existe uma função que realmente lê o
numero
físico do HD. Procure na net que irá achar.

Espero ter esclarecido essa dúvida.

Agora para bloquear a cópia de seus sistema, use a criatividade. cada um
faz
de forma diferente, tem gente que copia arquivos ocultos verificando se
os
arquivos estão lá. tem gente que coloca no registro do windows, entres
outras coisas. Mas ai fica por conta de sua criatividade e de sua real
necessidade.
__

Quando se copia um CD, com um copiador melhor, tipo CloneCD, o programa 
copiador não copia inclusive o número de série?

Elazar escreveu:
> Anderson Carlos
>
> Boa Tarde;
>
> Aproveitando a deixa para tirar uma duvida.
>
> um tempo atraz (inclusive ja postei a duvida) tentei fazer algo
> utilizando exatamente esta dica ai abaixo, mas com um CD, permitindo
que
> o usuario utilizase o programa em varios micros, mas somente uma copia
> por vez baseado no serial do Cd, so que a funcao abaixo retorna
numeros
> diferentes para cada versao de sistema operacional...
>
>
> A questao que ficou no ar é pq com o Win XP o serial de um CD é
> - no
>  Win98  e
> -
>   2000
> -
>
> o que tem de diferente?? alguem sabe responder?
>
> Atend.
> Elazar
>
>
> ---
> Eu uso essa função, que pega o nº de série do HD, eu gravo em uma
tabela
> o resultado e quando eu abro o sistema a 1º coisa que testo é o número
> de série do HD se este for diferente do que eu gravei eu travo o
> sistema.
>   Espero que possa te ajudar.
>   
>   Function TFrmPrincipal.SerialNum(FDrive:String) :String;
> var
>   Serial: DWord;
>   DirLen, Flags: DWord;
>   DLabel : Array[0..11] of Char;
> begin
>   Try
>
>
GetVolumeInformation(PChar(FDrive+':\'),dLabel,12,@Serial,DirLen,Flags,n
> il,0);
>Result := IntToHex(Serial,8);
> Except
>Result := '';
>   end;
> end;



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





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




Links do Yahoo! Grupos

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






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



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

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

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

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

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

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

 




Re: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)

2006-01-30 Por tôpico Emerson Moreno
Obrigado amigo, mas uso o FireBird 1.5. Como posso fazer?

Em 30/01/06, Eduardo Alves <[EMAIL PROTECTED]> escreveu:
>
> No mysql use limit 8500 (numero da linha)
> No oracle na clausula where coloque rowid = 8500
>
> Eduardo
>
> -Original Message-
> From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
> On Behalf Of Emerson Moreno
> Sent: segunda-feira, 30 de janeiro de 2006 14:48
> To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br
> Subject: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)
>
> Caros amigos programadores, peço-lhe desculpas pelo OFF mas estou
> precisando de uma ajudinha. Vamos lá:
>
>   Tenho uma tabela com 8500 registros. Como faço para trazer um
> registro especificado por mim, sendo de o campo é indexado por
> dd/mm/yy hh:mm.
> e pode ter vários registro na base. Porém eu quero determinar o qual
> quero trazer.
>
> Mais ou menos assim
>
> SELECT COUNT(*) FROM TABELA
>
> irá retornar 8512 registros
>
> Quero dar um select que me traga o registro 8510 por exemplo.
>
> Não sei como fazer aguardo resposta.
>
> Muito obrigado a todos.
>
> --
> []'s
>
> Emerson Moreno
> O grande sábio aprende por ensinar!
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
>
>
>   *Yahoo! Grupos, um serviço oferecido por:*   PUBLICIDADE
> 
> --
> *Links do Yahoo! Grupos*
>
>- Para visitar o site do seu grupo na web, acesse:
>http://br.groups.yahoo.com/group/delphi-br/
>
>- Para sair deste grupo, envie um e-mail para:
>[EMAIL PROTECTED]<[EMAIL PROTECTED]>
>
>- O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
>Serviço do Yahoo! .
>
>


--
[]'s

Emerson Moreno
O grande sábio aprende por ensinar!


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

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

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

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

 




RE: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)

2006-01-30 Por tôpico Eduardo Alves
No mysql use limit 8500 (numero da linha)
No oracle na clausula where coloque rowid = 8500

Eduardo

-Original Message-
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of 
Emerson Moreno
Sent: segunda-feira, 30 de janeiro de 2006 14:48
To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br
Subject: [delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)

Caros amigos programadores, peço-lhe desculpas pelo OFF mas estou
precisando de uma ajudinha. Vamos lá:

  Tenho uma tabela com 8500 registros. Como faço para trazer um
registro especificado por mim, sendo de o campo é indexado por
dd/mm/yy hh:mm.
e pode ter vários registro na base. Porém eu quero determinar o qual
quero trazer.

Mais ou menos assim

SELECT COUNT(*) FROM TABELA

irá retornar 8512 registros

Quero dar um select que me traga o registro 8510 por exemplo.

Não sei como fazer aguardo resposta.

Muito obrigado a todos.

--
[]'s

Emerson Moreno
O grande sábio aprende por ensinar!


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

 




[delphi-br] OFF TOPIC - AJUDA COM SQL (POR FAVOR)

2006-01-30 Por tôpico Emerson Moreno
Caros amigos programadores, peço-lhe desculpas pelo OFF mas estou
precisando de uma ajudinha. Vamos lá:

  Tenho uma tabela com 8500 registros. Como faço para trazer um
registro especificado por mim, sendo de o campo é indexado por
dd/mm/yy hh:mm.
e pode ter vários registro na base. Porém eu quero determinar o qual
quero trazer.

Mais ou menos assim

SELECT COUNT(*) FROM TABELA

irá retornar 8512 registros

Quero dar um select que me traga o registro 8510 por exemplo.

Não sei como fazer aguardo resposta.

Muito obrigado a todos.

--
[]'s

Emerson Moreno
O grande sábio aprende por ensinar!


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

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

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

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

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

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

 




[delphi-br] NMSMTP

2006-01-30 Por tôpico stainle2003
Alguem sabe como faço para declarar o PASSWORD neste componente, 
só consigo enviar se escrever a senha e não sei onde posso fazer.


Grato

Stainle





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

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

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

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

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

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

 




Re: [delphi-br] Uso de DVD

2006-01-30 Por tôpico Eduardo Jedliczka
1 - Quantos aqui já tem acesso a DVD em seus respectivos computadores... , 
somente leitura de DVD
R:  Leitura e Gravação em 2 computadores.

2 - Quantos tem acesso banda larga
R: ADSL Turbo 300 - Brasil Telecom.

Sucesso,

=
Eduardo Jedliczka
Membro do TeamFB - FireBase
Apucarana - Pr
=

- Original Message - 
From: "Andreano Lanusse" <[EMAIL PROTECTED]>
To: 
Sent: Wednesday, January 18, 2006 11:12 PM
Subject: [delphi-br] Uso de DVD


Olá pessoal,

eu gostaria de saber fazer duas perguntas

1 - Quantos aqui já tem acesso a DVD em seus respectivos computadores... , 
somente leitura de DVD
2 - Quantos tem acesso banda larga

[]'s
Andreano Lanusse
System Engineer
Borland Latin America


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

 




[delphi-br] porta paralela

2006-01-30 Por tôpico Claudia Santos
Oi pessoal!!!
   
  Estou com um problema e se alguém puder me ajudar, ficarei muito 
agradecida
   
  Estou desenvolvendo um programa que controla o cartão de ponto dos 
funcionários. Tenho que ler o arquivo de cartão de ponto que será colocado na 
porta paralela do computador. Não sei como fazer isto. Ah! o arquivo está no 
formato html. Também nunca usei este tipo de arquivo. Já usei no formato txt.
  Será que alguém pode me ajudar??? Desde já muito obrigada!!!
   
  Cláudia Santos


-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

[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]
 
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] Proteção anti-cópias

2006-01-30 Por tôpico Emerson Moreno
O que acontece é que a função GetVolumeInformation retorna o numero do
volume do hd, isso significa que toda vez que o hd for formatado o numero
irá mudar. Pois a cada formatação o numero de volume é alterado. vc poder
fazer o teste usando essa mesma função porém indicando o drive A, ou seja, o
disquete, anote o numero, formate e depois rode a função novamente e
contatará que o numero muda. Mas existe uma função que realmente lê o numero
físico do HD. Procure na net que irá achar.

Espero ter esclarecido essa dúvida.

Agora para bloquear a cópia de seus sistema, use a criatividade. cada um faz
de forma diferente, tem gente que copia arquivos ocultos verificando se os
arquivos estão lá. tem gente que coloca no registro do windows, entres
outras coisas. Mas ai fica por conta de sua criatividade e de sua real
necessidade.



Em 30/01/06, Marcio Cruz <[EMAIL PROTECTED]> escreveu:
>
> Quando se copia um CD, com um copiador melhor, tipo CloneCD, o programa
> copiador não copia inclusive o número de série?
>
> Elazar escreveu:
> > Anderson Carlos
> >
> > Boa Tarde;
> >
> > Aproveitando a deixa para tirar uma duvida.
> >
> > um tempo atraz (inclusive ja postei a duvida) tentei fazer algo
> > utilizando exatamente esta dica ai abaixo, mas com um CD, permitindo que
> > o usuario utilizase o programa em varios micros, mas somente uma copia
> > por vez baseado no serial do Cd, so que a funcao abaixo retorna numeros
> > diferentes para cada versao de sistema operacional...
> >
> >
> > A questao que ficou no ar é pq com o Win XP o serial de um CD é
> > - no
> >  Win98  e
> > -
> >   2000
> > -
> >
> > o que tem de diferente?? alguem sabe responder?
> >
> > Atend.
> > Elazar
> >
> >
> > ---
> > Eu uso essa função, que pega o nº de série do HD, eu gravo em uma tabela
> > o resultado e quando eu abro o sistema a 1º coisa que testo é o número
> > de série do HD se este for diferente do que eu gravei eu travo o
> > sistema.
> >   Espero que possa te ajudar.
> >
> >   Function TFrmPrincipal.SerialNum(FDrive:String) :String;
> > var
> >   Serial: DWord;
> >   DirLen, Flags: DWord;
> >   DLabel : Array[0..11] of Char;
> > begin
> >   Try
> >
> > GetVolumeInformation(PChar(FDrive+':\'),dLabel,12,@Serial,DirLen,Flags,n
> > il,0);
> >Result := IntToHex(Serial,8);
> > Except
> >Result := '';
> >   end;
> > end;
>
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
>
>
>   *Yahoo! Grupos, um serviço oferecido por:*   PUBLICIDADE
> 
> --
> *Links do Yahoo! Grupos*
>
>- Para visitar o site do seu grupo na web, acesse:
>http://br.groups.yahoo.com/group/delphi-br/
>
>- Para sair deste grupo, envie um e-mail para:
>[EMAIL PROTECTED]<[EMAIL PROTECTED]>
>
>- O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
>Serviço do Yahoo! .
>
>


--
[]'s

Emerson Moreno
O grande sábio aprende por ensinar!


[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]
 
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] Programação OO duvida..

2006-01-30 Por tôpico Thiago Oliveira
Felipe, valeu...

Esses conceitos ainda não estão bem entendidos, na minha cabeça...

Obrigado pela dica...

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

2006-01-30 Por tôpico stainle2003
Alguem sabe como faço para declarar o PASSWORD neste componente, 
só consigo enviar se escrever a senha e não sei onde posso fazer.


Grato

Stainle





-- 
< 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] Uso de DVD

2006-01-30 Por tôpico Anderson - BR3
Sim
Sim

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de André Luis de Oliveira
Enviada em: quinta-feira, 19 de janeiro de 2006 09:45
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Uso de DVD

1 - Não
2 - Sim


- Original Message - 
From: "Welson Avelar" <[EMAIL PROTECTED]>
To: 
Sent: Thursday, January 19, 2006 9:09 AM
Subject: Re: [delphi-br] Uso de DVD


1 - Não.
  2 - Sim.

Andreano Lanusse escreveu:
  Olá pessoal,

eu gostaria de saber fazer duas perguntas

1 - Quantos aqui já tem acesso a DVD em seus respectivos computadores...
, 
somente leitura de DVD
2 - Quantos tem acesso banda larga

[]'s
Andreano Lanusse
System Engineer
Borland Latin America

=
"Nunca ande pelo caminho traçado, pois ele conduz somente até onde os
outros 
já foram."
Alexander Graham Bell
=
Welson de Avelar Soares Filho
Programador Delphi
Gemini Sistemas

Juiz de Fora - Minas Gerais
=

-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

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



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



Links do Yahoo! Grupos















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



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


 
Links do Yahoo! Grupos




 







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



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

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

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

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

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

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

 





Re: RES: [delphi-br] Proteção anti-cópias

2006-01-30 Por tôpico Marcio Cruz
Quando se copia um CD, com um copiador melhor, tipo CloneCD, o programa 
copiador não copia inclusive o número de série?

Elazar escreveu:
> Anderson Carlos
>
> Boa Tarde;
>
> Aproveitando a deixa para tirar uma duvida.
>
> um tempo atraz (inclusive ja postei a duvida) tentei fazer algo
> utilizando exatamente esta dica ai abaixo, mas com um CD, permitindo que
> o usuario utilizase o programa em varios micros, mas somente uma copia
> por vez baseado no serial do Cd, so que a funcao abaixo retorna numeros
> diferentes para cada versao de sistema operacional...
>
>
> A questao que ficou no ar é pq com o Win XP o serial de um CD é
> - no
>  Win98  e
> -
>   2000
> -
>
> o que tem de diferente?? alguem sabe responder?
>
> Atend.
> Elazar
>
>
> ---
> Eu uso essa função, que pega o nº de série do HD, eu gravo em uma tabela
> o resultado e quando eu abro o sistema a 1º coisa que testo é o número
> de série do HD se este for diferente do que eu gravei eu travo o
> sistema.
>   Espero que possa te ajudar.
>   
>   Function TFrmPrincipal.SerialNum(FDrive:String) :String;
> var
>   Serial: DWord;
>   DirLen, Flags: DWord;
>   DLabel : Array[0..11] of Char;
> begin
>   Try
>
> GetVolumeInformation(PChar(FDrive+':\'),dLabel,12,@Serial,DirLen,Flags,n
> il,0);
>Result := IntToHex(Serial,8);
> Except
>Result := '';
>   end;
> end;



-- 
< 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] Arquivos do tipo *.DTA e *. IND e *.NET de qual banco de dados são ?

2006-01-30 Por tôpico Jean Fábio Fuchs
BTFUTIL.EXE é o nome do aplicativo (bem bicheira pra variar...)

[]´s 

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Gerhard 
Roger Nack
Enviada em: segunda-feira, 30 de janeiro de 2006 14:24
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Arquivos do tipo *.DTA e *.IND e *.NET de qual banco 
de dados são ?

Ola Eduardo,

A MEGA usa um gerenciador de arquivos chamado "B-tree Filer" da antiga 
TurboPower, agora disponível gratuitamente em 
http://www.bsdg.org/resources/turbopower.html

Bom, para começar os arquivos .NET são arquivos de bloqueio de registro em 
rede, desnecessários no seu caso, bem como os arquivos .IND (índices) que 
também não serão necessários no seu caso de somente importar os dados.

Esses arquivos .DTA são compostos basicamente de um cabeçalho de tamanho fixo 
(não lembro o tamanho, veja nos fontes da turbopower) e o resto do arquivo é 
uma lista de RECORDs (formato pascal DOS).

Existia um aplicativo da própria turbopower que mostrava o tamanho do header, 
tamanho dos registros, quantidade de registros, numero de índices, etc ... 
porem não me recordo o nome dele. Talvez tenha nesse site que passei.

Espero ter ajudado, e boa sorte !!!


Gerhard Roger Nack
[EMAIL PROTECTED] 


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de 
eduardo.sic Enviada em: sábado, 28 de janeiro de 2006 23:29
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Arquivos do tipo *.DTA e *.IND e *.NET de qual banco 
de dados são ?


parece pervasive SQL, abre o arquivo DTA no Edit e olha o cabeçalho dele, 
sempre tem alguma pista.


=
>De:"eduna67" <[EMAIL PROTECTED]>
>Para:delphi-br@yahoogrupos.com.br
>Assunto:[delphi-br] Arquivos do tipo *.DTA e *.IND e *.NET de qual banco de 
>dados são ?
>
>Ola Pessoal blz,
>
>Preciso saber qual é o banco de dados usa esses tipos de arquivo ?
>
>Tenho que importar essa base de dados para outro banco, é um sistema 
>feito em D7 que uma empresa chamada www.mega.com.br, mas o pessoal não 
>que ajudar é mole, tenho que me virar sozinho.
>
>Bom grato desde já a quem puder ajudar.
>
>Eduardo
>
>
>
>
>
>--
>< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>http://br.groups.yahoo.com/group/delphi-br/messa
>ges
>
>[EMAIL PROTECTED]
> 
>Links do Yahoo! Grupos
>
>http://br.groups.yahoo.com/group/delphi-br/
>
>
>http://br.yahoo.com/info/utos.html









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


 
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] Arquivos do tipo *.DTA e *. IND e *.NET de qual banco de dados são ?

2006-01-30 Por tôpico Gerhard Roger Nack
Ola Eduardo,

A MEGA usa um gerenciador de arquivos chamado "B-tree Filer" da antiga 
TurboPower, agora disponível gratuitamente em 
http://www.bsdg.org/resources/turbopower.html

Bom, para começar os arquivos .NET são arquivos de bloqueio de registro em 
rede, desnecessários no seu caso, bem como os arquivos .IND (índices) que 
também não serão necessários no seu caso de somente importar os dados.

Esses arquivos .DTA são compostos basicamente de um cabeçalho de tamanho fixo 
(não lembro o tamanho, veja nos fontes da turbopower) e o resto do arquivo é 
uma lista de RECORDs (formato pascal DOS).

Existia um aplicativo da própria turbopower que mostrava o tamanho do header, 
tamanho dos registros, quantidade de registros, numero de índices, etc ... 
porem não me recordo o nome dele. Talvez tenha nesse site que passei.

Espero ter ajudado, e boa sorte !!!


Gerhard Roger Nack
[EMAIL PROTECTED] 


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de 
eduardo.sic
Enviada em: sábado, 28 de janeiro de 2006 23:29
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Arquivos do tipo *.DTA e *.IND e *.NET de qual banco 
de dados são ?


parece pervasive SQL, abre o arquivo DTA no Edit e olha o cabeçalho dele, 
sempre tem alguma pista.


=
>De:"eduna67" <[EMAIL PROTECTED]>
>Para:delphi-br@yahoogrupos.com.br
>Assunto:[delphi-br] Arquivos do tipo *.DTA e *.IND e *.NET de qual banco de 
>dados são ?
>
>Ola Pessoal blz,
>
>Preciso saber qual é o banco de dados usa esses
>tipos de arquivo ?
>
>Tenho que importar essa base de dados para outro
>banco, é um sistema
>feito em D7 que uma empresa chamada
>www.mega.com.br, mas o pessoal não
>que ajudar é mole, tenho que me virar sozinho.
>
>Bom grato desde já a quem puder ajudar.
>
>Eduardo
>
>
>
>
>
>-- 
>< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA
>MENSAGEM >
>
>http://br.groups.yahoo.com/group/delphi-br/messa
>ges
>
>[EMAIL PROTECTED]
> 
>Links do Yahoo! Grupos
>
>http://br.groups.yahoo.com/group/delphi-br/
>
>
>http://br.yahoo.com/info/utos.html









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


 
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

 




Re: [delphi-br] Programação OO duvida..

2006-01-30 Por tôpico Filipe
Ah... ok, não tinha visto isso, achei que o problema estava no constructor da 
classe.

Bom... se vc olha bem esta linha "Fcodigo := TIntegerField.Create(Fcodigo);"
vc perceberá que está tentando passar ele próprio como seu Owner (dono), e ele 
nem foi criado ainda! Além do mais, o Owner deveria ser um Dataset, que seria o 
dono do campo, e naum o próprio campo, vc não acha?


se não tiver um dataset, tente passar Application, ou nil para o owner, mas não 
ele mesmo...


Flw!


[]'s

Filipe Geyer


  - Original Message - 
  From: Thiago Oliveira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, January 30, 2006 10:50 AM
  Subject: Re: [delphi-br] Programação OO duvida..


  Filipe,

  Entendi mas o meu erro ocorre por que a propiedade está assim:

  property codigo : TIntegerField read Fcodigo write Fcodigo;

  e no create está assim:

  Fcodigo := TIntegerField.Create(Fcodigo);
  Fcodigo.DisplayLabel := 'Código';
  Fcodigo.FieldName := 'CODIGO';

  A minha duvida é como devo colocar no Create essa propriedade, já que
  declarei daquela forma... (não sei se é correto fazer isso)...

  O erro como já falei é "campo 'código' não tem arquivo"...

  Valeu.
  Thiago


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



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





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



[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]
 
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 BOOLEAN no Firebird

2006-01-30 Por tôpico Zote
Geralmente os bancos de dados usam bit como boolean.
Só não lembro se o FB tem esse tipo.

--
José Henrique (Zote)

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Eduardo Alves
Enviada em: segunda-feira, 30 de janeiro de 2006 11:10
Para: delphi-br@yahoogrupos.com.br
Assunto: RE: [delphi-br] Campo BOOLEAN no Firebird

Faca um teste.

Crie um campo do tipo char(1) onde 0 = True e 1 = False;

Se eu nao me engano deste jeito funciona. Mas apenas li sobre isto, faca um
teste e veja se funciona mesmo.

Eduardo

-Original Message-
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On
Behalf Of Leandro
Sent: segunda-feira, 30 de janeiro de 2006 09:12
To: delphi-br@yahoogrupos.com.br
Cc: [EMAIL PROTECTED]
Subject: [delphi-br] Campo BOOLEAN no Firebird

Pessoal,

Tem algum tipo de campo no Firebird que o delphi reconheça como
TBooleanField?
Preciso disso para compatibilidade com códigos antigos, da época do Paradox.

obrigado,

Leandro



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


 
Links do Yahoo! Grupos




 




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


 
Links do Yahoo! Grupos




 



Received: (qmail 30174 invoked by uid 0); 30 Jan 2006 10:31:21 -0200
Received: from 216.155.203.233 by poseidon.bludata.com.br (envelope-from
<[EMAIL PROTECTED]
>, uid 0) with qmail-scanner-1.25 
 (clamdscan: 0.85/974. spamassassin: 3.0.2.  
 Clear:RC:0(216.155.203.233):SA:0(-2.4/5.0):. 
 Processed in 4.539489 secs); 30 Jan 2006 12:31:21 -
X-Qmail-Scanner-Mail-From:
[EMAIL PROTECTED]
via poseidon.bludata.com.br
X-Qmail-Scanner: 1.25 (Clear:RC:0(216.155.203.233):SA:0(-2.4/5.0):.
Processed in 4.539489 secs)
Received: from unknown (HELO n10a.bullet.dcn.yahoo.com) (216.155.203.233)
  by poseidon.bludata.com.br with SMTP; 30 Jan 2006 10:31:16 -0200
Comment: DomainKeys? See http://antispam.yahoo.com/domainkeys
DomainKey-Signature: a=a-sha1; q=s; c=fws; s=tel; d=hoogrupos.com.br;

b=3RY8rizg3TEHflo1d5ohe8BY9lGH8YwxkSyMnIMYvY858NxtKP4GHgnTIqh2LX2CmTiZ8caTnq
5sy1TvzU9IK19gyxwUm0TF+P7tN4HU3/B2mzFRWUgnDZQe6jwkaz;
Received: from [216.155.201.64] by n10.bullet.dcn.yahoo.com with NNFMP; 30
Jan 2006 12:31:07 -
Received: from [66.218.69.2] by t1.bullet.dcn.yahoo.com with NNFMP; 30 Jan
2006 12:31:07 -
Received: from [66.218.66.27] by t2.bullet.scd.yahoo.com with NNFMP; 30 Jan
2006 12:31:06 -
X-Yahoo-Newman-Property: groups-email
X-Sender: [EMAIL PROTECTED]
X-Apparently-To: delphi-br@yahoogrupos.com.br
Received: (qmail 390 invoked from network); 30 Jan 2006 12:31:06 -
Received: from unknown (66.218.66.217)
  by m21.grp.scd.yahoo.com with QMQP; 30 Jan 2006 12:31:06 -
Received: from unknown (HELO pythagoras.intranet.cbab.com.br)
(200.222.94.116)
  by mta2.grp.scd.yahoo.com with SMTP; 30 Jan 2006 12:31:06 -
X-MimeOLE: Produced By Microsoft Exchange V6.5
Content-class: urn:content-classes:message
Message-ID:
<[EMAIL PROTECTED]>
X-MS-Has-Attach: 
X-MS-TNEF-Correlator: 
Thread-Topic: [delphi-br] Campo BOOLEAN no Firebird
Thread-Index: AcYlnkunmf2ViLVZQKWr0+Rcl0XOptQg
To: 
X-Originating-IP: 200.222.94.116
X-eGroups-Msg-Info: 1:12:0:0
From: "Eduardo Alves" <[EMAIL PROTECTED]>
X-Yahoo-Profile: ecastroa_edu
Sender: delphi-br@yahoogrupos.com.br
MIME-Version: 1.0
Mailing-List: list delphi-br@yahoogrupos.com.br; contact
[EMAIL PROTECTED]
Delivered-To: mailing list delphi-br@yahoogrupos.com.br
List-Id: 
Precedence: bulk
List-Unsubscribe: 
Date: Mon, 30 Jan 2006 10:10:24 -0300
Subject: RE: [delphi-br] Campo BOOLEAN no Firebird
Reply-To: delphi-br@yahoogrupos.com.br
Content-Type: text/plain; charset=O-8859-1
Content-Transfer-Encoding: quoted-printable
X-Spam-Checker-Version: SpamAssassin 3.0.2 (2004-11-16) on 
poseidon.bludata.com.br
X-Spam-Level: 
X-Spam-Status: No, score=.4 required=0 tests=L,BAYES_00 
autolearn=available version=0.2

Faca um teste.

Crie um campo do tipo char(1) onde 0 = True e 1 = False;

Se eu nao me engano deste jeito funciona. Mas apenas li sobre isto, faca um
teste e veja se funciona mesmo.

Eduardo

-Original Message-
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On
Behalf Of Leandro
Sent: segunda-feira, 30 de janeiro de 2006 09:12
To: delphi-br@yahoogrupos.com.br
Cc: [EMAIL PROTECTED]
Subject: [delphi-br] Campo BOOLEAN no Firebird

Pessoal,

Tem algum tipo de campo no Firebird que o delphi reconheça como
TBooleanField?
Preciso disso para compatibilidade com códigos antigos, da época do Paradox.

obrigado,

Leandro



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

Re: [delphi-br] Mensagem Com Sinal Sonoro

2006-01-30 Por tôpico Filipe
MessageBeep(0);
MessageBeep(8);
MessageBeep(16);
MessageBeep(32);
MessageBeep(64)... etc;


vc pode tb fazer um loop:

for i := 0 to 4 do
begin
  MessageBeep(0);
  Sleep(300);
end;



[]'s

Filipe Geyer

  - Original Message - 
  From: Eduardo Santos 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, January 30, 2006 12:48 PM
  Subject: Re: [delphi-br] Mensagem Com Sinal Sonoro


  vc pode utilizar a função Beep.
 
Até 
Carlos Eduardo.

  Cleiton <[EMAIL PROTECTED]> escreveu:
Olá pessoal...

  Tem como emitir um sinal sonoro em uma mensagem de alerta do sistema? Se 
tiver, como se faz?

  um grande abraço a todos

  Cleiton
  -- 
  Esta mensagem foi verificada pelo sistema de antivírus e
  acredita-se estar livre de perigo.



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



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





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


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




  
  -
  Yahoo! doce lar. Faça do Yahoo! sua homepage.

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



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





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



[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]
 
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] Proteção anti-cópias

2006-01-30 Por tôpico Elazar
Anderson Carlos

Boa Tarde;

Aproveitando a deixa para tirar uma duvida.

um tempo atraz (inclusive ja postei a duvida) tentei fazer algo
utilizando exatamente esta dica ai abaixo, mas com um CD, permitindo que
o usuario utilizase o programa em varios micros, mas somente uma copia
por vez baseado no serial do Cd, so que a funcao abaixo retorna numeros
diferentes para cada versao de sistema operacional... 


A questao que ficou no ar é pq com o Win XP o serial de um CD é
- no 
 Win98  e
-
  2000
-

o que tem de diferente?? alguem sabe responder?

Atend.
Elazar


---
Eu uso essa função, que pega o nº de série do HD, eu gravo em uma tabela
o resultado e quando eu abro o sistema a 1º coisa que testo é o número
de série do HD se este for diferente do que eu gravei eu travo o
sistema.
  Espero que possa te ajudar.
   
  Function TFrmPrincipal.SerialNum(FDrive:String) :String;
var
  Serial: DWord;
  DirLen, Flags: DWord;
  DLabel : Array[0..11] of Char;
begin
  Try
 
GetVolumeInformation(PChar(FDrive+':\'),dLabel,12,@Serial,DirLen,Flags,n
il,0);
   Result := IntToHex(Serial,8);
Except
   Result := '';
  end;
end;


Anderson Carlos






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



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

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

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

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

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

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

 





RES: [delphi-br] Oportunidade de trabalho

2006-01-30 Por tôpico Diogo
O que isso tem a ver com Delphi?

Mais uma que poderia ser barrada aqui...

 

Atenciosamente,

 

Diogo R. Viegas

Analista de Sistemas

Suntech Telecom Solutions

*- 48 3234-0107  

*- [EMAIL PROTECTED]

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Aline Ferraresi Nascimento
Enviada em: segunda-feira, 30 de janeiro de 2006 13:40
Para: Aline Ferraresi Nascimento
Assunto: [delphi-br] Oportunidade de trabalho

 


Procuramos um profissional para trabalhar em Campinas/SP. 
Conhecimentos necessários: 
- Java 
- DB2 
- SQL Server 
- Oracle 
Desejável: 
Visual Basic 
ASP 
Enviar CV para [EMAIL PROTECTED] com o código SSTSR

Aline Nascimento
SST it solutions
Building the Wireless Age
Admin Staff
[EMAIL PROTECTED]









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



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








Yahoo! Grupos, um serviço oferecido por:



PUBLICIDADE
 
 

 

  _  

Links do Yahoo! Grupos

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



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



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

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

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

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

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

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

 




Re: [delphi-br] Mensagem Com Sinal Sonoro

2006-01-30 Por tôpico Luis Lopes
Use o componente TMediaPlayer. Vc pode tocar os sons
de erro e alerta do Windows ou gravar e tocar seus
próprios sons.

[]´s

Luis Alberto.

--- Eduardo Santos <[EMAIL PROTECTED]> escreveu:

> vc pode utilizar a função Beep.
>
>   Até 
>   Carlos Eduardo.
> 
> Cleiton <[EMAIL PROTECTED]> escreveu:
>   Olá pessoal...
> 
> Tem como emitir um sinal sonoro em uma mensagem de
> alerta do sistema? Se tiver, como se faz?
> 
> um grande abraço a todos
> 
> Cleiton
> -- 
> Esta mensagem foi verificada pelo sistema de
> antivírus e
> acredita-se estar livre de perigo.
> 
> 
> 
> [As partes desta mensagem que não continham texto
> foram removidas]
> 
> 
> 
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA
> MENSAGEM >
> 
> 
> 
> 
> 
> Yahoo! Grupos, um serviço oferecido por:
>PUBLICIDADE
>  
>   
> -
>   Links do Yahoo! Grupos
> 
>Para visitar o site do seu grupo na web, acesse:
> http://br.groups.yahoo.com/group/delphi-br/
> 
>Para sair deste grupo, envie um e-mail para:
> [EMAIL PROTECTED]
> 
>O uso que você faz do Yahoo! Grupos está sujeito
> aos Termos do Serviço do Yahoo!. 
> 
>   
> 
> 
>   
> -
>  Yahoo! doce lar. Faça do Yahoo! sua homepage.
> 
> [As partes desta mensagem que não continham texto
> foram removidas]
> 
> 
> 
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA
> MENSAGEM >
> 
> http://br.groups.yahoo.com/group/delphi-br/messages
> 
> [EMAIL PROTECTED]
>  
> Links do Yahoo! Grupos
> 
> 
> 
> http://br.yahoo.com/info/utos.html
> 
>  
> 
> 
> 


  Luis Alberto
  Belo Horizonte - MG










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



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

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

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

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

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

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

 




[delphi-br] DBManager e Interbase

2006-01-30 Por tôpico André Mota
Alguém pode me indicar as configurações de server para o interbase utilizando o 
DBManager?

Ele diz que não consegue completar conexão com 'localhost'. Já troquei para o 
nome da máquina, 127.0.0.1, ip da conexão local e NADA.

ENGINE: Interbase
NAME: [EMAIL PROTECTED]
HOSTNAME: localhost
PORT: 3050
USER ID: SYSDBA
PASSWORD: masterkey
DATABASE: GDBTeste
DATABASE FILENAME: c:\gdbteste.gdb

Alguém pode me ajudar?

André Mota

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

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

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

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

 




Re: [delphi-br] Mensagem Com Sinal Sonoro

2006-01-30 Por tôpico Eduardo Santos
vc pode utilizar a função Beep.
   
  Até 
  Carlos Eduardo.

Cleiton <[EMAIL PROTECTED]> escreveu:
  Olá pessoal...

Tem como emitir um sinal sonoro em uma mensagem de alerta do sistema? Se tiver, 
como se faz?

um grande abraço a todos

Cleiton
-- 
Esta mensagem foi verificada pelo sistema de antivírus e
acredita-se estar livre de perigo.



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



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





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

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

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

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

  



-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

[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]
 
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] Caracteres Em Branco

2006-01-30 Por tôpico Eduardo Santos
utilize a função Trim() do delphi..
   
  Ela retira os espaços em branco.
   
  Falow
  Carlos Eduardo.
  
Cleiton <[EMAIL PROTECTED]> escreveu:
  Olá pessoal ...

Tem alguma função em que eu possa retirar de um campo os carecteres em branco 
antes e depois dos carecteres válidos?

Por exemplo...

No campo nome coloco: cleiton.

Supondo que dei alguns espaços antes e depois do nome, como faço pra retirar 
essas caracteres em branco antes de gravar essa informação no banco?

um grrande abraço a todos

Cleiton
-- 
Esta mensagem foi verificada pelo sistema de antivírus e
acredita-se estar livre de perigo.



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



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





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

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

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

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

  



-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

[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]
 
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] Banco Não Grava Informações

2006-01-30 Por tôpico itamar
ola,
ja me aconteceu isto.
so que uso mysql 3,5XX
para resolver execute o mysql em linha de comnado ou via algum gerenciador o 
comando repair table sua_tabela

isso pode ter acontecido por quebra de indice interno do mysql


ps- na chamada do MEU mysql eu uso o programa MYSQLOd.exe --flush
isso da um commit a cada transacao do banco e nao deixa "quebrar" os indices




Citando Cleiton <[EMAIL PROTECTED]>:

>> Olá pessoal ...
>> 
>> Está me acontecendo algo um tanto quanto curioso, do qual fiz diversas
>> tentativas de resolver o problema e ainda não consegui.
>> 
>> Para título de curiosidade estou usando MySql 4.1 e delphi 7.
>> 
>> O que acontece é o seguinte:
>> 
>> Tenho uma tabela cliente que entre outros campos tem:
>> 
>> * sexo -> campo do tipo varchar (1) que indica o sexo do cliente. O campo é
>> obrigatório.
>> 
>> * cidade_empresa -> campo do tipo integer que indica a cidade onde se
>> localiza a empresa onde o cliente trabalha e que faz referência a tabela
>> cidade, ou seja, é uma chave estrangeira. Esse campo não é obrigatório.
>> 
>> O que acontece é que após prenchido corretamente todos os dados do
>> formulário de cadastro do cliente, salva-se as informações. Acontece que,
>> não porque acontece mas, os campos sexo e cidade_empresa ficam em branco no
>> formulario e acaba não gravando nada no banco. Não aparece nenhuma mensagem
>> de erro e quando vou verificar no banco, todas as informações foram
>> gravadas, apesar do campo sexo ser obrigatorio.
>> 
>> Fiz um teste e inseri essas informações usando o Mysql Front. Aí na
>> formulário aparece as informações que eu coloquei mas se tentar alterar
>> acontece a mesma coisa quando vou inserir novos dados, mas mantendo a
>> informação anterior que foi colocada no banco pelo MySql Front.
>> 
>> No campo sexo estou usando um DBComboBox e no campo cidade_empresa estou
>> usando um DBEdit. Já a inversáo dos dois componentes nesses campos e
>> acontece a mesma coisa.
>> 
>> Alguém do grupo já passou por isso? Ou alguém tem idéia de como resolver
>> esse problema?
>> 
>> um grande abraço a todos
>> 
>> Cleiton
>> -- 
>> Esta mensagem foi verificada pelo sistema de antivírus e
>>  acredita-se estar livre de perigo.
>> 
>> 
>> 
>> [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

 




[delphi-br] Oportunidade de trabalho

2006-01-30 Por tôpico Aline Ferraresi Nascimento

Procuramos um profissional para trabalhar em Campinas/SP. 
Conhecimentos necessários: 
- Java 
- DB2 
- SQL Server 
- Oracle 
Desejável: 
Visual Basic 
ASP 
Enviar CV para [EMAIL PROTECTED] com o código SSTSR

Aline Nascimento
SST it solutions
Building the Wireless Age
Admin Staff
[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]
 
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] VCL SKIN plz!!!

2006-01-30 Por tôpico Leonardo Mascarenhas
Preciso do VCL Skin alguem pod me ajuda?


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

2006-01-30 Por tôpico galdiador guardiao
conhece algum componete ou alguma forma  de colocar um filtro em uma imagen jpg 
para selecionar o diretorio ?
   
  isso sem usar um banco de dados?


-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

[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]
 
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] Impedir Caracteres Indesejados

2006-01-30 Por tôpico Cleiton
Olá pessoal...

Como fazer para impedir que usuário digite números em um campo que deveria 
aceitar apenas letras e como impedir que o usuário digite letras em um campo 
que deveria aceitar apenas números?

abraços

Cleiton
-- 
Esta mensagem foi verificada pelo sistema de antivírus e
 acredita-se estar livre de perigo.



[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]
 
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] Banco Não Grava Informações

2006-01-30 Por tôpico Cleiton
Olá pessoal ...

Está me acontecendo algo um tanto quanto curioso, do qual fiz diversas 
tentativas de resolver o problema e ainda não consegui.

Para título de curiosidade estou usando MySql 4.1 e delphi 7.

O que acontece é o seguinte:

Tenho uma tabela cliente que entre outros campos tem:

* sexo -> campo do tipo varchar (1) que indica o sexo do cliente. O campo é 
obrigatório.

* cidade_empresa -> campo do tipo integer que indica a cidade onde se localiza 
a empresa onde o cliente trabalha e que faz referência a tabela cidade, ou 
seja, é uma chave estrangeira. Esse campo não é obrigatório.

O que acontece é que após prenchido corretamente todos os dados do formulário 
de cadastro do cliente, salva-se as informações. Acontece que, não porque 
acontece mas, os campos sexo e cidade_empresa ficam em branco no formulario e 
acaba não gravando nada no banco. Não aparece nenhuma mensagem de erro e quando 
vou verificar no banco, todas as informações foram gravadas, apesar do campo 
sexo ser obrigatorio.

Fiz um teste e inseri essas informações usando o Mysql Front. Aí na formulário 
aparece as informações que eu coloquei mas se tentar alterar acontece a mesma 
coisa quando vou inserir novos dados, mas mantendo a informação anterior que 
foi colocada no banco pelo MySql Front.

No campo sexo estou usando um DBComboBox e no campo cidade_empresa estou usando 
um DBEdit. Já a inversáo dos dois componentes nesses campos e acontece a mesma 
coisa.

Alguém do grupo já passou por isso? Ou alguém tem idéia de como resolver esse 
problema?

um grande abraço a todos

Cleiton
-- 
Esta mensagem foi verificada pelo sistema de antivírus e
 acredita-se estar livre de perigo.



[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]
 
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] Mensagem Com Sinal Sonoro

2006-01-30 Por tôpico Cleiton
Olá pessoal...

Tem como emitir um sinal sonoro em uma mensagem de alerta do sistema? Se tiver, 
como se faz?

um grande abraço a todos

Cleiton
-- 
Esta mensagem foi verificada pelo sistema de antivírus e
 acredita-se estar livre de perigo.



[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]
 
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] Caracteres Em Branco

2006-01-30 Por tôpico Cleiton
Olá pessoal ...

Tem alguma função em que eu possa retirar de um campo os carecteres em branco 
antes e depois dos carecteres válidos?

Por exemplo...

No campo nome coloco: cleiton.

Supondo que dei alguns espaços antes e depois do nome, como faço pra retirar 
essas caracteres em branco antes de gravar essa informação no banco?

um grrande abraço a todos

Cleiton
-- 
Esta mensagem foi verificada pelo sistema de antivírus e
 acredita-se estar livre de perigo.



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

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

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

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

 




[delphi-br] Re: Re: REGULARIZAR SOFTWARES e Registro de FONTES

2006-01-30 Por tôpico Josir Gomes
Olá Emerson,

não precisa de nada disso meu amigo - vc vai gastar uma grana à toa e perder um 
tempo enorme com burocracia. Segue um post antigo que eu dei falando sobre isso:

Vc não precisa registrar nada em canto algum (exceto se ele for trabalhar com 
impressoras fiscais ou outros registros contábeis).

Uma vez tendo a documentação do sistema e os códigos fontes, coloque tudo em um 
envelope lacrado e envie pelo correio para vc mesmo e *não* abra. Se houver 
alguma pendenga judicial, esse material é prova suficiente em qualquer tribunal 
de que vc desenvolveu o software na data indicada no registro do correio - o 
envelope deve ser aberto na frente do juiz. Consulte um advogado especializado 
em direitos autorais que ele vai te confirmar isso.

Na verdade, vc não precisa ter nem o software pronto, basta ter um modelo 
detalhado do que o software irá fazer, com telas, etc. Quanto mais documentação 
melhor. Mas tendo o software pronto, é mais fácil de provar que é seu. 

Boa Sorte,
Josir.


- Original Message - 
From: "Emerson da Rocha Luiz" <[EMAIL PROTECTED]>
To: 
Sent: Saturday, November 12, 2005 6:34 PM
Subject: Re: [delphi-br] Re: REGULARIZAR SOFTWARES e Registro de FONTES


Tempos atras, eu também estava com dúvidas como essas, daí mandei um emal
para o INPI, e essa foi a resposta. Espero que seja de alguma forma útil.


 From: *Registro de Software <[EMAIL PROTECTED]>*Mailed-By: *
inpi.gov.br * To: *Emerson da Rocha Luiz <
[EMAIL PROTECTED]>*
Date: *Nov 3, 2005 11:03 AM*
Subject: *Re: Regristro de programa de banco de dados

*
Reply | Reply to all | Forward | Print | Add sender to Contacts list | Trash
this message | Report phishing | Show original | Message text garbled?


 Caro Emerson,
 Desculpe a demora em responder, mas o seu email estava em uma pasta criada
pelo Norton e eu só descobri agora.
Para dar entrada em um pedido de registro de programa de computador, vc tem
que apresentar uma documentação formal e outra técnica.

A parte formal consiste na apresentação dos seguintes documentos: uma folha
de petição preenchida (Formulário: Pedido de Registro), guia de recolhimento
e uma procuração (caso não seja vc a fazer o depósito), documento que
comprove o direito do titular, que é um documento comprobatório do vínculo
empregatício ou da prestação de serviço. Se vc estiver modificando um outro
programa deverá apresentar, também um documento de autorização do titular do
programa. A parte técnica consiste na apresentação, em duas vias, da
listagem integral ou parcial e, às vezes, também são apresentadas as
especificações e os fluxogramas. É necessário que a parte da listagem que vc
apresente especifique o seu programa e seja capaz de caracterizar a criação
independente e identificar o seu programa (Lei 9609/98, art3º, §1º, inciso
III).

No site do INPI (www.inpi.gov.br ), vc encontrará
os documentos para download (no lado esquerdo clique em download ->
programas de computador para encontrar os documentos e exemplos e para a
guia de recolhimento há um quadro à esquerda com o título: Guia Eletrônica,
onde vc deverá se cadastrar para obtê-la). Aconselho que vc dê uma olhada no
Manual do usuário, onde vc encontrará até como devem ser preenchidos os
formulários (no lado esquerdo, clique em programas de computador -> manual
do usuário).

Vc está fazendo confusão com as proteções. Os programas de computador são
protegiudos por direito de autor, de acordo com a Lei de Software, Lei
9609/98. já as patentes, elas tem como base outra Lei, a Lei 9772/97. São
regimes jurídicos distintos, proteções distintas e objetos distintos.

Quanto ao tempo que levará para obter o certificado, isto vai demorar, pois
estamos sem gente e atrasados. no momento, estamos examinando os pedidos de
1998. Quanto ao valor, no Manual do Usuário tem a Tabela de Retribuição.



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

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

<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
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: dbExpressError: Operation not supported

2006-01-30 Por tôpico Marcelo Miranda Silva
E como vc resolveu?

 

 

Atenciosamente,

 

 

Marcelo Miranda Silva 

 

Divisão de Banco de Dados

Departamento de Produção 

Tribunal de Justiça do Estado do Rio de Janeiro

Tel.: (0XX21) 2588-3417 / 1814

 

 



De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Murillo 
Proença
Enviada em: quinta-feira, 26 de janeiro de 2006 12:48
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Re: dbExpressError: Operation not supported

 

já tive um problema parecido, não sei se era exatamente esse, mas no 
meu caso era versão da Midas.dll

--- Em delphi-br@yahoogrupos.com.br, "Marcelo Miranda Silva" 
<[EMAIL PROTECTED]> escreveu
>
> Pessoal,
> 
>  
> 
>  
> 
> Tenho uma aplicação feita em d6 agora que instalei o D7 está dando 
o erro dbExpressError: Operation not supported 
> 
> Quando executo o comando  dmUSUARIOS.cdsUSUARIOS.Open;
> 
>  
> 
>  
> 
>  
> 
> Atenciosamente,
> 
>  
> 
>  
> 
> Marcelo Miranda Silva 
> 
>  
> 
> Divisão de Banco de Dados
> 
> Departamento de Produção 
> 
> Tribunal de Justiça do Estado do Rio de Janeiro
> 
> Tel.: (0XX21) 2588-3417 / 1814
> 
>  
> 
>  
> 
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]
>







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







Yahoo! Grupos, um serviço oferecido por:

PUBLICIDADE
 

 

 



Links do Yahoo! Grupos

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



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





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

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

<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
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] Programação OO duvida..

2006-01-30 Por tôpico Thiago Oliveira
Filipe,

Entendi mas o meu erro ocorre por que a propiedade está assim:

property codigo : TIntegerField read Fcodigo write Fcodigo;

e no create está assim:

Fcodigo := TIntegerField.Create(Fcodigo);
 Fcodigo.DisplayLabel := 'Código';
 Fcodigo.FieldName := 'CODIGO';

A minha duvida é como devo colocar no Create essa propriedade, já que
declarei daquela forma... (não sei se é correto fazer isso)...

O erro como já falei é "campo 'código' não tem arquivo"...

Valeu.
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]
 
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] Desenvolvimento de Componentes para Relatório em Delphi / Lazarus.

2006-01-30 Por tôpico Eduardo Jedliczka
Caros amigos,

Aos que já leram um e-mail semelhante na FireBase, CFLP-Suporte, e 
Lazarus-Brasil, minhas desculpas.

Durante muito tempo, procurei ferramentas para construção de relatórios que 
fossem simples, eficientes e que tivesse texto justificado.

Encontrei algumas muito boas (CrystalReport mas é caro e não funciona em 
computadores mais antigos) algumas interessantes, algumas complicadas, e 
muito lixo, seja ele open-source ou proprietário. (Para ser sincero estou 
neste dilema desde o Delphi 1, pois achava o ReportSmith extremamente pesado 
na época para rodar em 486SX com windows 3.1)

O que acabei fazendo foi escrevendo minhas próprias rotinas de impressão, 
utilizando as classes Tcanvas e TPrinter, e naturalmente os Escapes do 
Delphi para conseguir realizar a impressão em coordenadas (mm) ao invés de 
pontos.

Recentemente iniciei o desenvolvimento de um sistema em Linux, utilizando o 
Lazarus e FreePascal, pois ao meu ver o Kylix não terá novas versões. Porém 
achei que já era tempo de converter minhas "units" cheias de funções numa 
paleta de componentes.

Gastei alguns dias para criar módicos 6 componentes (com funcionamento 
semelhante ao QuickReport, mas extremamente mais pobre de recursos, porém 
com suporte à texto justificado e sombra em labeis):

- Report -> A página do relatório, ao Executar Report.ShowPreview ele exibe 
uma tela de preview semelhante ao QuickReport, mas tem a opção de salvar o 
preview em arquivo para ser impresso ou visualizado em outro computador.

- Band -> As bandas, criei de 3 tipos, cabeçalho, detalhe e rodapé. pode ter 
mais de uma banda do mesmo tipo.

- Label -> um tipo de label com possibilidade de utilizar nenhuma, uma ou 
duas sombras.

- Text -> uma espécie de memo, mas com definição de espaçamento diferenciado 
para a primeira linha de cada parágrafo e texto justificado (igual ao word, 
ou seja, aumentando igualmente o tamanho do espaçamento entre todas as 
palavras).

- DBLabel -> label com acesso à banco de dados.

- DbText -> text com acesso à banco de dados.

Estou planejando incluir componentes para fazer quadrados, círculos, linhas, 
exibir códigos de barra, e uma expécie de Expression, para exibir o Total de 
Páginas, data e hora de impressão, nome do computador, etc..

Escrevi os Componentes em Delphi, e adaptei-os para funcionarem no Lazarus 
(em outras palavras cortei algumas coisas que não existem no Lazarus) e fiz 
algumas alterações quanto à units, e a forma como endereça uma função. Por 
este motivo, posso acreditar que as mesmas units (com diretrizes de 
compilação) poderão ser usadas no Lazarus e no Delphi. Devido à natureza dos 
componentes, imagino que possa ser utilizado do Delphi 1.0 em diante.

Justamente por este motivo, gostaria de dizer que estou disposto a tornar 
estes componentes open-source (como projeto do SourceForge.Net) desde que 
consiga pelo menos 5 pessoas dispostas a dar manutenção neles.

Considero que estas pessoas são bem-vindas para atuarem:
  - acertando alguns pequenos detalhes, por exemplo: os labeis não atualizam
o caption automaticamente ao alterar a propriedade, é necessário alterar o
seu tamanho para ver o novo caption... sem contar que é preciso esconder
determinados métodos e propriedades, coisas que não atrapalham o
funcionamento, mas que incomodam durante o desenvolvimento;
 - escrevendo exemplos e tutoriais;
 - escrevendo os manuais e arquivos de ajuda (inicialmente em português e
inglês).

Ou, em outras palavras, deixando-os mais parecidos com componentes pagos
e/ou profissionais disponíveis no mercado.

Para não tumultuar a lista, não responderei absolutamente nada aqui.

Se alguém desejar prestar ajuda, colaborar com algumas ideías, dicas e 
sugestões, ou ainda obter maiores informações, respondam em Private para 
"jedyfb arroba gmail.com", e já adianto, não responderei nenhum e-mails do
tipo, envia para mim...

Sucesso,

=
Eduardo Jedliczka
Membro do TeamFB - FireBase
Apucarana - Pr
=



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

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

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

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

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

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

 




[delphi-br] Off-Topic: Qual é o Front-end mais usado...

2006-01-30 Por tôpico Anderson - BR3
Olá amigos da lista!!!
 
Para os amigos que usam MySQL com Delphi qual é o Front-End mais usado ?
Digo, no FireBird é o IBExpert e no mysql ?.
Outra coisa quem programa com o Delphi/MySQL usa mais o DbExpress ou
componentes terceirizados ?
O MySQL com Delphi mais usado seria a versão 4.??? e não a 5.???
 
 
Qualquer dica, ficarei agradecido.
 
Um forte abraço a todos
Anderson Furtilho
 


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

2006-01-30 Por tôpico info.desenvolvimento
Pessoal, criei um form para imprimir somente 6 etiquetas por folha, só que as 
etiquetas estão saindo uma abaixo da outra (POR COLUNA), eu quero que saia 3 do 
lado direito e três do lado esquerdo (POR LINHAS), alguém sabe como eu faço 
isso. 
Tipo preenchimento por linhas?

PAULO FERNANDES
PORTO ALEGRE / RS

 

[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]
 
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] Barra de Ferramentas

2006-01-30 Por tôpico Eduardo Suruagy
Como faço pra criar uma barra de ferramentas onde o usuário final podera
personaliza-la dizendo quais os botões ele quer. Isso claro em tempo de
execução e podendo ser salvo as configurações da bara do usuário p/ q qd ele
entrar no sistema novamente as configurações continuem como ele deixou...
Obrigado !!


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



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

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

<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
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] Programação OO duvida..

2006-01-30 Por tôpico Filipe
Sempre faço assim:

Type
  TClasse = Class
  public
constructor Create; Override;
  end;

TClasse.Constructor Create; Override;
begin
  Inherited Create;
  // seto as variáveis.
end;


Tente assim.


[]'s

Filipe Geyer


  - Original Message - 
  From: Thiago Oliveira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, January 30, 2006 7:49 AM
  Subject: [delphi-br] Programação OO duvida..


  Galera,

  Estou com uma dificuldade, em um ponto em meus estudos. No Create dessa
  Classe está dando um erro... O Erro é quando o objeto Fcodigo recebe algum
  valor, dá que o arquivo está vazio. Então cheguei a conclusão de que a
  criação desses objetos está errada

  Está assim essa parte... Se ouderem me ajudar agradeço...

  constructor TCliente.Create;
  begin
  (...)
  //Em cada um faço isso : Criar Objeto e Configura o mesmo
  Fcodigo := TIntegerField.Create(Fcodigo);
  Fcodigo.DisplayLabel := 'Código';
  Fcodigo.FieldName := 'CODIGO';



   Aqui está a Classe 
  type
TCliente = class(TTabela_OOP)
private
  Fcodigo: TIntegerField;
  Fnome: TStringField;
  Fcidade: TStringField;
  Fendereco: TStringField;
  Festado: TStringField;
  Fbairro: TStringField;
  Fcep: TStringField;
public
  constructor Create;
  destructor Destroy; override;

  property codigo : TIntegerField read Fcodigo write Fcodigo;
  property nome : TStringField read Fnome write Fnome;
  property endereco : TStringField read Fendereco write Fendereco;
  property bairro : TStringField read Fbairro write Fbairro;
  property cidade : TStringField read Fcidade write Fcidade;
  property estado : TStringField read Festado write Festado;
  property cep : TStringField read Fcep write Fcep;

  procedure Localizar_Clientes;
  procedure Recebe_Valores;
  procedure Envia_Valores;
  procedure Inicializa_Valores;
end;


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



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





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



[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]
 
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] Problema Impressão Matricial em EPS ON FX-2190

2006-01-30 Por tôpico Augustus Otávio Pinto
Esta instalada na porta paralela mesmo (LPT1), o mais estranho eh que ateh o
velho 
comando do DOS "dir > prn" funciona, mas quando envio a impressao atraves da
aplicacao
nao sai nada.

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Campus
Enviada em: sábado, 30 de janeiro de 1999 09:05
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Problema Impressão Matricial em EPSON FX-2190


ela não tá na porta USB ?

- Original Message - 
From: "Augustus Otávio Pinto" <[EMAIL PROTECTED]>
To: 
Sent: Monday, January 30, 2006 8:37 AM
Subject: [delphi-br] Problema Impressão Matricial em EPSON FX-2190


Bom dia !!!

Tenho um programa que roda em uma rede de 03 estacoes W98, e utilizo
impressao matricial usando as funcoes AssignFile() e WriteLn() para gravar
direto para a porta "LPT". Funcionava perfeitamente com impressoras Epson
LX300, FX 1050, 2170, 2180, etc tanto localmente como pela rede. Acontece
que o pessoal comprou uma Epson FX 2190 e agora não consigo mais imprimir
localmente. Pela rede consigo mandar uma impressao, mas na maquina que a
impressora esta instalada não sai nada. Alguem teria alguma experiencia ou
solucao para me passar ?

Grato.

Augustus

-- 
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.375 / Virus Database: 267.14.23/243 - Release Date: 27/01/2006




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



Links do Yahoo! Grupos










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


 
Links do Yahoo! Grupos




 




-- 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.375 / Virus Database: 267.14.23/243 - Release Date: 27/01/2006
 

-- 
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.375 / Virus Database: 267.14.23/243 - Release Date: 27/01/2006
 



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

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

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

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

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

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

 




[delphi-br] Problemas em instalar o componente Zeos no Delphi 7

2006-01-30 Por tôpico analistarmr
Bom dia !

Baixei o componente Zeos, segui todos os passos e mesmo assim não 
consigo instalar. Uso o Delphi 7 !

Alguem pode me dar uma luz !!

Desde já agradeço

Rafael
[EMAIL PROTECTED]
[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]
 
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] Campo BOOLEAN no Firebird

2006-01-30 Por tôpico Eduardo Alves
Faca um teste.

Crie um campo do tipo char(1) onde 0 = True e 1 = False;

Se eu nao me engano deste jeito funciona. Mas apenas li sobre isto, faca um 
teste e veja se funciona mesmo.

Eduardo

-Original Message-
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of 
Leandro
Sent: segunda-feira, 30 de janeiro de 2006 09:12
To: delphi-br@yahoogrupos.com.br
Cc: [EMAIL PROTECTED]
Subject: [delphi-br] Campo BOOLEAN no Firebird

Pessoal,

Tem algum tipo de campo no Firebird que o delphi reconheça como
TBooleanField?
Preciso disso para compatibilidade com códigos antigos, da época do Paradox.

obrigado,

Leandro



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

 





Re: [delphi-br] Problema Impressão Matricial em EPSO N FX-2190

2006-01-30 Por tôpico Campus
ela não tá na porta USB ?

- Original Message - 
From: "Augustus Otávio Pinto" <[EMAIL PROTECTED]>
To: 
Sent: Monday, January 30, 2006 8:37 AM
Subject: [delphi-br] Problema Impressão Matricial em EPSON FX-2190


Bom dia !!!

Tenho um programa que roda em uma rede de 03 estacoes W98, e utilizo
impressao matricial
usando as funcoes AssignFile() e WriteLn() para gravar direto para a porta
"LPT".
Funcionava perfeitamente com impressoras Epson LX300, FX 1050, 2170, 2180,
etc tanto localmente como
pela rede.
Acontece que o pessoal comprou uma Epson FX 2190 e agora não consigo mais
imprimir localmente.
Pela rede consigo mandar uma impressao, mas na maquina que a impressora esta
instalada não
sai nada.
Alguem teria alguma experiencia ou solucao para me passar ?

Grato.

Augustus

-- 
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.375 / Virus Database: 267.14.23/243 - Release Date: 27/01/2006




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

 





Re: [delphi-br] Campo BOOLEAN no Firebird

2006-01-30 Por tôpico Emerson Moreno
Caro Leandro, o FireBird não tem campo do tio boolean, vc terá que fazer de
utra forma, no meu caso usa Char(1) colocando "S" ou "N", mas tb pode ser
feito de outras maneiras, "T" ou "F".

Em 30/01/06, Leandro <[EMAIL PROTECTED]> escreveu:
>
> Pessoal,
>
> Tem algum tipo de campo no Firebird que o delphi reconheça como
> TBooleanField?
> Preciso disso para compatibilidade com códigos antigos, da época do
> Paradox.
>
> obrigado,
>
> Leandro
>
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
>
>
>   *Yahoo! Grupos, um serviço oferecido por:*   PUBLICIDADE
> 
> --
> *Links do Yahoo! Grupos*
>
>- Para visitar o site do seu grupo na web, acesse:
>http://br.groups.yahoo.com/group/delphi-br/
>
>- Para sair deste grupo, envie um e-mail para:
>[EMAIL PROTECTED]<[EMAIL PROTECTED]>
>
>- O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
>Serviço do Yahoo! .
>
>


--
[]'s

Emerson Moreno
O grande sábio aprende por ensinar!


[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]
 
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] Problema Impressão Matricial e m EPSON FX-2190

2006-01-30 Por tôpico Welson Avelar
-x-
  Augustus Otávio Pinto escreveu:
   
  Bom dia !!!

Tenho um programa que roda em uma rede de 03 estacoes W98, e utilizo
impressao matricial 
usando as funcoes AssignFile() e WriteLn() para gravar direto para a porta
"LPT".
Funcionava perfeitamente com impressoras Epson LX300, FX 1050, 2170, 2180,
etc tanto localmente como 
pela rede.
Acontece que o pessoal comprou uma Epson FX 2190 e agora não consigo mais
imprimir localmente. 
Pela rede consigo mandar uma impressao, mas na maquina que a impressora esta
instalada não
sai nada.
Alguem teria alguma experiencia ou solucao para me passar ?

Grato.

Augustus
  -x-
  [Welson]
  http://devres.freeprohost.com/portal/index.php
   
  Dê uma olhada nesse link. Tem um componente (VDOPrint) que é muito bom pra 
impressão em matriciais.
   
  Um forte abraço.


=
"Nunca ande pelo caminho traçado, pois ele conduz somente até onde os outros já 
foram."
Alexander Graham Bell
=
Welson de Avelar Soares Filho
Programador Delphi
Gemini Sistemas

Juiz de Fora - Minas Gerais
=

-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

[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]
 
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] Campo BOOLEAN no Firebird

2006-01-30 Por tôpico Leandro
Pessoal,

Tem algum tipo de campo no Firebird que o delphi reconheça como
TBooleanField?
Preciso disso para compatibilidade com códigos antigos, da época do Paradox.

obrigado,

Leandro



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

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

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

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

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

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

 




[delphi-br] Re: Programação OO duvida..

2006-01-30 Por tôpico Thiago Oliveira
O erro exatamante é que não tem o "campo não tem arquivo"...

Valeu..

Em 30/01/06, Thiago Oliveira <[EMAIL PROTECTED]> escreveu:
>
> Galera,
>
> Estou com uma dificuldade, em um ponto em meus estudos. No Create dessa
> Classe está dando um erro... O Erro é quando o objeto Fcodigo recebe algum
> valor, dá que o arquivo está vazio. Então cheguei a conclusão de que a
> criação desses objetos está errada
>
> Está assim essa parte... Se ouderem me ajudar agradeço...
>
> constructor TCliente.Create;
> begin
>  (...)
>  //Em cada um faço isso : Criar Objeto e Configura o mesmo
>  Fcodigo := TIntegerField.Create(Fcodigo);
>  Fcodigo.DisplayLabel := 'Código';
>  Fcodigo.FieldName := 'CODIGO';
>
>
>
>  Aqui está a Classe 
> type
>   TCliente = class(TTabela_OOP)
>   private
> Fcodigo: TIntegerField;
> Fnome: TStringField;
> Fcidade: TStringField;
> Fendereco: TStringField;
> Festado: TStringField;
> Fbairro: TStringField;
> Fcep: TStringField;
>   public
> constructor Create;
> destructor Destroy; override;
>
> property codigo : TIntegerField read Fcodigo write Fcodigo;
> property nome : TStringField read Fnome write Fnome;
> property endereco : TStringField read Fendereco write Fendereco;
> property bairro : TStringField read Fbairro write Fbairro;
> property cidade : TStringField read Fcidade write Fcidade;
> property estado : TStringField read Festado write Festado;
> property cep : TStringField read Fcep write Fcep;
>
> procedure Localizar_Clientes;
> procedure Recebe_Valores;
> procedure Envia_Valores;
> procedure Inicializa_Valores;
>   end;


[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]
 
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] Problema Impressão Matricial em EPSON FX-2190

2006-01-30 Por tôpico Augustus Otávio Pinto
Bom dia !!!

Tenho um programa que roda em uma rede de 03 estacoes W98, e utilizo
impressao matricial 
usando as funcoes AssignFile() e WriteLn() para gravar direto para a porta
"LPT".
Funcionava perfeitamente com impressoras Epson LX300, FX 1050, 2170, 2180,
etc tanto localmente como 
pela rede.
Acontece que o pessoal comprou uma Epson FX 2190 e agora não consigo mais
imprimir localmente. 
Pela rede consigo mandar uma impressao, mas na maquina que a impressora esta
instalada não
sai nada.
Alguem teria alguma experiencia ou solucao para me passar ?

Grato.

Augustus

-- 
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.375 / Virus Database: 267.14.23/243 - Release Date: 27/01/2006
 



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

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

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

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

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

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

 





[delphi-br] Programação OO duvida..

2006-01-30 Por tôpico Thiago Oliveira
Galera,

Estou com uma dificuldade, em um ponto em meus estudos. No Create dessa
Classe está dando um erro... O Erro é quando o objeto Fcodigo recebe algum
valor, dá que o arquivo está vazio. Então cheguei a conclusão de que a
criação desses objetos está errada

Está assim essa parte... Se ouderem me ajudar agradeço...

constructor TCliente.Create;
begin
 (...)
 //Em cada um faço isso : Criar Objeto e Configura o mesmo
 Fcodigo := TIntegerField.Create(Fcodigo);
 Fcodigo.DisplayLabel := 'Código';
 Fcodigo.FieldName := 'CODIGO';



 Aqui está a Classe 
type
  TCliente = class(TTabela_OOP)
  private
Fcodigo: TIntegerField;
Fnome: TStringField;
Fcidade: TStringField;
Fendereco: TStringField;
Festado: TStringField;
Fbairro: TStringField;
Fcep: TStringField;
  public
constructor Create;
destructor Destroy; override;

property codigo : TIntegerField read Fcodigo write Fcodigo;
property nome : TStringField read Fnome write Fnome;
property endereco : TStringField read Fendereco write Fendereco;
property bairro : TStringField read Fbairro write Fbairro;
property cidade : TStringField read Fcidade write Fcidade;
property estado : TStringField read Festado write Festado;
property cep : TStringField read Fcep write Fcep;

procedure Localizar_Clientes;
procedure Recebe_Valores;
procedure Envia_Valores;
procedure Inicializa_Valores;
  end;


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