date:20090616

 

Amigos ... estou com um pequeno problema penso q seja simples ... porem p
kem esta iniciando  

Antes de me mandarem procurar no Google, já revirei tudo por lá ... ok 

Necessito selecionar os 12 ultimo s registros de uma query  

Já usei o

 

Select top 12 * from tabels desc

Select first 12 * from tabela desc

Select * from tabela desc limit 12

 

Enfim fiz varias tentativas sem êxito  donde apelo para ajuda de vcs, mais
experientes  

 

Meu BD e o DBIsam e trabalho com Delphi 7 ok 

 

Desde já agradeço 

 

 

FIOS E CABOS ENGENHARIA LTDA

CÍCERO FERNANDES

ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

CREA-SC 27.958-0

3521-2988  -  9191.6226

 http://fiosecabos.ind.br/ http://fiosecabos.ind.br -
mailto:cic...@fiosecabos.ind.br cic...@fiosecabos.ind.br

P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE! 

 



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

Re: RES: [delphi-br] OFF TOPIC: Mega Projeto

Se for coletar pelo site, não há nada de ilegal nisto visto que o meio aonde 
foi adquirida a informação é publico. Seria o mesmo caso que alguem quiser 
vender uma base de dados para Telemarketing mas que a populou a partir de dados 
obtidos no via102 ou mesmo de digitação do catalogo telefonico.



[]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: Valfrid-Ly Silva Couto 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, June 15, 2009 10:26 PM
  Subject: Re: RES: [delphi-br] OFF TOPIC: Mega Projeto





  Isso é legal?!

  --- Em seg, 15/6/09, Reinaldo Aparecido Pereira ctocv...@yahoo.com.br 
escreveu:

  De: Reinaldo Aparecido Pereira ctocv...@yahoo.com.br
  Assunto: RES: [delphi-br] OFF TOPIC: Mega Projeto
  Para: delphi-br@yahoogrupos.com.br
  Data: Segunda-feira, 15 de Junho de 2009, 12:58

  Caros,

  Estou preparando um documento detalhado para explicar o projeto e
  encaminharei à todos os interessados.

  Mas adianto, a base que desejo extrair é a de veículos do Detran-PR.

  http://celepar7.pr.gov.br/mtm/servicos/cons_multa.asp

  Essa base pode ser usada para uma infinidade de coisas. Alguns dados da
  base:

  - VEICULO

  - MARCA

  - MODELO

  - PLACA

  - RENAVAM

  - CHASSIS

  - SITUACAO (SE ESTÁ FINANCIADO, SE TEM BUSCA E APREENSÃO)

  - MULTA, (SE TEM MULTAS E QUAIS).

  Nem preciso dizer que isso tem um valor incalculável.

  Eu desejo usá-la para um site que logo concluirei de contestação de multas.

  A base será usada para que a partir de um placa eu consiga o Renavam.

  Em breve enviarei informações detalhadas.

  Assim que todos os interessados se manifestarem, envio os detalhe.

  De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
  nome de EmbarcaDelphi
  Enviada em: segunda-feira, 15 de junho de 2009 10:50
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] OFF TOPIC: Mega Projeto

  Quem quer ser laranjas? A Base de Dados são informações de contas 
  bancárias, hehehe (brincadeira)
  Estou aguadando mais informações sobre esse seu Mega Projeto

  Reginaldo escreveu:
  
  
   Meu pc de casa fica ligado 24 hs, posso contribuir, mas poderia dar 
   mais detalhes do que contem essa base de dados ?
  
   Reginaldo
  
   - Original Message -
   From: Reinaldo Aparecido Pereira
   To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
  mailto:delphi-br%40yahoogrupos.com.br
   Sent: Monday, June 15, 2009 8:56 AM
   Subject: [delphi-br] OFF TOPIC: Mega Projeto
  
   Olá amigos,
  
   Preciso de 300 voluntários para a execução de um projeto bem simples.
   Trata-se de um robô que irá baixar uma base de dados de 5 milhões de 
   linhas.
  
   Para baixar usando apenas meu computador, segundo alguns cálculos 
   levarei 1
   ano.
  
   Dessa forma, estou convidando-os para uma grande desafio. Preciso de 
   300 pcs
   rodando um aplicativo para baixar a base. Acredito que um dia à um dia e
   meio de processamento está resolvido.
  
   A base tem um valor enorme e depois de integrada, envio a cópia dela para
   cada um que participou do processo.
  
   Quaisquer dúvidas estou à total disposição.
  
   Grato,
  
   Reinaldo
  
  
   

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

  

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  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] Dúvida com Zeos

2009-06-16 Por tôpico Eduardo Silva dos Santos

Olá pessoal, oque vou falar não vai resolver o problema de vocês com Zeos,
mais é uma excelente dica..

Eu usei zeos durante anos, realmente é fantástico, mas infelizmente é um
projeto que devido a vários fatores tem suas limitações em relação a
desenvolvimento e suporte.

eu acredito que quem tem um software profissional e em produção não pode
ficar refém desse tipo de problema.

então para quem precisa de tranquilidade e um suporte à contento eu
recomendo o  Unidac  http://www.devart.com/unidac/

deem uma olhada, baixem o trial que vale a pena.

att, Eduardo.

2009/6/16 omar l m rosa o...@conesul.inf.br



 HI!

 Só para aumentar suas dúvidas

 Estou enfrentando problemas com Zeos desde a versao 6.4.4

 Voltei para a 6.2.2.rc

 Ex: a) parse de SQL, nome de tabela com delimitador [ ] não eceita
 edição fic a read only como se fosse uma view...
 b) campos identity vez que outra nao retornam novo valor à aplicacao...
 c) lentidão ao abrir o dataset

 Bai!

 º.·´¯`·. º.·´¯`·. º.·´¯`·.
 Omar L. M. Rosa
 º.·´¯`·. º.·´¯`·. º.·´¯`·.
 o...@conesul.inf.br omar%40conesul.inf.br

 - Original Message -
 From: Leonardo Quinino
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br ;
 delphitodel...@yahoogrupos.com.br DelphiToDelphi%40yahoogrupos.com.br ;
 delphi_soprogramado...@yahoogrupos.com.brDELPHI_SOPROGRAMADORES%40yahoogrupos.com.br
 Sent: Tuesday, June 16, 2009 9:47 AM
 Subject: [delphi-br] Dúvida com Zeos

 Pessoal, estou testando o Zeos LIb 6.5.5 , com Delphi 7 + Firebird 2.1
 Tive duas dúvidas.

 1) em alguns campos do tipo NUMERIC (9,2) , no banco de dados 5.55 mostra
 no componente, DBEDIT 6,00

 2) não conseguir rodar o seguinte select...

 select sum( cast( quantidade * valor_unitario as numeric( 18, 2 ) ) ) as
 Total from ITENS_VENDAS
 WHERE ID_INTERNO = '5578'

 Coloquei o mesmo select, num ClientDataSet + SQLQuery e roda beleza.

 Isso é algo da natureza do ZEOS ?

 --
 Leonardo Quinino

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

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

  




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


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

Re: [delphi-br] OFF-TOPIC - Ligação inusitada

Meu, 

Coisas deste tipo, desde quando participo de listas de discussão, já recebi um 
monte. O pior de tudo, acho, e quando te ligam totalmente fora de hora ou em 
hora totalmente inapropriada para tal. As vezes voce tá no serviço e com chefe 
do lado e vem um e te liga pra tirar dúvida de Quick Report e não sei o que...

E nao é só por telefone que rolam estas coisas não. Pior é quando te ligam em 
modo voip as 2 da matina no Skype.

 

[]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: Jackson Gomes - ToolsComps 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, June 10, 2009 4:35 PM
  Subject: [delphi-br] OFF-TOPIC - Ligação inusitada





  Hoje recebi uma ligação um pouco inusitada. Alguém me ligou perguntando se eu 
  programava em Delphi. Achei até que era proposta de trabalho :-).

  A pessoa disse estar começando a programar em Delphi, recebeu de um amigo um 
  programa de estoque, o mesmo não compilava por causa de uma unit de nome 
spin 
  não sei o quê.dcu, e se eu podia ajudá-lo a resolver isso.

  Falei que não podia ajudá-lo por telefone e que iria passar o endereço da 
lista 
  para ele pedir ajuda. Pedi pra pessoa me mandar um email mas até agora nada.

  Alguém mais aqui recebeu essa ligação? Acredito que essa pessoa deve ter pego 
  meu tel comercial aqui ou em outra lista, já que o mesmo está disponível na 
  minha assinatura (para assuntos comerciais, claro!!!).

  Bizarro :-)

  --
  Jackson Gomes
  ToolsComps - Controle de Usuários para Desenvolvedores CodeGear
  Web Site: http://www.toolsandcomps.com
  Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
  e-mail: jack...@toolsandcomps.com
  Fone: 27 3389 1138 - 8811 0324
  --
  http://jacklovesdelphi.blogspot.com - Delphi, Intraweb, etc
  --
  Devhost - Webhost para desenvolvedores Delphi
  http://www.devhost.com.br
  devh...@devhost.com.br



  

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

[delphi-br] Provide flags não estão sendo respeitados - Delphi 2007

2009-06-16 Por tôpico André Geraldo dos Santos

Pessoal,
Bom dia.

   Estou desenvolvendo uma aplicação usando o delphi 2007 + DBX + mysql
5.0.77, em um dos meus cruds tenho uma situação de cadastro mestre detalhe e
nesta situação uso nested datasets para persistir o pai e filhos no banco de
dados, um dos filhos usa um select que envolve umas 5 tabelas e todos os
campos já estão com os provide flags configurados tanto na query quanto no
cds.

  Quando tento persistir este filho é exibida uma mensagem falando que o
campo X que foi configurado para não ser persistido não existe na tabela do
crud em questão.

  Em fim erro ocorre porque o DBX não está respeitando as configurações de
provide flag que defino para os meus campos, alguém já passou por isso e
pode ajudar?



Atenciosamente,


   André Geraldo dos Santos

 Analista de Sistemas/Desenvolvedor
 Belo Horizonte / Minas Gerais
 E-mail   : andresanto...@gmail.com




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

RES: [delphi-br] Firebird Transação no Delphi

Primeira coisa, largue mão de usar esse tal de CommitRetaining(). Isso só dá 
dor de cabeça. Outra coisa, tenha em mente SEMPRE que uma transação é um 
processo atômico, ou seja, ou é tudo ou é nada.

O mais correto é fazer assim (teoricamente):

IbTransaction1.BeginTransaction();
try
  SalvarContasReceber();
  UpdateCheque;
  GeraComissão;
  IntregraBanco;
  IbTransaction1.Commit;
except
  IbTransaction1.Rollback;
end;
Sds.


De: delphi-br@yahoogrupos.com.br [delphi...@yahoogrupos.com.br] em Nome de 
Rodrigo Bevilacqua Marcondes [rodrig...@yahoo.com.br]
Enviado: terça-feira, 16 de junho de 2009 2:07
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Firebird Transação no Delphi




Olá Pessoal,

Assim: tenho minha tela de Conta a receber;
Tenho a
situação do contas a receber ( A - Aberto ou B - Baixado );
Quando mudo para
baixado preciso
- gerar comissão no conta a pagar;
- integrar com o
controle bancário
- atualizar uma tabela de cheques;

Hoje eu faça
assim :
uso o IBDataSet e no AfterPost eu faço assim
:

UpdateCheque;
IbTransaction1.CommitRetaining;

GeraComissão;
IbTransaction1.CommitRetaining;

Intregrabanco;
IbTransaction1.CommitRetaining;

mas
nem sempre funciona certo, as vezes trava no meio e uma deles não
atualiza.

Gostaria de ver com você como seria para eu fazer uma
transação ideal nesse
caso.
Ou seja como vocês garantem que salvou ,
pois esta no after post os outros
procedimentos sejam executado, e caso de
algum erro nem salve o principal.
Mas o mesmo ja salvou 
Estou meio
confuso com isso.

Teria que ser algo assim :
IniciaTransação
Salva
Contas a
Receber
UpdateCheque;
GeraComissão;
Intregrabanco;
IbTransaction1.CommitRetaining;

Qualquer
ajuda é bem vinda ..

Obrigado

Rodrigo ®¿®

.




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

RES: RES: [delphi-br] OFF TOPIC: Mega Projeto

Já que o João tocou no assunto... pra mim, isso tá cheirando a juntar um monte 
de neguinho pra poder consultar algum webservice de CEP e sair montando um 
banco de dados de CEP a partir de várias consultas.

Sds.


De: delphi-br@yahoogrupos.com.br [delphi...@yahoogrupos.com.br] em Nome de Joao 
Morais [jcmorai...@gmail.com]
Enviado: segunda-feira, 15 de junho de 2009 23:06
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] OFF TOPIC: Mega Projeto




2009/6/16 Luiz Escobar 
esco...@megasistema.com.brmailto:escobar%40megasistema.com.br

 se for legal, to dentro...

Se fosse legal, haveria um link no site para baixar a base, haveria
uma porta para conexão ao banco para leitura, haveria um webservice.
Não parece evidente?

Joao Morais


.




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

Res: [delphi-br] Cria Tabela

2009-06-16 Por tôpico Wagne®_Fix

Crie algum butão vai no Click

E eu faço assim

  try
DM.BD.BeginTrans;
with DM.sqlPadrao do begin
   limpaSQL(DM.SQLPadrao);
   Sql.Add('USE [BANCO]');
   Sql.Add('SET ANSI_NULLS ON');
   Sql.Add('SET QUOTED_IDENTIFIER ON');
   Sql.Add('SET ANSI_PADDING ON');
   Sql.Add('CREATE TABLE [dbo].[TABELA](');
   Sql.Add('[ID] [int] IDENTITY(1,1) NOT NULL, [COD] [int] NOT NULL, [ORC] 
[int] NULL, [CODP] [varchar](10) NULL,');
   Sql.Add('[DESCR] [varchar](100) NULL, [QTDE] [int] NULL, [PRECO] [float] 
NULL, [TOTAL] [float] NULL,');
   Sql.Add('CONSTRAINT [PK_TABELA] PRIMARY KEY CLUSTERED');
   Sql.Add('(');
   Sql.Add('[ID] ASC');
   Sql.Add(')WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, 
IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON 
[PRIMARY]');
   Sql.Add(') ON [PRIMARY]');
   Sql.Add('SET ANSI_PADDING OFF');
   ExecSQL;
end;
DM.BD.CommitTrans;
Application.MessageBox('Tabela Criada com 
Sucesso!','Atenção',MB_OK+MB_ICONEXCLAMATION);

except
  DM.BD.RollbackTrans;
  Application.MessageBox('Erro, Tente novamente', 'Erro', MB_OK + 
MB_ICONERROR);
  exit;
end;






De: izaias_gomes izaias_go...@yahoo.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 16 de Junho de 2009 7:51:22
Assunto: [delphi-br] Cria Tabela





Bom dia a Todos,

Desde ja agradece a atenção de vcs, amigos e o seguinte tenho um sistema feito 
em delphi 7, Firebird 1.5 e DBExpress, toda vez que tenho que dar manutenção no 
sistema tipo cria um campo novo na tabela ou uma tabela nova tenho que fazer 
isso em todos os clientes onde o sistema esta instalado, alguém poderia me dar 
um dica de como fazer isso no propria executavel?? ?. 


   


  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: [delphi-br] impressora bematech dispara o papel na hora de imprimir

2009-06-16 Por tôpico Wagne®_Fix

Tive esse problema, só mudando de componente de impressão que resolveu o meu 
problema





De: bene20032004 bene20032...@yahoo.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 15 de Junho de 2009 9:17:46
Assunto: [delphi-br] impressora bematech dispara o papel na hora de imprimir





Estou tentando imprimir em uma impressora bematech nao fiscal mp20 usando 
drives genérico só que ao final da impressão ela começa imprimir em branco sem 
parar e para parar tem que desligar ela. 
Não posso imprimir direto na lpt1.
Tem como resolver este problema ?


   


  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]

Re: [delphi-br] selecionando registros

2009-06-16 Por tôpico Nicolas

O comando está correto.

O que acontece quando você executa ?

Talvez interessante informar tambem no comando SQL por qual campo deve ser 
organizada a tabela (order by)

[]s

Alexandre



  - Original Message - 
  From: cic...@fiosecabos.ind.br 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, June 16, 2009 12:02 PM
  Subject: [delphi-br] selecionando registros







  Amigos ... estou com um pequeno problema penso q seja simples ... porem p
  kem esta iniciando  

  Antes de me mandarem procurar no Google, já revirei tudo por lá ... ok 

  Necessito selecionar os 12 'ultimo s registros de uma query  

  Já usei o

  Select top 12 * from tabels desc

  Select first 12 * from tabela desc

  Select * from tabela desc limit 12

  Enfim fiz varias tentativas sem êxito . donde apelo para ajuda de vcs, mais
  experientes  

  Meu BD 'e o DBIsam e trabalho com Delphi 7 ok 

  Desde já agradeço 

  FIOS E CABOS ENGENHARIA LTDA

  CÍCERO FERNANDES

  ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

  CREA-SC 27.958-0

  3521-2988 - 9191.6226

  http://fiosecabos.ind.br/ http://fiosecabos.ind.br -
  mailto:cic...@fiosecabos.ind.br cic...@fiosecabos.ind.br

  P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
  AMBIENTE! 

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



  

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

[delphi-br] Re: Dúvida com Zeos

2009-06-16 Por tôpico Silvio Clecio

Olá galera,

--- Em delphi-br@yahoogrupos.com.br, Leonardo Quinino leonardo.quin...@... 
escreveu
 Pessoal, estou testando o Zeos LIb 6.5.5 ,  com Delphi 7 + Firebird 
 1) em alguns campos do tipo NUMERIC (9,2) , no banco de dados 5.55  mostra
 no componente, DBEDIT 6,00

Leonardo, você já tentou buscar esse valor com algo tipo...:

---
TeuEdit.Text := TuaZQuery.FieldByName('Campo').AsCurrency;
---

... só para teste? Parece que tem um round em ação aí.
 
 2) não conseguir rodar o seguinte select...
 
 select sum( cast( quantidade * valor_unitario as numeric( 18, 2 ) ) ) as
 Total from ITENS_VENDAS
 WHERE  ID_INTERNO = '5578'

Você usa ZUpdateSQL? Se sim, esse componente estava com um bug, um brother 
(Jean Patrick) resolveu e postou para o pessoal do desenvolvimento (Esse rapaz 
vem contribuindo com muitos projetos open source, vale a pena conhecer o site 
dele [http://www.jpsoft.com.br/]).

A versão 6.6.5 me deu algumas dores de cabeça também, cheguei a voltar para a 
6.6.4, mas depois que vi os logs no SVN testei a 6.6.5 e pelo menos os bugs que 
o pessoal estava se queixando foram resolvidos.

Eu uso a versão 7 sem problemas, e vejo que é o contrário do que o pessoal 
fala: ... a evolução do Zeos é lenta pq blá...blá...blá...; pelo contrário, é 
até rápida, pois mesmo sendo um produto open source, onde trabalha quem quer e 
quando pode, o interesse dos desenvolvedores em deixar o Zeos estável para 
Delphi/Lazarus/N-Bancos é respeitável.
---
[]'s, Silvio Clécio
---
Linux User: #481900
Gmail, GTalk: silviop...@gmail.com
E-mail, Y! Messenger: silviop...@yahoo.com.br
BlogSite: http://silvioprog.blogspot.com/
BlogSpot: http://silvioclecio.blogspot.com/
VirtualDriver: http://silvioprog.4shared.com/
°oO| Seja livre, use Linux! |Oo°

RES: RES: [delphi-br] OFF TOPIC: Mega Projeto

2009-06-16 Por tôpico TI - Metalurgica Jano

Estou dentro amigo.

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Luiz Escobar
Enviada em: terça-feira, 16 de junho de 2009 00:37
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] OFF TOPIC: Mega Projeto

 






se for legal, to dentro...
[]s
Luiz Escobar

From: Valfrid-Ly Silva Couto 
Sent: Monday, June 15, 2009 10:26 PM
To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br  
Subject: Re: RES: [delphi-br] OFF TOPIC: Mega Projeto

Isso é legal?!

--- Em seg, 15/6/09, Reinaldo Aparecido Pereira ctocv...@yahoo.com.br
mailto:ctocvl_1%40yahoo.com.br  escreveu:

De: Reinaldo Aparecido Pereira ctocv...@yahoo.com.br
mailto:ctocvl_1%40yahoo.com.br 
Assunto: RES: [delphi-br] OFF TOPIC: Mega Projeto
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
Data: Segunda-feira, 15 de Junho de 2009, 12:58

Caros,

Estou preparando um documento detalhado para explicar o projeto e
encaminharei à todos os interessados.

Mas adianto, a base que desejo extrair é a de veículos do Detran-PR.

http://celepar7.pr.gov.br/mtm/servicos/cons_multa.asp

Essa base pode ser usada para uma infinidade de coisas. Alguns dados da
base:

- VEICULO

- MARCA

- MODELO

- PLACA

- RENAVAM

- CHASSIS

- SITUACAO (SE ESTÁ FINANCIADO, SE TEM BUSCA E APREENSÃO)

- MULTA, (SE TEM MULTAS E QUAIS).

Nem preciso dizer que isso tem um valor incalculável.

Eu desejo usá-la para um site que logo concluirei de contestação de multas.

A base será usada para que a partir de um placa eu consiga o Renavam.

Em breve enviarei informações detalhadas.

Assim que todos os interessados se manifestarem, envio os detalhe.

De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de EmbarcaDelphi
Enviada em: segunda-feira, 15 de junho de 2009 10:50
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
Assunto: Re: [delphi-br] OFF TOPIC: Mega Projeto

Quem quer ser laranjas? A Base de Dados são informações de contas 
bancárias, hehehe (brincadeira)
Estou aguadando mais informações sobre esse seu Mega Projeto

Reginaldo escreveu:


 Meu pc de casa fica ligado 24 hs, posso contribuir, mas poderia dar 
 mais detalhes do que contem essa base de dados ?

 Reginaldo

 - Original Message -
 From: Reinaldo Aparecido Pereira
 To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
 Sent: Monday, June 15, 2009 8:56 AM
 Subject: [delphi-br] OFF TOPIC: Mega Projeto

 Olá amigos,

 Preciso de 300 voluntários para a execução de um projeto bem simples.
 Trata-se de um robô que irá baixar uma base de dados de 5 milhões de 
 linhas.

 Para baixar usando apenas meu computador, segundo alguns cálculos 
 levarei 1
 ano.

 Dessa forma, estou convidando-os para uma grande desafio. Preciso de 
 300 pcs
 rodando um aplicativo para baixar a base. Acredito que um dia à um dia e
 meio de processamento está resolvido.

 A base tem um valor enorme e depois de integrada, envio a cópia dela para
 cada um que participou do processo.

 Quaisquer dúvidas estou à total disposição.

 Grato,

 Reinaldo


 

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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]





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

[delphi-br] Profissional com 20 anos de experiencia

2009-06-16 Por tôpico carloshteles

Bom dia a todos!

Tenho Grande experiência em desenvolvimento, estou com algum tempo livre e 
procuro trabalhos freelancer, caso interesse meu curriculum encontra-se no link 
abaixo.

http://www.4shared.com/dir/13941020/2531f87d/Publicos.html

Abraços

-
Carlos H. S. Teles
Analista/Desenvolvedor de sistema

celular - (047)9618-0364
msn - carloshte...@hotmail.com
talk - carloshte...@gmail.com
Skipe - carloshteles

Re: RES: [delphi-br] OFF TOPIC: Mega Projeto

2009-06-16 Por tôpico EmbarcaDelphi

É porisso que existem tantos LARANJAS no mundo!
Meu Deus!

Joao Morais escreveu:


 2009/6/16 Luiz Escobar esco...@megasistema.com.br 
 mailto:escobar%40megasistema.com.br
 
  se for legal, to dentro...

 Se fosse legal, haveria um link no site para baixar a base, haveria
 uma porta para conexão ao banco para leitura, haveria um webservice.
 Não parece evidente?

 Joao Morais

 .

RES: RES: [delphi-br] OFF TOPIC: Mega Projeto

2009-06-16 Por tôpico Iran Lima

Já existe um banco de dados de CEP para download.

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Rubem Rocha
Enviada em: terça-feira, 16 de junho de 2009 10:58
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: RES: [delphi-br] OFF TOPIC: Mega Projeto
Prioridade: Alta

 






Já que o João tocou no assunto... pra mim, isso tá cheirando a juntar um
monte de neguinho pra poder consultar algum webservice de CEP e sair
montando um banco de dados de CEP a partir de várias consultas.

Sds.


De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[delphi...@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br ] em
Nome de Joao Morais [jcmorai...@gmail.com mailto:jcmoraisjr%40gmail.com ]
Enviado: segunda-feira, 15 de junho de 2009 23:06
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
Assunto: Re: RES: [delphi-br] OFF TOPIC: Mega Projeto

2009/6/16 Luiz Escobar esco...@megasistema.com.br
mailto:escobar%40megasistema.com.br mailto:escobar%40megasistema.com.br

 se for legal, to dentro...

Se fosse legal, haveria um link no site para baixar a base, haveria
uma porta para conexão ao banco para leitura, haveria um webservice.
Não parece evidente?

Joao Morais

.

[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] Chamar Form a partir de uma thread

2009-06-16 Por tôpico Alexandre Rodrigues

1)if contador = valor then
 Syncronize(ChamarForm);
2)While not Terminated do
begin
...
if Condicao then
   Break; //Encerra a execução da Thread
end;

3) Não entendi, que estado thread tu quer pegar?

Magnun Oliveira escreveu:
 
 
 
 Ola a todos.
 
 Tenho um programa q executa umas 15 threads p/ efetuar um processamento. 
 Coloquei o processamento no metodo Execute da thread. Funciona ok.
 
 Em determinado momento, preciso chamar um form, de dentro dessa thread. 
 No execute:
 
 if contador = valor then
 ChamarForm;
 
 procedure TThread.ChamarForm;
 begin
 
 form1.caption := IntToStr(ThreadID);
 // Chama o Formulario
 Form3 := TForm3.Create(nil);
 try
 Form3.ShowModal;
 finally
 Form3.Free;
 Form3 := nil;
 end;
 
 end;
 
 Ele mostra a id da thread no caption do form, porem nao chama o Form3 ...
 o que estou fazendo de errado?
 
 outras duvidas ... como encerrar a thread de dentro do onExecute?
 como recuperar o estado de uma thread?
 
 [As partes desta mensagem que não continham texto foram removidas]

[delphi-br] Dúvida em formatação para insert com sql D2009

2009-06-16 Por tôpico papaia.forum

Cenário: D2009 + DataSnap + Firebird + Drive do Thiago Borges.
Tenho que gravar em uma tabela filho e em uma neta, mas não dá para usar 
master/detail, pois essa gravação é condicional; portanto estou utilizado o 
evento AfterUpdateRecord do provider da tabela Pai, onde testo a condição 
pelo DeltaDS. Até aí tudo bem. O problema ocorre porque tenho que gravar um 
valor fracionario (tipo 0.50 centavos) na tabela neta, e já usei todo tipo 
de formatação na instrução sql e não consigo gravar o valor com as casas 
decimais (se usar uma mascara que arredonda aí consigo gravar). Segue a 
instrução sql:


   // grava da tabela neta.
   Ssql:='insert into 
COMISSOES_CONFIG_DETALHE(id_comissoes_config_detalhe, '
   + 'id_comissoes_config,data,comissao_supervisor_tipo,'
   + 'comissao_supervisor_valor, comissao_vendedor_tipo,'
   + 'comissao_vendedor_valor,id_usuario, datahoradigitacao)'
   + ' values (gen_id(gen_comissoes_config_detalhe_id,1) '
   + ', ' + IntToStr(cont)
   + ', ' + quotedstr(FormatDateTime('mm/dd/', 
DeltaDS.FieldByName('DATA').AsDateTime))
   + ', ' + DeltaDS.FieldByName('COMISSAO_SUPERVISOR_TIPO').AsString
   + ', ' + quotedstr(FormatFloat('#.00', 
DeltaDS.FieldByName('COMISSAO_SUPERVISOR_VALOR').AsCurrency))
   + ', ' + DeltaDS.FieldByName('COMISSAO_VENDEDOR_TIPO').AsString
   + ', ' + quotedstr(FormatFloat('#.00', 
DeltaDS.FieldByName('COMISSAO_VENDEDOR_VALOR').AsCurrency))
   + ', ' + DeltaDS.FieldByName('ID_USUARIO').AsString
   + ', current_timestamp)';
   sqlAux.Close;
   sqlAux.CommandText:=Ssql;
   sqlAux.ExecSQL(True);

O erro está na linha que tem o QuotedStr.
Já pesquisei nesta lista e em outras, e acho que já usei todas as opções de 
máscaras, mas nenhum funcionou.
Se alguem puder dar alguma dica, antecipadamente deixo meus agradecimentos.

waldir silva. 


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

[delphi-br] Comunicação USB com Delphi

2009-06-16 Por tôpico Lucas Neves

Pessoal, boa tarde,

Enviei um e-mail uma vez à lista mas infelizmente outro tópico acabou 
tomando conta dele, hhehehehe. Sendo assim, gostaria de insistir com 
vocês mais uma vez:

Estou desenvolvendo um projeto onde terei de movimentar motores de passo 
via porta USB. Pesquisei bastante coisas a respeito da porta e da 
comunicação, mas não tenho a menor idéia de como fazer isso com Delphi. 
Alguem já teve a necessidade de fazer algo parecido e poderia me dar uma 
luz?

Obrigado!

Lucas Neves

RES: [delphi-br] Comunicação USB com Delphi

2009-06-16 Por tôpico Fernando Leal

Ola Lucas

 

Dê uma olhada nesse site, talvez de ajuda.

www.rogercom.com http://www.rogercom.com/ 

 

att.:

 

  _  

Fernando Leal

 mailto:fcl...@unifemm.edu.br fcl...@unifemm.edu.br

Programador de Sistemas

Coordenadoria de Informática

Centro Universitário UNIFEMM

55(0xx31)2106-2114

 http://www.unifemm.edu.br/ www.unifemm.edu.br

 

  _  

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Lucas Neves
Enviada em: terça-feira, 16 de junho de 2009 14:18
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Comunicação USB com Delphi

 






Pessoal, boa tarde,

Enviei um e-mail uma vez à lista mas infelizmente outro tópico acabou 
tomando conta dele, hhehehehe. Sendo assim, gostaria de insistir com 
vocês mais uma vez:

Estou desenvolvendo um projeto onde terei de movimentar motores de passo 
via porta USB. Pesquisei bastante coisas a respeito da porta e da 
comunicação, mas não tenho a menor idéia de como fazer isso com Delphi. 
Alguem já teve a necessidade de fazer algo parecido e poderia me dar uma 
luz?

Obrigado!

Lucas Neves





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

[delphi-br] Problemas: Intraweb + Rave + pdf

2009-06-16 Por tôpico Fábio Thomaz

Olá amigos, estou desenvolvendo um módulo de matrículas OnLine no intraweb,
depois de tudo feito, funcionando certinho, passei para os testes finais e
verifiquei que o arquivo pdf gerado no rave (Ficha de Matrícula, Boleto, etc
...) saem com os dados de uma outra pessoa quando este processo de inscrição
é feito simultaneamente, alguém teria uma dica para que isto não
acontece-se? A classe TIWUserSessionBase é única para cada usuário não é?
Veja um exemplo:
//Função que rega o arquivo pdf e retorna o link do mesmo
function TUserSession.ImprimeFichaMatricula(Matricula, Curso, Ano: Integer):
string;
  var Arquivo : string;
  vcdsIMat: TClientDataSet;
  rvProject: TRvProject;
  rvPDF: TRvRenderPDF;
  rvSystem: TRvSystem;
begin
  rvProject := TRvProject.Create(Self);
  rvProject.Name := 'rvFichaMatricula';
  rvPDF := TRvRenderPDF.Create(Self);
  rvSystem := TRvSystem.Create(Self);
  try
rvProject.Engine := rvSystem;

rvProject.Close;
cdsFichaMatricula.Close;
cdsFichaMatricula.Params[0].Value := Matricula;
cdsFichaMatricula.Open;

if cdsFichaMatricula.RecordCount = 1 then
begin
  Arquivo := 'FichaMatricula' + WebApplication.AppID + '.pdf';

  rvProject.ProjectFile := gsAppPath + 'Files\FichaMatricula.rav';
  rvProject.Open;

  vcdsIMat := TClientDataSet.Create(Self);
  vcdsIMat.Name := 'vcdsIMat';
  try

vcdsIMat.Data := Consulta('SELECT C.CSI_NOMCUR, P.CSI_DATA,
P.CSI_INSCRICAO '+
  'FROM TSI_PREMATRICULA P '+
  'INNER JOIN TSI_CADCUR C ON (C.CSI_CODCUR
= P.CSI_CODCUR) '+
  'WHERE P.CSI_CODESC = '+vgCodEscola+
  'AND P.CSI_ANOLET = '+IntToStr(Ano)+
  'AND P.CSI_MATALU = '+IntToStr(Matricula)+
  'AND P.CSI_CODCUR = '+IntToStr(Curso));

with rvProject do
begin
  SetParam('Curso',vcdsIMat.Fields[0].AsString);
  SetParam('Inscricao',vcdsIMat.Fields[2].AsString);
  SetParam('DataMat',vcdsIMat.Fields[1].AsString);
end;

with rvSystem do
begin
  SystemSetups := [];
  DefaultDest := rdFile;
  DoNativeOutput:= False;
  RenderObject:= rvPDF;
  OutputFileName:= gsAppPath + 'Files\'+ Arquivo;
end;

rvProject.Execute;

  finally
rvProject.Close;
vcdsIMat.Free;
  end;

  Result :=
'window.open('+WebApplication.Request.URL+'/files/'+Arquivo+', ,);';
end
else
begin
  Result := 'window.open(Files/FichaNaoEncontrada.html, ,);';
end;
  finally
rvProject.Free;
rvPDF.Free;
rvSystem.Free;
  end;
end;


//Procedimento que mostra a ficha
procedure TF0InfPreMatricula.iwlnkFichaMatriculaClick(Sender: TObject);
  var Matricula, Curso: Integer;
begin
  with UserSession do
  begin
Matricula := StrToInt(Parametros[0]);
Curso := StrToInt(Parametros[2]);
AddToInitProc(ImprimeFichaMatricula(Matricula,Curso,vgAnoLetivo));
  end;
end;

Aparentemente, pelos testes que fiz, parece que as informações ficam
armazenadas no servidor, quando outro usuário chama o mesmo procedimento ele
apenas cria outro arquivo com as mesmas informações obtidas antes, estranho
é que eu crio e destruo os componentes em tempo de execução e mesmo assim o
problema persiste.

Qualquer ajuda é bem vinda! Desde já agradeço.

Fábio Thomaz.


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

RES: RES: [delphi-br] OFF TOPIC: Mega Projeto

2009-06-16 Por tôpico Reinaldo Aparecido Pereira

Já respondido.

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Valfrid-Ly Silva Couto
Enviada em: segunda-feira, 15 de junho de 2009 22:26
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] OFF TOPIC: Mega Projeto

 






Isso é legal?!

--- Em seg, 15/6/09, Reinaldo Aparecido Pereira ctocv...@yahoo.com.br
mailto:ctocvl_1%40yahoo.com.br  escreveu:

De: Reinaldo Aparecido Pereira ctocv...@yahoo.com.br
mailto:ctocvl_1%40yahoo.com.br 
Assunto: RES: [delphi-br] OFF TOPIC: Mega Projeto
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
Data: Segunda-feira, 15 de Junho de 2009, 12:58

Caros,

Estou preparando um documento detalhado para explicar o projeto e
encaminharei à todos os interessados.

Mas adianto, a base que desejo extrair é a de veículos do Detran-PR.

http://celepar7.pr.gov.br/mtm/servicos/cons_multa.asp

Essa base pode ser usada para uma infinidade de coisas. Alguns dados da
base:

- VEICULO

- MARCA

- MODELO

- PLACA

- RENAVAM

- CHASSIS

- SITUACAO (SE ESTÁ FINANCIADO, SE TEM BUSCA E APREENSÃO)

- MULTA, (SE TEM MULTAS E QUAIS).

Nem preciso dizer que isso tem um valor incalculável.

Eu desejo usá-la para um site que logo concluirei de contestação de multas.

A base será usada para que a partir de um placa eu consiga o Renavam.

Em breve enviarei informações detalhadas.

Assim que todos os interessados se manifestarem, envio os detalhe.

De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de EmbarcaDelphi
Enviada em: segunda-feira, 15 de junho de 2009 10:50
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
Assunto: Re: [delphi-br] OFF TOPIC: Mega Projeto

Quem quer ser laranjas? A Base de Dados são informações de contas 
bancárias, hehehe (brincadeira)
Estou aguadando mais informações sobre esse seu Mega Projeto

Reginaldo escreveu:


 Meu pc de casa fica ligado 24 hs, posso contribuir, mas poderia dar 
 mais detalhes do que contem essa base de dados ?

 Reginaldo

 - Original Message -
 From: Reinaldo Aparecido Pereira
 To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
 Sent: Monday, June 15, 2009 8:56 AM
 Subject: [delphi-br] OFF TOPIC: Mega Projeto

 Olá amigos,

 Preciso de 300 voluntários para a execução de um projeto bem simples.
 Trata-se de um robô que irá baixar uma base de dados de 5 milhões de 
 linhas.

 Para baixar usando apenas meu computador, segundo alguns cálculos 
 levarei 1
 ano.

 Dessa forma, estou convidando-os para uma grande desafio. Preciso de 
 300 pcs
 rodando um aplicativo para baixar a base. Acredito que um dia à um dia e
 meio de processamento está resolvido.

 A base tem um valor enorme e depois de integrada, envio a cópia dela para
 cada um que participou do processo.

 Quaisquer dúvidas estou à total disposição.

 Grato,

 Reinaldo


 

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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]

RES: [delphi-br] selecionando registros

Coloquei resumido ... mas está informado ... o order by 

O delphi dá erro de comando desconhecido na sql ... linha tal 

Desde já agradeço sua colaboração 

 

 

 

FIOS E CABOS ENGENHARIA LTDA

CÍCERO FERNANDES

ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

CREA-SC 27.958-0

3521-2988  -  9191.6226

 http://fiosecabos.ind.br/ http://fiosecabos.ind.br -
mailto:cic...@fiosecabos.ind.br cic...@fiosecabos.ind.br

P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE! 

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Nicolas
Enviada em: terça-feira, 16 de junho de 2009 12:19
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] selecionando registros

 






O comando está correto.

O que acontece quando você executa ?

Talvez interessante informar tambem no comando SQL por qual campo deve ser
organizada a tabela (order by)

[]s

Alexandre

- Original Message - 
From: cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br  
To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br  
Sent: Tuesday, June 16, 2009 12:02 PM
Subject: [delphi-br] selecionando registros

Amigos ... estou com um pequeno problema penso q seja simples ... porem p
kem esta iniciando  

Antes de me mandarem procurar no Google, já revirei tudo por lá ... ok 

Necessito selecionar os 12 'ultimo s registros de uma query  

Já usei o

Select top 12 * from tabels desc

Select first 12 * from tabela desc

Select * from tabela desc limit 12

Enfim fiz varias tentativas sem êxito . donde apelo para ajuda de vcs, mais
experientes  

Meu BD 'e o DBIsam e trabalho com Delphi 7 ok 

Desde já agradeço 

FIOS E CABOS ENGENHARIA LTDA

CÍCERO FERNANDES

ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

CREA-SC 27.958-0

3521-2988 - 9191.6226

http://fiosecabos.ind.br/ http://fiosecabos.ind.br -
mailto:cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br 
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br 

P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE! 

[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] Comunicação USB com Delphi

2009-06-16 Por tôpico Julio Cesar

hum... usb, ainda nao tinha visto, mas tem umas placas q vc compra e coloca no 
pc q controlam 3 step motors, provavelmente elas tem q ter um driver qq, o 
fabricante nao iria fazer e deixar td mundo no escuro... contacta o fabricante 
e pergunta sobre os drivers...


julio cesar

  - Original Message - 
  From: Lucas Neves 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, June 16, 2009 6:17 PM
  Subject: [delphi-br] Comunicação USB com Delphi





  Pessoal, boa tarde,

  Enviei um e-mail uma vez à lista mas infelizmente outro tópico acabou 
  tomando conta dele, hhehehehe. Sendo assim, gostaria de insistir com 
  vocês mais uma vez:

  Estou desenvolvendo um projeto onde terei de movimentar motores de passo 
  via porta USB. Pesquisei bastante coisas a respeito da porta e da 
  comunicação, mas não tenho a menor idéia de como fazer isso com Delphi. 
  Alguem já teve a necessidade de fazer algo parecido e poderia me dar uma 
  luz?

  Obrigado!

  Lucas Neves


  

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

[delphi-br] invalid pointer exception

2009-06-16 Por tôpico Berdam

galera, estou tendo um erro quando tento criar um TxmlDocument dinamicamente.

Quando
coloco o componente no form, ele não apresenta esse erro, porém quando
cria de maneira dinâmica ocorre 'Invalider Pointer Operation'.

O erro aparece na penúltima linha de código
 XmlProtocolo := TXmlDocument.Create(nil);
  XmlProtocolo.XML.Add(retWS);
  XmlProtocolo.Active :=true;

  NodeRec:= 
XmlProtocolo.DocumentElement.ChildNodes.FindNode('infProt');
  stnProt:= NodeRec.ChildNodes['nProt'].text;   


Estou esquecendo alguma propriedade ???
 

Uberdam Cavaletti
Formado em Tecnologia da Informação - Unoesc - Xxe
Pós-graduado em desenvolvimento Java - Unoesc - Xxe

http://buscatextual.cnpq.br/buscatextual/visualizacv.jsp?id=K4251629Y0



  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]

Re: RES: [delphi-br] selecionando registros

2009-06-16 Por tôpico Moacir - GMail

Cicero,

Fica quase impossível descobrir o problema com este tipo de informação:

O delphi dá erro de comando desconhecido na sql ... linha tal  


Escreve TODA a mensagem de erro, bem como a instrução sql.

Moacir


cic...@fiosecabos.ind.br escreveu:
 Coloquei resumido ... mas está informado ... o order by 

 O delphi dá erro de comando desconhecido na sql ... linha tal 

 Desde já agradeço sua colaboração 

  

  

  

 FIOS E CABOS ENGENHARIA LTDA

 CÍCERO FERNANDES

 ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

 CREA-SC 27.958-0

 3521-2988  -  9191.6226

  http://fiosecabos.ind.br/ http://fiosecabos.ind.br -
 mailto:cic...@fiosecabos.ind.br cic...@fiosecabos.ind.br

 P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
 AMBIENTE! 

  

 De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
 nome de Nicolas
 Enviada em: terça-feira, 16 de junho de 2009 12:19
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] selecionando registros

  






 O comando está correto.

 O que acontece quando você executa ?

 Talvez interessante informar tambem no comando SQL por qual campo deve ser
 organizada a tabela (order by)

 []s

 Alexandre

 - Original Message - 
 From: cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br  
 To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br  
 Sent: Tuesday, June 16, 2009 12:02 PM
 Subject: [delphi-br] selecionando registros

 Amigos ... estou com um pequeno problema penso q seja simples ... porem p
 kem esta iniciando  

 Antes de me mandarem procurar no Google, já revirei tudo por lá ... ok 

 Necessito selecionar os 12 'ultimo s registros de uma query  

 Já usei o

 Select top 12 * from tabels desc

 Select first 12 * from tabela desc

 Select * from tabela desc limit 12

 Enfim fiz varias tentativas sem êxito . donde apelo para ajuda de vcs, mais
 experientes  

 Meu BD 'e o DBIsam e trabalho com Delphi 7 ok 

 Desde já agradeço 

 FIOS E CABOS ENGENHARIA LTDA

 CÍCERO FERNANDES

 ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

 CREA-SC 27.958-0

 3521-2988 - 9191.6226

 http://fiosecabos.ind.br/ http://fiosecabos.ind.br -
 mailto:cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br 
 cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br 

 P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
 AMBIENTE! 

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

[delphi-br] Novo arquivo carregado em delphi-br

2009-06-16 Por tôpico delphi-br


Olá,

Esta mensagem é uma notificação para informá-lo que um novo arquivo foi 
adicionado no grupo delphi-br.

  Arquivo : /CBHPM_2005 - 4º Edicao .xls 
  Carregado por   : rickbamen rickba...@gmail.com 
  Descrição   : CBHPM_2005 - 4º Edicao 

Você pode acessar o arquivo pela URL:

http://br.groups.yahoo.com/group/delphi-br/files/CBHPM_2005%20-%204%80%A0%A6%BA%20Edicao%20.xls
 

Para saber mais sobre compartilhamento de arquivos no grupo, leia:

http://help.yahoo.com/help/br/groups/files

Atenciosamente,

rickbamen rickba...@gmail.com

[delphi-br] Novo arquivo carregado em delphi-br

2009-06-16 Por tôpico delphi-br


Olá,

Esta mensagem é uma notificação para informá-lo que um novo arquivo foi 
adicionado no grupo delphi-br.

  Arquivo : /CBHPM_2003 - 3º Edicao.xls 
  Carregado por   : rickbamen rickba...@gmail.com 
  Descrição   : CBHPM_2003 - 3º Edicao 

Você pode acessar o arquivo pela URL:

http://br.groups.yahoo.com/group/delphi-br/files/CBHPM_2003%20-%203%80%A0%A6%BA%20Edicao.xls
 

Para saber mais sobre compartilhamento de arquivos no grupo, leia:

http://help.yahoo.com/help/br/groups/files

Atenciosamente,

rickbamen rickba...@gmail.com

Re: [delphi-br] Comunicação USB com Del phi

2009-06-16 Por tôpico Lucas Neves

Ai e que está o problema. Estamos desenvolvendo a placa e o software, ou 
seja, eu preciso de alguma forma mais genérica de comunicação. Por ex: 
se eu envio uma string com os bits a serem ativados, essas coisas...

Julio Cesar escreveu:


 hum... usb, ainda nao tinha visto, mas tem umas placas q vc compra e 
 coloca no pc q controlam 3 step motors, provavelmente elas tem q ter 
 um driver qq, o fabricante nao iria fazer e deixar td mundo no 
 escuro... contacta o fabricante e pergunta sobre os drivers...

 julio cesar

 - Original Message -
 From: Lucas Neves
 To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
 Sent: Tuesday, June 16, 2009 6:17 PM
 Subject: [delphi-br] Comunicação USB com Delphi

 Pessoal, boa tarde,

 Enviei um e-mail uma vez à lista mas infelizmente outro tópico acabou
 tomando conta dele, hhehehehe. Sendo assim, gostaria de insistir com
 vocês mais uma vez:

 Estou desenvolvendo um projeto onde terei de movimentar motores de passo
 via porta USB. Pesquisei bastante coisas a respeito da porta e da
 comunicação, mas não tenho a menor idéia de como fazer isso com Delphi.
 Alguem já teve a necessidade de fazer algo parecido e poderia me dar uma
 luz?

 Obrigado!

 Lucas Neves

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

Re: [delphi-br] selecionando registros

2009-06-16 Por tôpico Jackson Gomes - ToolsComps


 O delphi dá erro de comando desconhecido na sql ... linha tal 

não é o Delphi que dá erro, mas sim a Engine SQL do DBISAM. Verifique no site 
ou 
nos docs do produto a sintaxe correta.

Jackson Gomes
ToolsComps - Controle de Usuários para Desenvolvedores CodeGear
Web Site: http://www.toolsandcomps.com
Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
e-mail: jack...@toolsandcomps.com
Fone: 27 3389 1138 - 8811 0324

http://jacklovesdelphi.blogspot.com - Delphi, Intraweb, etc

Devhost - Webhost para desenvolvedores Delphi
http://www.devhost.com.br
devh...@devhost.com.br

[delphi-br] Visualizar várias fotos do banco de dados cliente

2009-06-16 Por tôpico nillgolv

Oi pessoal, venho aqui pedir ajuda no seguinte, tenho a tabela de registro de 
clientes em paradox, 
Nela tenho o campo fotos.

Preciso usar um form em que eu vizualize as fotos dos clientes de forma pequena 
mesmo, para que eu possa visualizar mesmo que tenha muitos fotos, que seja 
criado uma barra na vertical para ir navegando, ou seja deslizando a barra, ou 
mesmo a cada clique ir passando as fotos.

Re: [delphi-br] Comunicação USB com Delphi

2009-06-16 Por tôpico Julio Cesar

hum. entao vale a dica de um outro colega pra ir no site rogercom (acho q 
eh esse), me mata uma curiosidade, pq fazer a placa pra conectar pela usb e nao 
plugada no micro?

julio cesar

  - Original Message - 
  From: Lucas Neves 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, June 16, 2009 8:30 PM
  Subject: Re: [delphi-br] Comunicação USB com Delphi

  Ai e que está o problema. Estamos desenvolvendo a placa e o software, ou 
  seja, eu preciso de alguma forma mais genérica de comunicação. Por ex: 
  se eu envio uma string com os bits a serem ativados, essas coisas...

  Julio Cesar escreveu:

   hum... usb, ainda nao tinha visto, mas tem umas placas q vc compra e 
   coloca no pc q controlam 3 step motors, provavelmente elas tem q ter 
   um driver qq, o fabricante nao iria fazer e deixar td mundo no 
   escuro... contacta o fabricante e pergunta sobre os drivers...

   julio cesar

   - Original Message -
   From: Lucas Neves
   To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
   Sent: Tuesday, June 16, 2009 6:17 PM
   Subject: [delphi-br] Comunicação USB com Delphi

   Pessoal, boa tarde,

   Enviei um e-mail uma vez à lista mas infelizmente outro tópico acabou
   tomando conta dele, hhehehehe. Sendo assim, gostaria de insistir com
   vocês mais uma vez:

   Estou desenvolvendo um projeto onde terei de movimentar motores de passo
   via porta USB. Pesquisei bastante coisas a respeito da porta e da
   comunicação, mas não tenho a menor idéia de como fazer isso com Delphi.
   Alguem já teve a necessidade de fazer algo parecido e poderia me dar uma
   luz?

   Obrigado!

   Lucas Neves

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

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

RES: RES: [delphi-br] OFF TOPIC: Mega Projeto

Existem 'n' bases de CEP disponíveis por aí pra download. Se o cara vai querer 
baixar ou não, é outra história. Até pq não se sabe se essas 'n' bases de CEP 
disponíveis por aí estão 100% atualizadas!

Mais uma coisa, o companheiro que anunciou este projeto já disse a intenção 
dele. O que ele quer é gente pra fazer consultas ao site do DETRAN para assim 
preencher um banco de dados.

Não me agrada muito essa idéia, mas quem quiser ajudar o companheiro, fique a 
vontade!

Sds.


De: delphi-br@yahoogrupos.com.br [delphi...@yahoogrupos.com.br] em Nome de Iran 
Lima [i...@sgisolution.com.br]
Enviado: terça-feira, 16 de junho de 2009 3:50
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: RES: [delphi-br] OFF TOPIC: Mega Projeto




Já existe um banco de dados de CEP para download.

De: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br 
[mailto:delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br] Em
nome de Rubem Rocha
Enviada em: terça-feira, 16 de junho de 2009 10:58
Para: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br
Assunto: RES: RES: [delphi-br] OFF TOPIC: Mega Projeto
Prioridade: Alta

Já que o João tocou no assunto... pra mim, isso tá cheirando a juntar um
monte de neguinho pra poder consultar algum webservice de CEP e sair
montando um banco de dados de CEP a partir de várias consultas.

Sds.


De: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br 
mailto:delphi-br%40yahoogrupos.com.br
[delphi...@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br 
mailto:delphi-br%40yahoogrupos.com.br ] em
Nome de Joao Morais [jcmorai...@gmail.commailto:jcmoraisjr%40gmail.com 
mailto:jcmoraisjr%40gmail.com ]
Enviado: segunda-feira, 15 de junho de 2009 23:06
Para: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br 
mailto:delphi-br%40yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] OFF TOPIC: Mega Projeto

2009/6/16 Luiz Escobar 
esco...@megasistema.com.brmailto:escobar%40megasistema.com.br
mailto:escobar%40megasistema.com.br mailto:escobar%40megasistema.com.br

 se for legal, to dentro...

Se fosse legal, haveria um link no site para baixar a base, haveria
uma porta para conexão ao banco para leitura, haveria um webservice.
Não parece evidente?

Joao Morais

.




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

RES: RES: [delphi-br] OFF TOPIC: Mega Projeto

Ah, esqueci tb de mencionar. Para os desavisados de plantão, a base de CEPs dos 
correios é licenciada. Portanto, obtê-la por outros meios é ilegal. Consulta a 
site até pode acontecer, pois quem comprou a base de CEPs pode explorá-la 
comercialmente. Agora, quem quer ficar escrevendo robozinhos pra ficar fazendo 
consultas a um webservice que disponibiliza essa consulta e pega o resultado da 
consulta pra criar um banco de dados e depois revendê-lo está cometendo crime, 
pois não obteve o banco de dados de forma legal. Acredito eu q o mesmo valha 
para o caso do DETRAN.

Sds.


De: delphi-br@yahoogrupos.com.br [delphi...@yahoogrupos.com.br] em Nome de Iran 
Lima [i...@sgisolution.com.br]
Enviado: terça-feira, 16 de junho de 2009 3:50
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: RES: [delphi-br] OFF TOPIC: Mega Projeto




Já existe um banco de dados de CEP para download.

De: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br 
[mailto:delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br] Em
nome de Rubem Rocha
Enviada em: terça-feira, 16 de junho de 2009 10:58
Para: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br
Assunto: RES: RES: [delphi-br] OFF TOPIC: Mega Projeto
Prioridade: Alta

Já que o João tocou no assunto... pra mim, isso tá cheirando a juntar um
monte de neguinho pra poder consultar algum webservice de CEP e sair
montando um banco de dados de CEP a partir de várias consultas.

Sds.


De: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br 
mailto:delphi-br%40yahoogrupos.com.br
[delphi...@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br 
mailto:delphi-br%40yahoogrupos.com.br ] em
Nome de Joao Morais [jcmorai...@gmail.commailto:jcmoraisjr%40gmail.com 
mailto:jcmoraisjr%40gmail.com ]
Enviado: segunda-feira, 15 de junho de 2009 23:06
Para: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br 
mailto:delphi-br%40yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] OFF TOPIC: Mega Projeto

2009/6/16 Luiz Escobar 
esco...@megasistema.com.brmailto:escobar%40megasistema.com.br
mailto:escobar%40megasistema.com.br mailto:escobar%40megasistema.com.br

 se for legal, to dentro...

Se fosse legal, haveria um link no site para baixar a base, haveria
uma porta para conexão ao banco para leitura, haveria um webservice.
Não parece evidente?

Joao Morais

.




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

Re: [delphi-br] selecionando registros

2009-06-16 Por tôpico Edelson Regis de Lima

O DESC você usa em conjunto com o ORDER BY

Digamos que voce tenha uma tabela chamada Cliente, e que tenha o campo
CodigoCliente

Para retornar os 12 primeiros registros voce faz:
SELECT TOP 12 * FROM Cliente ORDER BY CodigoCliente

E para retornar os 12 ultimos registros voce faz:
SELECT TOP 12 * FROM Cliente ORDER BY CodigoCliente DESC

[]s

Edelson.


2009/6/16 cic...@fiosecabos.ind.br





 Amigos ... estou com um pequeno problema penso q seja simples ... porem p
 kem esta iniciando 

 Antes de me mandarem procurar no Google, já revirei tudo por lá ... ok

 Necessito selecionar os 12 ultimo s registros de uma query 

 Já usei o

 Select top 12 * from tabels desc

 Select first 12 * from tabela desc

 Select * from tabela desc limit 12

 Enfim fiz varias tentativas sem êxito  donde apelo para ajuda de vcs, mais
 experientes 

 Meu BD e o DBIsam e trabalho com Delphi 7 ok

 Desde já agradeço

 FIOS E CABOS ENGENHARIA LTDA

 CÍCERO FERNANDES

 ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

 CREA-SC 27.958-0

 3521-2988 - 9191.6226

 http://fiosecabos.ind.br/ http://fiosecabos.ind.br -
 mailto:cic...@fiosecabos.ind.br cicero%40fiosecabos.ind.br
 cic...@fiosecabos.ind.br cicero%40fiosecabos.ind.br

 P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
 AMBIENTE!

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

  



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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* 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: RES: RES: [delphi-br] OFF TOPIC: Mega Projeto

2009-06-16 Por tôpico Joao Henrique Levada

Li, ontem mesmo, no sítio do Detran-SP que é proibido consultar dados de um 
veículo através do número de sua placa.

Logo, se você fornecer um meio para que isso aconteça, estará fazendo algo 
ilegal.

Se me disser que a consulta está lá e é aberta bastando para isso o número do 
RENAVAM. Lhe respondo que este número é confidencial e, geralmente, de 
conhecimento apenas do proprietário do veículo, a quem a consulta é pertinente.

Vejam, neste trecho extraído da página 
(http://www.detran.sp.gov.br/faq/faq.asp):

2 - Como faço para obter informações de determinado veículo por meio da placa?
Por questão de segurança, não é possível nenhum tipo de consulta por meio da 
placa do veículo. Essa informação é confidencial e de uso exclusivo do Detran. 
Somente o proprietário do veículo pode solicitar um extrato do veículo 
pessoalmente no órgão onde o mesmo está registrado. O Detran só fornece os 
dados mediante autorização judicial.

Re: [delphi-br] Comunicação USB com Delphi

2009-06-16 Por tôpico Eduardo Silva dos Santos

Lucas, aqui http://www.rogercom.com/
ou aqui
http://www-user.tu-chemnitz.de/~heha/bastelecke/Rund%20um%20den%20PC/USB2LPT/index.html.enhttp://www-user.tu-chemnitz.de/%7Eheha/bastelecke/Rund%20um%20den%20PC/USB2LPT/index.html.en

você encontra a solução.

2009/6/16 Lucas Neves lucas_del...@yahoo.com.br



 Pessoal, boa tarde,

 Enviei um e-mail uma vez à lista mas infelizmente outro tópico acabou
 tomando conta dele, hhehehehe. Sendo assim, gostaria de insistir com
 vocês mais uma vez:

 Estou desenvolvendo um projeto onde terei de movimentar motores de passo
 via porta USB. Pesquisei bastante coisas a respeito da porta e da
 comunicação, mas não tenho a menor idéia de como fazer isso com Delphi.
 Alguem já teve a necessidade de fazer algo parecido e poderia me dar uma
 luz?

 Obrigado!

 Lucas Neves
  




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


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

Re: RES: RES: [delphi-br] OFF TOPIC: Mega Projeto

2009-06-16 Por tôpico Nicolas

Faz sentido...

já pensou se todo sequestrador/Assaltante/Bandido resolver descobrir o endereço 
dos proprietários de cada carrão que passar na rua ?

tem coisas que não precisam ser ilegais, mas tem que avaliar se é Ético também.

Alexandre



  - Original Message - 
  From: Joao Henrique Levada 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, June 16, 2009 2:16 PM
  Subject: Re: RES: RES: [delphi-br] OFF TOPIC: Mega Projeto





  Li, ontem mesmo, no sítio do Detran-SP que é proibido consultar dados de um 
veículo através do número de sua placa.

  Logo, se você fornecer um meio para que isso aconteça, estará fazendo algo 
ilegal.

  Se me disser que a consulta está lá e é aberta bastando para isso o número 
do RENAVAM. Lhe respondo que este número é confidencial e, geralmente, de 
conhecimento apenas do proprietário do veículo, a quem a consulta é pertinente.

  Vejam, neste trecho extraído da página 
(http://www.detran.sp.gov.br/faq/faq.asp):

  2 - Como faço para obter informações de determinado veículo por meio da placa?
  Por questão de segurança, não é possível nenhum tipo de consulta por meio da 
placa do veículo. Essa informação é confidencial e de uso exclusivo do Detran. 
Somente o proprietário do veículo pode solicitar um extrato do veículo 
pessoalmente no órgão onde o mesmo está registrado. O Detran só fornece os 
dados mediante autorização judicial. 



  

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

RES: RES: [delphi-br] selecionando registros



 

procedure TF_Simula_Conv.Nova1Click(Sender: TObject);

begin

   F_simula_conv.DBISAMQuery1.Active := False;

   f_simula_conv.DBISAMQuery1.SQL.Clear;

   f_simula_conv.DBISAMQuery1.SQL.Add('  select  top 12 * from faturas');

   f_simula_conv.DBISAMQuery1.SQL.Add('   where faturas.codigo_cliente =
clientes.codigo');

   f_simula_conv.DBISAMQuery1.SQL.Add('order by faturas.data des');

   f_simula_conv.DBISAMQuery1.Active := true;

end;

 

 

Ok ... segue  

 

FIOS E CABOS ENGENHARIA LTDA

CÍCERO FERNANDES

ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

CREA-SC 27.958-0

3521-2988  -  9191.6226

 http://fiosecabos.ind.br/ http://fiosecabos.ind.br -
mailto:cic...@fiosecabos.ind.br cic...@fiosecabos.ind.br

P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE! 

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Moacir - GMail
Enviada em: terça-feira, 16 de junho de 2009 16:23
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] selecionando registros

 






Cicero,

Fica quase impossível descobrir o problema com este tipo de informação:

O delphi dá erro de comando desconhecido na sql ... linha tal  


Escreve TODA a mensagem de erro, bem como a instrução sql.

Moacir

cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br  escreveu:
 Coloquei resumido ... mas está informado ... o order by 

 O delphi dá erro de comando desconhecido na sql ... linha tal 

 Desde já agradeço sua colaboração 

 

 

 

 FIOS E CABOS ENGENHARIA LTDA

 CÍCERO FERNANDES

 ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

 CREA-SC 27.958-0

 3521-2988 - 9191.6226

 http://fiosecabos.ind.br/ http://fiosecabos.ind.br -
 mailto:cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br 
cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br 

 P Antes de imprimir, pense em sua responsabilidade e compromisso com o
MEIO
 AMBIENTE! 

 

 De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
 nome de Nicolas
 Enviada em: terça-feira, 16 de junho de 2009 12:19
 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br

 Assunto: Re: [delphi-br] selecionando registros

 






 O comando está correto.

 O que acontece quando você executa ?

 Talvez interessante informar tambem no comando SQL por qual campo deve ser
 organizada a tabela (order by)

 []s

 Alexandre

 - Original Message - 
 From: cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br 
 To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br 
 Sent: Tuesday, June 16, 2009 12:02 PM
 Subject: [delphi-br] selecionando registros

 Amigos ... estou com um pequeno problema penso q seja simples ... porem p
 kem esta iniciando  

 Antes de me mandarem procurar no Google, já revirei tudo por lá ... ok 

 Necessito selecionar os 12 'ultimo s registros de uma query  

 Já usei o

 Select top 12 * from tabels desc

 Select first 12 * from tabela desc

 Select * from tabela desc limit 12

 Enfim fiz varias tentativas sem êxito . donde apelo para ajuda de vcs,
mais
 experientes  

 Meu BD 'e o DBIsam e trabalho com Delphi 7 ok 

 Desde já agradeço 

 FIOS E CABOS ENGENHARIA LTDA

 CÍCERO FERNANDES

 ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

 CREA-SC 27.958-0

 3521-2988 - 9191.6226

 http://fiosecabos.ind.br/ http://fiosecabos.ind.br -
 mailto:cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br 
 cic...@fiosecabos.ind.br mailto:cicero%40fiosecabos.ind.br
mailto:cicero%40fiosecabos.ind.br 

 P Antes de imprimir, pense em sua responsabilidade e compromisso com o
MEIO
 AMBIENTE! 

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



 

 





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

Re: [delphi-br] Comunicação USB com Del phi

2009-06-16 Por tôpico Lucas Neves

O site da Rogercom tem tudo em termos de placa, a placa ja montamos, 
inclusive temos o projeto desenhado de uma placa de controle de 30 
motores de passo. Deve ser plugado na USB primeiro por se tratar da 
maneira mais modena de comunicacao, depois que esse dispositivo não pode 
ficar somente conectado a um pc. Depois há o interesse na 
comercialização deste produto.

Julio Cesar escreveu:


 hum. entao vale a dica de um outro colega pra ir no site rogercom 
 (acho q eh esse), me mata uma curiosidade, pq fazer a placa pra 
 conectar pela usb e nao plugada no micro?

 julio cesar

 - Original Message -
 From: Lucas Neves
 To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
 Sent: Tuesday, June 16, 2009 8:30 PM
 Subject: Re: [delphi-br] Comunicação USB com Delphi

 Ai e que está o problema. Estamos desenvolvendo a placa e o software, ou
 seja, eu preciso de alguma forma mais genérica de comunicação. Por ex:
 se eu envio uma string com os bits a serem ativados, essas coisas...

 Julio Cesar escreveu:
 
 
  hum... usb, ainda nao tinha visto, mas tem umas placas q vc compra e
  coloca no pc q controlam 3 step motors, provavelmente elas tem q ter
  um driver qq, o fabricante nao iria fazer e deixar td mundo no
  escuro... contacta o fabricante e pergunta sobre os drivers...
 
  julio cesar
 
  - Original Message -
  From: Lucas Neves
  To: delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br
  Sent: Tuesday, June 16, 2009 6:17 PM
  Subject: [delphi-br] Comunicação USB com Delphi
 
  Pessoal, boa tarde,
 
  Enviei um e-mail uma vez à lista mas infelizmente outro tópico acabou
  tomando conta dele, hhehehehe. Sendo assim, gostaria de insistir com
  vocês mais uma vez:
 
  Estou desenvolvendo um projeto onde terei de movimentar motores de passo
  via porta USB. Pesquisei bastante coisas a respeito da porta e da
  comunicação, mas não tenho a menor idéia de como fazer isso com Delphi.
  Alguem já teve a necessidade de fazer algo parecido e poderia me dar uma
  luz?
 
  Obrigado!
 
  Lucas Neves
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 

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

[delphi-br] Re: Dúvida com Zeos

2009-06-16 Por tôpico Leonardo Quinino

Percebi que os problemas com select ...
ocorrem varicoes  do cod de erro, mas sempre qdo tem SUM, CAST, MAX,
Porém o mesmo select, no CLIENTDATASET, passa normal, isso ocorre apenas no
Zeos.

Testei a UniDac, aparenmente, ainda não pode ver vantagem, porém tenho que
aprofundar melhor e fazer um bom bentchmark, para ser justo, até então em
redes LOCAIS o que mais me mostrou estabilidade foi o CLIENTDATASET  ( DBX
).


2009/6/16 Leonardo Quinino leonardo.quin...@gmail.com

 Pessoal, estou testando o Zeos LIb 6.5.5 ,  com Delphi 7 + Firebird 2.1
 Tive duas dúvidas.

 1) em alguns campos do tipo NUMERIC (9,2) , no banco de dados 5.55  mostra
 no componente, DBEDIT 6,00

 2) não conseguir rodar o seguinte select...

  select sum( cast( quantidade * valor_unitario as numeric( 18, 2 ) ) ) as
 Total from ITENS_VENDAS
 WHERE  ID_INTERNO = '5578'

 Coloquei o mesmo select, num ClientDataSet + SQLQuery   e roda beleza.

 Isso é algo da natureza do ZEOS ?


 --
 Leonardo Quinino




-- 
Leonardo Quinino


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

[delphi-br] Open Dialog

2009-06-16 Por tôpico Júlio César Santiago Guiótti

Pessoal,

trabalho em um sistema que pode rodar tanto na máquina local do
cliente quanto em um servidor nosso.
Em alguns locais do sistema utilizamos o componente OpenDialog, no
entanto agora devido a alterações na infra estrutura ao executar o
OpenDialog terei que limitar e travar o acesso do usuário a
determinado diretório.
Não consigui até agora fazer isso utilizando o OpenDialog.
Alguém tem alguma idéia?

Obrigado,
abraço,

Júlio César

[delphi-br] Re: Visualizar várias fotos do banco de dados cliente

2009-06-16 Por tôpico edelsonregis

Você pode utilizar um TScrollBox, que é tipo um painel com scroll, e ir 
adicionando componentes do tipo TImagem preenchidos cada um com uma foto.
Aí voce vai ter que fazer algum esqueminha para controlar o posicionamento das 
imagens, tamanho, etc...
Pegar a imagem do campo da tabela (creio que seja blob) e carregar num TImagem 
voce já sabe? Se não souber, diz aí que a gente ajuda...

Edelson.



--- Em delphi-br@yahoogrupos.com.br, nillgolv nillg...@... escreveu

 Oi pessoal, venho aqui pedir ajuda no seguinte, tenho a tabela de registro de 
 clientes em paradox, 
 Nela tenho o campo fotos.
 
 Preciso usar um form em que eu vizualize as fotos dos clientes de forma 
 pequena mesmo, para que eu possa visualizar mesmo que tenha muitos fotos, que 
 seja criado uma barra na vertical para ir navegando, ou seja deslizando a 
 barra, ou mesmo a cada clique ir passando as fotos.

Re: [delphi-br] Comunicação USB com Delphi

2009-06-16 Por tôpico Julio Cesar

nao sei o q ele vai fazer, mas o segundo link ao meu ponto de vista esta fora
de cogitacao, explico

...slow controls, like for garden, model railway...
Certain equipment categories are excluded from correct emulation:
Time critical equipment, like direct stepper motor controls (above 100 Hz or
so...

o adaptador soh funciona para stepers abaixo dos 100Hz... nao sei qual ele vai
usar rsrsr... mas se quer fazer algo como um controlador (cnc) para um router
ou qq tipo de maquina parecida, eu acho q deveria ver bem...

relembrando, soh dei meu ponto de vista, na conheco o projeto...

julio cesar

- Original Message -
From: Eduardo Silva dos Santos
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, June 16, 2009 6:27 PM
Subject: Re: [delphi-br] Comunicação USB com Delphi

Lucas, aqui http://www.rogercom.com/
ou aqui

http://www-user.tu-chemnitz.de/~heha/bastelecke/Rund%20um%20den%20PC/USB2LPT/index.html.enhttp://www-user.tu-chemnitz.de/%7Eheha/bastelecke/Rund%20um%20den%20PC/USB2LPT/index.html.en

você encontra a solução.

2009/6/16 Lucas Neves lucas_del...@yahoo.com.br

Pessoal, boa tarde,

Enviei um e-mail uma vez à lista mas infelizmente outro tópico acabou
tomando conta dele, hhehehehe. Sendo assim, gostaria de insistir com
vocês mais uma vez:

Estou desenvolvendo um projeto onde terei de movimentar motores de passo
via porta USB. Pesquisei bastante coisas a respeito da porta e da
comunicação, mas não tenho a menor idéia de como fazer isso com Delphi.
Alguem já teve a necessidade de fazer algo parecido e poderia me dar uma
luz?

Obrigado!

Lucas Neves

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

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

RES: [delphi-br] selecionando registros

Descobri... na verdade como DBIsam tenho q colocar o top 12 no final da 
instrução e não no começo como foram os exemplos q encontrei na net ... 
Segue a rotina correta para, se alguém precisar ok 
Agradeço a todos q colaboraram ... 


   F_simula_conv.DBISAMQuery1.Active := False;
   f_simula_conv.DBISAMQuery1.SQL.Clear;
   f_simula_conv.DBISAMQuery1.SQL.Add('  select  * from faturas,clientes');
   f_simula_conv.DBISAMQuery1.SQL.Add('   where clientes.codigo = 
faturas.codigo_cliente');
   f_simula_conv.DBISAMQuery1.SQL.Add(' and clientes.empresa = :cli');
   f_simula_conv.DBISAMQuery1.SQL.Add('order by faturas.data desc top 12');
   f_simula_conv.DBISAMQuery1.ParamByName('cli').Value := 
F_clientes.RzDBEdit2.text;
   f_simula_conv.DBISAMQuery1.Active := true;



FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
3521-2988  -  9191.6226
http://fiosecabos.ind.br -  cic...@fiosecabos.ind.br
 Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO 
AMBIENTE! 

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome 
de Edelson Regis de Lima
Enviada em: terça-feira, 16 de junho de 2009 13:47
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] selecionando registros

O DESC você usa em conjunto com o ORDER BY

Digamos que voce tenha uma tabela chamada Cliente, e que tenha o campo
CodigoCliente

Para retornar os 12 primeiros registros voce faz:
SELECT TOP 12 * FROM Cliente ORDER BY CodigoCliente

E para retornar os 12 ultimos registros voce faz:
SELECT TOP 12 * FROM Cliente ORDER BY CodigoCliente DESC

[]s

Edelson.


2009/6/16 cic...@fiosecabos.ind.br





 Amigos ... estou com um pequeno problema penso q seja simples ... porem p
 kem esta iniciando 

 Antes de me mandarem procurar no Google, já revirei tudo por lá ... ok

 Necessito selecionar os 12 ‘ultimo s registros de uma query 

 Já usei o

 Select top 12 * from tabels desc

 Select first 12 * from tabela desc

 Select * from tabela desc limit 12

 Enfim fiz varias tentativas sem êxito … donde apelo para ajuda de vcs, mais
 experientes 

 Meu BD ‘e o DBIsam e trabalho com Delphi 7 ok

 Desde já agradeço

 FIOS E CABOS ENGENHARIA LTDA

 CÍCERO FERNANDES

 ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

 CREA-SC 27.958-0

 3521-2988 - 9191.6226

 http://fiosecabos.ind.br/ http://fiosecabos.ind.br -
 mailto:cic...@fiosecabos.ind.br cicero%40fiosecabos.ind.br
 cic...@fiosecabos.ind.br cicero%40fiosecabos.ind.br

 P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
 AMBIENTE!

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

  



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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM

Re: RES: RES: [delphi-br] OFF TOPIC: Mega Projeto

quem disse que isto talvez não seja ilegal por estar disponível na WEB fui eu.

Agora, já que o Detran se pronunciou a respeito desta questão apresentada, 
mediante uma resposta feita a uma pergunta no site, então podemos concluir que 
esta coleta que o colega propoe, inclusive fazer um mutirão, é ILEGAL.

Diferente da questão da base de dados de CEP dos correios que não há restrições 
a voce fazer a sua propria coleta. Há restrições sim em usar a base do programa 
deles para outro fim. É diferente.

[]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: Joao Henrique Levada 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, June 16, 2009 2:16 PM
  Subject: Re: RES: RES: [delphi-br] OFF TOPIC: Mega Projeto





  Li, ontem mesmo, no sítio do Detran-SP que é proibido consultar dados de um 
veículo através do número de sua placa.

  Logo, se você fornecer um meio para que isso aconteça, estará fazendo algo 
ilegal.

  Se me disser que a consulta está lá e é aberta bastando para isso o número 
do RENAVAM. Lhe respondo que este número é confidencial e, geralmente, de 
conhecimento apenas do proprietário do veículo, a quem a consulta é pertinente.

  Vejam, neste trecho extraído da página 
(http://www.detran.sp.gov.br/faq/faq.asp):

  2 - Como faço para obter informações de determinado veículo por meio da placa?
  Por questão de segurança, não é possível nenhum tipo de consulta por meio da 
placa do veículo. Essa informação é confidencial e de uso exclusivo do Detran. 
Somente o proprietário do veículo pode solicitar um extrato do veículo 
pessoalmente no órgão onde o mesmo está registrado. O Detran só fornece os 
dados mediante autorização judicial. 



  

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

RES: [delphi-br] Open Dialog

Explique com mais detalhes essa limitação na sua infra-estrutura! De
repente, a solução não está necessariamente nas suas mãos para ser
resolvida, e sim com o(s) administrador(es) da rede, que podem limitar esse
acesso através de políticas de segurança.

 

Sds.

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Júlio César Santiago Guiótti
Enviada em: terça-feira, 16 de junho de 2009 16:19
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Open Dialog

 

Pessoal,

trabalho em um sistema que pode rodar tanto na máquina local do
cliente quanto em um servidor nosso.
Em alguns locais do sistema utilizamos o componente OpenDialog, no
entanto agora devido a alterações na infra estrutura ao executar o
OpenDialog terei que limitar e travar o acesso do usuário a
determinado diretório.
Não consigui até agora fazer isso utilizando o OpenDialog.
Alguém tem alguma idéia?

Obrigado,
abraço,

Júlio César

 



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

Re: RES: [delphi-br] OFF TOPIC: Mega Projeto