[delphi-br] Impressora Matricial USB

[jairazambuja]

Alguém sabe me informar como faço para saber se uma impressora(paralela) 
matricial instalada em um adaptador paralelo > USB esta pronta para imprimir?

Na Lpt1 é fácil, mas estes adaptadores paralelo > USB, instala uma porta 
virtual que eu não consigo identificar no sistema.  

Minha empresa comprou varios computadores da Dell que não tem porta serial nem 
paralela, então preciso usar adaptadres USB, como imprimo nota fiscal em modo 
texto, direto para impresora, preciso ler o status da mesma. 

 

Re: [delphi-br] [DICA] Meus Exemplos

[EmbarcaDelphi]

Ow Rubem, o utilitário "ClearSetupPassword" você disponibilizou os 
fontes para ser usado em qual versão do Delphi?

blz


Rubem Nascimento da Rocha escreveu:
>
>
>
> Acredito que não seja do conhecimento de todos, mas eu tb coloco 
> colaborações nas áreas de arquivos da lista de discussão. Espero q 
> elas possam um dia serem úteis a vocês.
>
> Na área de arquivos da lista delphi-br, postei os seguintes exemplos:
>
> TimerMsgBox.zip
> Exemplo de MessageBox com timer, ilustrando outras técnicas 
> interessantes de programação em Delphi
>
> Sample.zip
> Exemplo de função que procura qual o controle usado para editar um 
> campo de um dataset. O exemplo também mostra como ajustar o foco para 
> o controle encontrado.
>
> Entrada de Dados Sem Letras Acentuadas.zip
> Exemplo estúpidamente simples de como evitar digitação de caracteres 
> acentuados ao utilizar controles data-aware.
>
> ClearSetupPassword.zip
> Utilitário escrito em Delphi 7 para limpar a senha do Setup do 
> computador. Este utilitário roda somente em ambientes NT 
> (NT/2000/XP/2003/etc). Bom proveito.
>
> Na pasta Exemplos da área de arquivos da lista delphi-br, postei os 
> seguintes exemplos:
>
> Cronometro e DBGrid.rar
> Exemplo de como mostrar uma coluna de cronômetro em um dataset e este 
> ser visualizado em um DBGrid e atualizado via TTimer.
>
> DBGrid e ProgressBar.rar
> Exemplo de como implementar o efeito de uma barra de progresso em um 
> DBGrid sem a necessidade de usar o componente TProgressBar.
>
> Sds.,
>
> Rubem Rocha
>
> Manaus, AM
>
>
> 

Re: [delphi-br] [off-topic] Será que posso faz er isso ???

[Ricardo César Cardoso]

Poxa, Daniel... isso já ajuda BASTANTE! 

Valeu a dica! Vou testar.

[]'s
Ricardo.

1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.

2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor 
compreendida.

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

--- Em qui, 9/7/09, Daniel Augusto Bastos  escreveu:

De: Daniel Augusto Bastos 
Assunto: Re: [delphi-br] [off-topic] Será que posso fazer isso ???
Para: delphi-br@yahoogrupos.com.br
Data: Quinta-feira, 9 de Julho de 2009, 17:29
















  
  http://www.geek. com.br/blogs/ 832697632/ posts/10397- maquina-virtual- 
virtualbox- 3-ganha-suporte- a-graficos- 3d



Ainda não é a melhor coisa do mundo, mas as coisas estão começando a

caminhar :)



Abs

Daniel Augusto Bastos



2009/7/9 Ricardo César Cardoso 



> Meu ponto de vista é o seguinte (partindo do princípio que o s/w é

> legalizado):

>

> * Se está rodando sob o mesmo hardware físico, não importa se há uma

> máquina virtual em pararelo, é legal. Inclusive é o que faço como ambiente

> de testes. Deixo uma máquina virtual com o Windows SP2 e outra com SP3,

> ambos limpos (sem nenhum outro s/w instalado) e coloco meus sistemas para

> testar lá. Quando quero avaliar algum software também uso do mesmo

> expediente. Acabou o período de avaliação, basta excluir a VM e restaurar o

> backup limpo e zerado, sem ter que ficar instalando e desinstalando software

> do hardware principal.

>

> Pena que não dê pra virtualizar o ambiente para jogos... mas aí a conversa

> sai do escopo.

>

> []'s

> Ricardo.

>

> 1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.

>

> 2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor

> compreendida.

>

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

>

> --- Em qua, 8/7/09, Luiz Escobar  escreveu:

>

> AH tá...  isso eu já sei o que quero mesmo saber é se posso fazer isso

> sem me causar problemas tipo PIRATARIA... .

>

> Tenho meu Windows instalado com seu numero de série certinho, agora quero

> instalar o VirtualBOX e instalar ele novamente, com o mesmo numero em uma

> maquina virtual para eventuais testes de sistemas...  não sei se isso seria

> considerado PIRATARIA... .  Já que estou usando os dois na mesma maquina e

> os dois serão usados por iEU e mais ninguém.

>

> []s

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>

>   _ _ _ _ _ _

> Veja quais são os assuntos do momento no Yahoo! +Buscados

> http://br.maisbusca dos.yahoo. com

>

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

>

>

>

>  - - --

>

> --

> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

>

>

>

>



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




 

  




 

















  

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

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

[delphi-br] Res:Como rodar uma aplicação feita em Delphi 2009 ? NOVO ERRO!!

[RICARDO]

Tentei seguir os conselhos passados pelos amigos da lista ... e agora surgiu
um novo erro !

Coloquei todos os arquivos manualmente (Exe e DLLs) e instalei o firebird
2.1 

na máquina cliente que não possui o Delphi 2009 instalado!

 

Agora qdo tento rodar o programa  a mensagem de erro que dah eh :

 

ERROR READING CONNECT...DRIVER NAME : CANNOT FIND CONNECTION FILES FROM
APPLICATION

DIRECTORY (C:\..) OR THE SYSTEM REGISTRY
(\SOFTWARE\CODGEAR\BDS\6.0\DBEXPRESS)

 

Já faz 4 dias que procuro no google e em fóruns e nada da certo 

:?

 

O que será que esta faltando ?

 

 



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

Re: [delphi-br] [off-topic] Será que posso fazer is so ???

[Leandro]

acho q a licença eh por maquina.. n importa se vc tem 1 ou 2 HD com o
windows instalado

2009/7/9 Eduardo Silva dos Santos 

>
>
> Luiz, teoricamente você estará violando a licença, pois estará com o mesmo
> windows sendo executado duas vezes.. porém na mesma máquina. ai fica a
> dúvida.. sinceramente, melhor você dar uma ligada pra MS, pior que na
> dúvida
> o atendente vai falar pra você comprar outra licença.
>
> Att,
> ...
> Eduardo Silva dos Santos
> DRD SISTEMAS
> (27) 3218-4201
> (27) 9961-7095
> MSN: eduardo@gmail.com 
> Site: http://www.drdsistemas.com.br/
> ...
>
> 2009/7/8 Luiz Escobar 
> 
> >
>
> >
> >
> > AH tá... isso eu já sei o que quero mesmo saber é se posso fazer isso
> > sem me causar problemas tipo PIRATARIA
> > Tenho meu Windows instalado com seu numero de série certinho, agora quero
> > instalar o VirtualBOX e instalar ele novamente, com o mesmo numero em uma
> > maquina virtual para eventuais testes de sistemas... não sei se isso
> seria
> > considerado PIRATARIA Já que estou usando os dois na mesma maquina e
> os
> > dois serão usados por iEU e mais ninguém.
> > []s
> >
> > From: Daniel Sobrinho Laporte
> > Sent: Wednesday, July 08, 2009 6:50 PM
> > To: delphi-br@yahoogrupos.com.br  40yahoogrupos.com.br>
> > Subject: Re: [delphi-br] [off-topic] Será que posso fazer isso ???
> >
> > Olá Luiz, pode fazer que funciona sem problemas. Eu uso dessa maneira e
> > roda
> > que é uma maravilha!
> >
> > []'s
> >
> > Daniel
> >
> > 2009/7/8 Luiz Escobar 
> > 
> 
> > >
> >
> > >
> > >
> > > Olá gente, to pensando aqui com meus Buttons
> > > Será que posso instalar o VB (VirtualBOX) na minha maquina e instalar o
> > meu
> > > Windows dentro dele com o mesmo numero/serial, só pra ter um Windows
> > limpo
> > > para fazer testes, etc e tal ou vou precisar comprar uma licença só
> > pra
> > > isso 
> > >
> > > Minha maquina suporta... tem 4GB (XP só enxerga 3GB), é um Core 2 QUAD
> e
> > já
> > > roda o OpenSUSE 11.1 dentro do meu XP só pra fazer testes, tenho o Win7
> > (a
> > > versão que saiu pra testes) e agora queria por o XP também, ah
> tenho
> > o
> > > Ubuntum 9.04 tmbm...
> > >
> > > []s
> > > Luiz Escobar - http://www.megasistema.com.br
> > > 
> > > Harbour 2.0.0beta1(Rev.11414) (DbfNtx+MySQL)
> > > MiniGUI 1.6 Extended (Build 69)-2009.06.25
> > > BCC 5.8.2 (Turbo C++ Explorer 2006)
> > > 
> > > XAMPP 1.7.1 (Apache+MySQL+PHP+(Linux/Win))
> > > FLEX 3.0 (iniciante)
> > > 
> > > Delphi ( 6 PRO & 7 Ent ) (DBF/NTX+MySQL)
> > > 
> > >
> > > [As partes desta mensagem que não continham texto foram removidas]
> > >
> > >
> > >
> >
> > --
> > Daniel Sobrinho Laporte
> > Analista de Sistemas e Desenvolvedor Delphi + Firebird.
> > Colunista e Editor Técnico ClubeDelphi - DevMedia.
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
Leandro, MuTukA


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

Re: [delphi-br] Validacao de PIS

[Ulisses]

Boa tarde!

Já tentou usar o ACBRValidador?

Baixa o pacote de componentes da ACBR e utiliza esse componente.

Boa sorte.

Ulisses
  - Original Message - 
  From: Eny Urias 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, July 07, 2009 1:41 PM
  Subject: Res: [delphi-br] Validacao de PIS





  eu tb achei essa funcao... mas nao funciona no Delphi 2007... isso sem falar 
que essa funcao nao prevê a digitação de um numero diferente de digitos... 

  mesmo assim obrigada pela atencao

  
  De: Alisson Yahoo 
  Para: delphi-br@yahoogrupos.com.br
  Enviadas: Terça-feira, 7 de Julho de 2009 12:57:40
  Assunto: Re: [delphi-br] Validacao de PIS

  Pra que componente? É uma rotina muito simples. Pesquisei na internet e 
  achei uma função pra validar PIS:

  function TForm1.ConferePis( sPis: String): Boolean;
  var i, iSoma, iAux, iDigito: Integer;
  begin
  iSoma := 0;
  iAux := 2;
  for i := 1 to 10 do
  begin
  iSoma := iSoma + (iAux * StrToInt(Copy( sPis, 11-i, 1)));
  if iAux < 9 then
  iAux := iAux+1
  else
  iAux := 2;
  end;

  iDigito := 11 - (iSoma mod 11);
  if iDigito > 9 then
  iDigito := 0;

  Result := StrToInt(Copy( sPis, 11, 1)) = iDigito;
  if not Result then
  MessageDlg(' Pis inválido!', mtWarning, [mbOK], 0);
  end;

  Eu tenho essa outra pra conferir CPF. Eu chamo no evento OnExit do 
  componente:

  function ConfereCPF(Edit : TCustomEdit) : Boolean;
  var n1,n2,n3,n4, n5,n6,n7, n8,n9,d1, d2: Integer;
  Digitado, Calculado, Num : String;
  begin
  ConfereCpf := True;
  Num := Edit.Text;
  Num := StringReplace( Num, '.', '', [rfReplaceAll] );
  Num := StringReplace( Num, '-', '', [rfReplaceAll] );
  Num := StringReplace( Num, '_', '', [rfReplaceAll] );

  if (Trim(Num) <> '') then
  begin
  n1 := StrToInt (Num[1]);
  n2 := StrToInt (Num[2]);
  n3 := StrToInt (Num[3]);
  n4 := StrToInt (Num[4]);
  n5 := StrToInt (Num[5]);
  n6 := StrToInt (Num[6]);
  n7 := StrToInt (Num[7]);
  n8 := StrToInt (Num[8]);
  n9 := StrToInt (Num[9]);

  d1 := n9*2+n8*3+n7* 4+n6*5+n5* 6+n4*7+n3* 8+n2*9+n1* 10;
  d1 := 11 - (d1 mod 11);

  if (d1 >= 10) then
  d1 := 0;

  d2:=d1*2+n9* 3+n8*4+n7* 5+n6*6+n5* 7+n4*8+n3* 9+n2*10+n1* 11;
  d2:=11-(d2 mod 11);

  if (d2 >= 10) then
  d2:=0;

  Calculado := IntToStr(d1) + IntToStr (d2);
  Digitado := Num[10] + Num[11];
  ConfereCpf := Calculado = Digitado;
  if (Calculado <> Digitado) then
  begin
  Edit.SetFocus;
  raise exception.Create( 'CPF não confere!');
  end;
  end;
  end;

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

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

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



  

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

Re: [delphi-br] [off-topic] Será que posso fazer isso ???

[toninhoeleote...@gmail.com]

E porque não usar o Virtual PC. Uso faz um tempão e é show de bola.
Pode usar também o esquema de fazer 2 partições no seu PC e depois criar 
um ghost e voltar sempre que precisar a partição C. Eu particularmente 
acho que dá mais trabalho do que Máquina Virtual .

abs.
Toninho

Re: [delphi-br] Pesquisa completa

[Josinaldo]

uso o ACCESS 
alguem sabe mim dizer se ele tem essa funcionalidade ou terei que fazer isso no 
delphi


  - Original Message - 
  From: Daniel Augusto Bastos 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, July 09, 2009 2:45 AM
  Subject: Re: [delphi-br] Pesquisa completa





  Os bancos de dados normalmente ficam responsáveis por esta tarefa.
  Normalmente este tipo de pesquisa de fica de forma transparente a sua
  aplicação. Claro, supondo que o banco que vc usa tenha suporte.
  verifique se o Banco de Dados que vc usa tem suporte pois, com toda a
  certeza, vc terá perda de desempenho fazendo uma solução por software.

  Abs
  Daniel Augusto Bastos

  2009/7/8 Leandro 

  > sei q pra banco de dados existe uma funcao tbm q substitui os caracteres
  > especiais mas n lembro o nome da funcao..
  >
  > 2009/7/8 nillgolv 
  >
  > >
  > >
  > >
  > >
  > > Coloque um TEdit no form e no evento OnChange digite:
  > >
  > > SuaTabela.IndexName :='iNOME';
  > > SuaTabela.FindNearest ([Edit1.Text]);
  > >
  > > Em 08/07/2009 12:20, sudscript < sudscr...@yahoo.com.br 40yahoo.com.br>> escreveu:
  > >
  > > Ola pessoal bom, dia!!
  > > gostaria da ajuda de vcs emuma questao que tenho aqui
  > > é o seguinte um cliente meu gostaria de inclementar num sistema que fiz
  > pra
  > >
  > > ele uma pesquisa onde ele digistasse JOAO e aparecesse todos os joao
  > > cadastrados tanto com acento como sem aceento
  > > mais o que eu tinha feito pra ele so localiza de acordo com o que se
  > > escreve
  > > alguem ja fez algo assim?
  > > que possa mim ajudar?
  > >
  > >
  > >
  >
  >
  >
  > --
  > Leandro, MuTukA
  >
  >
  > [As partes desta mensagem que não continham texto foram removidas]
  >
  >
  >
  > 
  >
  > --
  > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
  >
  >
  >
  >

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



  

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

Re: [delphi-br] erro clientdataset

[felipe govoni]

sim o campo e auto incremento, vou ter q colocar esse valor manualmente?
pois a aplicação vai ser varios usuarios incluindo registros ao mesmo tempo,
tenho
medo q de algo errado.



2009/7/9 Daniel Augusto Bastos 

>
>
> Como é a geração da sua chave primária?
> Se for auto-incrementável pelo banco, com certeza não irá aparecer.
> O TClientDataSet trabalha gerenciando localmente os seus dados (mesmo apos
> o
> post) para obter um melhor desempenho ..
> a comunicação com o banco é feita realmente quando vc usa o apply. É nesta
> hora que é gerado o seu ID, pois é a hora que ele realmente grava os dados.
> Para fins de testes, e se a sua chave primária no seu banco está setada
> para
> auto incrementável, tente atribuir um valor qualquer no field da sua chave
> primária.
>
> Abs
> Daniel Augusto Bastos
>
> 2009/7/9 felipe govoni 
> >
>
>
> > boa tarde
> >
> > estou sando delphi 2007 + mysql 5.1
> > o grupo query clientdataset + datasetprovider + datasource
> > esta tudo configurado correto pois estou seguindo uma videoaula da
> > devmedia,
> > porem
> > quando salvo, nao aparece a chave primaria e obviamente na hora do
> > applyupdate da erro
> > pois esta dizendo que a chave primaria esta null.
> >
> >
> > alguem sabe oq pode se?
> >
> >
> >
> >
> > --
> > Felipe Govoni
> > -
> > GOVONI Sistemas
> > Fone 8472-8718
> > www.govoni.com.br
> >
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
> > 
> >
> > --
> > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> >
> >
> >
> >
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
Felipe Govoni
-
GOVONI Sistemas
Fone 8472-8718
www.govoni.com.br


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

Re: [delphi-br] [off-topic] Será que posso fazer is so ???

[Daniel Augusto Bastos]

http://www.geek.com.br/blogs/832697632/posts/10397-maquina-virtual-virtualbox-3-ganha-suporte-a-graficos-3d

Ainda não é a melhor coisa do mundo, mas as coisas estão começando a
caminhar :)

Abs
Daniel Augusto Bastos


2009/7/9 Ricardo César Cardoso 

> Meu ponto de vista é o seguinte (partindo do princípio que o s/w é
> legalizado):
>
> * Se está rodando sob o mesmo hardware físico, não importa se há uma
> máquina virtual em pararelo, é legal. Inclusive é o que faço como ambiente
> de testes. Deixo uma máquina virtual com o Windows SP2 e outra com SP3,
> ambos limpos (sem nenhum outro s/w instalado) e coloco meus sistemas para
> testar lá. Quando quero avaliar algum software também uso do mesmo
> expediente. Acabou o período de avaliação, basta excluir a VM e restaurar o
> backup limpo e zerado, sem ter que ficar instalando e desinstalando software
> do hardware principal.
>
> Pena que não dê pra virtualizar o ambiente para jogos... mas aí a conversa
> sai do escopo.
>
> []'s
> Ricardo.
>
> 1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.
>
> 2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor
> compreendida.
>
> 3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!
>
> --- Em qua, 8/7/09, Luiz Escobar  escreveu:
>
> AH tá...  isso eu já sei o que quero mesmo saber é se posso fazer isso
> sem me causar problemas tipo PIRATARIA... .
>
> Tenho meu Windows instalado com seu numero de série certinho, agora quero
> instalar o VirtualBOX e instalar ele novamente, com o mesmo numero em uma
> maquina virtual para eventuais testes de sistemas...  não sei se isso seria
> considerado PIRATARIA... .  Já que estou usando os dois na mesma maquina e
> os dois serão usados por iEU e mais ninguém.
>
> []s
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>  
> 
> Veja quais são os assuntos do momento no Yahoo! +Buscados
> http://br.maisbuscados.yahoo.com
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> 
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
>


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

Re: [delphi-br] erro clientdataset

[Daniel Augusto Bastos]

Como é a geração da sua chave primária?
Se for auto-incrementável pelo banco, com certeza não irá aparecer.
O TClientDataSet trabalha gerenciando localmente os seus dados (mesmo apos o
post) para obter um melhor desempenho ..
a comunicação com o banco é feita realmente quando vc usa o apply. É nesta
hora que é gerado o seu ID, pois é a hora que ele realmente grava os dados.
Para fins de testes, e se a sua chave primária no seu banco está setada para
auto incrementável, tente atribuir um valor qualquer no field da sua chave
primária.

Abs
Daniel Augusto Bastos


2009/7/9 felipe govoni 

> boa tarde
>
> estou sando delphi 2007 + mysql 5.1
> o grupo query clientdataset + datasetprovider + datasource
> esta tudo configurado correto pois estou seguindo uma videoaula da
> devmedia,
> porem
> quando salvo, nao aparece a chave primaria e obviamente na hora do
> applyupdate da erro
> pois esta dizendo que a chave primaria esta null.
>
>
> alguem sabe oq pode se?
>
>
>
>
> --
> Felipe Govoni
> -
> GOVONI Sistemas
> Fone 8472-8718
> www.govoni.com.br
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> 
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
>


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

[delphi-br] Abrir o Comprovante Não Fiscal Vinculado. ELGIN FIT 1E

[julianoinfo]

Boa tarde senhores
Tenho 3 clientes que tem a ELGIN FIT 1E
e não consigo nem pela DLL nem pelo ACBr Abrir o Comprovante Não Fiscal 
Vinculado.
ele me retorna o seguinte erro Índice do Meio de Pagamento no cupom inválido.

algum colega já passou por isso ou faz idéia de como resolver esse problema

Grato pela Atenção
Juliano Pereira dos Santos

[delphi-br] erro clientdataset

[felipe govoni]

boa tarde

estou sando delphi 2007 + mysql 5.1
o grupo query clientdataset + datasetprovider + datasource
esta tudo configurado correto pois estou seguindo uma videoaula da devmedia,
porem
quando salvo, nao aparece a chave primaria e obviamente na hora do
applyupdate da erro
pois esta dizendo que a chave primaria esta null.


alguem sabe oq pode se?




-- 
Felipe Govoni
-
GOVONI Sistemas
Fone 8472-8718
www.govoni.com.br


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

Re: [delphi-br] [off-topic] Será que posso faz er isso ???

[Ricardo César Cardoso]

Meu ponto de vista é o seguinte (partindo do princípio que o s/w é legalizado): 

* Se está rodando sob o mesmo hardware físico, não importa se há uma máquina 
virtual em pararelo, é legal. Inclusive é o que faço como ambiente de testes. 
Deixo uma máquina virtual com o Windows SP2 e outra com SP3, ambos limpos (sem 
nenhum outro s/w instalado) e coloco meus sistemas para testar lá. Quando quero 
avaliar algum software também uso do mesmo expediente. Acabou o período de 
avaliação, basta excluir a VM e restaurar o backup limpo e zerado, sem ter que 
ficar instalando e desinstalando software do hardware principal.

Pena que não dê pra virtualizar o ambiente para jogos... mas aí a conversa sai 
do escopo.

[]'s
Ricardo.

1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.

2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor 
compreendida.

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

--- Em qua, 8/7/09, Luiz Escobar  escreveu:

AH tá...  isso eu já sei o que quero mesmo saber é se posso fazer isso sem 
me causar problemas tipo PIRATARIA... .

Tenho meu Windows instalado com seu numero de série certinho, agora quero 
instalar o VirtualBOX e instalar ele novamente, com o mesmo numero em uma 
maquina virtual para eventuais testes de sistemas...  não sei se isso seria 
considerado PIRATARIA... .  Já que estou usando os dois na mesma maquina e os 
dois serão usados por iEU e mais ninguém.

[]s

 

















  

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

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

RES: [Bulk] Re: [delphi-br] <<< Padronizaç ão de Código - Software / Ferramenta >>>

[Juliano Silva - Yahoo]

Vinicius, obrigado

 

Um pouco antes de você enviar eu tinha acabado de achar esse camarada,
ajudou bastante... 

 

Obrigado

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Vinicius A. Santos
Enviada em: quarta-feira, 8 de julho de 2009 14:38
Para: delphi-br@yahoogrupos.com.br
Assunto: [Bulk] Re: [delphi-br] <<< Padronização de Código - Software /
Ferramenta >>>

 






Veja se isto ajuda
http://www.aew.wur.nl/UK/Delforexp/

Juliano Silva - Yahoo escreveu:
>
>
> Pessoal, boa tarde
>
> Alguem CONHECE algum software ou ferramenta que faz PADRONIZAÇÃO DE CÓDIGO
> em Delphi? Trabalhamos em vários programadores, temos um padrão e está
> funcionando bem, o problema é que o sistema é muito grande e o código 
> antigo
> está todo bagunçado, então queríamos organizar...
>
> Juliano Silva
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 

-- 
Vinicius A. Santos
www.msisolucoes.com.br





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

Re: [delphi-br] [off-topic] Será que posso fazer is so ???

[Eduardo Silva dos Santos]

Luiz, teoricamente você estará violando a licença, pois estará com o mesmo
windows sendo executado duas vezes.. porém na mesma máquina. ai fica a
dúvida.. sinceramente, melhor você dar uma ligada pra MS, pior que na dúvida
o atendente vai falar pra você comprar outra licença.

Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...


2009/7/8 Luiz Escobar 

>
>
> AH tá... isso eu já sei o que quero mesmo saber é se posso fazer isso
> sem me causar problemas tipo PIRATARIA
> Tenho meu Windows instalado com seu numero de série certinho, agora quero
> instalar o VirtualBOX e instalar ele novamente, com o mesmo numero em uma
> maquina virtual para eventuais testes de sistemas... não sei se isso seria
> considerado PIRATARIA Já que estou usando os dois na mesma maquina e os
> dois serão usados por iEU e mais ninguém.
> []s
>
> From: Daniel Sobrinho Laporte
> Sent: Wednesday, July 08, 2009 6:50 PM
> To: delphi-br@yahoogrupos.com.br 
> Subject: Re: [delphi-br] [off-topic] Será que posso fazer isso ???
>
> Olá Luiz, pode fazer que funciona sem problemas. Eu uso dessa maneira e
> roda
> que é uma maravilha!
>
> []'s
>
> Daniel
>
> 2009/7/8 Luiz Escobar 
> 
> >
>
> >
> >
> > Olá gente, to pensando aqui com meus Buttons
> > Será que posso instalar o VB (VirtualBOX) na minha maquina e instalar o
> meu
> > Windows dentro dele com o mesmo numero/serial, só pra ter um Windows
> limpo
> > para fazer testes, etc e tal ou vou precisar comprar uma licença só
> pra
> > isso 
> >
> > Minha maquina suporta... tem 4GB (XP só enxerga 3GB), é um Core 2 QUAD e
> já
> > roda o OpenSUSE 11.1 dentro do meu XP só pra fazer testes, tenho o Win7
> (a
> > versão que saiu pra testes) e agora queria por o XP também, ah tenho
> o
> > Ubuntum 9.04 tmbm...
> >
> > []s
> > Luiz Escobar - http://www.megasistema.com.br
> > 
> > Harbour 2.0.0beta1(Rev.11414) (DbfNtx+MySQL)
> > MiniGUI 1.6 Extended (Build 69)-2009.06.25
> > BCC 5.8.2 (Turbo C++ Explorer 2006)
> > 
> > XAMPP 1.7.1 (Apache+MySQL+PHP+(Linux/Win))
> > FLEX 3.0 (iniciante)
> > 
> > Delphi ( 6 PRO & 7 Ent ) (DBF/NTX+MySQL)
> > 
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
>
> --
> Daniel Sobrinho Laporte
> Analista de Sistemas e Desenvolvedor Delphi + Firebird.
> Colunista e Editor Técnico ClubeDelphi - DevMedia.
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>


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

Re: [delphi-br] Por favor me ajude!

[Walter Chagas (Bol)]

Este erro ocorreu porque a unit SqlConst.pas do seu Delphi não contem a 
constante "SDRIVERREG _SETTING" que é requerida pelo seu projeto.

Abra a unit, e adicione esta constante.

[]s
 
 
Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
wchag...@bol.com.br
http://www.geocities.com/SiliconValley/Bay/1058
http://delphitocorporerm.blogspot.com/
MSN: whitesock...@hotmail.com
SKYPE: WalterChagasJr


  - Original Message - 
  From: Adenes Junior 
  To: delphi-br@yahoogrupos.com.br ; firebird...@yahoogrupos.com.br 
  Sent: Tuesday, July 07, 2009 6:48 PM
  Subject: [delphi-br] Por favor me ajude!





  Tenho um sistema de desenvolvido em Delphi 7 e Firebird, tive que formatar a
  maquina e instalar novamente o delphi. Quando compilo o
  sistema recebo a seguinte msg de erro:

  [Fatal Error] AgendaEcoplan2007. dpr(18): Unit SqlExpr was compiled with a
  different version of SqlConst.SDRIVERREG _SETTING

  Como faço para resolver isso?

  Desde já agradeço a ajuda,

  Adenes Junior

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



  

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

Re: Res: [delphi-br] Validacao de PIS

[Evandro Siqueira]

Pessoal,

Por um descuido meu (não olho meu blog há uns 2 meses) os links do 
rapidshare estavam quebrados, mas já corrigi isso hoje.
Desculpem pelos inconvenientes.

Eny Urias escreveu:
>
>
> eu tb achei essa funcao... mas nao funciona no Delphi 2007... isso sem 
> falar que essa funcao nao prevê a digitação de um numero diferente de 
> digitos...
>
> mesmo assim obrigada pela atencao
>
> 
> De: Alisson Yahoo mailto:alssnco%40yahoo.com.br>>
> Para: delphi-br@yahoogrupos.com.br 
> Enviadas: Terça-feira, 7 de Julho de 2009 12:57:40
> Assunto: Re: [delphi-br] Validacao de PIS
>
> Pra que componente? É uma rotina muito simples. Pesquisei na internet e
> achei uma função pra validar PIS:
>
> function TForm1.ConferePis( sPis: String): Boolean;
> var i, iSoma, iAux, iDigito: Integer;
> begin
> iSoma := 0;
> iAux := 2;
> for i := 1 to 10 do
> begin
> iSoma := iSoma + (iAux * StrToInt(Copy( sPis, 11-i, 1)));
> if iAux < 9 then
> iAux := iAux+1
> else
> iAux := 2;
> end;
>
> iDigito := 11 - (iSoma mod 11);
> if iDigito > 9 then
> iDigito := 0;
>
> Result := StrToInt(Copy( sPis, 11, 1)) = iDigito;
> if not Result then
> MessageDlg(' Pis inválido!', mtWarning, [mbOK], 0);
> end;
>
> Eu tenho essa outra pra conferir CPF. Eu chamo no evento OnExit do
> componente:
>
> function ConfereCPF(Edit : TCustomEdit) : Boolean;
> var n1,n2,n3,n4, n5,n6,n7, n8,n9,d1, d2: Integer;
> Digitado, Calculado, Num : String;
> begin
> ConfereCpf := True;
> Num := Edit.Text;
> Num := StringReplace( Num, '.', '', [rfReplaceAll] );
> Num := StringReplace( Num, '-', '', [rfReplaceAll] );
> Num := StringReplace( Num, '_', '', [rfReplaceAll] );
>
> if (Trim(Num) <> '') then
> begin
> n1 := StrToInt (Num[1]);
> n2 := StrToInt (Num[2]);
> n3 := StrToInt (Num[3]);
> n4 := StrToInt (Num[4]);
> n5 := StrToInt (Num[5]);
> n6 := StrToInt (Num[6]);
> n7 := StrToInt (Num[7]);
> n8 := StrToInt (Num[8]);
> n9 := StrToInt (Num[9]);
>
> d1 := n9*2+n8*3+n7* 4+n6*5+n5* 6+n4*7+n3* 8+n2*9+n1* 10;
> d1 := 11 - (d1 mod 11);
>
> if (d1 >= 10) then
> d1 := 0;
>
> d2:=d1*2+n9* 3+n8*4+n7* 5+n6*6+n5* 7+n4*8+n3* 9+n2*10+n1* 11;
> d2:=11-(d2 mod 11);
>
> if (d2 >= 10) then
> d2:=0;
>
> Calculado := IntToStr(d1) + IntToStr (d2);
> Digitado := Num[10] + Num[11];
> ConfereCpf := Calculado = Digitado;
> if (Calculado <> Digitado) then
> begin
> Edit.SetFocus;
> raise exception.Create( 'CPF não confere!');
> end;
> end;
> end;
>
>  _ _ _ _ __
> Faça ligações para outros computadores com o novo Yahoo! Messenger
> http://br.beta. messenger. yahoo.com/
>
> __
> Veja quais são os assuntos do momento no Yahoo! +Buscados
> http://br.maisbuscados.yahoo.com 
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 

-- 
[]’s.

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





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

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

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

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

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

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

Re: [delphi-br] Pesquisa completa

[Eduardo Silva dos Santos]

Isso depende do banco e de como você faz as consultas.. o mysql trata isso
de forma transparente.. para ele João é igual JOAO
açúcar é igual a acucar.


Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...


2009/7/8 sudscript 

>
>
> Ola pessoal bom, dia!!
> gostaria da ajuda de vcs emuma questao que tenho aqui
> é o seguinte um cliente meu gostaria de inclementar num sistema que fiz pra
>
> ele uma pesquisa onde ele digistasse JOAO e aparecesse todos os joao
> cadastrados tanto com acento como sem aceento
> mais o que eu tinha feito pra ele so localiza de acordo com o que se
> escreve
> alguem ja fez algo assim?
> que possa mim ajudar?
>
>  
>


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

RE: [delphi-br] sql- selecionas os mesmos dados em duas tabelas

[Wilson, Stephen]

Ola Sergio

select codproduto,Nomeproduto, quantidade from produtoent
Union All
select codproduto,Nomeproduto, quantidade from custos
Order By (incluir o numero de coluna 'data')

Espero que ajude isso

Steve

-Original Message-
From: delphi-br@yahoogrupos.com.br
[mailto:delphi...@yahoogrupos.com.br]on Behalf Of Sergio - Jundiaí / SP
Sent: 08 July 2009 21:37
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] sql- selecionas os mesmos dados em duas tabelas






Boa tarde
alguem poderia me dar uma luz
estou querendo selecionar os mesmos dados em duas tabelas (produtoent e
custos) em ordem de data

select codproduto,Nomeproduto, quantidade from produtoent, custos
order by data

desde já agradeço

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





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