[delphi-br] Campo BLOB em paradox

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

preciso criar um campo BLOB (Binary) em paradox via SQL.
Mas se faço ... campo BLOB, ... ele cria por padrão um BLOB (Memo).
Alguém sabe como faço?

Obrigado,
Abraço,
Júlio


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



[delphi-br] Campo Blob

2009-09-22 Por tôpico Alessandro
Bom dia! Tenho um cadastro mestre-detalhe, em FB 1.5 com dbexpress. Tenho um 
campo Blob na tabela detalhe, entro com a informação em um campo DBMEMO. Ao 
salvar está dando o erro:
 
Project S087.EXE raised exception class EDatabaseError with message 'Database 
Server Error: Incorrect values within SQLDA structure'.

Alguém passou por isto? Utilizo a ligação NESTED DATASET

Alessandro


  

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] campo blob video?

2009-05-04 Por tôpico alessandra porto


  amigos como devo criar o campo blob na tabela do firebird
para armazenar videos  de forma  a aproveitar melhor os recursos do 
banco   

 campo tipo:

blob    subtipo   tamanho   etc


como tenho certeza que amigos aqui da lista já fazem uso deste recurso na 
pratica
gostaria de qual o formato mais apropriado  do campo blob  para o melhor 
aproveitamento


Grata pela atenção 






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

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



Re: [delphi-br] Campo Blob

2008-09-17 Por tôpico Marcos Bernardo
O Erro que esta dando não é no Delphi eh de Banco de dados ...
Olhe o tipo do seu campo...
de uma pesquisada hein... www.firebase.com.br

abraço

2008/9/16 BandaLemuel [EMAIL PROTECTED]

   Marcos...

 Tentei do jeito que vc falou mas esta dando o mesmo erro

 Sgue o codigo...

 Close;
 Sql.Clear;
 Sql.Text := 'INSERT INTO EMAIL VALUES ( :CDEML , :ASSUN , :ANEXO , :TEXTO
 )';
 ParamByName('CDEML').AsInteger := StrToInt( CDEML ) ;
 ParamByName('ASSUN').AsString := Trim( ASSUNTO );
 ParamByName('ANEXO').Value := ColocarValorNulo( ANEXO ) ;
 if TEXTO = nil then
 ParamByName('TEXTO').Value := null
 else
 ParamByName('TEXTO').Assign( RC );
 ExecSQL;
 Close;

 Tem alguma ideia.. ??? O banco é firebird...

 Vlw... Wesley ...

 From: Marcos Bernardo
 Sent: Tuesday, September 16, 2008 4:40 PM
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Subject: Re: [delphi-br] Campo Blob


 Salve...

 Tente o Assing

 ParamByName('CAMPO').Assing(RichText);

 abraço

 Marcos Bernardo

 2008/9/16 BandaLemuel [EMAIL PROTECTED]bandalemuel%40yahoo.com.br
 

  Lista
 
  Ja procurei e não achei..´.. tenho um Richedit onde faço um texto
  formatado.. preciso gravar ele em um campo blob... Alguem sabe como fazer
  isso ?? Estou tentando assim...
 
  // Rodo este primeiro
 
  { Coloca Texto do RichedText para o TMemoryStream }
  procedure TEmail.PegaTextoRichEdit(RC: TJvRichEdit);
  const
  OffSetMemoryStream : Int64 = 0 ;
  begin
  TEXTO := TMemoryStream.Create ;
  RC.Lines.SaveToStream( TEXTO );
  TEXTO.Position := OffSetMemoryStream ;
  end;
 
  //Depois a SQL
 
  Close;
  Sql.Clear;
  Sql.Text := 'INSERT INTO EMAIL VALUES ( :CDEML , :ASSUN , :ANEXO , :TEXTO
  )';
  ParamByName('CDEML').AsInteger := StrToInt( CDEML ) ;
  ParamByName('ASSUN').AsString := Trim( ASSUNTO );
  ParamByName('ANEXO').Value := ColocarValorNulo( ANEXO ) ;
  if TEXTO = nil then
  ParamByName('TEXTO').Value := null
  else
  ParamByName('TEXTO').LoadFromStream( TEXTO , ftFmtMemo );
  ExecSQL;
  Close;
 
  Ele esta dando um erro assim...
  unknown ISC error 336397210
  unknown ISC error 336397208
  ñ sei o que pode ser Alguem já conseguiu isso... Wesley
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

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

 __ Information from ESET NOD32 Antivirus, version of virus
 signature database 3446 (20080916) __

 The message was checked by ESET NOD32 Antivirus.

 http://www.eset.com

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

 



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



[delphi-br] Campo Blob

2008-09-16 Por tôpico BandaLemuel
Lista

Ja procurei e não achei..´.. tenho um Richedit onde faço um texto 
formatado.. preciso gravar ele em um campo blob... Alguem sabe como fazer isso 
?? Estou tentando assim...

// Rodo este primeiro

{ Coloca Texto do RichedText para o TMemoryStream }
procedure TEmail.PegaTextoRichEdit(RC: TJvRichEdit);
const
  OffSetMemoryStream  : Int64 = 0 ;
begin
TEXTO := TMemoryStream.Create ;
RC.Lines.SaveToStream( TEXTO );
TEXTO.Position  := OffSetMemoryStream ;
end;

//Depois a SQL


Close;
Sql.Clear;
Sql.Text  := 'INSERT INTO EMAIL VALUES ( :CDEML , 
:ASSUN , :ANEXO , :TEXTO )';
ParamByName('CDEML').AsInteger  := StrToInt( CDEML 
)  ;
ParamByName('ASSUN').AsString   := Trim( ASSUNTO );
ParamByName('ANEXO').Value  := 
ColocarValorNulo( ANEXO )  ;
if TEXTO = nil then
ParamByName('TEXTO').Value  := null
else
ParamByName('TEXTO').LoadFromStream( TEXTO , 
ftFmtMemo );
ExecSQL;
Close;


Ele esta dando um erro assim... 
unknown ISC error 336397210
unknown ISC error 336397208
ñ sei o que pode ser Alguem já conseguiu isso... Wesley

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



Re: [delphi-br] Campo Blob

2008-09-16 Por tôpico Marcos Bernardo
Salve...

Tente o Assing

ParamByName('CAMPO').Assing(RichText);

abraço

Marcos Bernardo

2008/9/16 BandaLemuel [EMAIL PROTECTED]

   Lista

 Ja procurei e não achei..´.. tenho um Richedit onde faço um texto
 formatado.. preciso gravar ele em um campo blob... Alguem sabe como fazer
 isso ?? Estou tentando assim...

 // Rodo este primeiro

 { Coloca Texto do RichedText para o TMemoryStream }
 procedure TEmail.PegaTextoRichEdit(RC: TJvRichEdit);
 const
 OffSetMemoryStream : Int64 = 0 ;
 begin
 TEXTO := TMemoryStream.Create ;
 RC.Lines.SaveToStream( TEXTO );
 TEXTO.Position := OffSetMemoryStream ;
 end;

 //Depois a SQL

 Close;
 Sql.Clear;
 Sql.Text := 'INSERT INTO EMAIL VALUES ( :CDEML , :ASSUN , :ANEXO , :TEXTO
 )';
 ParamByName('CDEML').AsInteger := StrToInt( CDEML ) ;
 ParamByName('ASSUN').AsString := Trim( ASSUNTO );
 ParamByName('ANEXO').Value := ColocarValorNulo( ANEXO ) ;
 if TEXTO = nil then
 ParamByName('TEXTO').Value := null
 else
 ParamByName('TEXTO').LoadFromStream( TEXTO , ftFmtMemo );
 ExecSQL;
 Close;

 Ele esta dando um erro assim...
 unknown ISC error 336397210
 unknown ISC error 336397208
 ñ sei o que pode ser Alguem já conseguiu isso... Wesley

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

 



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



Re: [delphi-br] Campo Blob

2008-09-16 Por tôpico BandaLemuel
Marcos...

Tentei do jeito que vc falou mas esta dando o mesmo erro

Sgue o codigo...

Close;
Sql.Clear;
Sql.Text  := 'INSERT INTO EMAIL VALUES ( :CDEML , 
:ASSUN , :ANEXO , :TEXTO )';
ParamByName('CDEML').AsInteger  := StrToInt( CDEML 
)  ;
ParamByName('ASSUN').AsString   := Trim( ASSUNTO );
ParamByName('ANEXO').Value  := 
ColocarValorNulo( ANEXO )  ;
if TEXTO = nil then
ParamByName('TEXTO').Value  := null
else
ParamByName('TEXTO').Assign( RC );
ExecSQL;
Close;

Tem alguma ideia.. ??? O banco é firebird...

Vlw... Wesley ...


From: Marcos Bernardo 
Sent: Tuesday, September 16, 2008 4:40 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Campo Blob


Salve...

Tente o Assing

ParamByName('CAMPO').Assing(RichText);

abraço

Marcos Bernardo

2008/9/16 BandaLemuel [EMAIL PROTECTED]

 Lista

 Ja procurei e não achei..´.. tenho um Richedit onde faço um texto
 formatado.. preciso gravar ele em um campo blob... Alguem sabe como fazer
 isso ?? Estou tentando assim...

 // Rodo este primeiro

 { Coloca Texto do RichedText para o TMemoryStream }
 procedure TEmail.PegaTextoRichEdit(RC: TJvRichEdit);
 const
 OffSetMemoryStream : Int64 = 0 ;
 begin
 TEXTO := TMemoryStream.Create ;
 RC.Lines.SaveToStream( TEXTO );
 TEXTO.Position := OffSetMemoryStream ;
 end;

 //Depois a SQL

 Close;
 Sql.Clear;
 Sql.Text := 'INSERT INTO EMAIL VALUES ( :CDEML , :ASSUN , :ANEXO , :TEXTO
 )';
 ParamByName('CDEML').AsInteger := StrToInt( CDEML ) ;
 ParamByName('ASSUN').AsString := Trim( ASSUNTO );
 ParamByName('ANEXO').Value := ColocarValorNulo( ANEXO ) ;
 if TEXTO = nil then
 ParamByName('TEXTO').Value := null
 else
 ParamByName('TEXTO').LoadFromStream( TEXTO , ftFmtMemo );
 ExecSQL;
 Close;

 Ele esta dando um erro assim...
 unknown ISC error 336397210
 unknown ISC error 336397208
 ñ sei o que pode ser Alguem já conseguiu isso... Wesley

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

 


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



 

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3446 (20080916) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com


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



[delphi-br] Campo Blob Calculado

2006-12-06 Por tôpico Marcelo
Amigos da lista bom dia. Preciso da ajuda de vcs.

Estou tentanto criar um campo calculado do tipo Blob Size 80.

Mas quando eu entro no formulário está dando o seguinte erro:

TbNotaVenda: Field 'RetencaoServico' cannot be a calculated o lookup 
field.

Alguém sabe oq é esse erro? É possível criar um campo calculado do tipo 
Blob?

Desde já agradeço a todos;.


RE: [delphi-br] Campo Blob Calculado

2006-12-06 Por tôpico Rubem Nascimento da Rocha
Ora, a mensagem de erro é clara: esse campo Blob (RetencaoServico) não pode 
ser calculado ou de lookup, por ser um campo Blob! Em resumo, campos Blob 
não podem ser calculados ou de lookup. Mais alguma coisa?

Sds.


From: Marcelo [EMAIL PROTECTED]
Reply-To: delphi-br@yahoogrupos.com.br
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Campo Blob Calculado
Date: Wed, 06 Dec 2006 10:30:42 -0200

Amigos da lista bom dia. Preciso da ajuda de vcs.

Estou tentanto criar um campo calculado do tipo Blob Size 80.

Mas quando eu entro no formulário está dando o seguinte erro:

TbNotaVenda: Field 'RetencaoServico' cannot be a calculated o lookup
field.

Alguém sabe oq é esse erro? É possível criar um campo calculado do tipo
Blob?

Desde já agradeço a todos;.

_
MSN Messenger: converse com os seus amigos online. 
http://messenger.msn.com.br



[delphi-br] Campo Blob Calculado

2006-12-06 Por tôpico Marcelo
Amigos da lista bom dia. Preciso da ajuda de vcs.



 Estou tentanto criar um campo calculado do tipo Blob Size 80.

 Mas quando eu entro no formulário está dando o seguinte erro:

 TbNotaVenda: Field 'RetencaoServico' cannot be a calculated o lookup 
 field.

 Alguém sabe oq é esse erro? É possível criar um campo calculado do 
 tipo Blob?

 Desde já agradeço a todos;.







Res: [delphi-br] Campo Blob Calculado

2006-12-06 Por tôpico Ricardo Cesar Cardoso
Somente complementando: não podem ser lookup ou calculados por conta do tamanho 
que podem (ou não) ter. Para o banco não é possível prever o tamanho de um 
campo blob como é feito para um campo do tipo VarChar por exemplo.

- Mensagem original 
De: Rubem Nascimento da Rocha [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 6 de Dezembro de 2006 14:13:15
Assunto: RE: [delphi-br] Campo Blob Calculado









  



Ora, a mensagem de erro é clara: esse campo Blob (RetencaoServico) 
não pode 

ser calculado ou de lookup, por ser um campo Blob! Em resumo, campos Blob 

não podem ser calculados ou de lookup. Mais alguma coisa?



Sds.



From: Marcelo [EMAIL PROTECTED] .com.br

Reply-To: [EMAIL PROTECTED] os.com.br

To: [EMAIL PROTECTED] os.com.br

Subject: [delphi-br] Campo Blob Calculado

Date: Wed, 06 Dec 2006 10:30:42 -0200



Amigos da lista bom dia. Preciso da ajuda de vcs.



Estou tentanto criar um campo calculado do tipo Blob Size 80.



Mas quando eu entro no formulário está dando o seguinte erro:



TbNotaVenda: Field 'RetencaoServico' cannot be a calculated o lookup

field.



Alguém sabe oq é esse erro? É possível criar um campo calculado do tipo

Blob?



Desde já agradeço a todos;.



 _ _ _ _ _ _

MSN Messenger: converse com os seus amigos online. 

http://messenger. msn.com.br






  







!--

#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;}
--







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

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



[delphi-br] Campo Blob IB

2005-10-06 Por tôpico Leandro
Olá,

Estou tentando ler um campo de uma tabela em Interbase, usando IBExpress,
que é do tipo:

OBSERVACOES BLOB SUB_TYPE 0 SEGMENT SIZE 80

No delphi aparece como Blob... só que o valor dele nao aparece no memo que
esta ligado ao mesmo,
nem joga em outro campo usando .asstring, .text, .value.

Como posso lê-lo?


Agradeço a atenção,

Leandro



-- 
 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] Campo Blob

2005-07-28 Por tôpico Eduardo
Alguém saberia me diser , pq isso acontece toda vez que carrego uma tabela que 
tenha o compo BLOB no Interbase/Firebird?

INTERBASE - isc_dsql_allocate_statement
INTERBASE - isc_open_blob
INTERBASE - isc_blob_info
INTERBASE - isc_close_blob
INTERBASE - isc_dsql_free_statement

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





Re: [delphi-br] Campo BLOB - IB Objects

2005-04-18 Por tôpico Evandro - Palas Recife


Quer um conselho de amigo? Evita gravar imagens dentro do teu IB/FB. Pois
isto aumenta consideravelmente o trafego da rede. Eu sugiro um campo CHAR
com o nome/path da figura e uma chamada direta à mesma.

[]'s
Evandro Siqueira
Programador
Palas Informática

- Original Message -
From: Dimas [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Saturday, April 16, 2005 12:58 PM
Subject: [delphi-br] Campo BLOB - IB Objects




Pessoal, alguem trabalha com IB Objects 4.2.i, na parte de campo
BLOB ?
Estou usando o componente TIB_Image porem, nao consigo gravar uma
imagem no formato JPG, BMP..

O campo da minha tabela em FireBird 1.5
BLOB SUB_TYPE 2 SEGMENT SIZE 4096

Obrigado

Dimas Fernando












--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

Links do Yahoo! Grupos















-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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

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

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

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

 





[delphi-br] Campo BLOB - IB Objects

2005-04-16 Por tôpico Dimas


Pessoal, alguem trabalha com IB Objects 4.2.i, na parte de campo 
BLOB ?
Estou usando o componente TIB_Image porem, nao consigo gravar uma 
imagem no formato JPG, BMP..
 
O campo da minha tabela em FireBird 1.5 
BLOB SUB_TYPE 2 SEGMENT SIZE 4096
 
Obrigado
 
Dimas Fernando












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