Res: [delphi-br] TVirtualTreeView

2010-06-09 Por tôpico Luiz Carlos
Blz...

Seguinte... não sei se vai lhe ajudar... mas que seja um começo

procedure PopulaTreeView;
var
  i, x: Integer;
  lForm, lComp: TTreeNode;
begin
  TreeView.Items.Clear;
  for I := 0 to 10 do
  begin
lForm := TreeView.Items.AddChild(nil, 'Formulario ' + IntToStr(i));
for x := 0 to 4 do
begin
  lComp := TreeView.Items.AddChild(lForm, 'Componente ' + IntToStr(i));
end;
  end;
end;


Abraços... e qualquer duvidas... estamos ai!!!





De: Murilo Cunha mcscu...@yahoo.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 9 de Junho de 2010 8:14:22
Assunto: [delphi-br] TVirtualTreeView

  
Pessoal,

Realmente preciso de ajuda para resolver esta pendencia em meu sistema.
Insisto em perguntar se ha alguem que possa me ajudar com esse assunto 
abaixo...

Obrigado
MuriloCunha

Pessoal,

Tenho a seguinte estrutura em meu TVirtualTreeView para D2010:

- Node 1
Node 1.1
Node 1.2
Node 1.3
+ Node 2
- Node 3
Node 3.1
Node 3.2
+ Node 4
+ Node 5

Como eu faço para trocar os CAPTIONS destes Nodes??
Este meu TVirtualTreeView exibe todos os forms que tenho em minha
aplicacao e, dentro destes nodes, exibe o nome de todos os componentes
que existem em cada form.
Quero colocar o nome dos forms no primeiro nivel e os componentes no
segundo nivel, como fazer??

Obrigado
MuriloCunha



-- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM


 


  

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



Res: Res: [delphi-br] TVirtualTreeView

2010-06-09 Por tôpico Luiz Carlos
Ops por não conhecer o componente, acreditei que pudesse ser util

Olha... fazendo algumas pesquisa na net... encontrei esse link  
http://mrbool.devmedia.com.br/Novo/Revista/cd71-michael-treeview.zip , faz 
parte de um artigo publicado na revista ClubeDephi, ed. 71.


Mais, uma vez... veja se pode ser util e desculpa ai.. vlw!!!





De: Murilo Cunha mcscu...@yahoo.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 9 de Junho de 2010 8:46:06
Assunto: Re: Res: [delphi-br] TVirtualTreeView

  
Luiz,

Esta implementacao serve para TTreeView.
O q estou procurando eh para TVirtualTreeView.
Ele tem um comportamento um tanto estranho para mim.

Alguem poderia nos ajudar nesta implementacao?
Sei que tenho que mexer no OnGetText mas nao sei como usa-lo.

Obrigado
MuriloCunha

On 09/06/2010 08:31, Luiz Carlos wrote:
 Blz...

 Seguinte... não sei se vai lhe ajudar... mas que seja um começo

 procedure PopulaTreeView;
 var
i, x: Integer;
lForm, lComp: TTreeNode;
 begin
TreeView.Items.Clear;
for I := 0 to 10 do
begin
  lForm := TreeView.Items.AddChild(nil, 'Formulario ' + IntToStr(i));
  for x := 0 to 4 do
  begin
lComp := TreeView.Items.AddChild(lForm, 'Componente ' + IntToStr(i));
  end;
end;
 end;


 Abraços... e qualquer duvidas... estamos ai!!!




 
 De: Murilo Cunhamcscu...@yahoo.com.br
 Para: delphi-br@yahoogrupos.com.br
 Enviadas: Quarta-feira, 9 de Junho de 2010 8:14:22
 Assunto: [delphi-br] TVirtualTreeView


 Pessoal,

 Realmente preciso de ajuda para resolver esta pendencia em meu sistema.
 Insisto em perguntar se ha alguem que possa me ajudar com esse assunto
 abaixo...

 Obrigado
 MuriloCunha

 Pessoal,

 Tenho a seguinte estrutura em meu TVirtualTreeView para D2010:

 - Node 1
 Node 1.1
 Node 1.2
 Node 1.3
 + Node 2
 - Node 3
 Node 3.1
 Node 3.2
 + Node 4
 + Node 5

 Como eu faço para trocar os CAPTIONS destes Nodes??
 Este meu TVirtualTreeView exibe todos os forms que tenho em minha
 aplicacao e, dentro destes nodes, exibe o nome de todos os componentes
 que existem em cada form.
 Quero colocar o nome dos forms no primeiro nivel e os componentes no
 segundo nivel, como fazer??

 Obrigado
 MuriloCunha

 

 


 


  

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



[delphi-br] Enviar Broadcast - DataSnap

2010-06-08 Por tôpico Luiz Carlos
Boa tarde,


Gostaria de saber se é possível implementar o Envio de Broadcast utilizando o 
DataSnap para as aplicações clientes ou para um cliente em especifico, e qual a 
melhor maneira se implementar tal solução?

Hoje, efetuo a mesma utilizando Socket com tcp.



No aguardo e obrigado


  

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



Res: [delphi-br] RE: [NDDV] Enviar Broadcast - DataSnap

2010-06-08 Por tôpico Luiz Carlos
Obrigado Andreano, vou estudar os exemplos!!




De: Andreano Lanusse andreano.lanu...@embarcadero.com
Para: n...@yahoogrupos.com.br n...@yahoogrupos.com.br; Delphi Br 
delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 8 de Junho de 2010 12:30:20
Assunto: [delphi-br] RE: [NDDV] Enviar Broadcast - DataSnap

  
Você tem que usar callback - aqui tem alguns exemplos 
http://cc.embarcadero.com/Item/27391

From: n...@yahoogrupos.com.br [mailto:n...@yahoogrupos.com.br] On Behalf Of 
Luiz Carlos
Sent: Tuesday, June 08, 2010 12:28 PM
To: n...@yahoogrupos.com.br; Delphi Br
Subject: [NDDV] Enviar Broadcast - DataSnap

Boa tarde,

Gostaria de saber se é possível implementar o Envio de Broadcast utilizando o 
DataSnap para as aplicações clientes ou para um cliente em especifico, e qual a 
melhor maneira se implementar tal solução?

Hoje, efetuo a mesma utilizando Socket com tcp.

No aguardo e obrigado

CONFIDENTIALITY NOTICE: This email message is for the sole use of the intended 
recipient(s) and may contain confidential and privileged information. Any 
unauthorized review, use, disclosure or distribution is prohibited. If you are 
not the intended recipient, please contact the sender by reply email and 
destroy all copies of the original message. 

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


 


  

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



RES: [delphi-br] Filtro no ClientDataSet Usando LIKE

2009-11-08 Por tôpico Luiz Carlos
Use cds.filter depois do seu ClientDataSet aberto

Espero ter ajudado,

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Gilvan Costa
Enviada em: sábado, 7 de novembro de 2009 21:43
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Filtro no ClientDataSet Usando LIKE

  

Olá Srs 
Estou querendo montar um filtro com ClietDataSet de forma que ele me traga
os registro de todos que começa com a letra A por exemplo . 
Tipo o que eu faço com no SQL: 
CDSPesquisa.Params.ParamByName('Pesquisa').Value := '%'+ Pesquisa +'%'; 
O objetivo é claro, uma vez que eu já tenho os dados no grid, gostaria de
fazer diversos filtros e não mais precisar 
ir no banco de dados e fazer uma nova consulta. 

Tentei montar o filtro usando LIKE mais não deu certo: 
CDSPesquisa.Filtered := False; 
CDSPesquisa.Filter := 'Meu Campo Like '+ QuotedStr('%' + BtePesquisar
Text + '%' ); 
CDSPesquisa.Filtered := True; 

Assim deu certo, mas só funcionar para um valor completo 
CDSPesquisa.Filter := 'Meu Campo = ' + QuotedStr(BtePesquisar.Text);

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





Nenhum vírus encontrado nessa mensagem recebida.
Verificado por AVG - www.avgbrasil.com.br
Versão: 8.5.423 / Banco de dados de vírus: 270.14.45/2476 - Data de
Lançamento: 11/07/09 07:38:00






[delphi-br] Meio Off - Apresentação Delphi 2010

2009-08-28 Por tôpico Luiz Carlos
Pessoal, alguma posição sobre esse evento?

Efetuei a inscrição, porem não recebi nenhuma confirmação por e-mail!


Abraços...



  

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

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



Res: [delphi-br] Meio Off - Apresentação Delphi 2010

2009-08-28 Por tôpico Luiz Carlos
Moacir,

Tem como voce mandar o link por favor. Como lhe disse, não recebi nada.. 
e quando tento efetuar novamente a inscrição consta como já efetuada.

Vlw!!!





De: Moacir - GMail prism...@gmail.com
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 28 de Agosto de 2009 11:31:21
Assunto: Re: [delphi-br] Meio Off - Apresentação Delphi 2010

  
Luiz,

Recebi minha confirmação sem problemas.

Sucesso !!

Moacir

Luiz Carlos escreveu:
 Pessoal, alguma posição sobre esse evento?

 Efetuei a inscrição, porem não recebi nenhuma confirmação por e-mail!


 Abraços...



 

   


  

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

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



Res: [delphi-br] BD

2009-08-25 Por tôpico Luiz Carlos
Cara, aprendi o seguinte.. nao existe o melhor.. e sim aquele que lhe atende.

O Firebird é uma boa opção, mas o Oracle ou SQLServer tambem sendo esses 
possuindo versões frees, porem com certas limitações.

Aconselho apenas voce analisar a situação e avaliar o que mais vai lhe atender 
ou seus clientes.


http://www.oracle.com/technology/products/database/xe/index.html
http://www.microsoft.com/express/sql/default.aspx
http://www.firebirdsql.org/


Abraços!






De: dionatanhenrique dionata...@hotmail.com
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 25 de Agosto de 2009 8:09:06
Assunto: [delphi-br] BD

  
Pessoal queria saber de voces qual o melhor banco de dados para ser usado para 
aplicaçoes de medio porte? de preferencia free!~Onde posso conseguilos?


   


  

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

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



[delphi-br] Meio Off - Catraca Tecnibra DLL

2009-08-24 Por tôpico Luiz Carlos
Bom dia.. pessoal

Estou com problemas que provavelmente alguem daqui ja passou por isso. Um amigo 
pediu ajuda para entender quais os parametros a ser enviado para a DLL da 
catraca Tecnibra através do Delphi e tudo que encontrei foi a DLL e comandos 
com parametros desatualisado. 

Caso alguem tenha experiencia com esse procedimento e puder me ajudar, favor 
entrar em contato em pvt para trocarmos mais informações...


Valeu.. 



  

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

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



Res: [delphi-br] DBGrid

2009-08-24 Por tôpico Luiz Carlos
Vou dar um pitaco.. tenta o seguinte!!

procedure TfrmClientes. edtPesquisaChang e(Sender: TObject);
begin
dmcli.qryClientes.DisableControls;
dmcli.qryClientes. Close;
dmcli.qryClientes. Params[0] .AsString := Trim(edtPesquisa. Text);
dmcli.qryClientes. Open;
dmcli.qryClientes.EnableControls;
end;

Blz... Abraços!





De: pcedisi pced...@gmail.com
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 24 de Agosto de 2009 13:51:49
Assunto: [delphi-br] DBGrid

  
Ola!

Por favor, preciso de ajuda com DBGrid!

Tenho um DBGrid de clientes e uso onChange para fazer pesquisa
a cada letra digitada, o problema é que ele redimensiona a cada
busca alem de redesenhar o DBGrid gerando um efeito de piscar
a cada letra digitada. Alguem pode ajudar? Isso que estou fazendo
é o certo?

procedure TfrmClientes. edtPesquisaChang e(Sender: TObject);
begin
dmcli.qryClientes. Close;
dmcli.qryClientes. Params[0] .AsString := Trim(edtPesquisa. Text);
dmcli.qryClientes. Open;
end;

obrigado,

Paulo

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


   


  

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

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



Res: [delphi-br] Setup

2009-08-07 Por tôpico Luiz Carlos
Tente utilizar o InnoSetup e criar o mesmo...
muito bom... recomendo!!





De: Régis Bender regis...@terra.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 7 de Agosto de 2009 13:53:09
Assunto: [delphi-br] Setup

  
Boa tarde. 
Preciso criar um arquivo setup para instalar o meu sistema e o firebird.
Alguem pode me dar uma dica de onde começar?

sds

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

Novo Hamburgo/RS
MSN: regis...@terra. com.br

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


   


  

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

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



RES: [delphi-br] Filtrar após já ter filtrado

2009-06-30 Por tôpico Luiz Carlos
Tentou assim

 

Var

  Filtro: String;

Begin

  Filtro := cds.Filter;

 

cdsFilter := Filtro + ‘ novo filtro ‘;

 

 

 

  _  

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de jccj2...@ymail.com
Enviada em: terça-feira, 30 de junho de 2009 21:26
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Filtrar após já ter filtrado

 






Olá...Pessoal
Alguém poderia me ajudar,como consigo criar uma rotina para filtrar um
ClientDataSet e mostrar em um DBGrid,e logo depois de ter filtrado ,filtrar
mais uma vez(só que agora com dados que estão no DBGrid, ou seja filtrar
mais de uma vez sem perder o primeiro filtro)
Obs:o primeiro filtro já fiz,abaixo segue o código do primeiro filtro.

procedure TForm1.BtnPesquisarClick(Sender: TObject);
begin
ClientDataSet1.FilterOptions:=[focaseinsensitive];
ClientDataSet1.Filter:='Nome like'+QuotedStr(Edit1.Text + '%');
ClientDataSet1.Filtered:=True;
end;



Verificado por AVG - www.avgbrasil.com.br
Versão: 8.5.375 / Banco de dados de vírus: 270.12.94/2208 - Data de
Lançamento: 06/29/09 05:54:00




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



Re: [delphi-br] !!!Dúvida tabela!!!

2009-06-05 Por tôpico Luiz Carlos Pereira
Poderia ser mais clarosinceramente, não entendi

--- Em sex, 5/6/09, Fernando de Laurentiis laurent...@uol.com.br escreveu:

De: Fernando de Laurentiis laurent...@uol.com.br
Assunto: [delphi-br] !!!Dúvida tabela!!!
Para: delphi-br@yahoogrupos.com.br delphi-br@yahoogrupos.com.br
Data: Sexta-feira, 5 de Junho de 2009, 16:57
















  
  Pessoal, boa tarde.



Imaginemos uma situação assim:



sCampo: string;



sCampo:='Query1. FieldByName( ''CAMPOX' ').AsString' ;



Como faço pra, qdo utilizar o sCampo, vier o conteudo do campo CAMPOX da 
tabela??



[]'sss


 

  




 

















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

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



[delphi-br] verificar impressora ativa no winXP

2009-06-02 Por tôpico Luiz Carlos Pereira
Olá a todos,

Alguêm sabe alguma forma de verificar se a impressora está ativa para ser usada?

Agradeço antecipadamente a todos,




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

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



[delphi-br] SQLConnection + DBX4 + Driver IBExpert

2009-05-05 Por tôpico Luiz Carlos
Boa tarde pessoal,

Estou efetuando alguns teste com a versão Trial do Delphi 2009 utilizando o 
driver da IBExpert para conexão com o banco, porém, quando altero a propriedade 
connected para True aparece a seguinte mensagem: Invalid package Handle e 
ainda não consegui encontrar o motivo.

Percebi que o mesmo utiliza uma BPL chamada IBEDBNATIVED12.bpl e na lista de 
packages instalados no delphi consta a mesma como não localizada. Tentei 
reinstalar o Delphi, o Driver e ainda assim a mensagem continua aparecendo.

Gostaria de saber se alguém já passou por esse problema, o que fez e como 
corrigiu o mesmo!?


Luiz Carlos
Araraquara-SP


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

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



[RESOLVIDO] Res: [delphi-br] SQLConnection + DBX4 + Driver IBExpert

2009-05-05 Por tôpico Luiz Carlos
Vlw José estou apenas avaliando as ferramentas, ainda não decidimos por um 
ou outro...

Ah, detalhe lembrando que os valores são parecidos dos drivers... tanto da 
Ibexpert quanto da Devart!!

Outra coisa, consegui resolver o problema da mensagem apenas colocando na lista 
de packages do Delphi a BPL que é utilizado pelo driver da IB. Legal que 
utilizando o instalador do HK, o mesmo atribui um local para a bpl, só que não 
a coloca onde foi definida deixando na pasta dos arquivos da IB apenas!!  
Após regularizar o caminho da BPL a mensagem deixou de aparecer e consegui 
normalmente efetuar a conexão tanto em tempo de execução como em tempo de 
designe!!!

Luiz Carlos
Araraquara-SP





De: JNP - NetSite j...@netsite.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 5 de Maio de 2009 14:16:18
Assunto: Re: [delphi-br] SQLConnection + DBX4 + Driver IBExpert





Olá Luiz, apanhei bastante com os drivers para o delphi 2009, minha 
conclusão é o driver da Devart, só que tem que estar com o Delphi atualizado 
(com as atualizações) para poder rodar redondo, tem suporte para unicode, 
etc...

[]s, José Nilton pace (JNP Software) 





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

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



[delphi-br] Cadastro de Instituições Financeiras

2009-01-08 Por tôpico Luiz Carlos
Olá a todos,

Alguêm teria algum lista ou tabela Firebird com todos os bancos(Febrabam)?

Agradeço antecipadamente,


Res: [delphi-br] PNG Transparente - Delphi 2009

2008-11-07 Por tôpico Luiz Carlos
Olá, 

Estou avaliando a versão Trial do Delphi e também estou com esse problema, 
será que o mesmo não deve ser pelo fato de ser trial?

Conseguiste resolver isso de algum outro modo, ou apenas convertendo o tipo 
da imagem!!

Junior





De: Paulo Coutinho [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 4 de Novembro de 2008 20:52:57
Assunto: Re: [delphi-br] PNG Transparente - Delphi 2009


Olá Felipe,

Já coloquei a imageList com a propriedade *DrawingStyle = dsTransparent* e
ja tentei também colocando a propriedade *Masked = false*, mas nada :(

Quando eu vou inserir a imagem na imageList, no preview ao lado aparece
transparente, mas ao inserir o fundo fica preto.

Vai entender :(

2008/11/4 felipe govoni govoni.felipe@ gmail.com

 nao tem uma propriedade transparent?

 2008/11/4 Paulo Coutinho [EMAIL PROTECTED] com paulo%40prsolucoes .com


  Olá pessoal,
 
  Estou com um problema no Delphi 2009 em relação ao PNG transparente, toda
  vez que coloco um ícone meu no formato PNG na imageList o fundo fica
 preto,
  ao invés de ficar transparente.
 
  E antes que perguntem, sim, os ícones são transparentes, eu utilizo eles
 em
  outros projetos web/java2se.
 
  --
  Atenciosamente,
  Paulo Coutinho.
  Site: www.prsolucoes. com
  Msn: [EMAIL PROTECTED] com paulo%40prsolucoes .com paulo%
 40prsolucoes. com
  Skype: paulo.prsolucoes
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

 --
 Felipe Govoni
  -
 Programador
 Fone 8472-8718

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

 


-- 
Atenciosamente,
Paulo Coutinho.
Site: www.prsolucoes. com
Msn: [EMAIL PROTECTED] com
Skype: paulo.prsolucoes

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

 


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

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



RES: [delphi-br] Erro BDE Windows 98

2008-10-23 Por tôpico Luiz Carlos
Bom, isso pode ter acontecido por algum problema no servidor de nomes do
windows (dns). Mas sinceramente, prefira usar o número ip do que o nome do
computador.

 

Espero ter ajudado,

 

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Alisson
Enviada em: Thursday, October 23, 2008 11:43 AM
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Erro BDE Windows 98

 

Tenho um sistema que usa BDE rodando em várias lojas. De uma hora pra outra 
o sistema parou de funcionar nas máquinas com Windows 98. O sistema não abre

o banco de dados. Geralmente uso o nome da máquina no BDE do seguinte modo:
nomedamaquina:c\NomePasta\NomeBanco.gdb. O sistema agora só funciona se eu 
colocar o IP do servidor do seguinte modo: 
192.168.0.1:c\NomePasta\NomeBanco.gdb. Será que isso foi causado por alguma 
atualização do Windows no servidor? Alguém tem alguma idéia do que está 
acontecendo? 

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

 

No virus found in this incoming message.
Checked by AVG - http://www.avg.com
Version: 8.0.175 / Virus Database: 270.8.2/1740 - Release Date: 10/22/2008
7:24 PM




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



[delphi-br] Off - Componente RLBoleto

2008-10-07 Por tôpico Luiz Carlos
Boa dia a todos,

Gostaria de ouvir a opinião de colegas que ja utilizarão ou utilizam o 
componente RLBoleto para geração de arquivos de remessa e retorno aos Bancos, 
mais precisamente o Banco do Brasil, pois estaremos com a necessidade de 
desenvolver tais procedimentos e não possuimos muitos conhecimentos sobre o 
assunto.

Ou ainda, alguma outra possibilidade de fazer tal implementação, grato desde já.



Luiz Carlos Junior 
Araraquara/SP


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses



Res: [delphi-br] Off - Componente RLBoleto

2008-10-07 Por tôpico Luiz Carlos
Encontrei nesse enedereço:
http://www.produsys.com.br/download/rlboleto/
 
[]s
Junior



- Mensagem original 
De: Fabio Ferreira [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 7 de Outubro de 2008 11:20:33
Assunto: Re: [delphi-br] Off - Componente RLBoleto


Como se baixa este componente? Estive no site, mas não achei um lugar para
download.Tem algum manual de uso ?

[]s
2008/10/7 Coutinho - Yahoo emanuelcoutinho@ yahoo.com. br

 É colega.
 Usei, gostei, e recomendo!!!
 Pode até criar seus boletos com seu próprio lay-out... tipo uma fatura
 com o boleto na parte inferior... tipo as faturas das telefônicas.. . etc...
 Vai fundo! É muito fácil de usar!!!
 Sds
 Emanuel Coutinho

 Luiz Carlos escreveu:

 
  Boa dia a todos,
 
  Gostaria de ouvir a opinião de colegas que ja utilizarão ou utilizam o
  componente RLBoleto para geração de arquivos de remessa e retorno aos
  Bancos, mais precisamente o Banco do Brasil, pois estaremos com a
  necessidade de desenvolver tais procedimentos e não possuimos muitos
  conhecimentos sobre o assunto.
 
  Ou ainda, alguma outra possibilidade de fazer tal implementação, grato
  desde já.
 
  Luiz Carlos Junior
  Araraquara/SP
 
  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a
  sua cara @ymail.com ou @rocketmail. com.
  http://br.new. mail.yahoo. com/addresses
  http://br.new. mail.yahoo. com/addresses
 
 

 


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

 


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

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



Re: [delphi-br] Ordenar registros DBGrid.

2008-09-23 Por tôpico Luiz Carlos
Edson Marco Ferrari Junior escreveu:

 Veja os indices do clientdataset.

 É por ele que tu pode facilmente ordenar (ascendente, ou descentde) uma
 coluna (ou mais).

 2008/9/22 Luiz Carlos [EMAIL PROTECTED] 
 mailto:lcrp_grupos%40yahoo.com.br

  Olá a todos,
 
  Estou com o seguinte problema; tenho uma sequencia de 5 registros e
  gostaria de mudar a ordem deles, podendo escolher em que posição
  inseri-los, por exemplo:
  modo original:
  1 - registro 1
  2 - registro 2
  3 - registro 3
  4 - registro 4
  5 - registro 5
 
  resultado desejado:
  1 - registro 2
  2 - registro 3
  3 - registro 4
  4 - registro 5
  5 - registro 1
 
  isso de forma aleatório,
 
  alguma idéia?
 
 
 

 -- 
 /*
 * Edson Marco Ferrari Junior
 * [EMAIL PROTECTED] mailto:edmafer%40edmafer.com.br
 * http://www.edmafer.com.br http://www.edmafer.com.br
 */

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

  
Não seria isso, eu gostaria de ordenar na sequencia de números que bem 
entender, por ex: colocar o 1,2 e depois o 4, 3 e depois o 5.



Re: [delphi-br] Ordenar registros DBGrid.

2008-09-23 Por tôpico Luiz Carlos
Coutinho - Yahoo escreveu:

 Luis Carlos.

 Não sei se os colegas que te responderam antes entenderam o que vc
 deseja. Eu entendi que você quer controlar, aleatoriamente, ou como der
 na telha, em determinado momento a ordem de inclusão de registros numa
 tabela...

 Bem, pelo visto você deseja alterar hoje de uma forma, amanhã, de outra...

 Eu sugiro que vc coloque um campo numérico, com valor inteiro, e coloque
 um índice único neste campo... Este campo é o que vc deverá alterar,
 inserindo números sequencialmente para que sejam apresentados na ordem
 que vc deseja.

 Lembre, que o conteúdo do campo é o que ordena, e se for um campo
 string, o sgbd vai letra a letra, fazendo a indexação, então:
 Antonia, vem antes de Antonio, Jorge antes de José... e assim
 sucessivamente.

 Você pode ainda usar vários campos... por exemplo
 Se for gerar um view (ou pesquisa do access), crie um campo que analise
 o valor do campo, e te dê uma resposta lógica (boolean), e depois, use
 outro campo para ser a próxima chave do índice... e um terceiro e assim
 sucessivamente... aí sua imaginação é que vai dizer, mas ainda assim, eu
 usaria um sql para isso, pois você poderá manipulá-lo de forma mais
 controlada

 Sds
 Emanuel Coutinho

 Luiz Carlos escreveu:
 
  Olá a todos,
 
  Estou com o seguinte problema; tenho uma sequencia de 5 registros e
  gostaria de mudar a ordem deles, podendo escolher em que posição
  inseri-los, por exemplo:
  modo original:
  1 - registro 1
  2 - registro 2
  3 - registro 3
  4 - registro 4
  5 - registro 5
 
  resultado desejado:
  1 - registro 2
  2 - registro 3
  3 - registro 4
  4 - registro 5
  5 - registro 1
 
  isso de forma aleatório,
 
  alguma idéia?
 

  
Obrigado pelas dicas pessoal


Re: [delphi-br] Ordenar registros DBGrid.

2008-09-23 Por tôpico Luiz Carlos
Coutinho - Yahoo escreveu:

 Luis Carlos.

 Não sei se os colegas que te responderam antes entenderam o que vc
 deseja. Eu entendi que você quer controlar, aleatoriamente, ou como der
 na telha, em determinado momento a ordem de inclusão de registros numa
 tabela...

 Bem, pelo visto você deseja alterar hoje de uma forma, amanhã, de outra...

 Eu sugiro que vc coloque um campo numérico, com valor inteiro, e coloque
 um índice único neste campo... Este campo é o que vc deverá alterar,
 inserindo números sequencialmente para que sejam apresentados na ordem
 que vc deseja.

 Lembre, que o conteúdo do campo é o que ordena, e se for um campo
 string, o sgbd vai letra a letra, fazendo a indexação, então:
 Antonia, vem antes de Antonio, Jorge antes de José... e assim
 sucessivamente.

 Você pode ainda usar vários campos... por exemplo
 Se for gerar um view (ou pesquisa do access), crie um campo que analise
 o valor do campo, e te dê uma resposta lógica (boolean), e depois, use
 outro campo para ser a próxima chave do índice... e um terceiro e assim
 sucessivamente... aí sua imaginação é que vai dizer, mas ainda assim, eu
 usaria um sql para isso, pois você poderá manipulá-lo de forma mais
 controlada

 Sds
 Emanuel Coutinho

 Luiz Carlos escreveu:
 
  Olá a todos,
 
  Estou com o seguinte problema; tenho uma sequencia de 5 registros e
  gostaria de mudar a ordem deles, podendo escolher em que posição
  inseri-los, por exemplo:
  modo original:
  1 - registro 1
  2 - registro 2
  3 - registro 3
  4 - registro 4
  5 - registro 5
 
  resultado desejado:
  1 - registro 2
  2 - registro 3
  3 - registro 4
  4 - registro 5
  5 - registro 1
 
  isso de forma aleatório,
 
  alguma idéia?
 

 
 Mensagens neste tópico 
 http://br.groups.yahoo.com/group/delphi-br/message/192092;_ylc=X3oDMTM4dWQ3aGVuBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BG1zZ0lkAzE5MjEzMgRzZWMDZnRyBHNsawN2dHBjBHN0aW1lAzEyMjIxODE5MDkEdHBjSWQDMTkyMDky
  
 (4) Responder (através da web) 
 http://br.groups.yahoo.com/group/delphi-br/post;_ylc=X3oDMTJyNzFqZGg5BF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BG1zZ0lkAzE5MjEzMgRzZWMDZnRyBHNsawNycGx5BHN0aW1lAzEyMjIxODE5MDk-?act=replymessageNum=192132
  
 | Adicionar um novo tópico 
 http://br.groups.yahoo.com/group/delphi-br/post;_ylc=X3oDMTJldXI4dm5kBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA250cGMEc3RpbWUDMTIyMjE4MTkwOQ--
  

 Mensagens 
 http://br.groups.yahoo.com/group/delphi-br/messages;_ylc=X3oDMTJlbHFjaGtvBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA21zZ3MEc3RpbWUDMTIyMjE4MTkwOQ--
  
 | Arquivos 
 http://br.groups.yahoo.com/group/delphi-br/files;_ylc=X3oDMTJmcDh0a2tpBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2ZpbGVzBHN0aW1lAzEyMjIxODE5MDk-
  
 | Fotos 
 http://br.groups.yahoo.com/group/delphi-br/photos;_ylc=X3oDMTJlaWJyNmdmBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA3Bob3QEc3RpbWUDMTIyMjE4MTkwOQ--
  
 | Links 
 http://br.groups.yahoo.com/group/delphi-br/links;_ylc=X3oDMTJmamJvOHI4BF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2xpbmtzBHN0aW1lAzEyMjIxODE5MDk-
  
 | Banco de dados 
 http://br.groups.yahoo.com/group/delphi-br/database;_ylc=X3oDMTJjZW91YzZyBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2RiBHN0aW1lAzEyMjIxODE5MDk-
  

 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

 http://br.groups.yahoo.com/;_ylc=X3oDMTJkb3A4cnVoBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2dmcARzdGltZQMxMjIyMTgxOTA5
  

 Alterar configurações via web 
 http://br.groups.yahoo.com/group/delphi-br/join;_ylc=X3oDMTJmMjFjMWtsBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA3N0bmdzBHN0aW1lAzEyMjIxODE5MDk-
  
 (Requer Yahoo! ID)
 Alterar configurações via e-mail: Alterar recebimento para lista 
 diária de mensagens 
 mailto:[EMAIL PROTECTED]:%20Lista%20de%20mensagens 
 | Alterar formato para o tradicional 
 mailto:[EMAIL PROTECTED]:+Tradicional 

 Visite seu Grupo 
 http://br.groups.yahoo.com/group/delphi-br;_ylc=X3oDMTJkNDFrazMyBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2hwZgRzdGltZQMxMjIyMTgxOTA5
  
 | Termos de uso do Yahoo! Grupos http://br.yahoo.com/info/utos.html 
 | Sair do grupo 
 mailto:[EMAIL PROTECTED]
 Atividade nos últimos dias

*
14
   Novos usuários
   
 http://br.groups.yahoo.com/group/delphi-br/members;_ylc=X3oDMTJmbGYxbXU4BF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwN2dGwEc2xrA3ZtYnJzBHN0aW1lAzEyMjIxODE5MDk-
*
1
   Novos arquivos
   
 http://br.groups.yahoo.com/group/delphi-br/files;_ylc=X3oDMTJnc2VrOGprBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwN2dGwEc2xrA3ZmaWxlcwRzdGltZQMxMjIyMTgxOTA5

 Visite seu Grupo 
 http://br.groups.yahoo.com/group/delphi-br;_ylc

Re: [delphi-br] Delphi 2007 - 3 Camadas - BSS

2008-09-23 Por tôpico Luiz Carlos
fjogassa escreveu:

 Boa tarde a todos.
 Estou desenvolvendo um sistema em três camadas no Delphi 2007
 utilizando o Borland Socket Server + DatasetProvider + ClientDataSet.
 Desenvolvi o servidor e o mesmo está funcionando, aparentemente,
 iniciei o socket server na máquina cliente (Windows Vista Ultimate
 64bits). Vou no BSS e configuro o servidor e dou um connected TRUE e
 conecta também. No cliente, juntamente com o socket coloquei um
 SharedConnection apontando para este socket. Agora vem o problema, na
 tela coloco um clientdataset e configuro o remoteserver e o
 providername e na hora que vou dar um actiev TRUE ele dá access
 violation no scktsvr.exe. alguém poderia me ajudar por favor.

 Obrigado.

 Abraços.

 GTalk: [EMAIL PROTECTED] mailto:fjogassa%40gmail.com

  
Tentou fazer a conexão sem o ShareConnection?


[delphi-br] Ordenar registros DBGrid.

2008-09-22 Por tôpico Luiz Carlos
Olá a todos,

Estou com o seguinte problema; tenho uma sequencia de 5 registros e 
gostaria de mudar a ordem deles, podendo escolher em que posição 
inseri-los, por exemplo:
modo original:
1 - registro 1
2 - registro 2
3 - registro 3
4 - registro 4
5 - registro 5

resultado desejado:
1 - registro 2
2 - registro 3
3 - registro 4
4 - registro 5
5 - registro 1

isso de forma aleatório,

alguma idéia?



[delphi-br] Mudar posição de registros em DBGrid

2008-09-22 Por tôpico Luiz Carlos
Olá a todos,

Estou com o seguinte problema; tenho uma sequencia de 5 registros e
gostaria de mudar a ordem deles, podendo escolher em que posição
inseri-los, por exemplo:
modo original:
1, 2, 3, 4, 5
gostaria de poder muda-los de posição como eu bem entender:
1,3,5,2,4

alguma idéia


Re: [delphi-br] Erro Data

2008-08-13 Por tôpico Luiz Carlos
dhsb escreveu:

 Pessoal,

 Estou com uma dúvida bem básica.

 Seguinte quando estou fazendo um insert na minha tabela tenho um
 campo chamado Data

 Data TIMESTAMP.

 qaundo dou um insert estou usando paramentros:

 'insert into tabela (codigo,data) values (:codigo,:data)'
 as vezes esta data e nula e nao esstou conseguindo gravar o restante.

 ParamByName('codigo').AsString := Nom;
 ParamByName('data').AsDate := strtodate(DataInicial);

 DataInicial e uma variavel que as vezes vem nula. Como posso resolver
 estes problemas?

 Tentei isso
 if length(Data) = 0 then
 Data := 'null'

 mas nao funcionou.
 Uso Firebird Delphi7

  
tentou ParamByName('data').IsNull


[delphi-br] Ordenação de CDS [ inversa ] D7-DBX-Firebird

2008-08-08 Por tôpico Luiz Carlos
Bom dia a todos,
Estou com um problema e ainda não consegui identificar. Bom, preciso ordernar 
os dados de um SQLQuery de forma inversa, ou seja, utilizando o DESC no ORDER 
By. Porém, não sei porque quando mostro os dados no CDS que esta ligado ao 
Provider ligado a Query é desconsiderado o DESC do ORDER By. Alguem ja passou 
por isso? Alguem saberia me informa o que posso estar fazendo de errado!?
Segue abaixo a consulta:
SELECT NT.cod_not, NT.tip_not, NT.num_not, NT.dat_emi, PF.nom_cli, NT.sit_not, 
NT.val_tot, NT.status
FROM TBNOTA NT join tbcfop CF on CF.cod_cfop = NT.cfo_not
 join tbcli_pf PF on PF.cod_cli = NT.cod_cli
WHERE NT.cod_not  0
AND NT.tip_cli = 'F'
UNION
SELECT NT.cod_not, NT.tip_not, NT.num_not, NT.dat_emi, PJ.nom_cli, NT.sit_not, 
NT.val_tot, NT.status
FROM TBNOTA NT join tbcfop CF on CF.cod_cfop = NT.cfo_not
 join tbcli_pj PJ on PJ.cod_cli = NT.cod_cli
WHERE NT.cod_not  0
AND NT.tip_cli = 'J'
ORDER BY  3 DESC, 1 , 2 , 4 , 5
P.S.: a mesma consulta utilizando no IBExpert funciona belezinha!! rsrs...
Obrigado a todos desde já!!
Junior - Araraquara/SP


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses


Res: [delphi-br] Ordenação de CDS [ inversa ] D7-DBX-Firebird

2008-08-08 Por tôpico Luiz Carlos
Eduardo,
não posso utilizar as colunas, visto que estou utilizando UNION e as colunas 
apesar de terem os mesmo nomes são de tabelas diferentes.
Junior - Araraquara/SP



- Mensagem original 
De: Eduardo Silva dos Santos [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 8 de Agosto de 2008 9:51:19
Assunto: Re: [delphi-br] Ordenação de CDS [ inversa ] D7-DBX-Firebird


acho que o cds só vai obedecer a ordenação se você usar as colunas no Order
BY

2008/8/8 Luiz Carlos [EMAIL PROTECTED] com.br

 Bom dia a todos,
 Estou com um problema e ainda não consegui identificar. Bom, preciso
 ordernar os dados de um SQLQuery de forma inversa, ou seja, utilizando o
 DESC no ORDER By. Porém, não sei porque quando mostro os dados no CDS que
 esta ligado ao Provider ligado a Query é desconsiderado o DESC do ORDER By.
 Alguem ja passou por isso? Alguem saberia me informa o que posso estar
 fazendo de errado!?
 Segue abaixo a consulta:
 SELECT NT.cod_not, NT.tip_not, NT.num_not, NT.dat_emi, PF.nom_cli,
 NT.sit_not, NT.val_tot, NT.status
 FROM TBNOTA NT join tbcfop CF on CF.cod_cfop = NT.cfo_not
 join tbcli_pf PF on PF.cod_cli = NT.cod_cli
 WHERE NT.cod_not  0
 AND NT.tip_cli = 'F'
 UNION
 SELECT NT.cod_not, NT.tip_not, NT.num_not, NT.dat_emi, PJ.nom_cli,
 NT.sit_not, NT.val_tot, NT.status
 FROM TBNOTA NT join tbcfop CF on CF.cod_cfop = NT.cfo_not
 join tbcli_pj PJ on PJ.cod_cli = NT.cod_cli
 WHERE NT.cod_not  0
 AND NT.tip_cli = 'J'
 ORDER BY 3 DESC, 1 , 2 , 4 , 5
 P.S.: a mesma consulta utilizando no IBExpert funciona belezinha!! rsrs...
 Obrigado a todos desde já!!
 Junior - Araraquara/SP

 Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua
 cara @ymail.com ou @rocketmail. com.
 http://br.new. mail.yahoo. com/addresses
 


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

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

 


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

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



Res: Res: [delphi-br] Ordenação de CDS [ inv ersa ] D7-DBX-Firebird

2008-08-08 Por tôpico Luiz Carlos
Ola Luciano,
acho que nao soube explicar direito. nesse caso não posso utilizar os nomes das 
colunas, porém, estou utilizando o indice delas!! e mesmo assim, nao consigo 
fazer tal ordenação!
Junior - Araraquara/SP



- Mensagem original 
De: Luciano Calenzani Simões [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 8 de Agosto de 2008 10:50:24
Assunto: Res: [delphi-br] Ordenação de CDS [ inversa ] D7-DBX-Firebird


Mesmo usando UNION é possível fazer ordenação, só que te forma diferente, 
usando um índoce para o campo. Observe o exemplo:

SELECT codigo as CAMPO1, nome CAMPO2, datanascimento CAMPO3 FROM TABELA1
UNION ALL
SELECT codigo as CAMPO1, razao_social CAMPO2, dataabertura CAMPO3 FROM TABELA43
ORDER BY 2, 3

Neste caso será ordenado pelo CAMPO2 E CAMPO3, independente da tabela.

Luciano Calenzani Simões

- Mensagem original 
De: Luiz Carlos [EMAIL PROTECTED] com.br
Para: [EMAIL PROTECTED] os.com.br
Enviadas: Sexta-feira, 8 de Agosto de 2008 10:38:21
Assunto: Res: [delphi-br] Ordenação de CDS [ inversa ] D7-DBX-Firebird

Eduardo,
não posso utilizar as colunas, visto que estou utilizando UNION e as colunas 
apesar de terem os mesmo nomes são de tabelas diferentes.
Junior - Araraquara/SP

Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail. com.
http://br.new. mail.yahoo. com/addresses

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

 


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

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



[delphi-br] Procedures no MySQL

2008-08-07 Por tôpico Luiz Carlos
Olá a todos,

Alguns dos amigos da lista já teve o problema de não aparecer no 
componente ZStoredProc(ZeosLib), as procedures cadastradas no banco?

Agradeço a todos,


Re: [delphi-br] Procedures no MySQL

2008-08-07 Por tôpico Luiz Carlos
Eduardo Silva dos Santos escreveu:

 Olá Luiz, se bem me lembro quando eu usava zeos realmente nao 
 aparecia, mas
 isso foi ha muito tempo, era mysql 4.1 e zeos 6.0.

 qual versão do MySQL e do Zeos que você está usando?

 2008/8/7 Luiz Carlos [EMAIL PROTECTED] 
 mailto:lcrp_grupos%40yahoo.com.br

  Olá a todos,
 
  Alguns dos amigos da lista já teve o problema de não aparecer no
  componente ZStoredProc(ZeosLib), as procedures cadastradas no banco?
 
  Agradeço a todos,
 
 

 -- 
 ...
 Eduardo Silva dos Santos
 DRD SISTEMAS
 (27) 3218-4201
 MSN: [EMAIL PROTECTED] mailto:eduardo.drd%40gmail.com
 Site: http://www.drdsistemas.com.br/ http://www.drdsistemas.com.br/
 ...

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

  
MySQL 5 e zeos 6.5


Res: [delphi-br] Re: dbgrid

2008-07-10 Por tôpico Luiz Carlos
Tenta colocar no evento keydown
case key of
    VK_DOWN : DBGrid.Options := DBGrid.Options - [dgEditing];
  end;
Junior - Ararauquara / SP



- Mensagem original 
De: rzzanatta [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 10 de Julho de 2008 9:48:12
Assunto: [delphi-br] Re: dbgrid


mas queria que fizesse isso quando está em modo de edição.

 


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

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



[delphi-br] DbEdit Valor Float

2008-06-16 Por tôpico Luiz Carlos
Boa dia a todos da lista,
Gostaria de saber se ja tiveram esse problema:
Tenho um dbedit na tela que esta recebendo um valor float do banco, porem 
quando o usuario digita o valor 100,00 ele armazena no banco corretamente, mas 
quando sai do form e volta o valor mostrado é igual 10=,00. 
Junior - Araraquara/SP


  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/


Res: Res: Res: [delphi-br] Re: DbEdit Valor Float

2008-06-16 Por tôpico Luiz Carlos
Concordo, porem, o que acho estranho é que apenas valores de centena o problema 
aparece, nos outros casos como citados não. Ja alterei as propriedades e nada, 
ja retirei os campos do CDS e adicionei novamente sem alterar as propriedades e 
nada.
Junior - Araraquara/SP



- Mensagem original 
De: Rubem Nascimento da Rocha [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 16 de Junho de 2008 14:59:53
Assunto: RE: Res: Res: [delphi-br] Re: DbEdit Valor Float



Quando trabalho com objetos TField de valores numéricos do tipo ponto flutuante 
(float, double, etc.), não mexo nas propeidades Precision e Size, e sempre o 
DisplayFormat funcionava normal pra mim.
Sds.

 _ _ __

To: [EMAIL PROTECTED] os.com.br
From: [EMAIL PROTECTED] com.br
Date: Mon, 16 Jun 2008 10:12:23 -0700
Subject: Res: Res: [delphi-br] Re: DbEdit Valor Float

Luciano,
no banco os campos estão como numeric(10,2) nas propriedades do clientdataset: 
precision=10 , size=3, displayformat e editformat = ###,###,##0. 00.
P.S.volto a dizer que o valor armazenado no banco esta correto, porem, no 
retorno a tela os valores estão desse modo para centenas (100,00 = 10=,00) ou ( 
2.000.000,000 = 2.000.00=,000 ). Nao sei porque aparece o sinal de igual.

- Mensagem original 
De: Luciano Calenzani Simões simoesluciano@ yahoo.com. br
Para: [EMAIL PROTECTED] os.com.br
Enviadas: Segunda-feira, 16 de Junho de 2008 13:35:21
Assunto: Res: [delphi-br] Re: DbEdit Valor Float

Você configurou o número de decimais e o formato de display nas propriedades do 
DBEdit?

Luciano Calenzani Simões

- Mensagem original 
De: dodo_gnr 
Para: [EMAIL PROTECTED] os.com.br
Enviadas: Segunda-feira, 16 de Junho de 2008 12:41:40
Assunto: [delphi-br] Re: DbEdit Valor Float

--- Em [EMAIL PROTECTED] os.com.br, Luiz Carlos escreveu

 Boa dia a todos da lista,
 Gostaria de saber se ja tiveram esse problema:
 Tenho um dbedit na tela que esta recebendo um valor float do banco,
porem quando o usuario digita o valor 100,00 ele armazena no banco
corretamente, mas quando sai do form e volta o valor mostrado é
igual 10=,00.
 Junior - Araraquara/SP


 Abra sua conta no Yahoo! Mail, o único sem limite de espaço
para armazenamento!
 http://br.mail. yahoo.com/

cara tens que usa o comando formatFloat( ',##0. 00', DBEdit.text) ;
ai ele vai add no banco de dados o valor por exemplo 100,00 . . .

 _ _ _ _ _ _
Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas 
e muito mais no MSN Video!
http://video. msn.com/? mkt=pt-br 


  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Res:DbEdit Valor Float

2008-06-16 Por tôpico Luiz Carlos
Antonio,
Sim para as 2 perguntas ... dou um post seguido do applyupdates.
Junior - Araraquara/SP


- Mensagem original 
De: Antonio ney.Silva [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 16 de Junho de 2008 14:42:32
Assunto: [delphi-br] Res:DbEdit Valor Float


Cara, como vc está salvando? .Post ou executando query? Outra pergunta? Vc
carregou este field para seu dataSet?

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

 


  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Enc: [delphi-br] Master / Detail com DBExpress + ClientDataSet ( Access Violation ).

2008-06-11 Por tôpico Luiz Carlos
Salve, Galera...
Reitero o pedido..rsrs...  sera mesmo que ninguem passou por esse problema!?!?!
Grato.


- Mensagem encaminhada 
De: Luiz Carlos [EMAIL PROTECTED]
Para: Delphi Br delphi-br@yahoogrupos.com.br; Delphi Total [EMAIL PROTECTED]
Enviadas: Terça-feira, 10 de Junho de 2008 16:42:35
Assunto: [delphi-br] Master / Detail com DBExpress + ClientDataSet ( Access 
Violation ).


Boa Tarde, amigos da lista.
Estou com problema, quanto a utilização de relacionamentos master/detail com 
DBExpress + ClientDataSet.
Seguinte tenho uma aplicação onde o seguinte caso esta ocorrendo:
1º SqlConnect - SqlQueryMaster - DataSource/Provider - ClientDataSet - 
DataSource - DbEdit
2º SqlConnect - SqlQueryDetail - ClientDataSet - DataSource - DBGrid
Aparentemente os relacionamentos estão corretos e as instruções SQL também, 
porém, quando estou dando um OPEN no dataset Master esta apresentando um erro 
de Access Violation, descobri que esta relacionado ao parametro do 
SqlQueryDetail ( apesar de ter adicionados os fields corretamente no 
ClientDataSet ), gostaria de saber se alguém ja passou por esse problema e em 
caso afirmativo o que posso fazer para regularizar.
P.S. quando efetuo a mesmas configurações em um form separado da aplicação com 
os mesmo componentes o problema não acontece!!! Ja verifiquei a criação dos 
DataModules e estão sendo criados apenas no inicio da aplicação.
Agradeço desde já aqueles que puderem ajudar.
Luiz Carlos Jr
Araraquara/SP

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento!
http://br.mail. yahoo.com/
 


  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: Res: Enc: [delphi-br] Master / Detail com DBExpress + ClientDataSet ( Access Violation ).

2008-06-11 Por tôpico Luiz Carlos
André, obrigado por ter se manifestado.
Mas acredito que nao tenha sido claro quanto ao problema que estou tendo!!!
Seguinte, no momento da abertura do DataSet Detail, ele necessita de um 
parametro que deveria vir do DataSet Master correto!!! Porem, em tempo de 
execução isso nao ocorre, como disse também, em um form separado do projeto 
esta tudo ok, efetuei teste e o problema não ocorre, mas quando incluo esse 
mesmo form no projeto porem acessando os componente de um DataModule tenho a 
mensagem de erro.
Não sei se fui mais claro agora...
Mesmo assim.. obrigado novamente.



- Mensagem original 
De: André Luis [EMAIL PROTECTED]
Para: Delphi Br delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 11 de Junho de 2008 15:45:59
Assunto: Res: Enc: [delphi-br] Master / Detail com DBExpress + ClientDataSet ( 
Access Violation ).


Dá uma procurada sobre o beforeupdaterecord do datasetprovider. 
Usamos assim: 
No OnNewRecord criamos um campo temporário para os códigos; 
Na hora do Apllyupdates usamos o beforeupdaterecord para alterar o código
temporário pelo código final. 
Na realidade o seu problema é muito simples de ser resolvido com uma boa 
estudada nos componentes e seus métodos.

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

 


  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



[delphi-br] Master / Detail com DBExpress + ClientDataSet ( Access Violation ).

2008-06-10 Por tôpico Luiz Carlos
Boa Tarde, amigos da lista.
Estou com problema, quanto a utilização de relacionamentos master/detail com 
DBExpress + ClientDataSet.
Seguinte tenho uma aplicação onde o seguinte caso esta ocorrendo:
1º SqlConnect - SqlQueryMaster - DataSource/Provider - ClientDataSet - 
DataSource - DbEdit
2º SqlConnect - SqlQueryDetail - ClientDataSet - DataSource - DBGrid
Aparentemente os relacionamentos estão corretos e as instruções SQL também, 
porém, quando estou dando um OPEN no dataset Master esta apresentando um erro 
de Access Violation, descobri que esta relacionado ao parametro do 
SqlQueryDetail ( apesar de ter adicionados os fields corretamente no 
ClientDataSet ), gostaria de saber se alguém ja passou por esse problema e em 
caso afirmativo o que posso fazer para regularizar.
P.S. quando efetuo a mesmas configurações em um form separado da aplicação com 
os mesmo componentes o problema não acontece!!! Ja verifiquei a criação dos 
DataModules e estão sendo criados apenas no inicio da aplicação.
Agradeço desde já aqueles que puderem ajudar.
Luiz Carlos Jr
Araraquara/SP


  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/


[delphi-br] D7, FB1.5, DBexpress ( driver - UIB FireBird15 )

2008-05-30 Por tôpico Luiz Carlos
Bom dia a todos da lista,
Estou com problemas e nao consigo entender o motivo.

Seguinte, criei um simples projeto utilizando D7, FB1.5, DBexpress ( driver - 
UIB FireBird15 ), entao até ai tranquilo, mas o problema ocorre quando tento 
executar o projeto em uma estação que nao tenha o D7 instalado alguem saberia 
me informa o motivo?
Detalhes dos procedimentos efetuados:
Aplicativo + dll's (dbexpUIBfire15.dll, fbclient.dll) + Arquivo.ini ( com 
informações para conexão com o banco ) todos no mesmo diretorio.
No aplicativo: 1 DM com SQLconection com a propriedade LoadParamsOnConnect = 
true.

Será que esqueci alguma coisa!
Grato desde já pela ajuda de todos!


  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/


[delphi-br] OFF-Topic - Componente para Matricial

2008-05-20 Por tôpico Luiz Carlos
Boa noite a todos,
Gostaria de  saber a opinião de colegas, sobre melhor componente para impressão 
matricial?
Sei que não existe o melhor e sim.. aquele que melhor nos adaptamos!!
Mas sempre é bom saber a opinião de quem ja passou ou esta passando por essa 
experiencia!!!
P.S. finalidade da impressão ( Notas Fiscais ).
Luiz Carlos M Junior
Araraquara / SP


  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/


[delphi-br] XPMan

2008-02-29 Por tôpico Luiz Carlos
Olá a todos,

Alguém saberia me dizer se tem como eu inserir algum objeto no meu form e
ele não sofrer as alterações impostas pelo XPManifest?

Agradeço a todos,



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



RES: [delphi-br] DBEXPRESS + SQLStoredProc + ORACLE - isso realmente funciona ?

2008-02-27 Por tôpico Luiz Carlos R. Pereira
No meu caso as procedures eu passo o parâmetro com Value.

Utilizo Delphi 7.

Sinceramente não tenho esse tipo de problemas com o Oracle. É necessário
verificar as configurações do seu banco, quando fiz o meu projeto de TCC
usando Oracle o único inconveniente foi que como eu não tinha acesso total
ao banco de dados eu precisava setar algumas configurações antes de abrir a
minha conexão.

São elas:

 

ALTER SESSION SET NLS_LANGUAGE = BRAZILIAN PORTUGUESE'

ALTER SESSION SET NLS_TERRITORY = BRAZIL');

ALTER SESSION SET NLS_DATE_FORMAT = ''DD/MM/ HH24:MI:SS'''

ALTER SESSION SET NLS_NUMERIC_CHARACTERS=''.,'''

 

 

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de alineri
Enviada em: quarta-feira, 27 de fevereiro de 2008 03:56
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] DBEXPRESS + SQLStoredProc + ORACLE - isso realmente
funciona ?

 

Ola Pessoal,

Estou atravessando madrugada a dentro e ate agora nao estou 
conseguindo executar minhas procedures do Oracle utilizando 
SQLStoredProc do Dbexpress. A cada momento e um erro diferente, sera 
que essa combinacao realmente funciona ?

Estou fazendo um teste basico, uma procedure que inclui registro em 
dois campos, ( Codigo - Numerico, Descricao - Texto ) a procedure foi 
testada diretamente no oracle e esta funcionando.

Os erros sao o seguinte:

ORA-06502 e ORA-06512 esse erro se referindo a campo Codigo que e 
numerico

No Oracle esse campo esta como Number e em params do SQLStoredProc o 
datatype esta como ftFMTBcd, e o valor passado para esse parametro 
vai como AsBCD.

Ja testei com Float, com Integer e continua dando os mesmos erros.

Qual seria a configuracao correta desses parametros do Delphi ?

Ou o Dbexpress realmente nao e recomendado para o Oracle ?

Versoes que estou utilizando

Oracle XE
Delphi 2006 com update
Windows XP ´professional

Um forte abraco a Todos
alineri

 



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



[delphi-br] Erro Data Set

2008-01-27 Por tôpico Luiz Carlos
Boa tarde a tdos,

gostaria de saber como resolver esse problema que esta
apresentando no momento da abertura de um dataset:

dataset does not support bookmarks, with are required
for multi-record data controls

segue abaixo a consulta da query.

SELECT L.COD, L.FIL, L.MAT, L.NRO, L.DTV, L.QTD,
L.VLD, L.VLA, L.FO, L.QTE, M.DES + ' ' + M.APR AS
DESC, F.RAZ AS RAZ
FROM TB_L L, TB_M M, TB_F F WHERE M.COD = L.MAT AND
F.COD = L.FOR



Grato, Junior!


  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/


RES: [delphi-br] [OFFTOPIC] Oracle ou PostgreSQL?

2007-12-28 Por tôpico Luiz Carlos
Componente de acesso Delphi + Oracle DbExpress!

 

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Yoshio Iwamoto
Enviada em: sexta-feira, 28 de dezembro de 2007 11:49
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] [OFFTOPIC] Oracle ou PostgreSQL?

 

O problema também seria convencer o pessoal deixar eu usar o
postgresql... ainda mais que eu sou novo por aqui.
Mas eu instalei o Oracle 10g pra testar e reparei que ele é um
elefante em cima de uma baleia azul. Só a instalação comeu mais de 1
GB e o banco inicial tinha 700MB. É muito pesado a ferramentas dele
utilizam Java que deixou mais pesado ainda (nada contra java é que eu
já programei em python XD), não sei se é normal mas leva um bom tempo
pra abrir só o login do Enterprise Manager, o pc não é tão ruim é um
amd 64 +3000 com 512MB RAM e HD 250GB SATA.

Aproveitando o OFF, vou add mais um OFF:

Eu baixei o Oracle 10g do site da Oracle mesmo já que era pra teste.
Na instalação eu criei o banco de dados inicial com o nome de orcl e
senha orcl10. Eu acesso o Enterprise Manager pelo
localhost:5500/em e é exibido o login pra conectar no banco orcl.
Pórem não estou conseguindo logar, ele diz que é usuário ou senha
inválido e não dá pra deixar nenhum campo em branco. No usuário eu
tentei orcl, SYS e SYSTEM com a senha orcl10, tentei também
com os meu usuário e senha do windows e mesmo assim deu como inválido.
Criei um outro banco orcl2 e também não entrou, já reinstalei (apaguei
até do registro do windows) e reiniciei o pc e mesmo assim não consigo
entrar. Alguém sabe o que pode ser isso?
Outra pergunta, com eu faço pra conectar o oracle no delphi(qual
componente usar)? Pois minha única experiência foi com ADO.

On Dec 28, 2007 6:53 PM, José Mário Silva Guedes jmarioguedes@
mailto:jmarioguedes%40gmail.com gmail.com wrote:
 Meu voto é para o PostgreSQL.

 Concordo que para Delphi a biblioteca de conexão ao banco de dados é uma
 escolha complicada mesmo.
 Porém vale a pena insistir no uso do PostgreSQL com Zeos porque o Zeos usa
 a
 libpq.dll para se conectar ao banco de dados, o que torna a conexão veloz.
 Porém concordo que dá um frio na barriga sim.

 O PostgreSQL é um banco de dados em franca expansão, sairá em breve a
 versão
 8.3 - com muitas novidades - e a comunidade brasileira é muito forte.

 Eu uso no Windows, pois detesto Linux. E brigo pelo PostgreSQL com unhas e
 dentes, mesmo no Windows.

 Alguns links interessantes:

 http://pgviavel. http://pgviavel.blogspot.com/ blogspot.com/ - Meu blog
sobre PostgreSQL com Zeos

 http://www.midstorm
http://www.midstorm.org/~telles/2007/08/30/16-caracteristicas-do-oracle-que
-fazem-falta-no-postgresql/
.org/~telles/2007/08/30/16-caracteristicas-do-oracle-que-fazem-falta-no-post
gresql/
 -
 Esse cara entende do assunto

 Recentemente teve a primeira PGCon Day Brazil.

 E foi um sucesso! 250 DBAs\Desenvolvedores de todo Brasil. O PostgreSQL é
 usado para gerenciar as fotos da Amazônia Legal, alimentação de todos os
 quartéis da Força Aérea Brasileira, dados corporativos do Metrô de São
 Paulo, e por ai vai.

 Guarde o dinheiro do Oracle para outros investimentos. Eu faria isso.

 Bom final de ano a todos.

 



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



[delphi-br] DELPHI - ORACLE - DBX

2007-11-30 Por tôpico Luiz Carlos
Duvida com gravaçao urgente de dados no oracle.
utilizando Delphi 7 e oracle 10g EX

Estou tentando efetuar uma gravaçao no oracle e esta
apresentando o erro abaixo, alguem ja passou por
isso???

RAISED exception class EOleException with 'dbExpress
Error: Invalid Field Type'

  CONEXAO.Open;
  try
CDS.Close;
CDS.Params[0].AsInteger := parametro;
CDS.Open;  // AQUI ACONTECE O ERRO
CDS.Append;
CDSCampo.value := valor;
CDS.Post;
CDS.ApplyUpdates(0);
  finally
CONEXAO.Close;
  end;

detalhe, ja tentei colocar o parametro com todos os
tipos possiveis. e a tabela no banco o campo é number.

Alguem poderia me ajudar!!!


Obrigado

Junior


  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/


RES: [delphi-br] Erro midas.dll mas ela nao faltando

2007-11-13 Por tôpico Luiz Carlos
Já aconteceu comigo de eu ter a Midas, mas no registro do windows ela estar
registrada apontando para outro caminho,

Se tiver experiência no Regedit, dá uma olhada, pode ser isso!

 

 

Espero ter ajudado,

 

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Clovis iTelefonica
Enviada em: terça-feira, 13 de novembro de 2007 09:13
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Erro midas.dll mas ela nao faltando

 

Ola Ricardo
Muito bom dia

Agradeceria se vc pudesse dar a relação dos arquivos do Fire e do IB para
serem carregados e onde vc os coloca. Pode ser em pvt se vc preferir
Obrigado
Clovito

Clovis Machado Ferreira
Que o Grande Arquiteto do Universo nos Ampare
Msn-clovito.ferreira@ mailto:clovito.ferreira%40hotmail.com hotmail.com
- Original Message - 
From: Ricardo Bianchin 
To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br 
Sent: Tuesday, November 13, 2007 9:03 AM
Subject: [delphi-br] Erro midas.dll mas ela nao faltando

Senhores,

eu mesmo fiz a o meu aplicativo de instalacao

trabalho com D7 e firebird 1.54

depois de instalar o firebird, meu sistema copia os dll e bpl do
delphi necessarios pro sistema funcionar, e nunca tive problemas

mas em uma maquina com WXP ta dando erro MIDAS.DLL
sempre q vejo um erro assim é pq ta faltando esta dll

só q ela com certeza esta no windows\system32

tentei até coloca-la na mesma pasta do .exe mas o erro persiste

alguem ja viu algo assim?

Ricardo Bianchin

ps.:
fugindo do assunto,
aproveito pra agradecer apoio de todos naquela pergunta se tem como
fazer join em tabelas de BDs distintos
resolvi usando os trigers!

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

 



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



[delphi-br] Gráfico com TChart.

2007-10-16 Por tôpico Luiz Carlos
Bom dia a todos,

 

Estou precisando gerar um gráfico onde no eixo Y eu tenho um valor médio,
por exemplo 3.

No eixo X eu tenho valores que variam de 1 a 100, agrupados por data.

 

Alguém tem alguma idéia como devo proceder para montar esse gráfico?

 

Agradeço a todos,



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



[delphi-br] FindClose(SearchRec)

2007-09-02 Por tôpico Luiz Carlos Pereira
Boa tarde a  todos do grupo

De antemão eu agradeço a opinião de todos que responderam ao meu email sobre 
PostGree+Delphi. Valew galera, foi muito bom..
Agora eu venho com um probleminha:
utilizando a função: FindClose(SearchRec), estou tendo o erro de tipos 
imcompatíves: Cardinal and TSearchRec.Vale lembra que minha variável SearchRec 
é do tipo TSearchRec.

O que está acontecendo?





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

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



Res: [delphi-br] FindClose(SearchRec)

2007-09-02 Por tôpico Luiz Carlos Pereira
galera, descobri o erro: existe uma função FindClose na unit Windows e uma na 
SysUtils, daí o erro. a Correta, no meu caso está na SysUtils.

Abraços a todos!

- Mensagem original 
De: Luiz Carlos Pereira [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Domingo, 2 de Setembro de 2007 15:41:31
Assunto: [delphi-br] FindClose(SearchRec)









  



Boa tarde a  todos do grupo



De antemão eu agradeço a opinião de todos que responderam ao meu email sobre 
PostGree+Delphi. Valew galera, foi muito bom..

Agora eu venho com um probleminha:

utilizando a função: FindClose(SearchRec ), estou tendo o erro de tipos 
imcompatíves: Cardinal and TSearchRec.Vale lembra que minha variável SearchRec 
é do tipo TSearchRec.



O que está acontecendo?



Flickr agora em português. Você clica, todo mundo vê.

http://www.flickr. com.br/



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






  







!--

#ygrp-mkp{
border:1px solid #d8d8d8;font-family:Arial;margin:14px 0px;padding:0px 14px;}
#ygrp-mkp hr{
border:1px solid #d8d8d8;}
#ygrp-mkp #hd{
color:#628c2a;font-size:85%;font-weight:bold;line-height:122%;margin:10px 0px;}
#ygrp-mkp #ads{
margin-bottom:10px;}
#ygrp-mkp .ad{
padding:0 0;}
#ygrp-mkp .ad a{
color:#ff;text-decoration:none;}
--



!--

#ygrp-sponsor #ygrp-lc{
font-family:Arial;}
#ygrp-sponsor #ygrp-lc #hd{
margin:10px 0px;font-weight:bold;font-size:78%;line-height:122%;}
#ygrp-sponsor #ygrp-lc .ad{
margin-bottom:10px;padding:0 0;}
--



!--

#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ê clica, todo mundo vê.
http://www.flickr.com.br/

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



Res: [delphi-br] Firibird Inserir Varios Registros

2007-09-02 Por tôpico Luiz Carlos Pereira
tenta usar o método ExecuteDirect do componente SQLConnection

- Mensagem original 
De: erimarfs [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Domingo, 2 de Setembro de 2007 16:48:41
Assunto: [delphi-br] Firibird Inserir Varios Registros









  



Gostaria de inserir varias linhas ao mesmo tempo; no SQL SERVER eu 

consigo ja no firibird eu nao consigo; so consigo se caminhar linha a 

linha. Segue EXEMPLO

insert into TTeste (codigo) values (1);

insert into TTeste (codigo) values (2);

insert into TTeste (codigo) values (3);

insert into TTeste (codigo) values (4);

insert into TTeste (codigo) values (5);

insert into TTeste (codigo) values (6);

insert into TTeste (codigo) values (7);

Eu quero gravar todos os registros em apenas um EXECSQL; so que so 

consigo se andar linha a linha e eu quero copiar ele todo..






  







!--

#ygrp-mkp{
border:1px solid #d8d8d8;font-family:Arial;margin:14px 0px;padding:0px 14px;}
#ygrp-mkp hr{
border:1px solid #d8d8d8;}
#ygrp-mkp #hd{
color:#628c2a;font-size:85%;font-weight:bold;line-height:122%;margin:10px 0px;}
#ygrp-mkp #ads{
margin-bottom:10px;}
#ygrp-mkp .ad{
padding:0 0;}
#ygrp-mkp .ad a{
color:#ff;text-decoration:none;}
--



!--

#ygrp-sponsor #ygrp-lc{
font-family:Arial;}
#ygrp-sponsor #ygrp-lc #hd{
margin:10px 0px;font-weight:bold;font-size:78%;line-height:122%;}
#ygrp-sponsor #ygrp-lc .ad{
margin-bottom:10px;padding:0 0;}
--



!--

#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ê clica, todo mundo vê.
http://www.flickr.com.br/

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



[delphi-br] Fortes Report - D2007

2007-08-29 Por tôpico Luiz Carlos Pereira
Boa noite, 

Alguêm sabe me informar se existe a versão do Fortes Report para Delphi 2007

Agradeço antecipadamente,


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

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



Re: [delphi-br] Extract DADOS apenas

2007-05-14 Por tôpico Luiz Carlos
Márcio, 

Valeu ter respondido, mas infelismente não eh bem isso
não!! 
Seguinte.. o que quiz dizer foi que preciso apenas dos
dados q qq ferramenta de backup do banco Firebird e
outras acredito não fazer, elas trazem juntos por
exemplo toda a linguagem SQL (INSERT, INTO, VALUES) e
mais os campos da tabela em questão. (CODIGO, STATUS).

Sera mesmo que não existe alguma maneira de se efetuar
um backup de um banco de dados apenas com os dados
contido nele e não a linguagem e estrutura!!


Valeu.. 

Junior - Araraquara/SP

--- Márcio Ricardo [EMAIL PROTECTED] escreveu:

 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]
 
 


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


[delphi-br] Delphi x POO

2007-05-02 Por tôpico Luiz Carlos
Boa Noite a todos,

Surgiu a duvida, se uma programacao construida no
ambiente grafico do Delphi (Object Pascal) eh ou nao
POO??

Junior - Araraquara/SP

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


Re: {Nota da Argo Internet: conteudo desarmado} [delphi-br] Imprimir diretamente para a porta (USB)

2007-01-12 Por tôpico Luiz Carlos F. da Cruz
Eu também já pesquisei, na epoca eu usar o clipper.
Não tem jeito de ir direto como a lp1, tem que usar gerenciador do windows.
Tem algumas soluções mas sempre usam o gerenciador do windows, o comando 
AssignFile('LPT1:')

Luiz Carlos
  - Original Message - 
  From: paganato 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, January 12, 2007 12:32 PM
  Subject: {Nota da Argo Internet: conteudo desarmado} [delphi-br] Imprimir 
diretamente para a porta (USB)


  Ja fiz essa pergunta antes e não obtive resposta.
  Gostaria de saber como fazer para imprimir diretamente na porta como
  as LPTs, mas como porta USB. Tenho um sistema q imprime diretametne na
  LPT1, porem o cliente comprou uma impressora q tem apenas porta UBS.
  Gostaria de estar adaptando meu sistema para atender a essa necessidade.

  Grato a todos,

  Alexandre Paganato.



   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.5.432 / Virus Database: 268.16.9/623 - Release Date: 11/1/2007 
15:33


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



[delphi-br] Fortes - Duvidas

2006-09-21 Por tôpico Luiz Carlos
Boa Tarde a todos...

Como sabem, ainda sou iniciante e tenho algumas
duvidas quanto a utilização de componentes do Delphi.

A minha mais nova duvida e quanto a utilização do
Fortes no Delphi... será que alguem teria um
passo-a-passo ou tutorial ou até mesmo uma apostila de
facil entendimento para me arrumar!

Desde já eu agradeço!!!


Junior - Araraquara/SP



___ 
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora! 
http://br.mobile.yahoo.com/mailalertas/ 
 



-- 
 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: [DELPHI-Total] Impressão Rave - Matricial - AJUDA

2006-09-05 Por tôpico Luiz Carlos
Então... realmente eu sei disse, mas o proprio rave
tem um componente chamado RvRenderText1, onde a
busca que eu fiz, encontrei a forma abaixo enviada de
como mandar o relatorio a ser impresso em modo texto.

O problema está sendo que utilizando esta maneira.. eu
não consigo imprimir nada!! 

Sei lá... alguém ja deve ter passado por isso!!!

Será que poderiam me ajudar!


Valeu... mesmo.. Junior.


P.S. Trilha.. valeu vc ter respondido!!

--- Trilha Zero [EMAIL PROTECTED] escreveu:

 Que eu saiba, o rave report imprime em modo GRAFICO
 ou seja usa as fontes do 
 windows.
 Se vc quer imprimir em matriciais deve usar um
 componente ou codigo quefaça 
 a impressora usar o conjunto de caracteres que ela
 possui.
 
 - Original Message - 
 From: Luiz Carlos [EMAIL PROTECTED]
 To: Delphi Br delphi-br@yahoogrupos.com.br;
 Delphi Total 
 [EMAIL PROTECTED]; Rave Reports 
 [EMAIL PROTECTED]
 Sent: Monday, September 04, 2006 2:09 PM
 Subject: [DELPHI-Total] Impressão Rave - Matricial -
 AJUDA
 
 
  Boa Tarde..
 
  Estou tentando fazer com que um relatorio seja
  impresso numa impressora matricil, mas não estou
  conseguindo... procurei diversas informações a
  respeito do assunto e a unica coisa que encontro e
  este codigo abaixo; porem quando insiro o mesmo na
  minha aplicação não obtenho resultado esperado, na
  verdade.. o relatorio não é impresso. será que
 estou
  fazendo algo de errado!?!? ou tem mais alguma
 outra
  configuração a ser feita!!! alguém já conseguiu
  imprimir desta maneira!?!? poderiam me ajudar!!!
 
 
  Obrigado!!
 
  Junior - Araraquara
 
  //**codigo encontrado*
 
  System.DefaultDest := rdFile;
  System.DoNativeOutput := false;
  System.RenderObject := RvRenderText1;
  System.OutputFileName := 'LPT1';
  System.SystemSetups :=
 DM_RELAT.System.SystemSetups -
  [ssAllowSetup];
 
  // Execute the report
  RvProject1.ExecuteReport('NOME_RELATORIO');
 
 
 
 

___
  Novidade no Yahoo! Mail: receba alertas de novas
 mensagens no seu celular. 
  Registre seu aparelho agora!
  http://br.mobile.yahoo.com/mailalertas/
 
 
 
 
 
 ---
   Divulgue o Grupo Dephi-Total
   Um favor para todos!
 
 ---
  Responda sempre que souber, lembre-se:
  Um dia pode ser você
 
 ---
  Para cancelar sua assinatura, envie um e-mail
 para:
  [EMAIL PROTECTED]
 
 ---
 
 
  Links do Yahoo! Grupos
 
 
 
 
 
 
 
 
  __ Informação do NOD32 IMON 1.1738
 (20060904) __
 
  Esta mensagem foi verificada pelo NOD32 sistema
 antivírus
  http://www.eset.com.br
 
  
 
 
   

___
 
 Novidade no Yahoo! Mail: receba alertas de novas
 mensagens no seu celular. Registre seu aparelho
 agora! 
 http://br.mobile.yahoo.com/mailalertas/ 
  
 
 




___ 
O Yahoo! está de cara nova. Venha conferir! 
http://br.yahoo.com


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





[delphi-br] Impressão Rave - Matricial - AJUDA

2006-09-04 Por tôpico Luiz Carlos
Boa Tarde..

Estou tentando fazer com que um relatorio seja
impresso numa impressora matricil, mas não estou
conseguindo... procurei diversas informações a
respeito do assunto e a unica coisa que encontro e
este codigo abaixo; porem quando insiro o mesmo na
minha aplicação não obtenho resultado esperado, na
verdade.. o relatorio não é impresso. será que estou
fazendo algo de errado!?!? ou tem mais alguma outra
configuração a ser feita!!! alguém já conseguiu
imprimir desta maneira!?!? poderiam me ajudar!!!


Obrigado!! 

Junior - Araraquara

//**codigo encontrado*

System.DefaultDest := rdFile;
System.DoNativeOutput := false;
System.RenderObject := RvRenderText1;
System.OutputFileName := 'LPT1';
System.SystemSetups := DM_RELAT.System.SystemSetups -
[ssAllowSetup];

// Execute the report
RvProject1.ExecuteReport('NOME_RELATORIO');



___ 
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora! 
http://br.mobile.yahoo.com/mailalertas/ 
 



-- 
 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] Impressão Rave - Matricial - AJUDA - A/C Atendimento - BG on-line

2006-09-04 Por tôpico Luiz Carlos
Cara.. até seria, se desta forma a impressão não
perdesse a parte visual... do relatorio!!


Mas valeu mesmo a dica..

Se alguém souber mais alguma coisa..

Desde já... fico grato!

Junior

--- Atendimento - BG on-line [EMAIL PROTECTED]
escreveu:

 Cara.. nao sei se era bem isso que vc precisava 
 Para impressão matricial utilizo a impressão direto
 para a porta da impressora LPT1
 
 
 
 
 
 
 procedure TNotaFiscal.BitBtn2Click(Sender: TObject);
 Var F :TextFile;
 Imprimir, LINHA1, LINHA2, LINHA3, LINHA4,
 LINHA5, LINHA6, LINHA7, LINHA8 : String;
 LINHA9, LINHA10, LINHA11, LINHA12 : String;
 Cont : Integer; VFor : Integer;
 begin
 
 
   AssignFile(F,impressora.lines[0]); 
 //impressora.lines[0] = LPT1 ou LPT2
   ReWrite(F);
 
   WriteLN(F,' ');
   WriteLN(F,' ');
   WriteLN(F,' ');
   WriteLN(F,' ');
   WriteLN(F,' ');
   WriteLN(F,' ');
   WriteLN(F,' ');
 
   Imprimir := Space(61) + Copy(WEmissao.Text,1,2) +
   Space(4)  + Copy(WEmissao.Text,4,2) +
   Space(3)  + Copy(WEmissao.Text,7,4);
   WriteLN(F,imprimir);
 
   WriteLN(F,' ');
   WriteLN(F,' ');
   WriteLN(F,' ');
 
   Imprimir := WCodigo.Text + Space(3) +


Space(11-Length(Alltrim(format('%n',[StrToFloat(WValor.Text)]
 + AllTrim(format('%n',[StrToFloat(WValor.Text)])) +
 Space(5) +
 WCodigo.Text + Space(5) +
 WVencimento.Text;
   WriteLN(F,Imprimir);
 
   WriteLN(F,' ');
 
   Imprimir := Space(6) +

Space(8-Length(AllTrim(format('%n',[StrToFloat(WDesconto.Text)]
 + AllTrim(format('%n',[StrToFloat(WDesconto.Text)]))
 +
   Space(6) +

Space(9-Length(AllTrim(format('%n',[StrToFloat(WReais.Text)]
 + AllTrim(format('%n',[StrToFloat(WReais.Text)])) +
   Space(4) + Alltrim(Wate.Text);
   WriteLN(F,Acentos(Imprimir));
 
   WriteLN(F,' ');
   Imprimir := Space(13) + AllTrim(Wcondicoes.Text);
   WriteLN(F,Acentos(Imprimir));
 
   WriteLN(F,' ');
 
   Imprimir := Space(12) + AllTrim(WSacado.Text);
   WriteLN(F,Acentos(Imprimir));
   WriteLN(F,' ');
 
   Imprimir := Space(12) + AllTrim(WEndereco.Text);
   WriteLN(F,Acentos(Imprimir));
   WriteLN(F,' ');
   WriteLN(F,' ');
 
   Imprimir := Space(12) + AllTrim(WCidade.Text) +
 Space(26-Length(Alltrim(Wcidade.Text))) +
   Space(8)  + AllTrim(WEstado.Text) +
 Space(13-Length(Alltrim(WEstado.Text))) +
   Space(7)  + WCep.Text;
   WriteLN(F,Acentos(Imprimir));
   WriteLN(F,' ');
 
   Imprimir := Space(12) + AllTrim(WPraca.Text);
   WriteLN(F,Acentos(Imprimir));
   WriteLN(F,' ');
 
   Imprimir := Space(12) + AllTrim(WCPF.Text)  +
 Space(34-Length(Alltrim(WCPF.Text))) +
   Space(9)  + Alltrim(WInsc.Text);
   WriteLN(F,Acentos(Imprimir));
   WriteLN(F,' ');
 
   Imprimir := Extenso(StrToFloat(WValorTotal.Text));
   If Length(Imprimir) = 63 Then Begin
 Linha1 := Imprimir; Linha2:= ' '; Linha3 := ' ';
 End
   Else
 Begin
   Linha1:=Corta(63,Imprimir,Linha2);
   Linha2:=AllTrim(Linha2) + ' ' +
 copy(Imprimir,64,Length(imprimir)-63);
   If Length(Linha2)  63 Then Begin
 Linha2:=Corta(63,Linha2,linha3);
   End;
 
 
 End;
 
   WriteLN(F,Space(13) + Acentos(LINHA1));
   WriteLN(F,Space(13) + Acentos(LINHA2));
   WriteLN(F,Space(13) + Acentos(LINHA3));
 
   WriteLN(F,' ');
   WriteLN(F,' ');
   WriteLN(F,' ');
   WriteLN(F,' ');
   WriteLN(F,' ');
   WriteLN(F,' ');
 
   //impressão da descrição dos serviços
 
   MemoAjuste.Text := WDescricao.Text + Space(50) +
 Space(50) + Space(50) +
  Space(50) + Space(50) +
 Space(50) + Space(50) + Space(50) +
  Space(50) + Space(50) +
 Space(50) + Space(50) + Space(50) ;
 
   WriteLN(F,Acentos(MemoAjuste.Lines[0]));
   WriteLN(F,Acentos(MemoAjuste.Lines[1]));
   WriteLN(F,Acentos(MemoAjuste.Lines[2]));
   WriteLN(F,Acentos(MemoAjuste.Lines[3]));
   WriteLN(F,Acentos(MemoAjuste.Lines[4]));
   WriteLN(F,Acentos(MemoAjuste.Lines[5]));
   WriteLN(F,Acentos(MemoAjuste.Lines[6])+ Space(6) +

AllTrim(format('%n',[StrToFloat(WValorTotal.Text)])));
   WriteLN(F,Acentos(MemoAjuste.Lines[7]));
   WriteLN(F,Acentos(MemoAjuste.Lines[8]));
   WriteLN(F,Acentos(MemoAjuste.Lines[9]));
   WriteLN(F,Acentos(MemoAjuste.Lines[10]));
   WriteLN(F,Acentos(MemoAjuste.Lines[11]));
 
 
 
 
 
 
 { WriteLN(F, #12);  //Ejeta a página}
   CloseFile(F);
 end;
 
 
 
 
   - Original Message - 
   From: Luiz Carlos 
   To: Delphi Br ; Delphi Total ; Rave Reports 
   Sent: Monday, September 04, 2006 2:09 PM
   Subject: [delphi-br] Impressão Rave - Matricial -
 AJUDA
 
 
   Boa Tarde..
 
   Estou tentando fazer com que um relatorio seja
   impresso numa impressora matricil, mas não estou
   conseguindo... procurei diversas informações a
   respeito do assunto e a unica coisa que encontro e
   este codigo abaixo; porem quando insiro o mesmo na
   minha aplicação não obtenho resultado esperado, na
   verdade.. o relatorio não é impresso. será que
 estou
   fazendo algo de errado

[delphi-br] Recuperação de Arquivo RAVE

2006-07-12 Por tôpico Luiz Carlos
Bom dia,

Estou com problema e quem sabe vocês poderiam me
ajudar!!! 

Tenho um arquivo antigo do Rave em um projeto do
Delphi 7.0 que quando executo na primeira vez ele abre
normal, mas quando eu faço alguma alteração o mesmo
arquivo apresenta um erro de memoria!! eu até refiz o
arquivo do rave mas continua o problema,

Alguém já passou por isso!?!?!

Alguém tem idéia de como resolver!?!?!

Obrigado.


Junior



___ 
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora! 
http://br.mobile.yahoo.com/mailalertas/ 
 



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

2006-05-22 Por tôpico Luiz Carlos



Boa tarde Hudson,

tente por exemplo consultar o IP dinamico de cada
maquina, utilizando o comando no prompt do DOS
ipconfig -all, ou algo do tipo. Caso o IP mostrado,
voce não consiga utilizar o VNC, use sites do tipo
www.abusar.com , onde mostre o IP na net de cada
maquina individualmente... ai, voce tenta acessar ok..

Qq duvida.. se eu puder ajudar!!

Aqui eu uso com frequencia o VNC e nunca tive problema
com clientes externos.


Junior - Araraquara
--- Hudson [EMAIL PROTECTED] escreveu:


-
Ola!

Gente estou enviando este topico afim de esclarecer
algumas duvidas sobre o ultravnc...

tenho um modem d-link 500G esta como router e preciso
pois tenho 10 maquinas em rede
Uso o UltraVNC para dar manutenção remota em clientes,
o funcionamento e ok em modems brind...
mas quando e router não da certo...
quando tento conectar fora da empresa não da certo...
mas a conexão funciona corretamente na rede
internar...
já tentei (201.58.215), (201.58.215:5900),
(201.58.215/10.1.1.8), (201.58.215:80),
(201.58.215/hudson) 
mas nenhum deu certoalguem sabe resolver isso?

grato

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA
MENSAGEM 

http://br.groups.yahoo.com/group/delphi-br/messages



 
 Yahoo! Grupos, um serviço oferecido
por: PUBLICIDADE
var lrec_target=_top;var lrec_URL=new
Array();lrec_URL[1]=http://br.ard.yahoo.com/SIG=12fh4cf9k/M=396559.7942981.9484407.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1148326915/A=3718281/R=0/id=flashurl/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs;var
lrec_flashfile=http://br.i1.yimg.com/br.yimg.com/i/230506_y300x250_maio03_dhs_dim5150.swf?clickTAG=_javascript_:LRECopenWindow(1);var
lrec_altURL=http://br.ard.yahoo.com/SIG=12fh4cf9k/M=396559.7942981.9484407.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1148326915/A=3718281/R=1/id=altimg/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs;var
lrec_altimg=http://br.i1.yimg.com/br.yimg.com/i/230506_y300x250_maio03_dhs_dim5150.gif;var
lrec_width=300;var lrec_height=250; 
 
 
-
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!.



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






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

* Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED]






  




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




  
  



  




  
Links do Yahoo! Grupos

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












[delphi-br] JOIN (INNER - LEFT - RIGHT)

2006-03-21 Por tôpico Luiz Carlos
Boa tarde...

Estou com dificuldade em fazer uma consulta em duas ou
mais tabelas onde conste resgitro em apenas uma delas
e as mesma estejam relacionadas, sendo assim, não
estou tendo retorno mesmo sabendo que conste os dados
na tabela. Soube dos comando JOIN (INNER - LEFT -
RIGHT - OUTER) mas não consigo aplicar a minha
consulta. Será que alguém teria um exemplo para me
mostrar.. ou até mesmo me explicar como fazer esta
consulta!... 


Será que me entenderam!?!?!?


Junior - Araraquara



___ 
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! 
http://br.acesso.yahoo.com


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




[delphi-br] Folha Continua - Rave

2006-03-02 Por tôpico Luiz Carlos
Boa Tarde...

Estou tendo dificuldades com impressão em etiquetas 
continuas no Rave, e quem sabe vocês poderiam me
ajudar... o problema é o seguinte.. configuro a pagina
no rave para impressão e a 1ª fica correta, mas já na
segunda pagina.. por ser formulário continuo e não ter
margem superior e inferior... estou perdendo as
margens iniciais, então fica a pergunta, como fazer
para que as próximas paginas a serem impressa,
mantenha  nas próximas paginas as dimensões da 1ª??
sem perder as configurações da 1ª

Obrigado

Junior - Araraquara








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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 




[delphi-br] Impressora Fiscal - Remota

2006-03-01 Por tôpico Luiz Carlos
Boa tarde,

Amigos do fórum, estou com problema em uma aplicação e
quem sabe vocês poderiam me ajudar. No sistema em que
estou trabalhando as vezes o cliente precisa trabalhar
remotamente de outro terminal em sua residência, o
problema esta na hora da impressão do relatório fiscal
- pois o mesmo não sai na impressora programada uma
vez que envio para a LPT1 direto do programa.

Como fazer para que o sistema imprima na LPT1 do
servidor estando no terminal cliente???

Obrigado.

Junior - Araraquara/SP



___
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!
http://br.acesso.yahoo.com


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





[delphi-br] Paradox 7

2005-03-21 Por tôpico LUIZ CARLOS PEREIRA


Olá,
 
Sou iniciante no Delphi e gostaria de saber qual o tamanho máximo de dados 
em MEGABYTES (MB) que o Paradox 7 suporta? Obrigado.


-
Yahoo! Mail - Com 250MB de espaço.  Abra sua conta!

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






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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