[delphi-br] Re: Resgatar valores de uma planilha de excel para o delphi. (quase desistindo)

2008-11-03 Por tôpico Márcio Ferraz
Grato pelas ajudas,
Mas sempre que irei conectar com a tabela do excel exibe uma mensagem 
que diz que a tabela externa não tem o formato esperado, já estou 
quase desistindo com isto, não sei mais o que fazer...
Agradeço.
Márcio

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

 Olá Marcio!
 
 Você pode recuperar os dados utilizando os componentes ADO 
 (ADOConnection e ADOQuery). Você conecta com a planilha e faz a 
 recuperação através de um select.
 
 
 --- Em delphi-br@yahoogrupos.com.br, Márcio Ferraz marciomrck@ 
 escreveu
 
  Olá pessoal do grupo. 
  Gostaria de uma ajudinha, preciso resgatar dados de uma planilha 
de 
  excel para o delphi e manipulá-la, tenho como exportar para o 
delphi 
  mais não sei como importar.
  Desde já grato.
  Márcio
 





[delphi-br] Re: Resgatar valores de uma planilha de excel para o delphi.

2008-10-31 Por tôpico Márcio Ferraz
OPA...
AGRADEÇO A TODOS RÁPIDO A RESPOSTA E BEM OBJETIVA, VALEU MESMO.
ABRAÇO A TODOS


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

 --- Em delphi-br@yahoogrupos.com.br, Márcio Ferraz marciomrck@ 
 escreveu
 
  Olá pessoal do grupo. 
  Gostaria de uma ajudinha, preciso resgatar dados de uma planilha 
de 
  excel para o delphi e manipulá-la, tenho como exportar para o 
 delphi 
  mais não sei como importar.
  Desde já grato.
  Márcio
 
 
 
 procedure TForm1.Button1Click(Sender: TObject);
 var
 Excel : Variant;
 i:Integer;
 analise,texto:string;
 begin
 i:=4;
 Excel := CreateOleObject('Excel.Application');
 Excel.Visible :=True;
 {Excel.Workbooks.Add;}
 Excel.WorkBooks.Open(Edit1.text+'nome da planilha.xls');
 texto:=Excel.WorkBooks[1].Sheets[1].Cells[i,3];
 while texto  '' do
 begin
 analise:=Excel.WorkBooks[1].Sheets[1].Cells[i,13];
 if analise  'Reprovado' then
 begin
 I:=I+1;
 texto:=Excel.WorkBooks[1].Sheets[1].Cells[i,3];
 end
 else
 begin
 texto:=Excel.WorkBooks[1].Sheets[1].Cells[i,3];
 table1.Insert;
 table1Cmpo1.Value:=Excel.WorkBooks[1].Sheets[1].Cells[i,1];
 table1.Post;
 i:=i+1
 end;
 end;
 Excel.WorkBooks.close;
 
 end;





[delphi-br] Re: Resgatar valores de uma planilha de excel para o delphi.

2008-10-31 Por tôpico Márcio Ferraz
Olá pessoal. 
configurei com a planilha em excel via ado, só que na hora de fazer a 
coneção ele dá uma mensagem que a tabela externa não está no formato 
esperado.
Estou usando Excel 2003 + delphi 7.
Alguem pode me ajudar nesta batalha estou precisando resgatar de uma 
planilha inscritos de um vestibular da facu que trabalho e presciso, 
mais até agora não consegui fazer esta conecção, sei como exportar 
dados mais não vejo meios de importar para o delphi, conseguindo isto 
irei armazenar em Firebird.
Grato 
Márcio


--- Em delphi-br@yahoogrupos.com.br, Márcio Ferraz [EMAIL PROTECTED] 
escreveu

 OPA...
 AGRADEÇO A TODOS RÁPIDO A RESPOSTA E BEM OBJETIVA, VALEU MESMO.
 ABRAÇO A TODOS
 
 
 --- Em delphi-br@yahoogrupos.com.br, ajmsombra ajmsombra@ 
 escreveu
 
  --- Em delphi-br@yahoogrupos.com.br, Márcio Ferraz marciomrck@ 
  escreveu
  
   Olá pessoal do grupo. 
   Gostaria de uma ajudinha, preciso resgatar dados de uma 
planilha 
 de 
   excel para o delphi e manipulá-la, tenho como exportar para o 
  delphi 
   mais não sei como importar.
   Desde já grato.
   Márcio
  
  
  
  procedure TForm1.Button1Click(Sender: TObject);
  var
  Excel : Variant;
  i:Integer;
  analise,texto:string;
  begin
  i:=4;
  Excel := CreateOleObject('Excel.Application');
  Excel.Visible :=True;
  {Excel.Workbooks.Add;}
  Excel.WorkBooks.Open(Edit1.text+'nome da planilha.xls');
  texto:=Excel.WorkBooks[1].Sheets[1].Cells[i,3];
  while texto  '' do
  begin
  analise:=Excel.WorkBooks[1].Sheets[1].Cells[i,13];
  if analise  'Reprovado' then
  begin
  I:=I+1;
  texto:=Excel.WorkBooks[1].Sheets[1].Cells[i,3];
  end
  else
  begin
  texto:=Excel.WorkBooks[1].Sheets[1].Cells[i,3];
  table1.Insert;
  table1Cmpo1.Value:=Excel.WorkBooks[1].Sheets[1].Cells[i,1];
  table1.Post;
  i:=i+1
  end;
  end;
  Excel.WorkBooks.close;
  
  end;
 





[delphi-br] Resgatar valores de uma planilha de excel para o delphi.

2008-10-30 Por tôpico Márcio Ferraz
Olá pessoal do grupo. 
Gostaria de uma ajudinha, preciso resgatar dados de uma planilha de 
excel para o delphi e manipulá-la, tenho como exportar para o delphi 
mais não sei como importar.
Desde já grato.
Márcio



Re: [delphi-br] Assinar Hash...

2008-06-30 Por tôpico Márcio Ricardo Alves da Silva
Valeu, Alexandre. Eu tenho esse livro aqui, mas tem que ser em .net. Eu achei 
uma dll mscoree.dll que tem uma função. Se funcionar eu posto aqui no grupo.
Márcio Ricardo Alves da Silva
Programador Pleno
Oracle Certified Associate 9i
* [EMAIL PROTECTED]

Config Informática Ltda
 Av. Eng. Luis Carlos Berrini, 801 - 7º andar
 04571-010 - Brooklin Novo - São Paulo - SP
( Fone (11) 5501-8300
( Fax (11) 5501-8302
8 www.config.com.br - Original Message - 

  From: Alexandre Rodrigues 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, June 30, 2008 2:13 PM
  Subject: Re: [delphi-br] Assinar Hash...


  Na verdade você quer é criptografar o hash gerado. O resultado seria uma 
  assinatura digital do arquivo do qual resultou o hash.
  De uma olhada no livro Assinatura Digital - Solução Delphi e Capicom

  Márcio Ricardo Alves da Silva escreveu:
   
   
   Davi, obrigado pela resposta. Mas com certeza eu não estou confundindo. 
   Eu preciso gerar um hash de uma string e depois assinar esse hash 
   utilizando SHA1-RSA.
   Márcio Ricardo Alves da Silva
   Programador Pleno
   Oracle Certified Associate 9i
   * [EMAIL PROTECTED] mailto:marcio.silva%40config.com.br
   
   Config Informática Ltda
Av. Eng. Luis Carlos Berrini, 801 - 7º andar
04571-010 - Brooklin Novo - São Paulo - SP
   ( Fone (11) 5501-8300
   ( Fax (11) 5501-8302
   8 www.config.com.br - Original Message -
   
   From: Davi Eduardo Borges Wall
   To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
   Sent: Monday, June 30, 2008 11:56 AM
   Subject: RES: [delphi-br] Assinar Hash...
   
   Assinar um Hash?
   
   Hash é um calculo feito através de uma informação de entrada e que gera 
   um índice para uma tabela genérica de valores de tamanho N.
   
   Muito utilizado para balancear tabelas com listas encadeadas.
   
   Agora... Assinar um Hash? Provavelmente você ta confundindo.
   
   -Mensagem original-
   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 Márcio Ricardo Alves 
   da Silva
   Enviada em: segunda-feira, 30 de junho de 2008 08:39
   Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
   Assunto: [delphi-br] Assinar Hash...
   
   Untitled DocumentAlguém tem um esquema onde eu consiga gerar um hash de 
   uma string e assinar esse hash?
   
   Obrigado,
   
   Márcio Ricardo.
   
   [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]
   
   
  __
  Faça ligações para outros computadores com o novo Yahoo! Messenger 
  http://br.beta.messenger.yahoo.com/ 


   

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



Re: [delphi-br] Assinar Hash...

2008-06-30 Por tôpico Márcio Ricardo Alves da Silva
Tem sim Alexandre. Eu consigo assinar um XML. Mas o que eu preciso, é assinar 
uma string, ou seja, pegar determinadas tag montar a string e assinar. Não 
posso gerar um xml e assinar essas tag separada, entendeu.
Márcio Ricardo Alves da Silva
Programador Pleno
Oracle Certified Associate 9i
* [EMAIL PROTECTED]

Config Informática Ltda
 Av. Eng. Luis Carlos Berrini, 801 - 7º andar
 04571-010 - Brooklin Novo - São Paulo - SP
( Fone (11) 5501-8300
( Fax (11) 5501-8302
8 www.config.com.br - Original Message - 

  From: Alexandre Rodrigues 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, June 30, 2008 3:05 PM
  Subject: Re: [delphi-br] Assinar Hash...


  Se não me engano o .net tem assinatura digital nativa.

  Márcio Ricardo Alves da Silva escreveu:
   
   
   Valeu, Alexandre. Eu tenho esse livro aqui, mas tem que ser em .net. Eu 
   achei uma dll mscoree.dll que tem uma função. Se funcionar eu posto aqui 
   no grupo.
   Márcio Ricardo Alves da Silva
   Programador Pleno
   Oracle Certified Associate 9i
   * [EMAIL PROTECTED] mailto:marcio.silva%40config.com.br
   
   Config Informática Ltda
Av. Eng. Luis Carlos Berrini, 801 - 7º andar
04571-010 - Brooklin Novo - São Paulo - SP
   ( Fone (11) 5501-8300
   ( Fax (11) 5501-8302
   8 www.config.com.br - Original Message -
   
   From: Alexandre Rodrigues
   To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
   Sent: Monday, June 30, 2008 2:13 PM
   Subject: Re: [delphi-br] Assinar Hash...
   
   Na verdade você quer é criptografar o hash gerado. O resultado seria uma
   assinatura digital do arquivo do qual resultou o hash.
   De uma olhada no livro Assinatura Digital - Solução Delphi e Capicom
   
   Márcio Ricardo Alves da Silva escreveu:
   
   
Davi, obrigado pela resposta. Mas com certeza eu não estou confundindo.
Eu preciso gerar um hash de uma string e depois assinar esse hash
utilizando SHA1-RSA.
Márcio Ricardo Alves da Silva
Programador Pleno
Oracle Certified Associate 9i
* [EMAIL PROTECTED] mailto:marcio.silva%40config.com.br 
   mailto:marcio.silva%40config.com.br
   
Config Informática Ltda
 Av. Eng. Luis Carlos Berrini, 801 - 7º andar
 04571-010 - Brooklin Novo - São Paulo - SP
( Fone (11) 5501-8300
( Fax (11) 5501-8302
8 www.config.com.br - Original Message -
   
From: Davi Eduardo Borges Wall
To: delphi-br@yahoogrupos.com.br 
   mailto:delphi-br%40yahoogrupos.com.br 
   mailto:delphi-br%40yahoogrupos.com.br
Sent: Monday, June 30, 2008 11:56 AM
Subject: RES: [delphi-br] Assinar Hash...
   
Assinar um Hash?
   
Hash é um calculo feito através de uma informação de entrada e que gera
um índice para uma tabela genérica de valores de tamanho N.
   
Muito utilizado para balancear tabelas com listas encadeadas.
   
Agora... Assinar um Hash? Provavelmente você ta confundindo.
   
-Mensagem original-
De: delphi-br@yahoogrupos.com.br 
   mailto:delphi-br%40yahoogrupos.com.br 
   mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br 
   mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br] Em nome de Márcio Ricardo Alves
da Silva
Enviada em: segunda-feira, 30 de junho de 2008 08:39
Para: delphi-br@yahoogrupos.com.br 
   mailto:delphi-br%40yahoogrupos.com.br 
   mailto:delphi-br%40yahoogrupos.com.br
Assunto: [delphi-br] Assinar Hash...
   
Untitled DocumentAlguém tem um esquema onde eu consiga gerar um hash de
uma string e assinar esse hash?
   
Obrigado,
   
Márcio Ricardo.
   
[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]
   
   
   __
   Faça ligações para outros computadores com o novo Yahoo! Messenger
   http://br.beta.messenger.yahoo.com/ http://br.beta.messenger.yahoo.com/
   
   [As partes desta mensagem que não continham texto foram removidas]
   
   
  __
  Faça ligações para outros computadores com o novo Yahoo! Messenger 
  http://br.beta.messenger.yahoo.com/ 


   

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



Re: [delphi-br] Gravar e visualizar imagem do banco de dados

2008-05-19 Por tôpico Márcio Cota
Guarde no banco de dados, ou entao mova o arquivo para um diretorio no 
servidor, ai vc não previsa saber somente o nome do arquivo, já que o diretorio 
será sempre o mesmo.

E quando for mostrar o arquivo, vc concatena o nome do diretorio padrao (no 
servidor) mais o nome do arquivo 

  - Original Message - 
  From: Carlos 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, May 19, 2008 4:57 PM
  Subject: [delphi-br] Gravar e visualizar imagem do banco de dados


  Boa tarde a todos!!
  Solicito ajuda aos colegas com mais este problema:
  Tem um sistema que captura uma foto com o caminho do banco de dados e 
  apresenta para o usuário. Até ai tudo bem, mas o problema é que este 
  sistema é usado na rede, e caso o usuário tente visualizar a imagem 
  em uma máquina diferente de onde estão as imagens, ocorre um erro 
  porque ele não encontra o caminho.
  Alguém poderia me dar uma ajuda neste sentido, com um tutorial, ou 
  link...por favor...
  Uso DBExpress, MySql 5.0, Delphi 7.

  //Este é o código para exibir a imagem
  dmCadastro.cdsFotos.Close;
  dmCadastro.cdsFotos.Params[0].Value :=
  dmCadastro.cdsEfetivorf.Value;
  dmCadastro.cdsFotos.Open;
  if not (dmCadastro.cdsFotos.IsEmpty) then
  imgFoto.Picture.LoadFromFile(dmCadastro.cdsFotosfoto.Value)
  else
  imgFoto.Picture := nil;

  //Este é o código que salva a imagem
  if dlgOpenPicFoto.Execute then
  begin
  dmCadastro.cdsFotos.Insert;
  dmCadastro.cdsFotosrf.Value :=
  dmCadastro.cdsEfetivorf.Value;
  imgFoto.Picture.LoadFromFile(dlgOpenPicFoto.FileName);
  dmCadastro.cdsFotos.FieldByName('Foto').AsString :=
  dlgOpenPicFoto.FileName;
  dmCadastro.cdsFotos.Post;
  end;

  Agradeço antecipadamente a atenção dispensada.
  att
  Carlos



   

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



[delphi-br] Off - Banco de dados distribuido

2008-05-05 Por tôpico Márcio Cota
Alguem aqui ja teve experiencia com banco de dados distribuido?

Existe algum banco free que tenha essa funcionalidade?

Meu problema é o seguinte:
Como o cliente pode ficar sem acesso ao servidor de banco de dados que pode 
estar em outra cidade, e por algum motivo a conexão ficou fora do ar, e o 
trabalho não pode parar, quando a conexão voltar ao normal, os dados 
gravados localmente seriam atualizado no servidor.

O banco de dados distribuido é a melhor opção para meu problema?

E facil implementar sem mudar codigo do programa?




Re: [delphi-br] Off - Banco de dados distribuido

2008-05-05 Por tôpico Márcio Cota
Não estava pensando em criar codigo no programa para poder fazer isso.

Tenho certeza que os bancos de dados ja tem essa funcionalidade.

Não estou querendo programar para uma funcionalidade que ja existe e que 
funciona.

Só não sei se consigo isso com banco de dados distribuido

Nem como fazer.

Por isso estou perguntando se alguem ja tem expericia com isso e pode me dar 
alguma sugestao

Abraços


- Original Message - 
From: Rafael Jorge
To: delphi-br@yahoogrupos.com.br
Sent: Monday, May 05, 2008 5:47 PM
Subject: Re: [delphi-br] Off - Banco de dados distribuido


no meu posto de sistema on line X off line to discutindo isso ai que tu ta
querendo..
to nesse barco tambem..
t+

2008/5/5 Márcio Cota [EMAIL PROTECTED]:

 Alguem aqui ja teve experiencia com banco de dados distribuido?

 Existe algum banco free que tenha essa funcionalidade?

 Meu problema é o seguinte:
 Como o cliente pode ficar sem acesso ao servidor de banco de dados que
 pode
 estar em outra cidade, e por algum motivo a conexão ficou fora do ar, e o
 trabalho não pode parar, quando a conexão voltar ao normal, os dados
 gravados localmente seriam atualizado no servidor.

 O banco de dados distribuido é a melhor opção para meu problema?

 E facil implementar sem mudar codigo do programa?




-- 



[delphi-br] site de emprego

2007-07-27 Por tôpico Márcio Ricardo
Untitled Document A quem tiver interesse (não é spam)...

o link abaixo é referente à um networking de profissionais da área de 
informática, como se fosse o orkut, mas é totalmente profissional... 
interessante para quem estar procurando emprego/nova oportunidade de trabalho.
http://www.via6.com/user_form2.php?promo=109672_14f383118178929f84b492eb35ef9a9c
Márcio Ricardo Alves da Silva
Programador Pleno
* [EMAIL PROTECTED]

Config Informática Ltda
 Av. Eng. Luis Carlos Berrini, 801 - 7º andar
 04571-010 - Brooklin Novo - São Paulo - SP
( Fone (11) 5501-8300
( Fax (11) 5501-8302
8 www.config.com.br 


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 


[delphi-br] Criar Serviços delphi...

2007-07-26 Por tôpico Márcio Ricardo
Untitled DocumentPessoal, bom dia!

Sei que já teve post sobre esse assunto, mas tenho algumas dúvidas, se alguém 
puder ajudar.

Usar thread é a melhor maneira?
Como não deixar a memória do serviço subir muito?

Quando finalizo o processo(serviço) inicializo ele automaticamente, mas ele vem 
como manual, como inicializá-lo automático? Sem ser a primeira vez, isso depois 
de derrubar e subir novamente o serviço.

Criar vários serviços em um mesmo executável é aconselhável?

Obrigado,
Márcio Ricardo Alves da Silva
Programador Pleno
* [EMAIL PROTECTED]

Config Informática Ltda
 Av. Eng. Luis Carlos Berrini, 801 - 7º andar
 04571-010 - Brooklin Novo - São Paulo - SP
( Fone (11) 5501-8300
( Fax (11) 5501-8302
8 www.config.com.br 


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 


Re: [delphi-br] Vaga de Programador Delphi Sênior - para o centro do RJ

2007-07-25 Por tôpico Márcio Ricardo
Concordo com o Jefferson...

O projeto deles deve ser muito grande... estão contratanto bastante gente... ou 
devem estar pagando R$ 2 mil para a vaga, com direito a só vale-transporte... 
já encheu o saco esse anuncio de vaga... sugiro ao Moderador que entre em 
contato com essa empresa e vê o que acontece por tantos e-mails repetitivos... 
ou criar uma pasta/grupo para postar as vagas de emprego.
Márcio Ricardo Alves da Silva
Programador Pleno
* [EMAIL PROTECTED]

Config Informática Ltda
 Av. Eng. Luis Carlos Berrini, 801 - 7º andar
 04571-010 - Brooklin Novo - São Paulo - SP
( Fone (11) 5501-8300
( Fax (11) 5501-8302
8 www.config.com.br - Original Message - 

  From: Jefferson - Fórum 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, July 24, 2007 6:36 PM
  Subject: Re: [delphi-br] Vaga de Programador Delphi Sênior - para o centro do 
RJ


  Bem que essa Nova Consultoria, poderia estar precisando de profissionais em 
Java. 
  Assim daria uma paz, pra lista...

  Se continuar contratando assim, todos desenvolvedores Delphi estão 
trabalhando nessa empresa.

  OPINIÃO PESSOAL!!!

  - Original Message - 
  From: Nova Consultoria 
  To: delphi-boleto ; delphi-br ; delphi-empregos ; delphi-lista ; delphi-total 
; firebird-br ; lista-delphi ; PHP-PT ; programacao-hacker 
  Sent: Tuesday, July 24, 2007 5:15 PM
  Subject: [delphi-br] Vaga de Programador Delphi Sênior - para o centro do RJ

  PROGRAMADOR DELPHI SÊNIOR 

  Formação 
  - Superior completo 
  Requisitos Profissionais 
  - Experiência a partir de 4 anos de desenvolvimento com Delphi 
  - Sólidos conhecimentos em SQL Server 
  - Orientação ao objeto 
  - Modelagem de dados 
  Desejável 
  - Oracle 
  - UML 

  Boa oportunidade em empresa de grande porte líder no seu segmento no Rio de 
Janeiro.

  Encaminhar currículos para: [EMAIL PROTECTED] especificando no campus Assunto 
o nome da vaga.

  Aguardamos confirmação do recebimento do mesmo.

  Att.

  Jaqueline Cardoso
  21 2531.1204 - 2532.2533
  [EMAIL PROTECTED]

  Flickr agora em português. Você cria, todo mundo vê. Saiba mais.

  [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] OFF Topic - SQL - copiar um registro para outro (beginner)

2007-07-25 Por tôpico Márcio Ricardo
segue...

UPDATE ARTIGO
SET NOME_ARTIGO, LOCALIZACAO_ARTIGO = (SELECT NOME_ARTIGO, LOCALIZACAO_ARTIGO 
FROM ARTIGO WHERE CODIGO_ARTIGO = 1)
WHERE CODIGO_ARTIGO = 2

Adapte as suas necessidades.
Márcio Ricardo Alves da Silva
Programador Pleno
* [EMAIL PROTECTED]

Config Informática Ltda
 Av. Eng. Luis Carlos Berrini, 801 - 7º andar
 04571-010 - Brooklin Novo - São Paulo - SP
( Fone (11) 5501-8300
( Fax (11) 5501-8302
8 www.config.com.br - Original Message - 

  From: [EMAIL PROTECTED] 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, July 25, 2007 1:33 PM
  Subject: Re: [delphi-br] OFF Topic - SQL - copiar um registro para outro 
(beginner)


  Estimado colega Gustavo

  Tentei montar o sql de maneira bem simples, com poucos campos, porem nao 
  funcionou, nao utilizo as triggers, somente sql (sou iniciante).

  Meu caso é o seguinte:

  Eu tenho um cadastro de artigos e eu quero copiar o registro de chave codigo 
  = 1 para o registro de chave codigo = 2, mantendo o 1, apenas trocar o 
  codigo da chave, a minha estrutura da tabela é assim:

  codigo_artigo
  nome_artigo
  localizacao_artigo

  E desejo copiar o artigo de codigo = 1 para o codigo 2, aproveitando todas 
  as outros informacoes como nome, localizacao, etc do registro de codigo=1.

  Desde já sinceramente agradeço pela ajuda, muito obrigado.

  []´s.

  - Original Message - 
  From: gustavo ... [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Tuesday, July 24, 2007 9:30 PM
  Subject: Res: [delphi-br] OFF Topic - SQL - copiar um registro para outro 
  (beginner)

  pelo que eu entendi...

  insert into tabela (codigo, nome, ...)
  select novocodigo, nome, ...
  where codigo = :codigoantigo

  vc pode atribuir um valor para o novocodigp. ou usar uma trigger com um 
  generator, assim vc pode deixar 0 (zero) no novocodigo q ele automaticamente 
  incrementa o código.

  - Mensagem original 
  De: [EMAIL PROTECTED] [EMAIL PROTECTED]
  Para: delphi-br@yahoogrupos.com.br
  Enviadas: Terça-feira, 24 de Julho de 2007 10:22:24
  Assunto: [delphi-br] OFF Topic - SQL - copiar um registro para outro 
  (beginner)

  Colegas

  Existe uma maneira via SQL de copiar um registro da tabela para outro, mas

  com a chave diferente?

  Qualquer ajuda é bem-vinda, muito obrigado.

  []´s.

  !--

  #ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean, 
  sans-serif;}
  #ygrp-mlmsg table {font-size:inherit;font:100%;}
  #ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean, 
  sans-serif;}
  #ygrp-mlmsg pre, code {font:115% monospace;}
  #ygrp-mlmsg * {line-height:1.22em;}
  #ygrp-text{
  font-family:Georgia;
  }
  #ygrp-text p{
  margin:0 0 1em 0;}
  #ygrp-tpmsgs{
  font-family:Arial;
  clear:both;}
  #ygrp-vitnav{
  padding-top:10px;font-family:Verdana;font-size:77%;margin:0;}
  #ygrp-vitnav a{
  padding:0 1px;}
  #ygrp-actbar{
  clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;}
  #ygrp-actbar .left{
  float:left;white-space:nowrap;}
  .bld{font-weight:bold;}
  #ygrp-grft{
  font-family:Verdana;font-size:77%;padding:15px 0;}
  #ygrp-ft{
  font-family:verdana;font-size:77%;border-top:1px solid #666;
  padding:5px 0;
  }
  #ygrp-mlmsg #logo{
  padding-bottom:10px;}

  #ygrp-vital{
  background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;}
  #ygrp-vital #vithd{
  
font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;}
  #ygrp-vital ul{
  padding:0;margin:2px 0;}
  #ygrp-vital ul li{
  list-style-type:none;clear:both;border:1px solid #e0ecee;
  }
  #ygrp-vital ul li .ct{
  
font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;}
  #ygrp-vital ul li .cat{
  font-weight:bold;}
  #ygrp-vital a {
  text-decoration:none;}

  #ygrp-vital a:hover{
  text-decoration:underline;}

  #ygrp-sponsor #hd{
  color:#999;font-size:77%;}
  #ygrp-sponsor #ov{
  padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;}
  #ygrp-sponsor #ov ul{
  padding:0 0 0 8px;margin:0;}
  #ygrp-sponsor #ov li{
  list-style-type:square;padding:6px 0;font-size:77%;}
  #ygrp-sponsor #ov li a{
  text-decoration:none;font-size:130%;}
  #ygrp-sponsor #nc {
  background-color:#eee;margin-bottom:20px;padding:0 8px;}
  #ygrp-sponsor .ad{
  padding:8px 0;}
  #ygrp-sponsor .ad #hd1{
  
font-family:Arial;font-weight:bold;color:#628c2a;font-size:100%;line-height:122%;}
  #ygrp-sponsor .ad a{
  text-decoration:none;}
  #ygrp-sponsor .ad a:hover{
  text-decoration:underline;}
  #ygrp-sponsor .ad p{
  margin:0;}
  o {font-size:0;}
  .MsoNormal {
  margin:0 0 0 0;}
  #ygrp-text tt{
  font-size:120%;}
  blockquote{margin:0 0 0 4px;}
  .replbq {margin:4;}
  --

  Flickr agora em português. Você cria, todo mundo vê.
  http://www.flickr.com.br/

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

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Links do Yahoo! Grupos

  __ Informação do NOD32 IMON 2418

Re: [delphi-br] DBExpress as vezes não esta gravando no banco

2007-07-10 Por tôpico Márcio Ricardo
Kra, coloca no enveto do ClientDataSet (OnReconcileError) aquele raise que o 
Bruno Lichot te sugeiu... com o erro você saberá o que é, ou passe para nós o 
erro... ai fica fácil de alguém te ajudar.
Márcio Ricardo Alves da Silva
Programador Pleno
* [EMAIL PROTECTED]

Config Informática Ltda
 Av. Eng. Luis Carlos Berrini, 801 - 7º andar
 04571-010 - Brooklin Novo - São Paulo - SP
( Fone (11) 5501-8300
( Fax (11) 5501-8302
8 www.config.com.br - Original Message - 

  From: Fabio Campigotto 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, July 10, 2007 3:58 PM
  Subject: Re: [delphi-br] DBExpress as vezes não esta gravando no banco


  Tentei com applyupdates(0).

  Mas olha só...
  Tenho alguns campos na tabela.

  Se altero um campo varchar2, o sistema gravou e confirmou no banco
  Se altero um campo Number, o sistema não gravou no banco estranho né?

  Tambem não tenho certeza se é referente ao tipo de campo.

  Sabes dizer alguma coisa? Obrigado...

  - Original Message - 
  From: Bruno Lichot 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, July 10, 2007 2:15 PM
  Subject: RES: [delphi-br] DBExpress as vezes não esta gravando no banco

  Pq esta dando erro..

  Vc tem q usar o applyupdates(0) e não (-1)

  E no evento onreconcilierror, colocar pelo menos um codigo q levante
  excessao como este:

  Raise edatabaseerror.create(e.message);

  O parametro -1 diz q podem ocorrer erros ilimitados e o zero determina q nao
  pode ocorrer erro.

  Atenciosamente,

  Bruno Lichot

  CodeGear Product Evangelist

  http://www.codegear.com

  http://cc.codegear.com/Author/795118

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Fabio Campigotto
  Enviada em: terça-feira, 10 de julho de 2007 13:11
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] DBExpress as vezes não esta gravando no banco

  Pessoal

  Estou utilizando DBExpress,
  No componente ClientDataSet, estou fazendo:
  ClientDataSet.ApplyUpdates(-1);

  Porque as vezes funciona e as vezes, não
  Alguns campos esta gravando e alguns não

  Alguem sabe dizer alguma coisa?

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

  __ Informação do NOD32 IMON 2390 (20070710) __

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

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

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



   

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



Re: [delphi-br] Inserindo conteúdo de um campo em um TEdit

2007-07-03 Por tôpico Márcio Ricardo
Verifica se antes o campo não está null

If not dmCompromisso.cdsCompromisso.FieldByName('Linha0700').isnull then
  cdb700 := dmCompromisso.cdsCompromisso.FieldByName('Linha0700').value;

a mesma forma para o edit.

Márcio Ricardo.
  - Original Message - 
  From: Adenes I. Freire Junior 
  To: delphi-br@yahoogrupos.com.br ; FireBase ; [EMAIL PROTECTED] ; [EMAIL 
PROTECTED] 
  Sent: Monday, July 02, 2007 8:53 AM
  Subject: [delphi-br] Inserindo conteúdo de um campo em um TEdit


  Caro amigo, quando tento passar o conteúdo de um campo num TEdit aparece a
  seguinte msg: Could not convert variant of type (Null) into tupe (String). 

  Isso ocorre quando o campo não tem nenhuma informação. 

  Exemplo: 

  CBox700.Text := dmCompromisso.cdsCompromisso.FieldByName('Linha0700').Value; 
  Edit701.Text := dmCompromisso.cdsCompromisso.FieldByName('Linha0701')
  Value 

  O compontente CBOx700.Text tem informção + o Edit701 n tem. É onde ocorre o 
erro.
  --

  ---
  avast! Antivirus: Outbound message clean.
  Virus Database (VPS): 000753-1, 02/07/2007
  Tested on: 2/7/2007 08:54:05
  avast! - copyright (c) 1988-2007 ALWIL Software.
  http://www.avast.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] Re: Duvida sobre SQL no Delphi

2007-06-28 Por tôpico Márcio Ricardo
fabiana, 
tenta usar QuotedStr(campo) essa função coloca aspas... eu sempre uso ela 
quando preciso usar aspas.

Se não der certo... elimine essa parte com as aspas e testa, pra termos certeza 
que o problema está ai, ou melhor, vai fazendo o select por partes (cada campo) 
assim você chega no campo onde está dando o problema
  - Original Message - 
  From: sandrobit2000 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, June 28, 2007 11:06 AM
  Subject: [delphi-br] Re: Duvida sobre SQL no Delphi


  Fabiana ao inves de colocar  ou '' coloque NULL

  espero ter ajudado

  Bit

  --- Em delphi-br@yahoogrupos.com.br, Fabiana [EMAIL PROTECTED] escreveu
  
   Marcelo,
   
   Não deu certo o Delphi diz que o campo é invalido quando uso o
  CAST da forma que vc sugeriu colocando as ' ' pelo codigo asc.
   
   Fabiana
   - Original Message - 
   From: Marcelo - Kappesberg 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Thursday, June 28, 2007 9:18 AM
   Subject: Re: [delphi-br] Re: Duvida sobre SQL no Delphi
   
   
   Acho que o problema neste caso eh as aspas simples, jah que ela
  tambem eh usada para carregar o SQL...
   
   tente fazer assim:..
   
   SQL.Add('CAST('+#34#34+' AS Char(1)) as TipoRec,');
   
   o #34 eh o codigo asc das aspas simples...
   
   Marcelo Hörlle
   [EMAIL PROTECTED]
   
   - Original Message - 
   From: Fabiana 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Thursday, June 28, 2007 8:53 AM
   Subject: Re: [delphi-br] Re: Duvida sobre SQL no Delphi
   
   Carlos, Bom Dia
   
   o codigo completo e esse aqui:
   
   with DModulo.qryVendas do
   begin
   Close;
   SQL.Clear;
   SQL.Add('Select');
   SQL.Add('VendasEspec.TipoRec as TipoRec,');
   SQL.Add('VendasEspec.NumeroRec as NumeroRec,');
   SQL.Add('VendasEspec.DataRec as DataRec,');
   SQL.Add('VendasEspec.UFCRM as UFCRM,');
   SQL.Add('VendasEspec.CRM as CRM,');
   SQL.Add('VendasEspec.TipoCRM as TipoCRM,');
   SQL.Add('VendasEspec.TipoDoc as TipoDoc,');
   SQL.Add('VendasEspec.NumeroDoc as NumeroDoc,');
   SQL.Add('VendasEspec.OrgaoExp as OrgaoExp,');
   SQL.Add('VendasEspec.UFDoc as UFDoc,');
   SQL.Add('VendasEspec.NomeComp as NomeComp,');
   SQL.Add('VendasEspec.NomeMed as NomeMed,');
   SQL.Add('VendasEspec.TipoOp as TipoOp,');
   SQL.Add('VendasEspec.DescProd as DescProd,');
   SQL.Add('VendasEspec.Quantidade as Quantidade,');
   SQL.Add('VendasEspec.DataVenda as DataVenda,');
   SQL.Add('VendasEspec.Lote as Lote,');
   SQL.Add('VendasEspec.RegMs as RegMS');
   SQL.Add('from');
   SQL.Add('vendasEspec');
   SQL.Add('UNION ALL');
   SQL.Add('select');
   SQL.Add('CAST('' AS Char(1)) as TipoRec,');
   SQL.Add('CAST('' AS VarChar(15)) as NumeroRec,');
   SQL.Add('CAST('' AS Date) as DataRec,');
   SQL.Add('CAST('' AS Char(2)) as UFCRM,');
   SQL.Add('CAST('' AS VarChar(10)) as CRM,');
   SQL.Add('CAST('' AS Char(4)) as TipoCRM,');
   SQL.Add('CAST('' AS Char(6)) as TipoDoc,'); 
   SQL.Add('Clientes.Inscr_Est as NumeroDoc,');
   SQL.Add('CAST('' AS Char(6)) as OrgaoExp,');
   SQL.Add('CAST('' AS Char(2)) as UFDoc,');}
   SQL.Add('Vendas.cliente as NomeComp,');
   SQL.Add('CAST('' AS VarChar(50)) as NomeMed,');
   SQL.Add('Vendas.operacao as TipoOp,');
   SQL.Add('Vendas.DescProd as DescProd,');
   SQL.Add('Vendas.quantidade as Quantidade,');
   SQL.Add('Vendas.data as DataVenda,');
   SQL.Add('Vendas.identifica as Lote,');
   SQL.Add('Codforn.codfornec as RegMS');
   SQL.Add('from');
   SQL.Add('Vendas');
   SQL.Add('LEFT JOIN');
   SQL.Add('Clientes ON vendas.CGC = clientes.CGC');
   SQL.Add('LEFT JOIN');
   SQL.Add('Codforn ON vendas.codprod = codforn.codelf');
   SQL.Add('where');
   SQL.Add('(vendas.data = :pDataini1) and (vendas.data =
  :pDatafim1) and');
   SQL.Add('(vendas.grupoProd = :pGrupo1) and (vendas.operacao =
  :tipoOp1) or');
   SQL.Add('(vendas.data = :pDataini2) and (vendas.data =
  :pDatafim2) and');
   SQL.Add('(vendas.grupoProd = :pGrupo2) and (vendas.operacao =
  :tipoOp2) or');
   SQL.Add('(vendas.data = :pDataini3) and (vendas.data =
  :pDatafim3) and');
   SQL.Add('(vendas.grupoProd = :pGrupo3) and (vendas.operacao =
  :tipoOp3) or');
   SQL.Add('(vendas.data = :pDataini4) and (vendas.data =
  :pDatafim4) and');
   SQL.Add('(vendas.grupoProd = :pGrupo4) and (vendas.operacao =
  :tipoOp4)');
   SQL.Add('Order by');
   SQL.Add('descprod,datavenda');
   
   Params[0].AsDate:= dtpInicial.Date;
   Params[1].AsDate:= dtpFinal.Date;
   Params[2].AsString := '1';
   Params[3].AsString := 'V';
   Params[4].AsDate:= dtpInicial.Date;
   Params[5].AsDate:= dtpFinal.Date;
   Params[6].AsString := '2';
   Params[7].AsString := 'V';
   Params[8].AsDate:= dtpInicial.Date;
   Params[9].AsDate:= dtpFinal.Date;
   Params[10].AsString := '3';
   Params[11].AsString := 'V';
   Params[12].AsDate:= dtpInicial.Date;
   Params[13].AsDate:= dtpFinal.Date;
   Params[14].AsString := '4';
   Params[15].AsString := 'V';
   Open;
   end;
   
   estou usando o UNION pois os tem campos em uma tabela que 

Re: [delphi-br] Erro na Execução

2007-06-28 Por tôpico Márcio Ricardo
Leandro, bom dia!

Primeiro, você tem que deixar a conexão com false.

Na Propriedade ConnectionName do SQLConnection, o nome tem que ser o mesmo q 
está no arquivo .ini, exemplo:

SQLConnection.ConnectionName := 'esse_nome';

[esse_nome]
DriverName=ORACLE
GETDRIVERFUNC=getSQLDriverORACLE
DATABASE=esquema
USER_NAME=usuario
PASSWORD=senha
BLOBSIZE=-1
ERRORRESOURCEFILE=
LOCALECODE=
ORACLE TRANSISOLATION=ReadCommited
ROWSETSIZE=20
OS AUTHENTICATION=False
MULTIPLE TRANSACTION=False
TRIM CHAR=False
DECIMAL SEPARATOR=,

Testa ai e vê se funciona.

Márcio Ricardo.

  - Original Message - 
  From: Leandro - Grupos 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, June 28, 2007 11:23 AM
  Subject: [delphi-br] Erro na Execução


  E ai pessoal blz

  Seguinte, estou desenvolvendo uma aplicação utilizando DBExpress. Utilizo um 
arquivo .ini para carregar as configurações de conexão do banco de dados, porem 
em tempo de projeto eu deixo definido no SQLConnection os parametros de acesso 
ao banco, para poder executar as consultas SQL e carregar os Campos nos 
ClientDataSet.

  A conexão deste SQLConnection fica ativa o tempo todo, porem quando eu 
instalo o executavel em um cliente ele me apresenta um erro de conexão dizendo 
que o banco de dados especificado nao foi encontrado ( no caso o banco de dados 
que esta definido no componente SQLConnection e não o que esta no arquivo ini). 
Eu coloquei no OnCreate do DataModule Principal, que é onde está o 
SQLConnection, a linha SQLConnection.connected := false, mas o erro ocorre 
antes de chegar nessa linha (sendo que ela é a primeira do OnCreate do 
Datamodule principal.

  OBS.: Se eu compilar o projeto com a propriedade Connected = false não ocorre 
esse problema.

  Não sei mais o que fazer

  Leandro Carbonera
  (54) 3343-1143 / 9977-1266
  [EMAIL PROTECTED]
  www.sigmatecnologia.com.br 

  [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 na Execução

2007-06-28 Por tôpico Márcio Ricardo
Leandro, vejo que você já conseguiu resolver o problema... em relação ao 
caminho ser diferente, você poderia pegar o caminho onde encontra o executável 
e colocar o arquivo .ini nele... e fazer como eu tinha te passado 
anteriormente... aqui na empresa utilizamos desse jeito... quando vai instalar 
em algum cliente novo, basta colocar o arquivo .ini no mesmo caminho do 
executável que o sistema pega tudo certinho...

Como já foi resolvido... blz.

Márcio Ricardo.
  - Original Message - 
  From: Leandro - Grupos 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, June 28, 2007 12:53 PM
  Subject: Re: [delphi-br] Erro na Execução


  Ok, Marcio muito obrigado pela atenção, mas o detalhe é justamente esse.
  Como eu cite no final da mensagem, se eu compilar o programa a propriedade 
SQLConnection.Connected = false funciona sem problemas. Porem lá no meu cliente 
o caminho que estiver informado em DATABASE não existe, lá será configurado 
outro caminho e salvo num arquivo .ini que será carregado no OnCreate do 
DataModule, mas o erro esta ocorrendo antes de executar o evento OnCreate..

  Desculpe se derepente eu não fui muito claro na explicaçao.

  Leandro Carbonera
  (54) 3343-1143 / 9977-1266
  [EMAIL PROTECTED]
  www.sigmatecnologia.com.br 

  - Original Message - 
  From: Márcio Ricardo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, June 28, 2007 11:46 AM
  Subject: Re: [delphi-br] Erro na Execução

  Leandro, bom dia!

  Primeiro, você tem que deixar a conexão com false.

  Na Propriedade ConnectionName do SQLConnection, o nome tem que ser o mesmo q 
está no arquivo .ini, exemplo:

  SQLConnection.ConnectionName := 'esse_nome';

  [esse_nome]
  DriverName=ORACLE
  GETDRIVERFUNC=getSQLDriverORACLE
  DATABASE=esquema
  USER_NAME=usuario
  PASSWORD=senha
  BLOBSIZE=-1
  ERRORRESOURCEFILE=
  LOCALECODE=
  ORACLE TRANSISOLATION=ReadCommited
  ROWSETSIZE=20
  OS AUTHENTICATION=False
  MULTIPLE TRANSACTION=False
  TRIM CHAR=False
  DECIMAL SEPARATOR=,

  Testa ai e vê se funciona.

  Márcio Ricardo.

  - Original Message - 
  From: Leandro - Grupos 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, June 28, 2007 11:23 AM
  Subject: [delphi-br] Erro na Execução

  E ai pessoal blz

  Seguinte, estou desenvolvendo uma aplicação utilizando DBExpress. Utilizo um 
arquivo .ini para carregar as configurações de conexão do banco de dados, porem 
em tempo de projeto eu deixo definido no SQLConnection os parametros de acesso 
ao banco, para poder executar as consultas SQL e carregar os Campos nos 
ClientDataSet.

  A conexão deste SQLConnection fica ativa o tempo todo, porem quando eu 
instalo o executavel em um cliente ele me apresenta um erro de conexão dizendo 
que o banco de dados especificado nao foi encontrado ( no caso o banco de dados 
que esta definido no componente SQLConnection e não o que esta no arquivo ini). 
Eu coloquei no OnCreate do DataModule Principal, que é onde está o 
SQLConnection, a linha SQLConnection.connected := false, mas o erro ocorre 
antes de chegar nessa linha (sendo que ela é a primeira do OnCreate do 
Datamodule principal.

  OBS.: Se eu compilar o projeto com a propriedade Connected = false não ocorre 
esse problema.

  Não sei mais o que fazer

  Leandro Carbonera
  (54) 3343-1143 / 9977-1266
  [EMAIL PROTECTED]
  www.sigmatecnologia.com.br 

  [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] Stack Overflow e BCD Overflow

2007-06-27 Por tôpico Márcio Ricardo
O2, tenta converter os seus campos inteiro e date para string na instrução que 
você coloca no SQLQuery.

Márcio Ricardo.
  - Original Message - 
  From: O2 Tecnologia (aJato) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, June 27, 2007 9:34 AM
  Subject: [delphi-br] Stack Overflow e BCD Overflow




  Estamos migrando nossa aplicação para DBExpress, e em alguns clientes 
  nossos em telas que já foram portadas estão aparecendo o erro Stack 
  Overflow e BCD Overflow, alguém tem uma luz do poderia estar provocando 
  isso ?

  Utilizamos D7 Upd1 + FB2.01, usando SQLQuery + Provider + ClientDataset.

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

2007-06-20 Por tôpico Márcio Ricardo
Outra opção..
verifica qual valor é maior entre o valor1 e valor2 e monte o seu calculo...

IF valor1 = valor2 then
  valor3 = valor1 - valor2
ELSE
  valor3 = valor2 - valor1

Márcio Ricardo.
  - Original Message - 
  From: Guionardo Furlan 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, June 20, 2007 1:16 PM
  Subject: Re: [delphi-br] Campo negativo


  Use a função ABS da unit SYSTEM (ela retorna o valor absoluto de um
  número, isto é, sem o sinal).

  Por exemplo:

  Valor3:=Abs(Valor1-Valor2);

  Em 20/06/07, Rodrigo Magno [EMAIL PROTECTED] escreveu:

   Amigos Delphianos,
  
   Estou precisando de como fazer o seguinte, tem uma condição aonde que :
  
   Valor1- Valor2 = Valor3
  
   aonde que se o valor3 for negativo tenho q fazer a ordem inversa, assim :
  
   valor2-valor1 = valor3.
  
   Alguem poderia me falar como podera fazer isto ?
  
   Obs : Como posso descobrir se o valor e negativo
  
   Rodrigo Magno

  -- 
  Timeo hominem unius libri
  Cogito ergo sum - Carpe diem

  []s
  Guionardo Furlan
  http://guionardo.blogspot.com


   

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



Re: [delphi-br] D7 - DBExpress - SQLServer 2005 - Read Commited / e alterações com Fetch (não fetchAll) SERÁ QUE TEM SOLUÇÃO???

2007-06-15 Por tôpico Márcio Ricardo
Davi, no evento BeforeApplyUpdates do DataSetProvider, você fecha a conexão, 
assim:

TSQLConnection.CloseDataSets.

vê se funciona.

Márcio Ricardo.


  - Original Message - 
  From: Davi Eduardo Borges Wall 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, June 14, 2007 2:52 PM
  Subject: RES: [delphi-br] D7 - DBExpress - SQLServer 2005 - ReadCommited / e 
alterações com Fetch (não fetchAll) SERÁ QUE TEM SOLUÇÃO???


  Estou utilizando a estrutura Connection - sqlquery - provider - 
clientedataset- datasource

  Se vc está falando do problema do fetch, tivemos que utilizar ddois dataset's 
1 para consultas e outro para alterações para 

  contornar o problema.

  Mas o problema ainda existe, se eu não der fetchall numa query utilizando sql 
server eu não consigo alterar os dados.
  as vezes gera uma mensagem de erro que não recordo, mas lembro que era em 
português e achei um tanto esquisito.

  

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Márcio 
Ricardo
  Enviada em: quarta-feira, 13 de junho de 2007 16:52
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] D7 - DBExpress - SQLServer 2005 - ReadCommited / e 
alterações com Fetch (não fetchAll) SERÁ QUE TEM SOLUÇÃO???

  Davi, que tipo de componentes de conexão você está utilizando?

  Você poderia passar exatamente a mesangem de erro que está dando? Acho que 
tive algo parecido com isso, e consegui resolver, é fácil.

  Márcio Ricardo.
  - Original Message - 
  From: Davi Eduardo Borges Wall 
  To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
  Sent: Friday, June 08, 2007 9:47 AM
  Subject: [delphi-br] D7 - DBExpress - SQLServer 2005 - ReadCommited / e 
alterações com Fetch (não fetchAll) SERÁ QUE TEM SOLUÇÃO???

  Olá senhores,

  Gostaria de saber como os senhores lidaram com esta situação que 
aparentemente só acontece
  no SGBD SQL Server.

  Trabalho no desenvolvimento de um sistema multibanco que utiliza transação 
pessimista. Ou seja, 
  somente quero ler informações commitadas. Todos os dados que não forem 
commitados considero
  dados inconsistentes. 

  No SQL Server (no meu caso 2005) se eu abrir uma transação, alterar, salvar e 
não dar commit ele da lock na tabela em questão.
  Todas as outras consultas ficarão literalmente travadas, até que o commit 
desta transação seja efetuado. Alguém sabe a causa disto?
  É assim mesmo que o SQL Server se comporta nesse caso? Por que os outros 
bancos como o FireBird e o Oracle não se comportam desta
  maneira mesmo utilizando ReadCommited?

  Estudei o hint NOLOCK que transforma aquele select especifico em uma consulta 
Read Uncommited, isto está ok, não gera mais o lock.
  Mas ele me retorna os dados antes de Commitar. O que não é legal. Imagine 
que um dado está sendo inserido por um usuário enquanto

  Outro usuário está tirando um relatório e esta informação está saindo no 
relatório. Daí da um erro, e acontece um Rollback. Eu tenho um
  dado no relatório que não existe na base.
  ReadPast me traz todos os registros que não estão lockados. O que também 
não satisfaz, pois o usuário pode estar editando um registro,
  importante alterando por exemplo a descrição, e estou tirando um relatório 
com valores. Esse registro não vai aparecer no relatório.

  Um colega uma vez disse  Qualquer que for a sua escolha, todas as opções são 
ruins, é isso mesmo ?

  Estas situações me fazem chegar a conclusão de que o Sql Server não é um 
banco de dados compatível com isolation ReadCommited,
  pois se para evitar um lock eu devo usar uma instrução Read Uncommited.

  No SqlServer também, estou com um problema intrigante. Se eu tenho uma query 
com fetch de 30 ou XX registros e tento alterar algum registro,
  após salvar o registro não salva. Somente se eu der um FetchAll, alterar e 
salvar, aí então os dados são salvos.

  Se alguém passou por esses problemas, qualquer sugestão é bem vinda.

  []'s

  Davi Wall.

  [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] CheckBox na DBGrid. Tem Como?

2007-06-15 Por tôpico Márcio Ricardo
Claro que tem!

const
  CtrlState: array[Boolean] of Integer = (DFCS_BUTTONCHECK, DFCS_BUTTONCHECK or 
DFCS_CHECKED);

eventos da Grid.



procedure TfrmExportaXML.DBGrid2DblClick(Sender: TObject);
begin
  if not (DM.ClientDataSet.State in [dsEdit]) then
DM.ClientDataSet.Edit;
  if DBGrid2.SelectedIndex = 8 then
  begin
if DM.ClientDataSet.FieldByName('CAMPO').AsString = '0' then
  DM.ClientDataSet.FieldByName('CAMPO').AsString := '1'
else
 DM.ClientDataSet.FieldByName('CAMPO').AsString := '0';
  end
  else
  begin
if DBGrid2.SelectedIndex = 9 then
begin
  if DM.ClientDataSet.FieldByName('CAMPO').AsString = '0' then
DM.ClientDataSet.FieldByName('CAMPO').AsString := '1'
  else
DM.ClientDataSet.FieldByName('CAMPO').AsString := '0';
end
else
begin
  if DBGrid2.SelectedIndex = 10 then
  begin
if DM.ClientDataSet.FieldByName('CAMPO').AsString = '0' then
  DM.ClientDataSet.FieldByName('CAMPO').AsString := '1'
else
  DM.ClientDataSet.FieldByName('CAMPO').AsString := '0';
  end;
end;
  end
end;

procedure TfrmExportaXML.DBGrid2DrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
  if DM.ClientDataSet.RecordCount  0 then
  begin
if (Column.FieldName = 'CAMPO') or
   (Column.FieldName = 'CAMPO') or
   (Column.FieldName = 'CAMPO')then
begin
  Self.DBGrid2.Canvas.FillRect(Rect);
  CheckBoxRectangle.Left := Rect.Left + 2;
  CheckBoxRectangle.Right := Rect.Right - 2;
  CheckBoxRectangle.Top := Rect.Top + 2;
  CheckBoxRectangle.Bottom := Rect.Bottom - 2;

  if (DataCol = 8) then
  begin
if (DM.ClientDataSet.FieldByName('CAMPO').AsString = '1') then
  DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, 
DFC_BUTTON, CtrlState[True])
else
  DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, 
DFC_BUTTON, CtrlState[False]);
  end
  else
  begin
if (DataCol = 9) then
begin
  if (DM.ClientDataSet.FieldByName('CAMPO').AsString = '1') then
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, 
DFC_BUTTON, CtrlState[True])
  else
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, 
DFC_BUTTON, CtrlState[False]);
end
else
begin
  if (DataCol = 10) then
  begin
  if (DM.ClientDataSet.FieldByName('CAMPO').AsString = '1') then
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, 
DFC_BUTTON, CtrlState[True])
  else
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, 
DFC_BUTTON, CtrlState[False]);
  end;
end;
  end;
   end;
  end;
end;

  - Original Message - 
  From: Tiago Zacchi 
  To: Grupo_Delphi-Br 
  Sent: Friday, June 15, 2007 8:01 AM
  Subject: [delphi-br] CheckBox na DBGrid. Tem Como?


  Olá pessoal!

  Gostaria de seber se tem fazer com que um dos campos da minha DBGrid seja um 
CheckBox, ou algo parecido! Tem como fazer isso ?

  Obrigado, 

  [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] Conexão com ORACLE - DBExpress ou DBE?

2007-06-14 Por tôpico Márcio Ricardo
Fábio, no seu componenete (SQLQuery) ou outro que você esteja utilizando, 
altere a propriedade GetMetadata para FALSE, e faça um teste.

Márcio Ricardo.
  - Original Message - 
  From: Luiz Carlos Pereira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, June 13, 2007 8:33 PM
  Subject: Res: [delphi-br] Conexão com ORACLE - DBExpress ou DBE?


  Tem algo de errado, pois não demora tanto assim.

  Qual o Oracle que você está usando?

  - Mensagem original 
  De: Fabio Campigotto [EMAIL PROTECTED]
  Para: delphi-br@yahoogrupos.com.br
  Enviadas: Quarta-feira, 13 de Junho de 2007 19:38:20
  Assunto: [delphi-br] Conexão com ORACLE - DBExpress ou DBE?

  Pessoal,

  Alguem tem um exemplo ou dica de como posso fazer a conexão com o Banco com 
os componentes da pateta DBExpress?

  Tentei, utilizando uma SQLQuery ligada a uma SQLConnection, mas demora 
muuuii para conectar.

  É isto mesmo? estes componentes não são os melhores?
  Ou é melhor seguir na linha da BDE mesmo?

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

  __
  Novo Yahoo! Cadê? - Experimente uma nova busca.
  http://yahoo.com.br/oqueeuganhocomisso 

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



   

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



[delphi-br] Import Type Libray...

2007-06-06 Por tôpico Márcio Ricardo
Boa tarde!

 No delphi 7 eu tinha um recurso no Project - Import Type Library, para 
importar uma dll e criar unit... esse recurso não estou achando no bds2006, 
alguém poderia me ajudar com isso?

Márcio Ricardo.

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



[delphi-br] IUnknown (URGENTE)...

2007-06-06 Por tôpico Márcio Ricardo
Boa tarde!

 Estou fazendo um aplicativo em .net e nele precisei adicionar o pas 
OleServer.pas, mas está dando erro na COM Interface IUnknown, ele não acha essa 
interface. 
 Alguém tem idéia de como resolver?

Márcio Ricardo.

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



Re: [delphi-br] Code/Gear...

2007-05-30 Por tôpico Márcio Ricardo
Bom dia!

  Então é isso, falou em .net a Borland não se pronuncia e deixa os usuários 
na mão ou ainda mais incentivados a trocar a ferramenta para programação .net.
  O duro é que quando leva-se ao problema a eles, os mesmos dizem pra fazermos 
uma lista que tem solução e que é só pagar um consultor que ele irá na empresa 
resolver todos os problemas. Pagamos, ficou o dia inteiro e nada.
  Como eu tinha dito na discussão sobre o desabafo, para win32 não existe 
melhor ferramenta, mas para .net além de ser dificil fazer aplicativos, não 
temos muito suporte ou alguém que responda por essa área.
   Mesmo assim agradeço as pessoas que tentaram pensar em alguma solução para o 
problema. 
  Só uma dica. Vamos parar de lançar versões e mais versões e encontrar 
soluções para esses problemas, senão vão acabando perdendo muitos clientes.

Márcio Ricardo.

  - Original Message - 
  From: Márcio Ricardo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, May 29, 2007 12:37 PM
  Subject: [delphi-br] Code/Gear...


  Bom tarde!

  Para o pessoal da Code/Gear ou quem puder ajudar.

  Estou precisando validar um XML, não estou conseguindo de jeito nenhum com o 
framework 1.1. Já com o framework 2.0 do Visual Studio, consegui fazer.

  Alguém sabe como eu congigo validar um XML no framework 1.1, ou se não tem 
jeito mesmo. Quando será lançado o framework 2.0 para o BDS2006, estamos 
precisando pra ontem dessa rotina.

  Obrigado,
  Márcio Ricardo.

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

2007-05-30 Por tôpico Márcio Ricardo
Sérgio, aqui na empresa o as senhas de acesso aos sistemas foram criptografadas 
usando o MD5 do componente UserControl. Teve que ser feito algumas coisas, 
tipo: Foi feito um programa de Converte Senha para rodar nos clientes que já 
tinham a senha cadastrada para alterar. Esse programa alterarva o tamanho do 
campo senha para 32. 
 Hoje estamos utilizando essa criptografia e está indo super bem, posso até 
dizer que é impossível a quebra da criptografia.
  - Original Message - 
  From: Sérgio T. Uetanabaro 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, May 30, 2007 8:39 AM
  Subject: [delphi-br] Criptografia


  Olá lista,

  Eu usava o lockbox da turbopower para alguns algoritmos de criptografia.
  Estamos analisando a atualização de nossos sistemas para delphi2007 e
  gostaria de saber se alguem pode me indicar algum componente para isso (MD5,
  SHA, RSA e etc) ja que o lockbox que está no sourceforge não está sendo
  continuado.


  Obrigado

  Sergio Uetanabaro


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

2007-05-30 Por tôpico Márcio Ricardo
Sérgio, precisei fazer isso também.

 Tinha que criptografar alguns selects que consta nas tabelas, eu não fui atrás 
de componente fiz na unha mesmo, ficou legal.
  - Original Message - 
  From: Sérgio T. Uetanabaro 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, May 30, 2007 9:22 AM
  Subject: RES: [delphi-br] Criptografia


  Olá Márcio,

  Obrigado pela dica mas eu realmente preciso de um componente
  especializado em criptografia pois preciso disso em vários lugares de nossos
  softwares e nao somente na autenticação de usuários.

  []´s

  Sergio

  _ 

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Márcio Ricardo
  Enviada em: quarta-feira, 30 de maio de 2007 09:11
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Criptografia
  Prioridade: Alta

  Sérgio, aqui na empresa o as senhas de acesso aos sistemas foram
  criptografadas usando o MD5 do componente UserControl. Teve que ser feito
  algumas coisas, tipo: Foi feito um programa de Converte Senha para rodar nos
  clientes que já tinham a senha cadastrada para alterar. Esse programa
  alterarva o tamanho do campo senha para 32. 
  Hoje estamos utilizando essa criptografia e está indo super bem, posso até
  dizer que é impossível a quebra da criptografia.
  - Original Message - 
  From: Sérgio T. Uetanabaro 
  To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br 
  Sent: Wednesday, May 30, 2007 8:39 AM
  Subject: [delphi-br] Criptografia

  Olá lista,

  Eu usava o lockbox da turbopower para alguns algoritmos de criptografia.
  Estamos analisando a atualização de nossos sistemas para delphi2007 e
  gostaria de saber se alguem pode me indicar algum componente para isso (MD5,
  SHA, RSA e etc) ja que o lockbox que está no sourceforge não está sendo
  continuado.

  Obrigado

  Sergio Uetanabaro

  [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] Code/Gear...

2007-05-30 Por tôpico Márcio Ricardo
Caro Bruno,

no meu entender você é totalmente contra o .net, correto? A empresa onde 
trabalho está com projeto de Nota Fiscal Eletrônica, utilizando o BDS2006. Com 
esse projeto temos vários clientes grandes, que infelizmente não posso citar a 
empresa na qual trabalho e nem quem são os clientes que estão utilizando e 
muito bem o noss sistema desenvolvido em .net com o bds2006.

Outra coisa, a equipe na qual estamos locado para esse projeto, fica batendo 
toda hora que o delphi não dá pra .net. O diretor até já comprou um visual 
studio 2005. 
Teremos e terão outros projetos para .net, então a intenção e começar esses 
novos projetos no C#. Com isso, seria interessante você dar uma 
solução/reposta sobre a minha dúvida e levantar a bola do bds2006 para 
.net, mas você sendo contra o .net faz mais acreditarmos a empresa trocar 
todas as suas versões que tem comprada do delphi e comprar o visual studio.

A minha intenção do e-mail era achar uma solução para o nosso problema, esses 
bla bla bla já sei e quase todo dia tem na lista... que o delphi, que o delphi 
é aquilo, acho que todos que mexem com o delphi sabem da sua capacidade e 
limitação. Queria apenas uma ajuda ou apenas uma notícia de quando será lançado 
uma nova versão do framework (se será lançada), não uma resposta com várias 
perguntas contra o .net.

Codegear, tem que tomar cuidado quando se perguntar o porque dessa tecnologia, 
como outras pessoas disseram, o Bill colocou na cabeça dos cartolas que o .net 
é bom. Se um cartola vê um e-mail desses, logo concluem que o delphi não serve 
para .net.

Sem polemizar,
Márcio Ricardo.

  - Original Message - 
  From: Bruno Lichot 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, May 30, 2007 12:04 PM
  Subject: RES: [delphi-br] Code/Gear...


  Salve Pessoal!

  Bom, vamos tentar ajudar a esclarecer algumas questões aqui.

  A CodeGear está aumentando o prazo de lançamento entre as versões para ter
  versões mais estáveis como já havia sido pedido tanto pela comunidade quanto
  por nosso clientes. 

  Mas agora falando como desenvolvedor e não como integrante da equipe...
  pergunta : - Quem precisa de .Net? Por que ir pra .Net? O .Net tecnicamente
  falando é uma copia da estrutura da VCL, que alias foi desenhada pela
  mesma pessoa, só que com uma linguagem muito mais poderosa para suportar que
  é o Pascal. Usuários de Delphi não precisam ir pra .Net, aplicações escritas
  em .Net não diferenciam em nada aplicações VCL com a diferença dos usuários
  terem que instalar o .Net que é de mais de 30 megas. Será que o .Net vai me
  trazer melhor performance e facilidades de manutenção, distribuição e
  adaptabilidade com custo e prazo aceitáveis para minha empresa e ao meu
  cliente, ou é somente mais um tecnologia jogada para engolirmos? Onde posso
  aplicar comercialmente o .NET?

  Vou substituir meu legados ou decidir por esta nova tecnologia? Onde isso
  vai afetar? Se é tão bom .NET pq o Windows não é feito em .NET?

  Uma outra pergunta: Quem é que já viu a MS criar, modificar e acabar com
  tecnologias/padrões? Será que o .Net dura muito tempo mais? Já viram a
  compatibilidade do .NEt 1 com o 2 e com o 3?

  Última pergunta: Só pq o Tio Bill criou tem que ser bom e tem que ser a
  solução pro mundo?

  O Highlander vem aí, todos já sabem e tb já falamos que teremos compiladores
  para 64bits. Desejo de nossos clientes.

  Temos trabalhado e nos empenhado, tanto na atuação da comunidade, com
  eventos e com nossa disponibilidade de atender da melhor forma nosso
  clientes e a comunidade de desenvolvedores.

  Mantemos o maior repositório de material Delphi do mundo o code central e o
  Developer Network.

  Tanto eu como o Andreano e outros membros da equipe de evangelistas e
  funcionários, temos participado ativamente da comunidade não somente para
  promover novidades dos produtos, mas ajudando tecnicamente e fornecendo
  solução.

  Abs

  Bruno

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Márcio Ricardo
  Enviada em: quarta-feira, 30 de maio de 2007 08:43
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Code/Gear...
  Prioridade: Alta

  Bom dia!

  Então é isso, falou em .net a Borland não se pronuncia e deixa os usuários
  na mão ou ainda mais incentivados a trocar a ferramenta para programação
  .net.
  O duro é que quando leva-se ao problema a eles, os mesmos dizem pra fazermos
  uma lista que tem solução e que é só pagar um consultor que ele irá na
  empresa resolver todos os problemas. Pagamos, ficou o dia inteiro e nada.
  Como eu tinha dito na discussão sobre o desabafo, para win32 não existe
  melhor ferramenta, mas para .net além de ser dificil fazer aplicativos, não
  temos muito suporte ou alguém que responda por essa área.
  Mesmo assim agradeço as pessoas que tentaram pensar em alguma solução para o
  problema. 
  Só uma dica. Vamos parar de lançar versões e mais versões e encontrar
  soluções para esses problemas

Re: [delphi-br] Code/Gear...

2007-05-30 Por tôpico Márcio Ricardo
Beleza Bruno.

  Fiquei aliviado com esse seu e-mail, sinceramente eu tinha entendido que você 
abominava o .net. 
  Bom como temos várias licença do delphi e se não me engano temos contrato com 
a Borland que assim que saia uma versão eles nos disponibliza. Tomara que 
disponiblize logo essa versão, pois sinceramente esse processo já passou por 
três programadores e nenhum de nós conseguiu chegar o que se deseja.

Obrigado pelos esclarecimentos, e com certeza contatarei vocês.

Valeu,
Márcio Ricardo.
  - Original Message - 
  From: Bruno Lichot 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, May 30, 2007 2:35 PM
  Subject: RES: [delphi-br] Code/Gear...


  Salve Mestre Márcio!

  Não disse em momento nenhum que sou contra .NET, e respondi sua pergunta
  dizendo que o Delphi 2007 For .NET virá com suporte ao .NET 2.0 e já Tb o
  3.0.

  Eu uso .NET como descrevi no email, e tenho 2 sistemas comerciais em .NET
  usando ASP.NET com um foco bastante especifico.

  O BDS 2006 não terá suporte ao .NET 2.0, somente o 2007. Logo, não será
  necessário trocar de ferramentas. E não tem como algo que veio do Delphi ser
  ruim não é mesmo? E o .NET é baseado na VCL como todos sabem. E acredito na
  maturidade que este alcançará pois existe muito investimento e uma excelente
  equipe trabalhando nisso, o que fiz foi levantar questionamentos sobre o uso
  ou não da plataforma e me colocar a disposição para ajudar no que fosse
  necessário independente de qual tecnologia fosse.

  E se precisar, não titubeie em nos contatar, estou aqui para auxiliar e me
  desculpe se me expressei mal, definitivamente não sou contra o .NET, ou
  Win32 ou ao Java, pelo contrário, sou a favor daquilo que mais se adapta ao
  meu negócio, minhas necessidades, meu bolso e meus clientes, e nisso tudo o
  que se adapta melhor são soluções Borland/CodeGear. Por exemplo, através do
  Delphi eu consigo prover soluções para meus clientes em Web, C/S, N-TIER,
  .NET e Java e tudo integrado e se tiver mais um pedacinho na colcha de
  retalhos que se falar em Datapackage, .NET, Java ou web services encaixamos
  também de forma limpa, rápida e segura.

  Grandes novidades estão sendo preparadas para o próximo semestre.

  Sinta -se a vontade de chamar sempre que preciso. Será um imenso prazer
  ajudar.

  As ordens

  Bruno

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Márcio Ricardo
  Enviada em: quarta-feira, 30 de maio de 2007 14:19
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Code/Gear...

  Caro Bruno,

  no meu entender você é totalmente contra o .net, correto? A empresa onde
  trabalho está com projeto de Nota Fiscal Eletrônica, utilizando o BDS2006.
  Com esse projeto temos vários clientes grandes, que infelizmente não posso
  citar a empresa na qual trabalho e nem quem são os clientes que estão
  utilizando e muito bem o noss sistema desenvolvido em .net com o bds2006.

  Outra coisa, a equipe na qual estamos locado para esse projeto, fica batendo
  toda hora que o delphi não dá pra .net. O diretor até já comprou um visual
  studio 2005. 
  Teremos e terão outros projetos para .net, então a intenção e começar esses
  novos projetos no C#. Com isso, seria interessante você dar uma
  solução/reposta sobre a minha dúvida e levantar a bola do bds2006 para
  .net, mas você sendo contra o .net faz mais acreditarmos a empresa trocar
  todas as suas versões que tem comprada do delphi e comprar o visual studio.

  A minha intenção do e-mail era achar uma solução para o nosso problema,
  esses bla bla bla já sei e quase todo dia tem na lista... que o delphi, que
  o delphi é aquilo, acho que todos que mexem com o delphi sabem da sua
  capacidade e limitação. Queria apenas uma ajuda ou apenas uma notícia de
  quando será lançado uma nova versão do framework (se será lançada), não uma
  resposta com várias perguntas contra o .net.

  Codegear, tem que tomar cuidado quando se perguntar o porque dessa
  tecnologia, como outras pessoas disseram, o Bill colocou na cabeça dos
  cartolas que o .net é bom. Se um cartola vê um e-mail desses, logo concluem
  que o delphi não serve para .net.

  Sem polemizar,
  Márcio Ricardo.

  - Original Message - 
  From: Bruno Lichot 
  To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
  Sent: Wednesday, May 30, 2007 12:04 PM
  Subject: RES: [delphi-br] Code/Gear...

  Salve Pessoal!

  Bom, vamos tentar ajudar a esclarecer algumas questões aqui.

  A CodeGear está aumentando o prazo de lançamento entre as versões para ter
  versões mais estáveis como já havia sido pedido tanto pela comunidade quanto
  por nosso clientes. 

  Mas agora falando como desenvolvedor e não como integrante da equipe...
  pergunta : - Quem precisa de .Net? Por que ir pra .Net? O .Net tecnicamente
  falando é uma copia da estrutura da VCL, que alias foi desenhada pela
  mesma pessoa, só que com uma linguagem muito mais poderosa para suportar que
  é o

Re: [delphi-br] Code/Gear...

2007-05-30 Por tôpico Márcio Ricardo
Ricardo, valeu pelas dicas.

  Mas o que eu preciso é validar o xml pela assinatura. Tenho um arquivo XML, 
nele contém um nó X509Certificate que tem um conteúdo que é o certificado. E 
neste conteúdo tem a chave pública do certificado que precisamos pegá-la e 
transformar em RSA para a validação do mesmo, mas quem disse que isso sai... rs.

Valeu,
Márcio Ricardo.
 


  - Original Message - 
  From: Ricardo César Cardoso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, May 30, 2007 3:55 PM
  Subject: Re: [delphi-br] Code/Gear...


  Em cima do assunto validação de XML, já encontrou alguma solução? 

  Pq eu estava pesquisando no google 
(http://www.google.com.br/search?hl=pt-BRq=validating+an+XML+file+with+.net+framework+1.1btnG=Pesquisarmeta=)

  e achei este link, veja se te interessa:
  http://builder.com.com/5100-6389-5080856.html

  Sds,
  Ricardo

  Márcio Ricardo [EMAIL PROTECTED] escreveu: Beleza Bruno.

  Fiquei aliviado com esse seu e-mail, sinceramente eu tinha entendido que você 
abominava o .net. 
  Bom como temos várias licença do delphi e se não me engano temos contrato com 
a Borland que assim que saia uma versão eles nos disponibliza. Tomara que 
disponiblize logo essa versão, pois sinceramente esse processo já passou por 
três programadores e nenhum de nós conseguiu chegar o que se deseja.

  Obrigado pelos esclarecimentos, e com certeza contatarei vocês.

  Valeu,
  Márcio Ricardo.
  - Original Message - 
  From: Bruno Lichot 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, May 30, 2007 2:35 PM
  Subject: RES: [delphi-br] Code/Gear...

  Salve Mestre Márcio!

  Não disse em momento nenhum que sou contra .NET, e respondi sua pergunta
  dizendo que o Delphi 2007 For .NET virá com suporte ao .NET 2.0 e já Tb o
  3.0.

  Eu uso .NET como descrevi no email, e tenho 2 sistemas comerciais em .NET
  usando ASP.NET com um foco bastante especifico.

  O BDS 2006 não terá suporte ao .NET 2.0, somente o 2007. Logo, não será
  necessário trocar de ferramentas. E não tem como algo que veio do Delphi ser
  ruim não é mesmo? E o .NET é baseado na VCL como todos sabem. E acredito na
  maturidade que este alcançará pois existe muito investimento e uma excelente
  equipe trabalhando nisso, o que fiz foi levantar questionamentos sobre o uso
  ou não da plataforma e me colocar a disposição para ajudar no que fosse
  necessário independente de qual tecnologia fosse.

  E se precisar, não titubeie em nos contatar, estou aqui para auxiliar e me
  desculpe se me expressei mal, definitivamente não sou contra o .NET, ou
  Win32 ou ao Java, pelo contrário, sou a favor daquilo que mais se adapta ao
  meu negócio, minhas necessidades, meu bolso e meus clientes, e nisso tudo o
  que se adapta melhor são soluções Borland/CodeGear. Por exemplo, através do
  Delphi eu consigo prover soluções para meus clientes em Web, C/S, N-TIER,
  .NET e Java e tudo integrado e se tiver mais um pedacinho na colcha de
  retalhos que se falar em Datapackage, .NET, Java ou web services encaixamos
  também de forma limpa, rápida e segura.

  Grandes novidades estão sendo preparadas para o próximo semestre.

  Sinta -se a vontade de chamar sempre que preciso. Será um imenso prazer
  ajudar.

  As ordens

  Bruno

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Márcio Ricardo
  Enviada em: quarta-feira, 30 de maio de 2007 14:19
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Code/Gear...

  Caro Bruno,

  no meu entender você é totalmente contra o .net, correto? A empresa onde
  trabalho está com projeto de Nota Fiscal Eletrônica, utilizando o BDS2006.
  Com esse projeto temos vários clientes grandes, que infelizmente não posso
  citar a empresa na qual trabalho e nem quem são os clientes que estão
  utilizando e muito bem o noss sistema desenvolvido em .net com o bds2006.

  Outra coisa, a equipe na qual estamos locado para esse projeto, fica batendo
  toda hora que o delphi não dá pra .net. O diretor até já comprou um visual
  studio 2005. 
  Teremos e terão outros projetos para .net, então a intenção e começar esses
  novos projetos no C#. Com isso, seria interessante você dar uma
  solução/reposta sobre a minha dúvida e levantar a bola do bds2006 para
  .net, mas você sendo contra o .net faz mais acreditarmos a empresa trocar
  todas as suas versões que tem comprada do delphi e comprar o visual studio.

  A minha intenção do e-mail era achar uma solução para o nosso problema,
  esses bla bla bla já sei e quase todo dia tem na lista... que o delphi, que
  o delphi é aquilo, acho que todos que mexem com o delphi sabem da sua
  capacidade e limitação. Queria apenas uma ajuda ou apenas uma notícia de
  quando será lançado uma nova versão do framework (se será lançada), não uma
  resposta com várias perguntas contra o .net.

  Codegear, tem que tomar cuidado quando se perguntar o porque dessa
  tecnologia, como outras pessoas disseram, o Bill colocou na cabeça dos

[delphi-br] Code/Gear...

2007-05-29 Por tôpico Márcio Ricardo
Bom tarde!

 Para o pessoal da Code/Gear ou quem puder ajudar.

 Estou precisando validar um XML, não estou conseguindo de jeito nenhum com o 
framework 1.1. Já com o framework 2.0 do Visual Studio, consegui fazer.

 Alguém sabe como eu congigo validar um XML no framework 1.1, ou se não tem 
jeito mesmo. Quando será lançado o framework 2.0 para o BDS2006, estamos 
precisando pra ontem dessa rotina.

Obrigado,
Márcio Ricardo.

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



Re: [delphi-br] Delphi...Um desabafo à CodeGear... - MARCIO RICARDO

2007-05-21 Por tôpico Márcio Ricardo
Olá João,

 estamos sim utilizando o bds2006 .net com windowsform. Deixamos apenas a parte 
de servços mais complexos com o windowsform, os cadastros mais básicos ficaram 
no win32. Estamos utilizando como SGBD: FIREBIRD, ORACLE, SYBASE, MS-SQL. Como 
ferramenta para gerar relatório o Crystal XI.

 Podemos trocar figurinhas sim, caso eu posso ajudar.

Márcio Ricardo.
  - Original Message - 
  From: João Paulo - EsPyl 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 17, 2007 6:25 PM
  Subject: Re: [delphi-br] Delphi...Um desabafo à CodeGear... - MARCIO RICARDO


  Olá...

  Voces estão utilizando o BDS2006 .NET, trabalhando com delphi windowsform ? 
  QUal o banco de dados voces adotaram ? E qual o gerador de relatorio ? Será 
  que poderiamos trocar algumas figurinhas ?

  []s

  - Original Message - 
  From: Márcio Ricardo [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Thursday, May 17, 2007 10:04 AM
  Subject: Re: [delphi-br] Delphi...Um desabafo à CodeGear...

  Aqui na empresa estamos trabalhando com .net, utilizando BDS2006. O primeiro 
  projeto foi uma luta pra ser feito nessa ferramenta, devido aos transtornos, 
  impossibilidade de fazer algumas coisas bem simples, resolvemos comprar 
  licença do visual studio para utiliza-lo nos proximos projetos.

  Soltaram a versão bds2007, mas o framework nem mudaram.

  Enfim, pra .net o delphi não serve mesmo. Já para win32 não 
  tenho que reclamar.
  - Original Message - 
  From: Luis Lopes
  To: delphi-br@yahoogrupos.com.br
  Sent: Thursday, May 17, 2007 9:34 AM
  Subject: Res: [delphi-br] Delphi...Um desabafo à CodeGear...

  Mani,

  Não compartilho da sua opinião em todos os pontos que vc citou nesse post, 
  mas, não posso deixar de concordar com alguns. Entretando, penso que o ponto 
  que mais tá pegando, para uma certa debandada de profissionais (podem pensar 
  que estou exagerando, mas conheço vários) Delphi para outras ferramentas, 
  não é e jamais será a qualidade da ferramenta, mas sim, as políticas ruins 
  adotadas pela Borland e que estão sendo pioradas pela Code Gear. Ao menos a 
  nível de Brasil. Até os eventos promovidos por eles, de lançamentos de novas 
  versões da ferramentas estão deixando a desejar.

  Fui, por exemplo, nos dois últimos eventos, aqui em BH, dos lançamentos do 
  BDS2006 e BDS2007... foi péssima a qualidade das apresentações. Confusa, 
  desorganizada, com o palestrante demonstrando despreparo e falta de 
  conhecimento da ferramenta... na minha opinião, um fiasco. Principalmente, 
  se comparadas as apresentações feitas pelos Srs. Guinther Pauli e Bruno 
  Lichot, da DevMedia, dias antes da apresentação da Borland (no caso do 
  BDS2006), que foram excelentes.

  A Code Gear está dando razões para que os desenvolvedores procurem motivos 
  para trocarem o Delphi por outra ferramenta, mesmo que esta tenha uma 
  qualidde inferior.

  []´s

  Luis Alberto P. Lopes
  Desenvolvimento de Sistemas
  Belo Horizonte - Minas Gerais

  - Mensagem original 
  De: maniacapordelphi [EMAIL PROTECTED]
  Para: delphi-br@yahoogrupos.com.br
  Enviadas: Quinta-feira, 17 de Maio de 2007 7:50:25
  Assunto: [delphi-br] Delphi...Um desabafo à CodeGear...

  Trabalho com Delphi desde o Delphi 3 e sempre adorei essa
  ferramenta. Infelizmente, pra minha tristeza, minha equipe decidiu
  adotar o VB e migrar todos os projetos, até que se possa abandonar o
  Delphi definitivamente. Motivos? Vários!!!
  1. Desde o Delphi 8 a IDE do Delphi ficou horrivel. Telas e mais
  telas enchendo o espaço do monitor em detrimento do espaço que
  tínhamos para as telas do nosso aplicativo no Delphi 7.
  2. Descontinuidade de componentes tão usados no Brasil, como Quick
  Report, substituindo-o por aquela ferramenta tenebrosa: O Rave
  Report, que não deu ibope, tanto é que nem foi adicionada a palheta
  do Delphi 2007.
  3. 30 dias para testes com o trial do Delphi 2007. O que dá pra
  fazer em 30 dias pra quem tem 10 projetos de peso?
  4. Preço do Delphi 2007, totalmente incompativel com a realidade
  brasileira.
  5. Componentes que sempre julgamos primordiais e que nunca foram
  adicionados ao Delphi como componentes da RXLib: currencyEdit,
  DateEdit, coisas que facilitam muito a vida do programador.
  6. Falta de um bom componente para relatório, inclusive que sirva
  pra impressão em matriciais.

  Desculpem o desabafo, mas eu gostava muito do Delphi:(
  Mani

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Links do Yahoo! Grupos

  __
  Fale com seus amigos de graça com o novo Yahoo! Messenger
  http://br.messenger.yahoo.com/

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

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

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Links do Yahoo! Grupos



   

[As partes desta mensagem que não continham texto

Re: [delphi-br] Delphi...Um desabafo à CodeGear...

2007-05-17 Por tôpico Márcio Ricardo
Aqui na empresa estamos trabalhando com .net, utilizando BDS2006. O primeiro 
projeto foi uma luta pra ser feito nessa ferramenta, devido aos transtornos, 
impossibilidade de fazer algumas coisas bem simples, resolvemos comprar licença 
do visual studio para utiliza-lo nos proximos projetos.

Soltaram a versão bds2007, mas o framework nem mudaram.

Enfim, pra .net o delphi não serve mesmo. Já para win32 não tenho 
que reclamar.
  - Original Message - 
  From: Luis Lopes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 17, 2007 9:34 AM
  Subject: Res: [delphi-br] Delphi...Um desabafo à CodeGear...


  Mani,

  Não compartilho da sua opinião em todos os pontos que vc citou nesse post, 
mas, não posso deixar de concordar com alguns. Entretando, penso que o ponto 
que mais tá pegando, para uma certa debandada de profissionais (podem pensar 
que estou exagerando, mas conheço vários) Delphi para outras ferramentas, não é 
e jamais será a qualidade da ferramenta, mas sim, as políticas ruins adotadas 
pela Borland e que estão sendo pioradas pela Code Gear. Ao menos a nível de 
Brasil. Até os eventos promovidos por eles, de lançamentos de novas versões da 
ferramentas estão deixando a desejar.

  Fui, por exemplo, nos dois últimos eventos, aqui em BH, dos lançamentos do 
BDS2006 e BDS2007... foi péssima a qualidade das apresentações. Confusa, 
desorganizada, com o palestrante demonstrando despreparo e falta de 
conhecimento da ferramenta... na minha opinião, um fiasco. Principalmente, se 
comparadas as apresentações feitas pelos Srs. Guinther Pauli e Bruno Lichot, da 
DevMedia, dias antes da apresentação da Borland (no caso do BDS2006), que foram 
excelentes.

  A Code Gear está dando razões para que os desenvolvedores procurem motivos 
para trocarem o Delphi por outra ferramenta, mesmo que esta tenha uma qualidde 
inferior.

  []´s


  Luis Alberto P. Lopes
  Desenvolvimento de Sistemas
  Belo Horizonte - Minas Gerais

  - Mensagem original 
  De: maniacapordelphi [EMAIL PROTECTED]
  Para: delphi-br@yahoogrupos.com.br
  Enviadas: Quinta-feira, 17 de Maio de 2007 7:50:25
  Assunto: [delphi-br] Delphi...Um desabafo à CodeGear...

  Trabalho com Delphi desde o Delphi 3 e sempre adorei essa 
  ferramenta. Infelizmente, pra minha tristeza, minha equipe decidiu 
  adotar o VB e migrar todos os projetos, até que se possa abandonar o 
  Delphi definitivamente. Motivos? Vários!!!
  1. Desde o Delphi 8 a IDE do Delphi ficou horrivel. Telas e mais 
  telas enchendo o espaço do monitor em detrimento do espaço que 
  tínhamos para as telas do nosso aplicativo no Delphi 7.
  2. Descontinuidade de componentes tão usados no Brasil, como Quick 
  Report, substituindo-o por aquela ferramenta tenebrosa: O Rave 
  Report, que não deu ibope, tanto é que nem foi adicionada a palheta 
  do Delphi 2007. 
  3. 30 dias para testes com o trial do Delphi 2007. O que dá pra 
  fazer em 30 dias pra quem tem 10 projetos de peso?
  4. Preço do Delphi 2007, totalmente incompativel com a realidade 
  brasileira.
  5. Componentes que sempre julgamos primordiais e que nunca foram 
  adicionados ao Delphi como componentes da RXLib: currencyEdit, 
  DateEdit, coisas que facilitam muito a vida do programador.
  6. Falta de um bom componente para relatório, inclusive que sirva 
  pra impressão em matriciais.

  Desculpem o desabafo, mas eu gostava muito do Delphi:(
  Mani 

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Links do Yahoo! Grupos

  __
  Fale com seus amigos de graça com o novo Yahoo! Messenger 
  http://br.messenger.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] Delphi

2007-05-15 Por tôpico Márcio Ricardo
uma forma bem simples...
no teu laço coloca um contador e uma condição if com ele, se for menor que dez 
recebe uma data se maior q 10 recebe outra data.

  - Original Message - 
  From: rzzanatta 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, May 15, 2007 9:46 AM
  Subject: [delphi-br] Delphi


  Olá nao sei se vou conseguir explicar muito bem mas vou tentar.
  tenho uma select, nela me traz 100 resultados, só que eu tenho que 
  listar eles linha por linha dentro de um while que percorre esses 100 
  resultados, para que cada linha de resultado eu possa adicionar uma 
  data.
  tipo os 10 primeiros vai acrescentar a data 01/05/2007, do 20 ao 30 
  acrescete a data 02/05/2007 e assim por diante.

  resultado 1, nome, endereço,etc, e data (acrescentada)

  1, Jose, rua sem nome, etc, 01/05/2007
  2, Maria, rua sem numero, etc, 01/05/2007
  ...
  11, Joao, rua sei lá, etc, 02/05/2007

  ...
  100, Paulo, rua lalalal, etc, 30/05/2007

  bom nao sei se ficou claro isso. mas tentei.
  obrigado.



   

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



Re: [delphi-br] Extract DADOS apenas

2007-05-14 Por tôpico Márcio Ricardo
Se eu entendi, tente isso...

 SELECT 'INSERT INTO SITUACAO(CODIGO, STATUS)
   VALUES (' + T.CODIGO + ',' ''+ T.STATUS +''')'
   FROM SITUACAO T
  - Original Message - 
  From: Luizcm_jr 
  To: FireBase ; delphi-br@yahoogrupos.com.br ; [EMAIL PROTECTED] 
  Sent: Monday, May 14, 2007 10:53 AM
  Subject: [delphi-br] Extract DADOS apenas


  Bom dia a Todos..

  Gostaria de saber se existe alguma maneira de efetuar um backup de uma base 
de dados Firebird apenas dos dados nela contigo.

  ex.: SITUACAO VALUES ('Ativo');

  qdo vc efetua o backup ou Extract Metadados ele traz o mesmo registro dessa 
maneira:

  INSERT INTO SITUACAO (CODIGO, STATUS) VALUES (34, 'Ativo');

  e eu não gostaria de obter os registros assim, existe alguma maneira???

  Junior - Araraquara/SP

  [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] sybase+delphi

2007-05-14 Por tôpico Márcio Ricardo
Zote, estou usando o ASE. Conversando com uma pessoa que conhece sybase, ela me 
disse que tem q fazer tudo na unha, como vc disse: usar o INSERT. Como estou 
desenvolvendo em 3 camadas, estou tendo problemas de conversões de campos de 
inteiro para string. O projeto já está pronto funcionando com dois SGDB, então 
vamos partir para o plano B e criar um programa que sincroniza o Sybase com o 
Oracle.

valeu pela dica.

Márcio Ricardo.
  - Original Message - 
  From: José Henrique (Zote) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, May 14, 2007 10:21 AM
  Subject: RE: [delphi-br] sybase+delphi


  Você esta usando sybase ASE ou ASA?

  O você dá o comando insert na mão ou esta usando algo parecido com TTable?

  Geralmente para pegar o valor gerado pelo identity você deve fazer um select
  (select @@identity -Isso no ASA).

  Espero ter ajudado.

  Abraço

  Zote

  From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On
  Behalf Of Márcio Ricardo
  Sent: quarta-feira, 9 de maio de 2007 11:41
  To: delphi-br@yahoogrupos.com.br
  Subject: [delphi-br] sybase+delphi
  Importance: High

  Alguém utiliza o bando de dados sybase com conexão dbexpress no D2006?

  Estou conectando e consultando os dados belezinha, mas quando vou inserir
  não consigo pegar o campo chave que está com identity esse campo é
  retornado null, ou seja, não está fazendo o auto-incremento.

  Obrigado,

  Márcio Ricardo.

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

2007-05-14 Por tôpico Márcio Ricardo
Crie um vetor com a quantidade do alfabeto e faça o loop assim. A cada passagem 
pelo loop vc joga para o parametro e executa sua query. É isso q vc quer?

Márcio Ricardo.
  - Original Message - 
  From: Rodrigo Magno 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, May 14, 2007 11:51 AM
  Subject: [delphi-br] Loop


  Amigos,

  Como posso fazer um loop para percorrer todas as letras alfabeticas e assim q 
mudar de letra passar para uma query em qual letra o loop esta como parametro.

  Atenciosamente,


  Rodrigo

  __
  Fale com seus amigos de graça com o novo Yahoo! Messenger 
  http://br.messenger.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] Agenda Médica

2007-05-11 Por tôpico Márcio Ricardo
Bom, primeiramente vc quer fazer a modelagem do sistema é isso né?

Kra, se vc não tem conhecimento em modelagem será meio complicado vc 
desenvolver, mas vamos lá.

Vc terá que ter uma tabela de agendamento fazendo relacionamento com a tabela 
médico.

Um chute, na tabela agendamento vc pode ter como chaves o código do médico e a 
data agendada, e como campos o horario do agendametno.

Tenta começar por isso e vê no que da. Eu não fiz a modelagem e nem parei pra 
pensar direito, mas faz isso ai.

Márcio Ricardo.
  - Original Message - 
  From: Ricardo Mendes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, May 11, 2007 8:37 AM
  Subject: Re: [delphi-br] Agenda Médica


  Galera foi mal...realmente é um apavoramento neh...
  Vamos começar então pelo meu problema inicial..

  Eu tenho a tabela de medicos
  Nome
  Especialidade
  Hora_Inicial
  Hora_Final
  Intervalo

  Preciso montar uma agenda para agendar os pacientes...o problema inicial 
seria como montar uma agenda com os horários disponiveis pelo medicos em data 
determinada...

  Ricardo Mendes
  TotalSat - Rastreamento de Veículos
  Departamento de Informática
  E-mail: [EMAIL PROTECTED] 
  Tel. (41) 2109-7717
  - Original Message - 
  From: Berdam 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, May 11, 2007 8:10 AM
  Subject: Re: [delphi-br] Agenda Médica

  não se apavore primeiramente, as vezes por mais pequenos que sejam os 
  problemas a gente se desespera.
  Esse email n tem nada a ver diretamente com o problema, mas começe por 
  um problema só, não queira resolver tudo com uma tacada só.

  Ricardo Mendes escreveu:
  
   Galera preciso de uma ajuda de vcs...
   Preciso criar uma agenda médica e to perdido em como fazer
  
   A ideia inicial é a seguinte...
   Selecionar um médico, uma data e ver os horários da agenda, porem o 
   que acontece é que eu não tenho apenas um medico, tenho varios e cada 
   cliente tem seu medico, além disso eu tenho q permitir que seja 
   incluido novo cliente na agenda, mesmo que ele não tenha sido 
   cadastrado no BD. E pra ajudar eu preciso montar a agenda com os 
   intervalos que o médico atende e verificar se o dia que está aberto na 
   agenda é dia de atendimento do médico, caso contrario avisar ao 
   usuario que o medico não atende nessa data...
   Além de tudo isso é como conseguir montar os clientes agendados 
   anteriormente quando a agenda for aberta na data especifica e colocar 
   os clientes nos horários que eles foram agendados...
  
   Espero q vc tenham entendido a minha solicitação e que me ajudem..
   Utilizo D7, Firebird
  
   Ricardo Mendes
   Analista/Programador
   TOTALSAT - Com. Equip. Eletronicos
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   

  __ Informação do NOD32 IMON 2257 (20070511) __

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

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



   

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



Re: [delphi-br] Agenda Médica

2007-05-11 Por tôpico Márcio Ricardo
Isso vc consegue fazer no select...
Na segunda consulta do médico, vc pega o horário da primeira mais 45 minutos e 
está marcada a segunda consulta, e assim sucessivamente para outras consultas. 
Vc pode tratar também pra marcar consulta até as 12:00h, dá pra fazer uma 
agenda bem legal.

Espero que ajude.

Márcio Ricardo.
  - Original Message - 
  From: Ricardo Mendes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, May 11, 2007 9:30 AM
  Subject: Re: [delphi-br] Agenda Médica


  Galera eu tenho a tabela de agedamento criada..

  ID_Agenda
  ID_medico
  ID_Procedimento
  Hora
  Data_Agen

  A modelagem das tabelas eu tenhoa minha duvida é como criar uma agenda, 
que coloque os horários das consultas do medico selecionado e com os 
intervalos...

  Exemp..
  O medico Ricardo atende segunda, terça e quarta..
  Começa a atender seus pacientes a partir das 08:00 até 12:00 e suas consultas 
devem ser agendadas em intervalos de 45 minutos.

  Ricardo Mendes
  TotalSat - Rastreamento de Veículos
  Departamento de Informática
  E-mail: [EMAIL PROTECTED] 
  Tel. (41) 2109-7717

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

2007-05-11 Por tôpico Márcio Ricardo
está funcionando antes, ou é a primeira vez que vc faz e dá o erro.

Eu tive um problema desse tipo com a conexão oracle, era problema de versão. No 
meu caso eu utiliza o oracle9i, compraram uma máquina nova pra desenvolver e 
colocaram o 10g, e quando ia conectar dava esse erro, era problema de dll. O 
pessoal não resolveu e voltei para o oracle9i.
Aqui eu utilizo conexão com o sql server 200 com dbexpress e funciona 
perfeitamente.

  - Original Message - 
  From: Ademir Morgado 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, May 11, 2007 10:40 AM
  Subject: [delphi-br] dbExpress Error


  Ola pessoal, bom dia!

  Estou tentando fazer a conexao de uma aplicação Delphi 7 acessando um 
  BD SQL Server 2000, mas quando executa ocorre o seguinte erro:

  Erro CdsFormatoData: EOleException - dbExpress Error: Unknown Error 
  Code '340'

  Alguem sabe o que pode ser isso??? Qualquer ajuda é valida!

  Obrigado,

  Ademir Morgado



   

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



Re: [delphi-br] Pesquisa

2007-05-10 Por tôpico Márcio Ricardo


utilize UpperCase.

dmDados.ibqPesquisaProdutos.SQL.add('Select *from Produtos where 
UpperCase(descricao) like ' + chr (39) + '%' + UpperCase(eDadoPesquisa.Text) 
+'%' + chr(39) + 'order by produtos.descricao');



  - Original Message - 
  From: Régis Bender 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 10, 2007 9:47 AM
  Subject: Re: [delphi-br] Pesquisa


  Estou abrindo uma query e passo o parametro SQL.

  dmDados.ibqPesquisaProdutos.SQL.add('Select *from Produtos where descricao 
like ' + chr (39) + '%' + eDadoPesquisa.Text +'%' + chr(39) + 'order by 
produtos.descricao');

  sds

  Bender Desenvolvimento de Sistemas 
  e Serviços Contábeis (Régis)
  (51) 98470699

  Novo Hamburgo/RS
  MSN: [EMAIL PROTECTED]

  - Original Message - 
  From: Ricardo César Cardoso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 10, 2007 9:39 AM
  Subject: Re: [delphi-br] Pesquisa

  Como vc está fazendo a pesquisa Régis? É no ClientDataSet ou vc está passando 
algum parametro para uma SQL?

  Sds,
  Ricardo.

  Régis Bender [EMAIL PROTECTED] escreveu: Pessoal, necessito da ajuda de vcs.
  Quando eu faço uma pesquisa, ele retorna apenas os indices que eu digitei em
  maiusculo.(Case sensitive)
  Como eu faço pra realizar a pesquisa direto, indiferente se está em
  maiusculo ou minusculo?
  Utilizo Delphi 7 e IB

  sds

  Bender Desenvolvimento de Sistemas 
  e Serviços Contábeis (Régis)
  (51) 98470699

  Novo Hamburgo/RS
  MSN: [EMAIL PROTECTED]

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

  _

  __
  Fale com seus amigos de graça com o novo Yahoo! Messenger 
  http://br.messenger.yahoo.com/ 

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

  --
  E-mail classificado pelo Identificador de Spam Inteligente.
  Para alterar a categoria classificada, visite o Terra Mail 

  --

  No virus found in this incoming message.
  Checked by AVG Free Edition. 
  Version: 7.5.467 / Virus Database: 269.6.6/795 - Release Date: 9/5/2007 15:07

  [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] Uma mãozinha com vetores...para o ap rendiz.

2007-05-10 Por tôpico Márcio Ricardo
crie um vetor de 8 posições e faça um for...

for i:=1 to 8 do
begin
   resultado := resultado * vetor[i];
  inc(i);
end;

  - Original Message - 
  From: werelli 
  To: [EMAIL PROTECTED] ; DELPHI_TOTAL ; LISTA_DELPHI 
  Sent: Thursday, May 10, 2007 9:59 AM
  Subject: [delphi-br] Uma mãozinha com vetores...para o aprendiz.


  Olá pessoal!

  Gente estou fazendo um curso de Delphi e agora entramos em vetores, o 
professor é muito bom, mas mesmo assim estou com dificuldades, vejam se podem 
me ajudar...
  Ele nos pediu que fizéssemos um programa para DOS que executasse a seguinte 
tarefa usando vetores.
  8*7*6*5*4*3*2*1 e exibisse o resultado.

  atenciosamente, 

  werelli

  Embora quem esteja quase morto ainda viva, quem está quase vivo já morreu 
faz tempo. (Luís Fernando Verissimo)TENDO EXCLUÍDO O IMPOSSÍVEL, O QUE RESTA, 
POR MAIS IMPROVÁVEL QUE PAREÇA, É A VERDADE!(Sherlock Holmes, Sir Arthur Conan 
Doyle)
  __
  Fale com seus amigos de graça com o novo Yahoo! Messenger 
  http://br.messenger.yahoo.com/ 

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



   

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



[delphi-br] sybase+delphi

2007-05-09 Por tôpico Márcio Ricardo
Alguém utiliza o bando de dados sybase com conexão dbexpress no D2006?

 Estou conectando e consultando os dados belezinha, mas quando vou inserir não 
consigo pegar o campo chave que está com identity esse campo é retornado 
null, ou seja, não está fazendo o auto-incremento.

Obrigado,

Márcio Ricardo.

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



[delphi-br] Conexão com o Oracle10g

2007-05-07 Por tôpico Márcio Ricardo
Bom dia lista!

Tenho uma aplicação que funcionava perfeitamente no oracle9i.
 Recebi uma máquina nova com o client do oracle10g instalado e agora a mesma 
não funciona. Minha aplicação foi feita pra rodar em SQl Server e Oracle, só 
funciona no sql server no oracle não consigo mais conexão. 
Estou fazendo a conexão através de dbexpress.

Alguém tem alguma luz?

Márcio Ricardo.

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



Re: [delphi-br] Apagar master-detail

2007-05-07 Por tôpico Márcio Ricardo
Seu programa está funcionando perfeitamente. Não pode apagar o pai e deixar os 
filhos orfão.

 Quando for apagar faça uma busca na tabela filho e apague os primeiros e 
depois vc apaga o pai, ok?
Como se fosse um delete cascade apaga o pai e sai procurando onde o mesmo faz 
referencia com tabelas filhas se achar apaga os filhos e os pais

Márcio Ricardo.
  - Original Message - 
  From: Magnun Oliveira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, May 07, 2007 11:52 AM
  Subject: [delphi-br] Apagar master-detail


  Fiz um master detail com CDS, inserção e alteração dah tudo certo, porem, se 
  eu for apagar um registro master com no minimo 1 detail dah esse erro: 
  'cannot delete master records with details'
  se eu apagar um registro master sem nenhum detail funciona ...

  Alguma saca como resolver? vlw ...

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



   

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



Re: [delphi-br] Fechar Form usando tecla ESC

2007-05-04 Por tôpico Márcio Ricardo
tenta utilizar no evento keypress do form.
  - Original Message - 
  From: Ricardo César Cardoso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, May 04, 2007 9:17 AM
  Subject: [delphi-br] Fechar Form usando tecla ESC


  Bom dia amigos da lista!

  Tenho a seguinte dúvida: num form da minha aplicação, gostaria que fosse 
possível usar a tecla [ESC] para sair da tela. Mas quando pressiono a tecla 
[ESC] para sair da tela, o sistema dá uma violação de acesso. Coloquei 
Breakpoints para ver se as rotinas Close e CloseQuery eram chamadas, mas 
nenhuma delas é chamada. 

  Vejam abaixo o código usado:

  Procedure TfrmEVENTOS_SERVICO.FormCloseQuery(Sender: TObject;
  var CanClose: Boolean);
  Begin
  dmEVENTOS_SERVICO.Free;
  End;

  Procedure TfrmEVENTOS_SERVICO.FormClose(Sender: TObject;
  var Action: TCloseAction);
  Begin
  with frmPRINCIPAL do
  MainMenu1.Items.Items[2].Remove(mJanelas.Find('TAREFAS'));

  Action := caFree;
  frmEVENTOS_SERVICO := nil;
  End;

  Procedure TfrmEVENTOS_SERVICO.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
  Begin
  if Key = 27 then
  frmEVENTOS_SERVICO.OnClose;
  End;

  Se alguém tiver alguma idéia de como resolver este problema, fico agradecido. 

  Saudações,
  Ricardo.

  __
  Fale com seus amigos de graça com o novo Yahoo! Messenger 
  http://br.messenger.yahoo.com/ 

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



   

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



[delphi-br] visoco...

2007-04-27 Por tôpico Márcio Ricardo
Tarde!

 Alguém já utilizou a dll Visoco.Data.ASE.dll para conexão com Assembly?

Não estou conseguindo conectar com o banco de dados.

obrigado,

Márcio Ricardo.

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



[delphi-br] BDP com Sybase...

2007-04-24 Por tôpico Márcio Ricardo
Alguém programa utilizando BDP com Sybase? Não estou conseguindo criar uma 
conexão.
Márcio Ricardo Alves da Silva
Programador Pleno
[EMAIL PROTECTED] 

*** Antes de imprimir, pense em seu compromisso com o Meio Ambiente *** 

 
Config Informática Ltda
Av. Eng. Luis Carlos Berrini, 801 - 7º andar
Brooklin Novo - São Paulo - SP
CEP: 04571-010 - Fone (11) 5501-8300 - www.config.com.br

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



[delphi-br] chamar dll do Windows...

2007-04-23 Por tôpico Márcio Ricardo
Bom dia!

 Alugém sabe como faço pra chamar a DLL CRYPT32.DLL  e utilizar as suas funções?

 Tenho um exemplo em C# que faz isso, mas não sei como chamar no delphi.

Obrigado,
Márcio Ricardo Alves da Silva
Programador Pleno
[EMAIL PROTECTED] 

*** Antes de imprimir, pense em seu compromisso com o Meio Ambiente *** 

 
Config Informática Ltda
Av. Eng. Luis Carlos Berrini, 801 - 7º andar
Brooklin Novo - São Paulo - SP
CEP: 04571-010 - Fone (11) 5501-8300 - www.config.com.br

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



[delphi-br] Validar XML

2007-04-23 Por tôpico Márcio Ricardo
Bom dia! 

Alguém já mexeu ou mexe com assinatura em XML e validação de XML? Eu tenho um 
XML assinado e preciso validar a sua assinatura.

Obrigado,
Márcio Ricardo Alves da Silva
Programador Pleno
[EMAIL PROTECTED] 

*** Antes de imprimir, pense em seu compromisso com o Meio Ambiente *** 

 
Config Informática Ltda
Av. Eng. Luis Carlos Berrini, 801 - 7º andar
Brooklin Novo - São Paulo - SP
CEP: 04571-010 - Fone (11) 5501-8300 - www.config.com.br

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



Re: [delphi-br] chamar dll do Windows...

2007-04-23 Por tôpico Márcio Ricardo
Então, eu preciso utilizar umas funções dessa dll para verificar a assinatura 
de um XML, entendeu?
como isso feito em C#:

[DllImport(Crypt32.dll, CharSet=CharSet.Auto)]
  internal extern static uint CertOpenSystemStore(int hprov, string 
szSubsystemProtocol);
  [DllImport(Crypt32.dll, CharSet=CharSet.Auto)]
  internal extern static uint CertEnumCertificatesInStore(uint hCertStore, 
uint pPrevCertContext);
  [DllImport(Crypt32.dll, CharSet=CharSet.Auto)]
  internal extern static uint CertDuplicateCertificateContext(uint 
pPrevCertContext);
  [DllImport(Crypt32.dll, CharSet=CharSet.Auto,SetLastError=true)]
  [return : MarshalAs(UnmanagedType.Bool)]
  internal extern static bool CertGetCertificateContextProperty(int 
pCertContext,int dwPropId,
 IntPtr pvData, ref uint pcbData);
  [DllImport(Crypt32.dll, CharSet=CharSet.Auto)]
  internal extern static uint CertCreateCertificateContext(uint 
dwCertEncodingType,
 [MarshalAs(UnmanagedType.LPArray)]byte[] pbCertEncoded, int 
cbCertEncoded);
  [DllImport(Advapi32.dll, CharSet=CharSet.Auto,SetLastError=true)]
  [return : MarshalAs(UnmanagedType.Bool)]
  internal extern static bool CryptAcquireContext(ref uint phProv,string 
pszContainer,
 string pszProvider,uint dwProvType,uint dwFlags);
  [DllImport(Crypt32.dll, CharSet=CharSet.Auto,SetLastError=true)]
  [return : MarshalAs(UnmanagedType.Bool)]
  internal extern static bool CryptImportPublicKeyInfoEx(uint hCryptProv 
,uint dwCertEncodingType, 
 IntPtr pInfo, uint aiKeyAlg, uint dwFlags ,uint pvAuxInfo, ref uint 
phKey); 
  [DllImport(Crypt32.dll, CharSet=CharSet.Auto,SetLastError=true)]
  [return : MarshalAs(UnmanagedType.Bool)]
  internal extern static bool CryptImportPublicKeyInfo(uint hCryptProv 
,uint dwCertEncodingType, 
 IntPtr pInfo, ref uint phKey); 
  [DllImport(Advapi32.dll, CharSet=CharSet.Auto,SetLastError=true)]
  [return : MarshalAs(UnmanagedType.Bool)]
  internal extern static bool CryptExportKey(uint hKey,uint hExpKey, uint 
dwBlobType, 
 uint dwFlags ,uint pbData, ref uint pdwDataLen);
  [DllImport(Crypt32.dll, CharSet=CharSet.Auto,SetLastError=true)]
  [return : MarshalAs(UnmanagedType.Bool)]
  internal extern static bool CertFreeCertificateContext(int pCertContext);
  [DllImport(Advapi32.dll, CharSet=CharSet.Auto,SetLastError=true)]
  [return : MarshalAs(UnmanagedType.Bool)]
  internal extern static bool CryptReleaseContext(uint hProv, uint dwFlags);

  - Original Message - 
  From: Berdam 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, April 23, 2007 10:41 AM
  Subject: Re: [delphi-br] chamar dll do Windows...


  mas se esta dll estiver na pasta system32 é não é diretamente chamada 
  pelo delphi??

  pelo que seu sei, quando um programa precisa de um dll, ele vai 
  diretamente verificar nesta pasta.

  Márcio Ricardo escreveu:
  
   Bom dia!
  
   Alugém sabe como faço pra chamar a DLL CRYPT32.DLL e utilizar as suas 
   funções?
  
   Tenho um exemplo em C# que faz isso, mas não sei como chamar no delphi.
  
   Obrigado,
   Márcio Ricardo Alves da Silva
   Programador Pleno
   [EMAIL PROTECTED] mailto:marcio.silva%40confignet.com.br
  
   *** Antes de imprimir, pense em seu compromisso com o Meio Ambiente ***
  
   Config Informática Ltda
   Av. Eng. Luis Carlos Berrini, 801 - 7º andar
   Brooklin Novo - São Paulo - SP
   CEP: 04571-010 - Fone (11) 5501-8300 - www.config.com.br
  
   [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] XMLDocument...

2007-04-20 Por tôpico Márcio Ricardo
Opa! Se for possível, eu aceito.

Obrigado.

Márcio Ricardo.
  - Original Message - 
  From: Leonardo Gonçalves 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, April 19, 2007 4:22 PM
  Subject: Re: [delphi-br] XMLDocument...


  Em .net nunca usei nao mano mas assim no curso q eu fiz de formação delphi
  na tds (q propagando rs) fiz alguns exemplos que trabalhava com xml fiz
  tanto em .net quanto em win32 mas assim era tdo criado dinamicamente sem o
  uso do componente xmldocument. Se quiser posso te passar os exemplos pode
  ser?

  Em 19/04/07, Alemão [EMAIL PROTECTED] escreveu:
  
   Boa tarde Márcio.
  
   Em .net eu nunca trabalhei, mas tentei trabalhar com o xmldocument em
   win32 e não consegui. Esse componente é muito problemático e dá muito pau
   de
   memória. Fiquei mais de uma semana quebrando a cabeça em cima dele e só
   dava
   erro. Troquei pro componente de xml contido na biblioteca Jedi e funcionou
   redondinho. Sem nenhum problema. Se vc tiver o Jedi instalado aí,
   recomendo
   nem tentar usar o txmldocument.
  
   att.
  
   Em 19/04/07, Márcio Ricardo [EMAIL PROTECTED]marcio_cbj%40yahoo.com.br
   escreveu:
   
Bom dia!
   
Alguém aqui já trabalhou com XMLDocument em delphi .net? Preciso pegar o
conteúdo de uma tag.
   
Obrigado,
Márcio Ricardo Alves da Silva
Programador Pleno
[EMAIL PROTECTED] marcio.silva%40confignet.com.br 
   marcio.silva%40confignet.com.br
   
*** Antes de imprimir, pense em seu compromisso com o Meio Ambiente ***
   
Config Informática Ltda
Av. Eng. Luis Carlos Berrini, 801 - 7º andar
Brooklin Novo - São Paulo - SP
CEP: 04571-010 - Fone (11) 5501-8300 - www.config.com.br
   
[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]



[delphi-br] declarar e utilizar dll

2007-04-20 Por tôpico Márcio Ricardo
E ae pessoal?

  Eu preciso declarar uma dll pra utilizar no meu projeto. Alguém sabe como 
faço isso?

eu fiz isso:function PublicKey(const Key : X509Certificate): X509Certificate; 
stdcall;
   external 'Crypt32.dll';

mas não deu certo. Podem me judar?

Bom final de semana a todos,

Márcio Ricardo Alves da Silva
Programador Pleno
[EMAIL PROTECTED] 

*** Antes de imprimir, pense em seu compromisso com o Meio Ambiente *** 

 
Config Informática Ltda
Av. Eng. Luis Carlos Berrini, 801 - 7º andar
Brooklin Novo - São Paulo - SP
CEP: 04571-010 - Fone (11) 5501-8300 - www.config.com.br

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



[delphi-br] XMLDocument...

2007-04-19 Por tôpico Márcio Ricardo
Bom dia!

Alguém aqui já trabalhou com XMLDocument em delphi .net? Preciso pegar o 
conteúdo de uma tag.

Obrigado,
Márcio Ricardo Alves da Silva
Programador Pleno
[EMAIL PROTECTED] 

*** Antes de imprimir, pense em seu compromisso com o Meio Ambiente *** 

 
Config Informática Ltda
Av. Eng. Luis Carlos Berrini, 801 - 7º andar
Brooklin Novo - São Paulo - SP
CEP: 04571-010 - Fone (11) 5501-8300 - www.config.com.br

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



Re: [delphi-br] Erro ClientDataSet

2007-04-18 Por tôpico Márcio Ricardo
posta o ero ai pra nós. no Evento OnreconcileError do ClientDataSet, coloca 
isso:
Action := raCancel;
  raise Exception.Create(e.Message);

ai fica fácil de ver o que está acontecendo.
  - Original Message - 
  From: Eduardo Suruagy 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, April 18, 2007 9:22 AM
  Subject: [delphi-br] Erro ClientDataSet


  Tenho uma tabela no firebird 1.5 que mcontem uma chave composta, estou
  usando IBX + Provider + ClientDataSet adicionei os campos no IBX e no
  DataSet mudei a propriedade do provider updatemode para wherekeyonly e os
  campos chaves alterei as propridedades providerflags: update = true; where =
  true; key = true; required = true, mas qd vou dar algum post da erro no
  sistema. alguem pode me ajudar

  [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] Minha opinião sobre o Delphi2007

2007-04-17 Por tôpico Márcio Ricardo
Não programo a tanto tempo como a maniaca. Mas eu utilizo o delphi 2006 e não 
vejo problema. A área de desenvolvimento ficou maior, ocultando a paleta de 
componentes e outras paletas, na qual eu acesso através de tecla de atalho qdo 
eu preciso utilizar. 
  - Original Message - 
  From: Leonardo Quinino 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, April 16, 2007 1:11 PM
  Subject: Re: [delphi-br] Minha opinião sobre o Delphi2007


  Já andei dando uma olhada no delphi 2005 e 2006, achei tbm putz lento, e o
  layout não me adaptei ainda, realmente a disposição das paletas no delphi 7
  , é muito exuto, e prático.

  Em 16/04/07, maniacapordelphi [EMAIL PROTECTED] escreveu:
  
   Como trabalho com o Delphi desde a versão 3 e fui fiel a ela até a
   versão 7, vejo-me no direito de dar pitaco sobre o Delphi 2007.
  
   Depois de muito erro, muita tentativa, troca de Sistema Operacional,
   troca de HD, troca de memória, desativação de firewal, desativação de
   anti-virus, consegui instalar o Trial do Delphi 2007.
   1. Download do trial extremamente demorado.
   2. Instalação do trial também demorado e pesado.
   3. Odiei a disposição das telas, da palheta de componentes, e de tudo
   o que surge quando se abre uma nova aplicação. Ficou uma tela cheia
   demais, cansativa aos olhos do desenvolvedor, com um espaço muito
   reduzido para a tela de designer e visualização do fonte. Quem está
   acostumado com o lay-out enxuto do Delphi 7 se assusta quando vê o lay-
   out do 2007.
   Tem como amenizar isso? Ocultar um pouco de tela, mostrar as palhetas
   de componentes de uma forma mais agradável aos olhos e também mais
   prática? De preferência, como era no Delphi 7?
   Trabalho com o Delphi desde a versão 3. A versão do Delphi até o
   Delphi 7 foi excelente(a prova é que a maioria dos desenvolvedores
   permaneceu nela). Mas, a partir das versões posteriores, ficou tudo
   muito ruim a nível de designer.
   4.Não achei a palheta do QuickReport tão falada no evento da CodeGear.
  
   Eu, Mani.
  
   
  

  -- 
  Leonardo Quinino

  [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] dbExpress + SQL Server + Parametros = Erro

2007-04-17 Por tôpico Márcio Ricardo
Andersson, eu comecei a programar a pouco tempo com SQL Server, programo mais 
em Oracle. Desculpe, mas eu não sei o que é optimization hints. Poderia me 
explicar, assim eu poderei tentar te ajudar.

Quando eu utilizo essa forma de parametro ? eu posso ter vários parametro no 
select, no delphi eu passo os parametros conforme a ordem que estão no select.

 Eu tenho uma aplicação que roda tanto pra SQL quanto para Oracle... criei 
  - Original Message - 
  From: Anderson Ribeiro 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, April 16, 2007 5:16 PM
  Subject: Re: [delphi-br] dbExpress + SQL Server + Parametros = Erro


  Márcio, colocando optimization hints, como o (nolock) por exemplo, o erro
  vai acontecer.

  O DBExpress não consegue tratá-los. Ficamos na mão.

  -- 

  Anderson Luiz Ribeiro
  Analista de sistemas
  Barretos-SP

  Blog: http://public-void-main.blogspot.com/
  E-mail: [EMAIL PROTECTED]

  On 4/16/07, Márcio Ricardo [EMAIL PROTECTED] wrote:
  
   eu utilizo assim:
  
   SELECT * FROM MINHA_TABELA WHERE CAMPO = ? --SIGINIFCA PASSAGEM DE
   PARAMETRO.
  
   e funciona. Eu nunca utilizei a declaração de variável em SQL, isso só se
   utiliza em Prodecure, tipo PL/SQL no Oracle.
   - Original Message -
   From: Fernando Nappe
   To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Sent: Friday, April 13, 2007 11:46 AM
   Subject: [delphi-br] dbExpress + SQL Server + Parametros = Erro
  
   Saudações Pessoal,
  
   Honestamente, nunca havia usado dbExpress com MS SQL Server, até hoje...
   Vejam o exemplo de uma SQL que estou usando:
  
   declare @variavel int
   select @variavel = :parametro
   select * from minha_tabela where campo = @variavel
  
   Quando tento adicionar os campos ao Fields Editor recebo o erro:
  
   ---
   Error
   ---
   SQL State: 42000, SQL Error Code: 0
   Erro de sintaxe ou violação de acesso
  
   ---
   OK
   ---
  
   Alguém já passou por algo parecido? Como resolveram?
  
   Desde já agradeço a ajuda e o tempo dispensado.
  
   Att.
   --
   Fernando Nappe
   Analistas de Sistemas
   http://nappe.blogspot.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]



   

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



Re: [delphi-br] Agrupando dados Duplicados

2007-04-17 Por tôpico Márcio Ricardo
Bom, se eu entendi direito, não importa o quanto apareça o mesmo CPF, apenas 
traga um é isso né?

Se for trazer apenas o CPF, esse select resolve: SELECT DISTINCT CPF, * FROM 
CLIENTES.

E no relatório é só você criar uma banda de grupo que a própria ferramenta faz 
isso. O seu select é normal, vc agrupa no relatório mesmo, entendeu?

Qual ferramenta vc vai utilizar pra fazer o relatório? É fácil fazer 
agrupamento pelo Rave, QuickReport e Crystal. Então, o seu select é da maneira 
que vc tinha postado no primeiro e-mail, no relatório vc agrupa, as ferramentas 
que citei tem as opções de agrupamento, é moleza.

Qualquer coisa, estamos ai pra tentar ajudar.

  - Original Message - 
  From: Tiago Vendemiatti 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, April 17, 2007 9:54 AM
  Subject: RE: [delphi-br] Agrupando dados Duplicados


  Ok..vamos la.

  É uma tabela só...

  Eu preciso deixar ele aceitar dados duplicados..devido a necessidade que o 
cliente...pois não se trata de um cadastro de cliente..só deixei isso como 
exemplo.
  Portanto é uma tabela só...e quero agrupar os dados (ou filtrar) quando o 
campo cpf for igual, me trazendo apenas um registro se houver mais que um, e se 
tiver apenas um também trazer normalmente.

  Obrigado
  Tiago

  To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Tue, 17 Apr 2007 09:24:42 
-0300Subject: Re: [delphi-br] Agrupando dados Duplicados

  Tiago, não consegui entender o que você quer, explique melhor que talvez eu 
possa te ajudar.Esse select vai ser feito em apenas em uma tabela? No exemplo 
que vc deu, como pode 1 cpf ser de vários clientes? É isso mesmo, ou ser feito 
um join com outra tabela?Passe mais informações para podermos te ajudar.- 
Original Message - From: Tiago Vendemiatti To: delphi-br@yahoogrupos.com.br 
Sent: Tuesday, April 17, 2007 9:03 AMSubject: [delphi-br] Agrupando dados 
DuplicadosCaros...por favorSei que aqui é mais DELPHI, mas como a linguagem 
que estou usando é delphi.rsrs..será que alguém consegue me ajudar em uma 
query?TEnho uma tabela..que aceita dados duplicados.Porém em um determinado 
momento (relatório) preciso suprimir,agrupar,etc os dados duplicados 
comparando-os por apenas um campo.EX:Select Distinct cpf,* from clientesO 
select acima deve funcionar da segunte maneira:Comparar o e agrupar os 
registros em que os cpf são iguais. Apenas ele, porém trazendo os outros dados 
quando só existe 1.Pode ser com group by, Union ou Distinct ou qualquer coisa 
que de certo!Muito 
ObrigadoAbsTiago__Procure
 em qualquer página Web com protecção eficaz. Obtenha já o Windows Live Toolbar 
GRATUITO!http://www.toolbar.live.com[As partes desta mensagem que não continham 
texto foram removidas][As partes desta mensagem que não continham texto foram 
removidas] 

  __
  O Windows Live Spaces já chegou! É fácil criar o seu próprio Web site pessoal.
  http://spaces.live.com/signup.aspx

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



   

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



[delphi-br] checkbox problema

2007-04-17 Por tôpico Márcio Ricardo
Pessoal, tenho uma grid com um checkbox, as vezes acontece de quando o usuário 
clicar no checkbox o mesmo aparece 0 ou 1, que coloquei pra referir checado e 
não checado, e quando sai da celula é exibida o checkbox normalmente. Alguém 
sabe como eu faço para que não apareça o 0 e o 1?

Obrigado,
Márcio Ricardo Alves da Silva
Programador Pleno
[EMAIL PROTECTED] 

*** Antes de imprimir, pense em seu compromisso com o Meio Ambiente *** 

 
Config Informática Ltda
Av. Eng. Luis Carlos Berrini, 801 - 7º andar
Brooklin Novo - São Paulo - SP
CEP: 04571-010 - Fone (11) 5501-8300 - www.config.com.br

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



Re: [delphi-br] Re: String Grid com banco de dados Access

2007-04-17 Por tôpico Márcio Ricardo
Kra no DBgrid é só ligar o DataSource do DBGRID com um componente TDataSource e 
a opção DataSet do DataSource liga o AdoTable seu.

No evento show do form, vc dá um open no AdoTable, pronto seus dados estão na 
grid.
- Original Message - 
  From: Gustavo André de Freitas 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, April 17, 2007 10:38 AM
  Subject: [delphi-br] Re: String Grid com banco de dados Access


  Quem puder ajuda então, como faço para inserir esses dados que estão 
  indo pro string grid num dbGrid?

  segue o código atual:

  procedure TForm1.Monitorar;
  var
  hprinter:thandle;
  bytesneeded,numjobs,i,ii:cardinal;
  pj:pjobs;
  begin
  hprinter := getcurrentprinterhandle(SGPrinter.Cells
  [0,linhaprinterselecionada]);
  try
  // EnumJobs(hprinter,0,100,1,nil,0,bytesneeded,numjobs);
  EnumJobs(hprinter,0,1000,2,nil,0,bytesneeded,numjobs);
  pj := AllocMem(bytesneeded);
  if not EnumJobs(hprinter,0,1000,2
  {1},pj,bytesneeded,bytesneeded,numjobs) then
  RaiseLastWin32Error;
  // if numjobs = 0 then

  // else begin
  for i := 0 to StringGrid1.ColCount -1 do
  for ii := 0 to StringGrid1.RowCount -1 do StringGrid1.Cells
  [i,ii] := '';

  StringGrid1.Cells[0,0] := 'Nome do documento';
  StringGrid1.Cells[1,0] := 'Status';
  StringGrid1.Cells[2,0] := 'Proprietário';
  StringGrid1.Cells[3,0] := 'Páginas';
  StringGrid1.Cells[4,0] := 'Enviado';
  StringGrid1.Cells[5,0] := 'Tamanho';
  StringGrid1.Cells[6,0] := 'Cód. Status';

  if numjobs0 THEN BEGIN
  StringGrid1.RowCount := numjobs+1;
  for i := 0 to pred(numjobs) do begin
  StringGrid1.Cells[0,i+1] := pj^[i].pDocument;
  StringGrid1.Cells[1,i+1] := getstatus(pj^[i].status);
  StringGrid1.Cells[2,i+1] := pj^[i].pUserName;
  StringGrid1.Cells[3,i+1] := inttostr(pj^[i].TotalPages);
  StringGrid1.Cells[4,i+1] := getdatajob(pj^[i].Submitted);
  StringGrid1.Cells[5,i+1] := copy(FloatTostr(pj^
  [i].Size/1024),1,1+pos(',',FloatTostr(pj^[i].Size/1024)))+' 
  KB'; //FormatFloat('###,##0.0 KB',trunc((pj^[i].Size/1024)/0.1)/10);
  jobids[i+1] := pj^[i].JobId;
  StringGrid1.Cells[6,i+1] := inttostr(pj^[i].Status);//+' -
  '+inttostr(jobids[i]);
  end;

  end;
  // end;
  finally
  ClosePrinter(hprinter);
  end;
  end;

  --- Em delphi-br@yahoogrupos.com.br, Rubem Nascimento da Rocha 
  [EMAIL PROTECTED] escreveu
  
   Companheiro, a experiência diz, e também quem trabalha com grandes 
   quantidades de dados comprova isso, que fazer a carga e a 
  apresentação dos 
   dados de forma manual, sem fazer uso de controles data-aware (que 
  são 
   próprios para isso), é uma prática questionável, uma vez que isto 
  impacta 
   diretamente no tempo de resposta que sua aplicação terá.
   
   Prefira usar TDBGrid ao invés de TStringGrid, pois o TDBGrid é um 
  controle 
   de grid preparado para exibição de dados a partir de um dataset 
  proveniente 
   (ou não) de uma conexão com um banco de dados.
   
   Sds.
   
   
   From: Gustavo André de Freitas [EMAIL PROTECTED]
   Reply-To: delphi-br@yahoogrupos.com.br
   To: delphi-br@yahoogrupos.com.br
   Subject: [delphi-br] String Grid com banco de dados Access
   Date: Mon, 16 Apr 2007 20:28:52 -
   
   Pessoal,
   
   tenho uma StringGrid que recebe alguns dados na minha aplicação e
   queria que esses dados fossem gravados num banco de dados, a 
  princípio
   esse banco seria o Access, gostaria de saber como faço para linkar
  (?),
   essa StringGrid com o banco de dados. estou usando adoconection e
   adotable...
   
   Desde já agradeço a ajuda de todos!
   
   Gustavo André de Freitas
   
   
   __
   MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.com
  



   

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



Re: [delphi-br] Agrupando dados Duplicados

2007-04-17 Por tôpico Márcio Ricardo
Tiago, não consegui entender o que você quer, explique melhor que talvez eu 
possa te ajudar.

 Esse select vai ser feito em apenas em uma tabela? No exemplo que vc deu, como 
pode 1 cpf ser de vários clientes? É isso mesmo, ou ser feito um join com outra 
tabela?

Passe mais informações para podermos te ajudar.
  - Original Message - 
  From: Tiago Vendemiatti 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, April 17, 2007 9:03 AM
  Subject: [delphi-br] Agrupando dados Duplicados


  Caros...por favor

  Sei que aqui é mais DELPHI, mas como a linguagem que estou usando é 
delphi.rsrs..será que alguém consegue me ajudar em uma query?

  TEnho uma tabela..que aceita dados duplicados.

  Porém em um determinado momento (relatório) preciso suprimir,agrupar,etc 
os dados duplicados comparando-os por apenas um campo.

  EX:

  Select Distinct cpf,* from clientes

  O select acima deve funcionar da segunte maneira:
  Comparar o e agrupar os registros em que os cpf são iguais. Apenas ele, porém 
trazendo os outros dados quando só existe 1.

  Pode ser com group by, Union ou Distinct ou qualquer coisa que de certo!


  Muito Obrigado

  Abs
  Tiago
  __
  Procure em qualquer página Web com protecção eficaz. Obtenha já o Windows 
Live Toolbar GRATUITO!
  http://www.toolbar.live.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] Agrupando dados Duplicados

2007-04-17 Por tôpico Márcio Ricardo
Ok, vamos lá.

  O exemplo que vc colocou: SELECT DISTINCT CPF, NOME FROM CLIENTES.
ela vai trazer apenas uma vez o Nome = Tiago e o CPF=123456789, desde que o 
nome seja igual, ok?

Tenta assim:

SELECT DISTINCT CPF, NOME FROM CLIENTES
GROUP BY CPF, NOME
ORDER BY CPF, NOME

OBS: LEMBRANDO QUE SE O CPF ESTIVER PARA DOIS NOMES DIFERENTES, ELE VAI SE 
REPETIR, OK?

se quiser pode adicionar mais campos.

falow.

  - Original Message - 
  From: André - Gmail 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, April 17, 2007 2:34 PM
  Subject: Re: [delphi-br] Agrupando dados Duplicados


  Select Distinct(cpf), clientes.* from clientes

  ou então vc coloca o nome de todos os campos que vc quiser após o 
  distinct(cpf)

  - Original Message - 
  From: Tiago Vendemiatti [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Tuesday, April 17, 2007 2:23 PM
  Subject: RE: [delphi-br] Agrupando dados Duplicados

  Então...
  Como eu disse...eu quero trazer tudo...

  Imagina assim:

  Se existir três registro como Nome Tiago, cpf 123456789.
  Fora os outros que não se repetem.

  Se fizer um select normal vai vir:

  nome cpf
  Tiago 123456789
  Tiago 123456789
  Tiago 123456789
  outros outros
  nomes cpf's

  Mas quero que saia assim:

  nome cpf
  Tiago 123456789
  outros outros
  nomes cpf's

  Apenas um..porém não trazendo apenas o cpf...mas sim todos os outros 
  campos...porém o DISTINCT deverá verificar apenas o CPF.

  Ficou mais claro?

  Obrigado pela ajuda
  Abs

  Tiago

  To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Tue, 17 
  Apr 2007 11:13:15 -0300Subject: Re: [delphi-br] Agrupando dados Duplicados

  Bom, se eu entendi direito, não importa o quanto apareça o mesmo CPF, apenas 
  traga um é isso né?Se for trazer apenas o CPF, esse select resolve: SELECT 
  DISTINCT CPF, * FROM CLIENTES.E no relatório é só você criar uma banda de 
  grupo que a própria ferramenta faz isso. O seu select é normal, vc agrupa no 
  relatório mesmo, entendeu?Qual ferramenta vc vai utilizar pra fazer o 
  relatório? É fácil fazer agrupamento pelo Rave, QuickReport e Crystal. 
  Então, o seu select é da maneira que vc tinha postado no primeiro e-mail, no 
  relatório vc agrupa, as ferramentas que citei tem as opções de agrupamento, 
  é moleza.Qualquer coisa, estamos ai pra tentar ajudar.- Original 
  Message - From: Tiago Vendemiatti To: delphi-br@yahoogrupos.com.br Sent: 
  Tuesday, April 17, 2007 9:54 AMSubject: RE: [delphi-br] Agrupando dados 
  DuplicadosOk..vamos la.É uma tabela só...Eu preciso deixar ele aceitar dados 
  duplicados..devido a necessidade que o cliente...pois não se trata de um 
  cadastro de cliente..só deixei isso como exemplo.Portanto é uma tabela 
  só...e quero agrupar os dados (ou filtrar) quando o campo cpf for igual, me 
  trazendo apenas um registro se houver mais que um, e se tiver apenas um 
  também trazer normalmente.ObrigadoTiagoTo: [EMAIL PROTECTED]: 
  [EMAIL PROTECTED]: Tue, 17 Apr 2007 09:24:42 -0300Subject: Re: 
  [delphi-br] Agrupando dados DuplicadosTiago, não consegui entender o que 
  você quer, explique melhor que talvez eu possa te ajudar.Esse select vai ser 
  feito em apenas em uma tabela? No exemplo que vc deu, como pode 1 cpf ser de 
  vários clientes? É isso mesmo, ou ser feito um join com outra tabela?Passe 
  mais informações para podermos te ajudar.- Original Message - From: 
  Tiago Vendemiatti To: delphi-br@yahoogrupos.com.br Sent: Tuesday, April 17, 
  2007 9:03 AMSubject: [delphi-br] Agrupando dados DuplicadosCaros...por 
  favorSei que aqui é mais DELPHI, mas como a linguagem que estou usando é 
  delphi.rsrs..será que alguém consegue me ajudar em uma query?TEnho uma 
  tabela..que aceita dados duplicados.Porém em um determinado momento 
  (relatório) preciso suprimir,agrupar,etc os dados duplicados 
  comparando-os por apenas um campo.EX:Select Distinct cpf,* from clientesO 
  select acima deve funcionar da segunte maneira:Comparar o e agrupar os 
  registros em que os cpf são iguais. Apenas ele, porém trazendo os outros 
  dados quando só existe 1.Pode ser com group by, Union ou Distinct ou 
  qualquer coisa que de certo!Muito 
  
ObrigadoAbsTiago__Procure
 
  em qualquer página Web com protecção eficaz. Obtenha já o Windows Live 
  Toolbar GRATUITO!http://www.toolbar.live.com[As partes desta mensagem que 
  não continham texto foram removidas][As partes desta mensagem que não 
  continham texto foram removidas] 
  __O Windows Live 
  Spaces já chegou! É fácil criar o seu próprio Web site 
  pessoal.http://spaces.live.com/signup.aspx[As partes desta mensagem que não 
  continham texto foram removidas][As partes desta mensagem que não continham 
  texto foram removidas]

  __
  O Windows Live Spaces já chegou! É fácil criar o seu próprio Web site 
  

[delphi-br] bandeja de impressão...

2007-04-17 Por tôpico Márcio Ricardo
Alguém sabe como eu faço para pegar o nome da Bandeja de Impressão, p.ex. 
bandeja1.

t+.
Márcio Ricardo Alves da Silva
Programador Pleno
[EMAIL PROTECTED] 

*** Antes de imprimir, pense em seu compromisso com o Meio Ambiente *** 

 
Config Informática Ltda
Av. Eng. Luis Carlos Berrini, 801 - 7º andar
Brooklin Novo - São Paulo - SP
CEP: 04571-010 - Fone (11) 5501-8300 - www.config.com.br

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



[delphi-br] grid com checkbox...

2007-04-16 Por tôpico Márcio Ricardo
Bom dia a todos!

  Tenho uma grid com dois checkbox, que estão funcionando quase que 
perfeitamente. O problema que estou tendo é que as vezes me aparece o número 1 
ou 0 que indicam 1-checado e 0-não checado. Alguém sabe como resolver isso?
Márcio Ricardo Alves da Silva
Programador Pleno
[EMAIL PROTECTED] 

*** Antes de imprimir, pense em seu compromisso com o Meio Ambiente *** 

 
Config Informática Ltda
Av. Eng. Luis Carlos Berrini, 801 - 7º andar
Brooklin Novo - São Paulo - SP
CEP: 04571-010 - Fone (11) 5501-8300 - www.config.com.br

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



Re: [delphi-br] dbExpress + SQL Server + Parametros = Erro

2007-04-16 Por tôpico Márcio Ricardo
eu utilizo assim:

SELECT * FROM MINHA_TABELA WHERE CAMPO = ? --SIGINIFCA PASSAGEM DE PARAMETRO.

e funciona. Eu nunca utilizei a declaração de variável em SQL, isso só se 
utiliza em Prodecure, tipo PL/SQL no Oracle.
  - Original Message - 
  From: Fernando Nappe 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, April 13, 2007 11:46 AM
  Subject: [delphi-br] dbExpress + SQL Server + Parametros = Erro


  Saudações Pessoal,

  Honestamente, nunca havia usado dbExpress com MS SQL Server, até hoje...
  Vejam o exemplo de uma SQL que estou usando:

  declare @variavel int
  select @variavel = :parametro
  select * from minha_tabela where campo = @variavel

  Quando tento adicionar os campos ao Fields Editor recebo o erro:

  ---
  Error
  ---
  SQL State: 42000, SQL Error Code: 0
  Erro de sintaxe ou violação de acesso

  ---
  OK
  ---

  Alguém já passou por algo parecido? Como resolveram?

  Desde já agradeço a ajuda e o tempo dispensado.

  Att.
  -- 
  Fernando Nappe
  Analistas de Sistemas
  http://nappe.blogspot.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] Ler arquivo XML

2007-04-16 Por tôpico Márcio Ricardo
O ClientDataSet faz isso.

cdsLeXML.Close;
  cdsLeXML.LoadFromFile(ExtractFilePath(Application.ExeName) +
   'Criptografia.xml');
  cdsLeXML.Open;

No meu caso tenho os campos criados no CllientDataSet, não sei e é isso que vc 
quer. Aqui eu gravei no xml e depois li o mesmo.


  - Original Message - 
  From: Marcos André 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, April 16, 2007 11:44 AM
  Subject: [delphi-br] Ler arquivo XML


  Olá pessoal,

  Alguém conhece um componente, ou uma rotina fácil para se ler arquivos
  XML??? Já um componente no Delphi, mas ainda n consegui usar...

  obrigado

  -- 
  Um abraço

  Marcos André

  [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] Filter dinâmico

2007-04-11 Por tôpico Márcio Ricardo
Paulo, obrigado pela dica.

O usuário insere no máximo 3 registros em uma GRID que está ligada a um 
DataSource que está ligado a um ClientDataSet. Conforme for escolhendo eu 
adiciono mais um em um contador e com esse contador fiz um for, segue abaixo o 
resultado:

procedure TfrmExportaXML.SpeedButton3Click(Sender: TObject);
var i : integer;
condicao : string;
begin
  cdsAuxiliar.First;
  for I := 0 to contador-1 do
  begin
if i = 0 then
  condicao := 'XML_ENVIO LIKE' + QuotedStr('%'+
  cdsAuxiliarTag_XML.AsString + '' +
  cdsAuxiliarVALOR.AsString + '/' +
  cdsAuxiliarTag_XML.AsString + '%')
else
  condicao := condicao + ' OR XML_ENVIO LIKE' + QuotedStr('%'+
  cdsAuxiliarTag_XML.AsString + '' +
  cdsAuxiliarVALOR.AsString + '/' +
  cdsAuxiliarTag_XML.AsString + '%');
cdsAuxiliar.Next;
  end;
  DM.cdsConsultaNFe.Filter   := condicao;
  DM.cdsConsultaNFe.Filtered := True;
  DM.cdsConsultaNFe.Close;
  DM.cdsConsultaNFe.Open;
end;


  - Original Message - 
  From: Paulo Alexsandro 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, April 10, 2007 7:48 PM
  Subject: Re: [delphi-br] Filter dinâmico


  HI,

  pressionei o tab sem querer e foi o que eu tinha digitado, hehehe

  vc vai ter que saber o tipo do campo para montar isso aí, por que se for uma
  data vai ter que botar no formato americano e dá um QuotedStr

  como vai ser a tela para o usuário escolher os campos que deseja ?

  pergunto, porque se tiver uma lista de 10 campo e ele colocar um valor em 3,
  aí vc usar um for, testa qual ele informou o valor e e monta a condição

  for 1 to 10

  if Length(ValorCampo)  0 then
  Condicao := Condicao + NomeCampo = FormataValorCampo(ValorCampo) + ' AND
  ' ;

  end;

  depois vc deleta as última 5 posições da string

  FormataValorCampo()

  é para retornar de acordo com o tipo do campo

  é por aí

  --
  Paulo Alexsandro - dprogrammer
  http://dprogrammer.wordpress.com/

  Em 10/04/07, Paulo Alexsandro [EMAIL PROTECTED] escreveu:
  
   HI,
  
   acredito
  
   Em 10/04/07, marcio_cbj [EMAIL PROTECTED] escreveu:
   
Pessoal, alguém já precisou trabalhar com filtro dinâmico do
ClientDataSet.Filter.
tenho uma aplicação que o usuário faz uma consulta e exibe os dados na
GRID, com o resultado dessa consulta o usuário pode escolher até três
campos para fazer o filtro em cima dos valores consultados.
Sei que é só ir colocando AND após uma condição de filtro, mas como
fazer?
   
Os campos que o usuário escolhe eu coloca em outra grid que contém a
informação a ser consultada.
   
Deu pra entender? Se alguém puder me ajudar.
   
  

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



   

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



[delphi-br] dois checkbox na GRID...

2007-04-10 Por tôpico Márcio Ricardo
Olá Pessoal. 

Alguém já trabalhou com dois checkbox na mesma GRID? Tenho duas colunas com 
checkbox, mas quando seleciono um checkbox outro tbém é checado. Estou usando a 
propriedade SelectedIndex para alternar entre checado e não checado, mas no 
evendo DrawnColumnCell ele seleciona tudo, vejam se está correto: 

DBGrid2.DefaultDrawDataCell(Rect, DBGrid2.columns[datacol].field, State); 
if (Column.FieldName = 'XENVIO') or 
(Column.FieldName = 'XRETORNO') then 
begin 
Self.DBGrid2.Canvas.FillRect(Rect); 
CheckBoxRectangle.Left := Rect.Left + 2; 
CheckBoxRectangle.Right := Rect.Right - 2; 
CheckBoxRectangle.Top := Rect.Top + 2; 
CheckBoxRectangle.Bottom := Rect.Bottom - 2; 

if (DBGrid2.SelectedIndex = 5) then 
begin 
if (DM.cdsConsultaNFe.FieldByName('XENVIO').AsString = '1') then 
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON, 
CtrlState[True]) 
else 
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON, 
CtrlState[False]); 
end; 
if (DBGrid2.SelectedIndex = 6) then 
begin 
if (DM.cdsConsultaNFe.FieldByName('XRETORNO').AsString = '1') then 
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON, 
CtrlState[True]) 
else 
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON, 
CtrlState[False]); 
end; 
end;
Márcio Ricardo Alves da Silva
Programador Pleno
[EMAIL PROTECTED] 

*** Antes de imprimir, pense em seu compromisso com o Meio Ambiente *** 

 
Config Informática Ltda
Av. Eng. Luis Carlos Berrini, 801 - 7º andar
Brooklin Novo - São Paulo - SP
CEP: 04571-010 - Fone (11) 5501-8300 - www.config.com.br

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



Re: [delphi-br] Delphi 2007

2007-02-26 Por tôpico Márcio
estou precisando desenvolver um sistema completo em delphi, alguem ta afim de 
passar a proposta ???


abraços

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



Re: [delphi-br] RE: Lentidão

2006-04-01 Por tôpico Márcio de Figueiredo Moura e Castro
Caro Fernando:

O campo NFID do ORDER BY tem índice? EMPRESAID também? Qual é o banco 
que você está utilizando?


  - Original Message - 
  From: [EMAIL PROTECTED] 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Saturday, April 01, 2006 3:37 PM
  Subject: Re: [delphi-br] RE: Lentidão


  ta assim 

  select * from NF

  where EMPRESAID = :EMPRESAID

  order by NFID



  Citando Josir Gomes [EMAIL PROTECTED]:

   
   
   
   Olá Fernando,
   
   passe pra gente como está o SQL da sua query.
   
   
   
   
   
   Seguinte meu programa tava trabalhando normal, ae  derrepente qndo xega no
   open da query fica muuitt lento, consegui resolver o problema 
do
   open mas quando eu estou editando a query no form fica bem lento oq deve ser
   isso???
   
   
   
   
   
   
   
   
   
   
   
   -- 
   
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
   
   
   
   http://br.groups.yahoo.com/group/delphi-br/messages
   
   
   
   [EMAIL PROTECTED]
   
   
   
   
   
   
   
   
   
 
   
   
   
   
   
 
   Links do Yahoo! Grupos
   
   
   Para visitar o site do seu grupo na web, acesse:
   http://br.groups.yahoo.com/group/delphi-br/

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

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






  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





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


--
  Links do Yahoo! Grupos

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




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: [delphi-br] Intraweb x JavaScript

2006-03-26 Por tôpico Márcio de Figueiredo Moura e Castro
Caro Fernando:

Se você criar e destruir o formulário, você poderia utilizar 
OnCreate/OnDestroy. Mas parece que você mantém o formulário, não é? Você já 
tentou utilizar o OnRender?


  - Original Message - 
  From: Fernando Moreira de Sousa 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, March 21, 2006 5:06 PM
  Subject: [delphi-br] Intraweb x JavaScript


  Olá pessoal,

estou fazendo um teste de converter um sistema Win32 para Web
  utilizando Intraweb no Delphi 2006. 
Não encontrei uma forma de disparar um comando, que pode ser cliente
  (JavaScript) ou Servidor (Delphi), em dois momentos: ao carregar a página
  (onLoad) e ao descarregar a página (onUnload).

Para simplicar seria o seguinte:
Ao carregar uma nova página gostaria de mostrar uma mensagem como Olá!
  (ex: onLoad = alert('Olá'); ) e ao sair da página mostrar tchau (ex:
  onUnload = alert('Tchau'); )

Parece ser simples, mas o formulário do Intraweb não permite (pelo menos
  eu não encontrei) uma forma de incluir comandos JavaScript nos eventos
  onLoad e onUnload.

Será que alguém poderia me ajudar!

Desde já agradeço!

  Abraços!
  _
  Fernando Sousa
  Belo Horizonte - MG




  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





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

   


--
  Links do Yahoo! Grupos

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




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





[delphi-br] Descarregar variavél da Memoria

2006-02-24 Por tôpico Márcio Rodrgues
Estou criando transações no DBXpress.

E uso variaveis do tipo TTransactionDesc = packed record.
Gostaria de saber se ela tem que ser liberada da memoria.







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





[delphi-br] Re: Super Componentes

2006-02-24 Por tôpico Márcio Rodrgues
Esses componentes são pagos

em www.delphitools.com.br
Vc pode adiquirir cds com centenas de componentes craqueado.
Comprei o cd e uso todos da dev.



--- Em delphi-br@yahoogrupos.com.br, Arthur Souza
[EMAIL PROTECTED] escreveu

 Alguém sabe onde posso encontrar esses componentes?
 
 - Info Power 4000
 
 - DevExpress
 
 Agradeço,
 
 
 [As partes desta mensagem que não continham texto foram removidas]








-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




[delphi-br] Re: Quem é esse componente?

2006-02-24 Por tôpico Márcio Rodrgues

Cara se não me engano são relacionados a componentes da DevExpress.
Pois existe nos componentes da dev uma biblioteca que se chama CXLibrary.



--- Em delphi-br@yahoogrupos.com.br, Arthur Souza
[EMAIL PROTECTED] escreveu

 Olá pessoal..
 
  Tenho baixado um fonte de um aplicação na Internet e quando vou a abrir
 algumas foms, me aparece o seguinte erro:
 
 não foi encontrado a classe  TCXButton, TCX GroupBox...
 
 Acredito que está faltando algum componente para operar estas classes...
 
 Agradeço se alguém souber q componente é esse..
 
 Arthur MS
 
 
 [As partes desta mensagem que não continham texto foram removidas]







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: RES: [delphi-br] Sistema funcionando com toque no monitor [ como fazer ?]

2006-02-24 Por tôpico Márcio Rodrgues
No mercado Livre tem...

--- Em delphi-br@yahoogrupos.com.br, Anderson Cichon [EMAIL PROTECTED]
escreveu

 E alguém tem idéias de onde encontrar essa tela que vai na frente do
monitor
 para vender?
 
 
 
 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] Em
 nome de TechVale - Gustavo
 Enviada em: quinta-feira, 23 de fevereiro de 2006 23:35
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Sistema funcionando com toque no monitor [ como
 fazer ?]
 
 Ola pessoal,
 
 O touchscreen funciona mais ou menos assim...
 
 Você coloca uma tela como se fosse um desses protetores de tela que vc
 compra por aí na frente de seu monitor. Este vidro tem uma
pelicula em 2
 camadas que formam um pequeno capacitor. Dependendo de onde vc toca
na tela
 a capacitancia varia.
 
 Para detectar esta variação de capacitancia vc precisa instalar uma
placa
 que gera os sinais que excitam esta pelicula.
 
 Uma vez que a capacitancia varie, esta placa transforma esta variação em
 coordenada de tela enviando ao sistema operacional através do driver
 apropriado, dependendo do modelo. 
 Uma vez trabalhei com uma placa que tinha uma saída que era colocado
em uma
 ligação estrela com o mouse, ou seja, o mouse ia ligado nela e tinha uma
 saida que era ligado na entrada do mouse.
 
 Normalmente a programação com tela touchscreen é transparente ao
aplicativo
 pois o programa recebe os dados como se fosse o mouse, ou seja, se
vc tocar
 na posição do botão OK em uma caixa de dialogo, o aplicativo recebe
um click
 como se o mouse tivesse clicado ali.
 
 Porém, para tirar proveito ao máximo destas telas touchscreen, o
aplicativo
 precisa ser desenvolvido para usar ao máximo o mouse. Normalemnte os
 aplicativos usam mais o teclado que o mouse...
 
 Espero ter ajudado..
 
 Abraços,
 
 Gustavo C. Bianconi.
 
 Técnico Eletrônico
 
 CREA-SP 0681944836
 
 Celular : (12) 9123.0302
 
 Email   : [EMAIL PROTECTED]
 
 MSN : [EMAIL PROTECTED]
 
  Sistemas, Serviços e Equipamentos para Automação
  
   R Romeu Carnevalli, 200 CS03 - Centro
 
   São José dos Campos - SP - 12209-490
 
   TeleFax 12 3923.5414
 
 www.techvale.com.br 
 
 
 
 
 
 
 
 
 
 - Original Message - 
 From: Walter Alves Chagas Junior [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Cc: [EMAIL PROTECTED]
 Sent: Thursday, February 23, 2006 4:50 PM
 Subject: RES: [delphi-br] Sistema funcionando com toque no monitor [
como
 fazer ?]
 
 
 Éh, na verdade o assunto é pouco explorado. Eu vou dar uma fuçada no
 Copernico hoje a noite e ver o que acho de interessante. O que eu tinha
 escrito, baseei no site abaixo e lá dizia da placa.
 
  http://www.automatica.com.br/periferi_quiosque.htm
 
 
 
 []s
 
 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia de telecomunicações
 Belo Horizonte - MG - Brazil
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200
 
 
 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
 nome de Filipe Xavier Ramalho
 Enviada em: quinta-feira, 23 de fevereiro de 2006 12:35
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Sistema funcionando com toque no monitor [ como
 fazer ?]
 
 
 http://www.waytec.com.br/conteudo.asp?lnk=produtos/ct5w
 
 Walter, não seria possível fazer a detecção dos toques apenas com
uma placa,
 o vidro do monitor não teria como identificar os pontos de toque.
 
 O site acima é de um produto que compõe o seguinte: uma tela
resistiva e uma
 placa controladora. a tela deve ser colotada sobre o monitor, para
 transformá-lo em um TouchScreen.
 
 Att,
 
 Filipe Xavier Ramalho
 Desenvolvimento
 Telefone: (41) 3219-2042
 Duty Sistemas de Gerenciamento de Riscos S/A
 http://www.duty.com.br
 
 Antes de imprimir pense no MEIO AMBIENTE!
 
   - Original Message - 
   From: Walter Alves Chagas Junior 
   To: 'delphi-br@yahoogrupos.com.br' 
   Sent: Thursday, February 23, 2006 12:11 PM
   Subject: RES: [delphi-br] Sistema funcionando com toque no monitor
[ como
 fazer ?]
 
 
   Não é tela. É uma placa especial que é instalada no computador e
que deve
   detectar os toques.
 
   []s
 
   Walter Alves Chagas Junior
   Projeto e desenvolvimento
   Telemont Engenharia de telecomunicações
   Belo Horizonte - MG - Brazil
   [EMAIL PROTECTED]
   Fone: (31) 3389-8215 Fax: (31) 3389-8200
 
 
   -Mensagem original-
   De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED]
   nome de Campus
   Enviada em: quinta-feira, 23 de fevereiro de 2006 10:32
   Para: delphi-br@yahoogrupos.com.br
   Assunto: Re: [delphi-br] Sistema funcionando com toque no monitor
[ como
   fazer ?]
 
 
   Provavelmente.
 
   É uma tela que é aplicada sobre o cinescópio do monitor, já vem com a
 fiação
   para conectar na porta serial ou usb. Deve se comportar como os
leitores
 de
   código de barra que são conectados via teclado.
 
 
   - Original Message - 
   From: Emerson Moreno [EMAIL PROTECTED]
   To: 

Re: RES: [delphi-br] Diagramas[OFF]

2006-02-22 Por tôpico Márcio Rodrgues
O SQL Server tem seu proprio sistema.
No Enterprise Manager que acompanha o SQL SERVER.


--- Em delphi-br@yahoogrupos.com.br, leo rodrigues [EMAIL PROTECTED] escreveu

 Existe também o Rational Rose, é muito bom.
 
 anderson valerio [EMAIL PROTECTED] escreveu:  Ja ouviu falar do
ErWin 4.1, [e uma excelente ferramenta de modelagem de
 dados, vai te atender muito bem !!!
 
 
 Colegas,
 Estava precisando estudar um banco de dados SQL Server, mais
especificamente
 o CorporeRM da RM Sistemas.
 Pensei numa ferramenta que gerasse os diagramas e os relacionamentos
deste
 banco.
 Vocês conhece algo parecido?
 
 Edmilson Pontes
 
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
 Links do Yahoo! Grupos
 
 
 
 
 
 
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
 
 
 
 
 
 Yahoo! Grupos, um serviço oferecido por:
 
 
 
 PUBLICIDADE
 

clubs/S=2137111264:HM/Y=BR/EXP=1140548777/A=3310604/R=2/id=noscript/SIG=1540

fueht/*http:/lt.dell.com/lt/lt.aspx?CID=11377LID=314739DGC=BADGSeg=DHSDU

RL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26
 l%3dpt%26s%3ddhs 
 
 
 50.gif 
 
 
 
 _ 
 
 Links do Yahoo! Grupos
 
 * Para visitar o site do seu grupo na web, acesse:
 http://br.groups.yahoo.com/group/delphi-br/
 
 * Para sair deste grupo, envie um e-mail para:
 [EMAIL PROTECTED]
 
 
 * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
 Serviço do Yahoo!. 
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
 Links do Yahoo! Grupos
 
 
 
 
 
 
 
 
 
   
 -
  Yahoo! doce lar. Faça do Yahoo! sua homepage.
 
 [As partes desta mensagem que não continham texto foram removidas]








-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




[delphi-br] Re: Auditar impressões de uma máquina

2006-02-22 Por tôpico Márcio Rodrgues

Eu tenho um sample de como listar os Print Jobs.

me manda seu e-mail que eu envio.


--- Em delphi-br@yahoogrupos.com.br, Murillo Proença [EMAIL PROTECTED]
escreveu

 Estou precisando desenvolver um software que ficará residente na 
 memória do micro e para cada impressão que o usuário enviar, eu tenho 
 que pegar o nome do documento e quantidade de cópias enviadas.
 Alguém já fez algo parecido ou sabe de algum doc, artigo, download?
 
 Grato
 
 Murillo Proença







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





[delphi-br] Re: Auditar impressões de uma máquina

2006-02-22 Por tôpico Márcio Rodrgues
Coloquei nos arquivos do grupo.

PrintJobs.Zip.

Márcio


--- Em delphi-br@yahoogrupos.com.br, Murillo Proença [EMAIL PROTECTED]
escreveu

 Estou precisando desenvolver um software que ficará residente na 
 memória do micro e para cada impressão que o usuário enviar, eu tenho 
 que pegar o nome do documento e quantidade de cópias enviadas.
 Alguém já fez algo parecido ou sabe de algum doc, artigo, download?
 
 Grato
 
 Murillo Proença








-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




[delphi-br] Tclientdaset verificar estado como um todo.

2006-02-21 Por tôpico Márcio Rodrgues
Boa tarde,

Estou migrando um sistema de IBO para DBExpress, para aceitar varios
bancos.

No sistema existe uma propriedade da TIBOQuery que se chama
UpdatePending que verifica se foi dado ou não applyupdates e
commitupdates no TIBOQuery.

Gostaria de saber se o ClientDataSet existe uma funçõa semelhante?
Pois UpdateStatus e State trata somente o record.

Obrigado desde já.






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




[delphi-br] Re: Validar diretório

2006-02-21 Por tôpico Márcio Rodrgues
if DirectoryExists('c:\temp') then
   ShowMessage('Existe')
else
   ShowMessage('Não Existe')


Marc_Adans.



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

 Amigos,
 
 Quero verificar se o diretório informado pelo usuário em um dbedit é
válido
 ou não, para evitar o erro de I/O entre o final da consulta do banco de
 dados e a gravação do arquivo txt. Alguém poderia me dar uma dica?
 
 Áureo
 
 
 [As partes desta mensagem que não continham texto foram removidas]








-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




[delphi-br] Re: Máscara em Table

2006-02-21 Por tôpico Márcio Rodrgues
Adicione os Tfield's na Table e na propriedade do Field que se chama
DisplayFormat de for Numerico ou EditMask se for String.

Procure no Help do delphi (DisplayFormat , EditMask ) que achará exemplos.


Marc_Adans.

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

 Ola...
 Tenho um campo q quero colocar mascara nele. 
 
 É um número de cartões de plano de saúde e eles tem a seguinte
estrutura:
 
 0129.01-15.2
 0129.02-23.5
 0129.03-31.8
 
 No caso, após o 0129, é uma sequencia numérica e ó temos 120
 cadastros, então quero que a máscara fique assim: 0129.000___-__._
 
 Acontece que já usei assim: 
 
 \012\9\.\0\0\.00-0;1;_
 
 mas quando eu digito o ultimo numero ele desaparece e não grava
 
 Alguém pode me dar uma ajuda?
 
 []s´
 Paulo







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




[delphi-br] Re: Fw: Help erro

2006-02-21 Por tôpico Márcio Rodrgues
Reveja as propriedade DataFields do seu TDBEditor.
Alguma deve estar com nome errado.



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

 
 
 
 Pessoal to precisando da seguinte ajuda.
 
 
 Tenho 3 tabelas:
 
 Locacao
 _
 cd_locacao PK
 cd_cli FK
 dt_locacao
 dt_devolucao
 
 
 Item_locacao
 ___
 cd_item PK
 cd_locacao FK
 cd_cli FK
 Cd_car FK
 quantidade
 
 Car
 
 cd_car
 nome
 
 Utilizo conexão Ado.
 Em Um for fiz o seguinte coloquei
 
 Adotablelocacao ligado ao datasourcelotacao
 e varios DBedit ligado a este data source.
 
 AdotableItemlocacao ligado ao datasourcelotacao
 e varios DBedit ligado a este data source
 
 Só que se deixo o Adotablelocacao true da o seguinte erro:
 
 Raised exception class edatabaseerror wicth message 'A componente
named XPKlotacao already exists'.
 
 Onde estou errando..?
 
 
 
 Cadanos
 
 [As partes desta mensagem que não continham texto foram removidas]








-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





[delphi-br] Re: Renomeando JPG em Lote

2006-02-21 Por tôpico Márcio Rodrgues
Com a função abaixo vc pode pesquisar um direotrio usando uma mascara
de arquivos, ele retorna um Tstringlist.
Depois é só fazer um laço for com a sua string list contendo a função
renamefile da unit sysutils.

Marc_Adans

function GetFileList(FDirectory, Filter: TFileName;
ShowFolder:Boolean): TStringList;
var
   ARec: TSearchRec;
   Res: Integer;
begin
 if FDirectory[Length(FDirectory)]  '\' then
 begin
  FDirectory := FDirectory + '\';
 end;
 Result := TStringList.Create;
 try
Res := FindFirst(FDirectory + Filter, faAnyFile or faArchive,
ARec);
while Res = 0 do
begin
 if ((ARec.Attr and faArchive) = faAnyFile) or ((ARec.Attr
and faArchive) = faArchive) then
 begin
  if ShowFolder then
  begin
   Result.Add(FDirectory + ARec.Name);
  end
  else
  begin
   Result.Add(ARec.Name);
  end
 end;
 Res := FindNext(ARec);
end;
FindClose(ARec);
 except
Result.Free;
 end;
end;






--- Em delphi-br@yahoogrupos.com.br, Arthur Souza
[EMAIL PROTECTED] escreveu

 Boa tarde pessoal,
 
 Estou com uma dúvida aki para realizar uma manutenção em meu sistema.
 
 Pois  precisaria estar realizando um programinha para estar
renomeando meus
 arquivos JPG. No meu caso tenho alocado num diretório 5 mil JPG's e
gostaria
 de estar renomeando esse lote um a um, esses arquivos, numa sequência
 numérica. como posso estar realizando isso?
 
 por exemplo:
 
 xxx.jpg, yyy.jpg.zzz.jpg
 assim renomeando-os para a ordem numérica assim:-- 1.jpg,
 2.jpg...5000.jpg
 
 Obrigado
 
 
 [As partes desta mensagem que não continham texto foram removidas]







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: RES: [delphi-br] Desing Arrojado

2006-02-21 Por tôpico Márcio Rodrgues
No site da clube delphi (www.clubedelphi.net)
Existe um artigo sobre o assunto.
Faça uma pesquisa no site..

Marc_Adans.

--- Em delphi-br@yahoogrupos.com.br, Moked - Tamara \(Brazil\)
[EMAIL PROTECTED] escreveu

  
  
   http://www.moked.com.br/   Tamara Clemente - Suporte Técnico
 Moked do Brasil - Consultoria de Segurança Empresarial
 Divisão MokInf de Informática
 PABX: (55-11) 5071-2748
 [EMAIL PROTECTED]
 www.moked.com.br http://www.moked.com.br/ 
 
 Grau de Sigilo:  Confidencial  Reservado  Interno  Amplo 
 Nível de Prioridade:  Alto  Médio  Baixo
 Destinatário/s: Lista de divulgação 

-
 Visual abaixo???rs...
 
 
 
 Tamara
 A Moked é a Única Empresa do ramo certificada pelo ISO9000:2000
 O emitente da mensagem é o responsável por seu conteúdo e
divulgação, proibindo
 sua reprodução sem a prévia autorização do mesmo. 
 Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o
 comprometimento com os Custo envolvidos! 
  
 
 
 
 De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] Em nome de Jorge Ericsson Silva
Pinheiro
 Enviada em: terça-feira, 21 de fevereiro de 2006 16:01
 Para: delphi-br@yahoogrupos.com.br
 Assunto: [delphi-br] Desing Arrojado
 
 
 
 
 Olá amigos delphianos,
 
 
 
 Alguém conhece algum componente que crie formulários com o visual
abaixo ?
 
 
 
 Obrigado,
 
 
 
 
 
 
 
 
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
 
 
 
 Yahoo! Grupos, um serviço oferecido por:  
 PUBLICIDADE
 
 
http://br.ard.yahoo.com/SIG=12f0sdbp8/M=396547.7942355.8848059.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1140551703/A=3310604/R=2/id=noscript/SIG=1540fueht/*http://lt.dell.com/lt/lt.aspx?CID=11377LID=314739DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs

 
 
 
 Links do Yahoo! Grupos
 
 
 * Para visitar o site do seu grupo na web, acesse:
   http://br.groups.yahoo.com/group/delphi-br/
 
 * Para sair deste grupo, envie um e-mail para:
   [EMAIL PROTECTED]
mailto:[EMAIL PROTECTED] 
 
 * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo! http://br.yahoo.com/info/utos.html . 
 
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]








-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: RES: [delphi-br] Desing Arrojado

2006-02-21 Por tôpico Márcio Rodrgues
Achei o link

http://www.devmedia.com.br/visualizacomponente.aspx?comp=281site=3

Marc_Adans




--- Em delphi-br@yahoogrupos.com.br, Márcio Rodrgues [EMAIL PROTECTED]
escreveu

 No site da clube delphi (www.clubedelphi.net)
 Existe um artigo sobre o assunto.
 Faça uma pesquisa no site..
 
 Marc_Adans.
 
 --- Em delphi-br@yahoogrupos.com.br, Moked - Tamara \(Brazil\)
 [EMAIL PROTECTED] escreveu
 
   
   
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
  Moked do Brasil - Consultoria de Segurança Empresarial
  Divisão MokInf de Informática
  PABX: (55-11) 5071-2748
  [EMAIL PROTECTED]
  www.moked.com.br http://www.moked.com.br/ 
  
  Grau de Sigilo:  Confidencial  Reservado  Interno  Amplo 
  Nível de Prioridade:  Alto  Médio  Baixo
  Destinatário/s: Lista de divulgação 
 

-
  Visual abaixo???rs...
  
  
  
  Tamara
  A Moked é a Única Empresa do ramo certificada pelo ISO9000:2000
  O emitente da mensagem é o responsável por seu conteúdo e
 divulgação, proibindo
  sua reprodução sem a prévia autorização do mesmo. 
  Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o
  comprometimento com os Custo envolvidos! 
   
  
  
  
  De: delphi-br@yahoogrupos.com.br
 [mailto:[EMAIL PROTECTED] Em nome de Jorge Ericsson Silva
 Pinheiro
  Enviada em: terça-feira, 21 de fevereiro de 2006 16:01
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Desing Arrojado
  
  
  
  
  Olá amigos delphianos,
  
  
  
  Alguém conhece algum componente que crie formulários com o visual
 abaixo ?
  
  
  
  Obrigado,
  
  
  
  
  
  
  
  
  
  
  
  [As partes desta mensagem que não continham texto foram removidas]
  
  
  
  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
  
  
  
  
  
  
  Yahoo! Grupos, um serviço oferecido por:
  PUBLICIDADE
  
  

http://br.ard.yahoo.com/SIG=12f0sdbp8/M=396547.7942355.8848059.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1140551703/A=3310604/R=2/id=noscript/SIG=1540fueht/*http://lt.dell.com/lt/lt.aspx?CID=11377LID=314739DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs
 
  
  
  
  Links do Yahoo! Grupos
  
  
  *   Para visitar o site do seu grupo na web, acesse:
  http://br.groups.yahoo.com/group/delphi-br/

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

  *   O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
 Serviço do Yahoo! http://br.yahoo.com/info/utos.html . 
  
  
  
  
  [As partes desta mensagem que não continham texto foram removidas]
 








-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





[delphi-br] Re: Acessar o Mysql 5.0

2006-02-21 Por tôpico Márcio Rodrgues
Acesse os link

http://www.delphibr.com.br/artigos/mysql_delphi.php

http://www.imasters.com.br/artigo.php?cn=3405cc=254

http://www.imasters.com.br/artigo.php?cn=3377cc=254

Marc_Adans

--- Em delphi-br@yahoogrupos.com.br, Milton Ribeiro Lima
[EMAIL PROTECTED] escreveu

 Boa tarde a todos!
 Sou inciante...
 Como acesso o My 5.0  via ODBC, ja que todos os componentes free nao
acessam
 as SP e Trig dai optei por ODBC.
 
 Alguem tem um passo-a-passo ou algum ideia de como acessar Free.
 
 Grato a todos







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





[delphi-br] SQLStoredProc, Oracle, pacote e Cursor

2006-02-17 Por tôpico Márcio de Figueiredo Moura e Castro

Caros senhores:

Em um banco Oracle 10g, possuo um pacote com um procedimento que me 
retorna um REF cursor:

PACKAGE PKG_ACOMODACOES as
type CURSOR_REF__ACOMODACOES IS REF CURSOR RETURN ACOMODACOES%ROWTYPE;

PROCEDURE PR_REF_ACOMODACOES
(
v_CURSOR_REF_ACOMODACOES out CURSOR_REF__ACOMODACOES
);

Utilizei um SQLStoredProc para chamar o procedimento. O parâmetro neste 
ficou como ftCursor e 
mudando a propriedade Active para True, este não apresenta nenhum problema.
A pergunta é: como é que eu faço para transferir os valores retornados 
para os campos do 
Delphi? 
No aguardo,

Márcio de Figueiredo Moura e Castro






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






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: [delphi-br] off-topic - direitos do programador...

2006-02-16 Por tôpico Márcio de Figueiredo Moura e Castro
Ué... cês tão muito bem! Ninguém falow em trabalhar até a madrugada, no 
carnaval, ano novo...   :-)





  - Original Message - 
  From: Walter Alves Chagas Junior 
  To: 'delphi-br@yahoogrupos.com.br' 
  Sent: Wednesday, February 15, 2006 3:55 PM
  Subject: RES: [delphi-br] off-topic - direitos do programador...


  Não é bem assim também não né gente! Eita povo que exagera.

  Você tem direito ao almoço né, senão se passa mal a tarde!

  []s

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


  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  nome de Eduardo Alves
  Enviada em: quarta-feira, 15 de fevereiro de 2006 15:49
  Para: delphi-br@yahoogrupos.com.br
  Assunto: RE: [delphi-br] off-topic - direitos do programador...


  Vc tem direito a café e banheiro ???

  Tem vaga para mais um ai 

  Rsrsrs

  Eduardo

  -Original Message-
  From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On
  Behalf Of Mario Scavoni
  Sent: quarta-feira, 15 de fevereiro de 2006 15:42
  To: delphi-br@yahoogrupos.com.br
  Subject: Re: [delphi-br] off-topic - direitos do programador...


  vamos lá:
  horários de trabalhos: Todos
  máximo por dia: dia e noite
  intervalos: café e banheiro
  férias: o q é isso?

  rs... desculpe.


  - Original Message - 
  From: Spadinha [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED]
  Sent: Wednesday, February 15, 2006 2:35 PM
  Subject: [delphi-br] off-topic - direitos do programador...


  olah para todos desculpe enviar essa mensagem off...

  mais gostaria de abrir uma discussao sobre os direitos do programador

  caso alguem tenha alguma documentacao ...
  sobre
  horarios de trabalho, maximo por dia...

  intervalos ...

  relacionados a RH...

  agradeco...

  obrigado e desculpas

  andre


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



  Links do Yahoo! Grupos












  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



  Links do Yahoo! Grupos









  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



  Links do Yahoo! Grupos








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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





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

   


--
  Links do Yahoo! Grupos

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




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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




[delphi-br] SQLStoredProc, Oracle, pacote e Cursor

2006-02-15 Por tôpico Márcio de Figueiredo Moura e Castro
Caros senhores:

Em um banco Oracle 10g, possuo um pacote com um procedimento que me 
retorna um REF cursor:

PACKAGE PKG_ACOMODACOES as
type CURSOR_REF__ACOMODACOES IS REF CURSOR RETURN ACOMODACOES%ROWTYPE;

PROCEDURE PR_REF_ACOMODACOES
(
v_CURSOR_REF_ACOMODACOES out CURSOR_REF__ACOMODACOES
);

Utilizei um SQLStoredProc para chamar o procedimento. O parâmetro neste 
ficou como ftCursor e 
mudando a propriedade Active para True, este não apresenta nenhum problema.
A pergunta é: como é que eu faço para transferir os valores retornados 
para os campos do 
Delphi? 
No aguardo,

Márcio de Figueiredo Moura e Castro





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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




Re: [delphi-br] PARAMETROS

2006-02-11 Por tôpico Márcio de Figueiredo Moura e Castro
Caro Gustavo:

Segue um exemplo utilizando o TSQLStoredProc que parâmetros de IN e OUT 
e utilizando Oracle 10g.

  SQLStoredProcPKG_ACOMODACOES.ParamByName('Sender').AsString := 'LOCALIZAR';
  SQLStoredProcPKG_ACOMODACOES.ParamByName('PI_CODIGO_ACOMODACAO').AsString := 
CODIGO_ACOMODACAO.Text;
  SQLStoredProcPKG_ACOMODACOES.ExecProc;
  CODIGO_ACOMODACAO.Text := 
SQLStoredProcPKG_ACOMODACOES.ParamByName('PO_CODIGO_ACOMODACAO').AsString;

Espero ter ajudado.

  - Original Message - 
  From: Gustavo Sequeira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, February 10, 2006 9:30 PM
  Subject: [delphi-br] PARAMETROS


  boa noite a todos da lista estou precisando urgente de ajuda... estou
  com um banco e tenho SP (Stored Procedure) e preciso jogar isso no
  delphi dae tudo bem a bronca e como receber os parametros do form,
  gostaria de saber como recebo eles e qual seria o componente nao
  gostaria de fazer... assim: blabla.parambyname('param').value :=
  blabla, gostaria de algo mais profissional

  --
  Att.
  Gustavo Sequeira
  Respondeu-lhe Yaohushua: Eu sou o caminho, e a verdade, e a vida;
  ninguém vem ao Pai, senão por mim.


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





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

   


--
  Links do Yahoo! Grupos

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




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






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





[delphi-br] login com acesso ao banco de dados paradox

2005-02-28 Por tôpico Márcio



Como fazer:
um login com acesso a banco de dados que temha os seguintes dados: 
usuário,grupo,senha e caso for usuário do grupo correto e também a 
senha
conferir abre o formulário principal sendo que estes dados estarão 
registrados em uma tabela paradox caso alguém tiver um arquivo pronto 
pode me mandar para
o e-mail [EMAIL PROTECTED]








-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





[delphi-br] Fórum

2005-01-26 Por tôpico Márcio


Interessados em um no fórum:

http://forums.cjb.net/index.php?mforum=delphi


---
iBestMail, agora com POP3/SMTP e 120MB de espaço!
Experimente: http://www.ibestmail.com.br





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





Re: [delphi-br] Re: DBGrid colorido e zebrado

2005-01-24 Por tôpico Márcio Frossard


Como posso pegar esses componentes?

Márcio Frossard
  - Original Message - 
  From: Luis Alberto Lopes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, January 24, 2005 11:38 AM
  Subject: Re: [delphi-br] Re: DBGrid colorido e zebrado


  Dê uma olhada na biblioteca de componentes Jedi. Tem um componente grid que 
  tem isso e mais uma série de componentes interessantes.
  É uma biblioteca Free e muito boa.


  -Mensagem Original- 
  De: Osmar de Souza Júnior [EMAIL PROTECTED]
  Para: delphi-br@yahoogrupos.com.br
  Enviada em: segunda-feira, 24 de janeiro de 2005 10:53
  Assunto: [delphi-br] Re: DBGrid colorido e zebrado




  dá uma olhada no historico de mensagens.
  se naum me engano isso ja foi discutido aqui...

  --- Em delphi-br@yahoogrupos.com.br, Eduardo Silva ® [EMAIL PROTECTED]
  escreveu
  
   Galera, alguém sabe como fazer para deixar cada coluna de um dbgrid
  com uma
   cor e ainda por cima zebrado ?
  
   Eu sei como deixar um ou outro, mas eu gostaria de deixar os dois ao
  mesmo
   tempo.
  
_  ___  _
   / )|   |( \
  / / | Eduardo de Almeida Silva  | \ \
_( (_ |  _[EMAIL PROTECTED] _  | _) )_
   (((\ \)|_/ )___( \_|(/ /)))
   ( \_/ / \ \_/ )
\   /   \   /
 \_/ \_/
 /   / \   \





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

  Links do Yahoo! Grupos











  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

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




--


  No virus found in this incoming message.
  Checked by AVG Anti-Virus.
  Version: 7.0.300 / Virus Database: 265.7.2 - Release Date: 21/1/2005

  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.7.2 - Release Date: 21/1/2005


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






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





Re: [delphi-br] Mudar de campo pelo tamanha do Edit

2005-01-20 Por tôpico Márcio Theis


Se não usar todo o MaxLength do campo, é só dar uma tab
da forma normal para saltar de campo.

- Original Message - 
From: Eduardo Silva ® [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, January 20, 2005 2:09 PM
Subject: RES: [delphi-br] Mudar de campo pelo tamanha do Edit



E se vc não usar todo o maxlength do campo, terá que colocar uma procedure
que troca o tab pelo enter ?

  -Mensagem original-
  De: jmourajr2000 [mailto:[EMAIL PROTECTED]
  Enviada em: quinta-feira, 20 de janeiro de 2005 12:51
  Para: delphi-br@yahoogrupos.com.br
  Assunto: RES: [delphi-br] Mudar de campo pelo tamanha do Edit



  Esta dica foi passada pelo nosso amigo Márcio Theis e fui eu quem
  postei a duvida e então lá vai:

  Crie a seguinte procedure

  procedure TForm1.SaltaCampos(Sender: TObject);
  begin
  if (Length((Sender as TEdit).Text) = ((Sender as TEdit).MaxLength))
  then
  Perform(WM_NEXTDLGCTL,0,0);
  end;

  depois ligue ela a todos os seus edit's através do OnChange, mas
  somente
  cuide,
  se vc estiver trabalhando com TDBEdit deve alterar na procedure onde
  tem os
  TEdit.

  Sendo assim vc tera somente um processo que fara tudo, sem a
  necessidade de
  terde
  colocar em todos os lugares os comandos.


  Abraços.

  José de Moura






  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por:








--
  Links do Yahoo! Grupos

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

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

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




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos













-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





Re: [delphi-br] Sistema para Controle de Versões

2005-01-18 Por tôpico Márcio Theis


No próprio site do FreeVcs vc encontra uma boa documentação, mas
em português você pode encontrar tb em:

http://www.activedelphi.com.br/modules.php?op=modloadname=Newsfile=articlesid=88
http://www.activedelphi.com.br/modules.php?op=modloadname=Newsfile=articlesid=113

ou se preferir você pode entrar em contato pelo ICQ com o Tiago Chagas, foi
ele quem escreveu
estes dois tutoriais e já me ajudou bastante com o FreeVCS, o n° do ICQ dele
é: 129257305.


- Original Message - 
From: Rogério [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, January 17, 2005 4:52 PM
Subject: Re: [delphi-br] Sistema para Controle de Versões



 Conheces algum manual para utilização do FreeVCS ??
 Tenho ele, mas não o instalei ainda para não onfundir os
desenvolvedores...

 - Original Message - 
 From: Danilo Antonio Leite [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Monday, January 17, 2005 6:49 PM
 Subject: Re: [delphi-br] Sistema para Controle de Versões


 
  Pesquise por FreeVCS. Aqui nós utilizamos e ele atende perfeitamente.
 
  Atenciosamente,
 
  Danilo Antônio Leite
  Arcadian Tecnologia SA
  [EMAIL PROTECTED]
 
 
 
 
  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
  Para ver as mensagens antigas, acesse:
   http://br.groups.yahoo.com/group/delphi-br/messages
 
  Para falar com o moderador, envie um e-mail para:
   [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
  Links do Yahoo! Grupos
 
 
 
 
 
 
 
 




 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

 Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

 Links do Yahoo! Grupos














-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





Re: [delphi-br] CEP qual a forma correta de se trabalhar ??

2005-01-18 Por tôpico Márcio Theis


Na minha opinião se no momento que o usuário preenche o CEP e este carrega
as informações de
logradouro, cidade e bairro, não se deve mais mexer nestes campos, pelo
menos é assim que nós
aqui trabalhamos. Ao menos que o CEP carregue somente a cidade, ai sim
permitir que ele altere
o logradouro e o bairro.


- Original Message - 
From: Marcelo Carvalho [EMAIL PROTECTED]
To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br;
[EMAIL PROTECTED];
[EMAIL PROTECTED]
Sent: Tuesday, January 18, 2005 7:58 AM
Subject: [delphi-br] CEP qual a forma correta de se trabalhar ??



Bom Dia,

Uma dúvida uma vez que se trabalha com tabelas de CEP's qual a postura
do sistema se deve tomar ??
Pegunto isso pois nunca sei se devo pedir somente o CEP e os demais campos
( ENDERECO, CIDADE, BAIRRO, UF ) já vem preenchidos, sem condição de
alteração e depois já cai diretamente no campo de numero ou complemento do
endeço ou se deixo o usuário alterar os campos ENDERECO, CIDADE, BAIRRO e UF
?? Uma vez que ele informe um CEP válido estes campos já estaram preenchidos
se ele alterar não estará distorcendo a validação do endereço ??

Atenciosamente,

Marcelo Carvalho


Essa mensagem, incluindo seus anexos, tem caráter confidencial e seu
contéudo
é restrito ao(s) destinatário(s) da mensagem.
Qualquer uso nao autorizado, replicaçao ou disseminaçao desta mensagem ou
parte dela é expressamente proibido.
Esse e-mail foi certificado contra virus.
ISCMPA - Irmandade da Santa Casa de Misericórdia de Porto Alegre



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos













-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





Re: [delphi-br] Como saltar campos automaticamente.

2005-01-18 Por tôpico Márcio Theis



Eu fiz o seguinte teste e deu certo:
Crie a seguinte procedure

procedure TForm1.SaltaCampos(Sender: TObject);
begin
if (Length((Sender as TEdit).Text) = ((Sender as TEdit).MaxLength)) then
Perform(WM_NEXTDLGCTL,0,0);
end;

depois ligue ela a todos os seus edit's através do OnChange, mas somente
cuide,
se vc estiver trabalhando com TDBEdit deve alterar na procedure onde tem os
TEdit.

Sendo assim vc tera somente um processo que fara tudo, sem a necessidade de
terde
colocar em todos os lugares os comandos.

Espero ter ajudado..
[]'s
/]/[EMAIL PROTECTED]

- Original Message - 
From: Rodrigo Schiavo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, January 18, 2005 7:06 AM
Subject: Re: [delphi-br] Como saltar campos automaticamente.



 if (Length(Edit1.Text)=3) then Perform(WM_NEXTDLGCTL,0,0);

 jmourajr2000 escreveu:

 
  Caros amigos, boa tarde!
 
  É possivel fazer com que exista um salto automatico, entre campos,
  sendo que ao completar o maxlenght de um Edit ou DBEdit salte para
  o proximo campo, sem a interferencia das teclas Tab e Enter.
 
  Estou tentando assim, mas sem sucesso:
 
  if lenght(Edit1.Text) = 8 then
 Edit2.SetFocus;
 
  Agradeço pela atenção.
 
  Abraços a todos.
 
  José de Moura
 
 
 
 
 
  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages
 
  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
 
 
  *Yahoo! Grupos, um serviço oferecido por:*
 
http://br.rd.yahoo.com/SIG=12ajvevqm/M=264379.5078783.6203979.1588051/D=brc
lubs/S=2137111264:HM/EXP=1105885116/A=2191897/R=0/SIG=10vqa2grn/*http://br.d
iversao.yahoo.com/
 
 
http://br.rd.yahoo.com/SIG=12ajvevqm/M=264379.5078783.6203979.1588051/D=brc
lubs/S=2137111264:HM/EXP=1105885116/A=2191897/R=1/SIG=10vqa2grn/*http://br.d
iversao.yahoo.com/
 
 
 
  
  *Links do Yahoo! Grupos*
 
  * Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
 
  * Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
 
mailto:[EMAIL PROTECTED]
 
  * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo! http://br.yahoo.com/info/utos.html.
 
 



 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

 Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

 Links do Yahoo! Grupos














-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





Re: [delphi-br] data atual

2005-01-14 Por tôpico Márcio Theis


edtData.Text:=DateToStr(Date);
  - Original Message - 
  From: james nascimento 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 12, 2005 3:34 PM
  Subject: [delphi-br] data atual



  Como faço para inserir automaticamente a data atual em uma EDIT, quando abrir 
um form.

  [EMAIL PROTECTED]

  
  -
  Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! 
agora.

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






  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

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



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






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





Re: [delphi-br] Exit

2005-01-14 Por tôpico Márcio Theis


tire o exit abaixo da linha de comando CmbSexo.SetFocus;
pois vc já da um setfocus e depois um exit, acredito ser isto.
  - Original Message - 
  From: frcunhahell 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, January 13, 2005 8:09 PM
  Subject: [delphi-br] Exit



  Tem um problema estranho por aki

  tem um trecho de codigo q eh o seguinte:

if length(trim(CmbSexo.Text)) = 0 then
begin
  MessageDlg('Digite o sexo', mtInformation,[mbok],0);
  CmbSexo.SetFocus;
  exit;
end;

  Caso deixa o campo sexo em branco o programa deveria para a execucao 
  do programa mas nao para e seguinte em diante. Mais estranh ainda 
  eh q c eu colocar um break no if ele funciona normalmente...

  Alguem sabe o q pode ser acontecendo?

  Valew





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

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



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






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





  1   2   >