[delphi-br] Re: TStream

2005-03-30 Por tôpico Dirceu Vasson Junior


Oi Eliza

Neste caso vc deve usar o TFileStream, que possui recursos de geração 
de arquivos em disco. O TStream possui recursos básicos para 
trabalhar na memória do micro.

Espero ter ajudado.
Dirceu
STR.--- Em delphi-br@yahoogrupos.com.br, Eliza [EMAIL PROTECTED] escreveu
 oi   DVJ,
 
 Vc está trabalhando com stream
 Preciso copiar o conteúdo de uma stream para uma variável txt.
 Como faço isso??
 
 Eliza - Dismar
 Departamento de Informática
 
 
 
 
 
 DVJ escreveu:
 
  Ola a todos
 
  Qual o melhor método para gravar um blob usando a TStream?
 
  Carrego o arquivo do DB, altero mas quando faço o update, não é 
  gravado no banco.
  //esse é o código que uso para gravar o
  //STR foi criado como variável global
  var
  DM: TTransactionDesc;
  begin
frReport.SaveToStream(STR);
DM.TransactionID:= 100;
DM.IsolationLevel:= xilREADCOMMITTED;
SQLConnection1.StartTransaction(DM);
with SQLQuery2 do
begin
  Params[0].LoadFromStream(STR, ftBlob);
  Params[1].AsInteger:= ClientDataSet1.Fields[0].AsInteger;
  ExecSQL();
end;
SQLConnection1.Commit(DM);
 
  Depois disso, fecho a tabela, abro-a e nada da alteração que fiz.
 
  Alguém teria uma luz???
 
  Grato pela ajuda.
 
 
  __
  Converse com seus amigos em tempo real com o Yahoo! Messenger
  http://br.download.yahoo.com/messenger/
 
 
  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages
 
  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
 
 
  *Yahoo! Grupos, um serviço oferecido por:*
 
  * 
  
http://br.rd.yahoo.com/SIG=12anhh2qc/M=264105.3931087.6562589.1588051
/D=brclubs/S=2137111264:HM/EXP=1112282878/A=2361264/R=6/SIG=10v4acpp0/
*http://br.shopping.yahoo.com/*
  
 
 
  --
--
  *Links do Yahoo! Grupos*
 
  * Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
 
  * Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
mailto:[EMAIL PROTECTED]
subject=Unsubscribe
 
  * O uso que você faz do Yahoo! Grupos está sujeito aos Termos 
do
Serviço do Yahoo! http://br.yahoo.com/info/utos.html.
 
 
 
 -- 
 
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





[delphi-br] Re: Comunicação com a Balança Toledo

2004-12-24 Por tôpico Dirceu Vasson Junior


Oi...

To precisando fazer a leitura das informações de uma balança 
rodoviária toledo, já li as outras mensagens postadas aqui mas o que 
acontece:
˜
†žx~~ž
~ž~xxx
˜
†žx~~ž
~ž~xxx

é isso que o programinha teste lê (deve estar em hexa e estou usando 
o cport para ler a serial).

Quais os processos que eu devo construir para ler as informações 
acima (transformar caracter a caractar para binário e depois para 
string?)?

grato pela ajuda
--- Em delphi-br@yahoogrupos.com.br, Sávio Cler [EMAIL PROTECTED] 
escreveu
 Eu usei o compoente em anexo cport-3.0.zip, ai ele lê uns troços 
doidos, que
 só em interessa os números, pego estes e fica bem fácil.
 
 Ex: Temp2 é o que o componente captura, em procedure
 TFLeitor.CPSerialRxChar(Sender: TObject; Count: Integer);
 
 Pega só nrs: for Temp1:=1 to Length(Temp2) do if (Temp2[Temp1]
='0') and
 (Temp2[Temp1]='9') then Temp3:=Temp3+Temp2[Temp1];
 
 Abraço. Qq coisa fala.
 
 
   Sávio Cler
   ICQ 142428832
   www.sgm.rg3.net
   [EMAIL PROTECTED]
   Sto A. de Pádua - Rio de Janeiro
   Contato Pessoal:   (22)9812-0656
 
   ~ ~
 ( @ @ )
   ---o0Oo-(_)-oO0o---
   Precisando de dicas?
  www.deephi.hpg.com.br
   ---
 Mais de 3 downloads
   -ooO---Ooo-
 - Original Message -
 From: Guilherme Erzinger [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Friday, October 01, 2004 2:57 PM
 Subject: [delphi-br] Comunicação com a Balança Toledo
 
 
 Olá
 
 Alguem tem algum exemplo, ou dica de como fazer uma Comunicacao via 
seria
 (COM1) Com uma Balanca Toledo ???
 
 
 Obrigado,
 
 
 
 Guilherme
 
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages
 
 Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
 
 
   Yahoo! Grupos, um serviço oferecido por:
 
   São Paulo Rio de Janeiro Curitiba Porto Alegre 
Belo
 Horizonte Brasília
 
 
 
 
 

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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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