Texto de um memo para um Campo BLOB

Question

Ol�,Gostaria de saber como fa�o para salvar em um campo BLOB do SQL Server um texto que est� em um componente MEMO. Como seria a rotina? Qual deve ser o tipo do campo? Text ou NText ? Gostaria tamb�m ...

Ivanh · Answer

[code:1:66522790bf]tabelaCAMPOBLOB.Assign(Memo1.Lines);Memo1.Lines.Assign(tabelaCAMPOBLOB);[/code:1:66522790bf]...

Ricobv · Answer

[quote:b75ec8c5e2=�ivanh�][code:1:b75ec8c5e2]tabelaCAMPOBLOB.Assign(Memo1.Lines);Memo1.Lines.Assign(tabelaCAMPOBLOB);[/code:1:b75ec8c5e2][/quote:b75ec8c5e2]Ok, mas como fa�o isso utilizando uma query??...

Ivanh · Answer

[code:1:1ac760b8ca]Memo1.Lines.Assign(TBlobField(Fields&#91;0&93;));[/code:1:1ac760b8ca]...

Ricobv · Answer

[quote:4e1b0b18b3=�ivanh�][code:1:4e1b0b18b3]Memo1.Lines.Assign(TBlobField(Fields&#91;0&93;));[/code:1:4e1b0b18b3][/quote:4e1b0b18b3]Vou tentar isso. Valeu pela ajuda!!P.S.: Se outra pessoa conhecer algum outro modo, pode dizer....

Ricobv · Answer

Tentei a solu��o indicada, mas n�o funcionou corretamente. Algu�m sabe ma outra solu��o? Estou precisando com urg�ncia mesmo...Grato....

Ivanh · Answer

Seja mais claro entao. Mande um pedaco de codigo.Qual erro ocorre?...

Ricobv · Answer

[quote:2e61cc1989=�ivanh�]Seja mais claro entao. Mande um pedaco de codigo.Qual erro ocorre?[/quote:2e61cc1989]Aqui est� um trecho do comando:with Query1 dobegin  Close;  Clear;  SQL.Add(�Insert into Produto (Observacao)�);  SQL.Add(�Values (:vObservacao)�);  //aqui preciso atribuir ao par�metro o conte�do do memo  ExecSQL;end;O que quero saber � como atribuir o conte�do do memo ao par�metro indicado. Estou utilizando os componentes da paleta ADO.Grato....

Ivanh · Answer

Ahhhh Agora entendi.Acho que vc vai ter que usar um componente de acesso.Por comando sql acho q nao tem como!...

Ricobv · Answer

[quote:fd70f318c3=�ivanh�]Ahhhh Agora entendi.Acho que vc vai ter que usar um componente de acesso.Por comando sql acho q nao tem como![/quote:fd70f318c3]S� tem essa maneira mesmo? N�o h� nenhuma outra?...

Kapak · Answer

Colega, tente assim e veja se funciona:[code:1:69a97169e1]var MS:TMemoryStream;begin  MS := TMemoryStream.Create;  Memo1.Lines.SaveToStream(MS);  Query1.ParamByName(�vObservacao�).LoadFromStream(MS, ftMemo);  Query1.ExecSql;  MS.Free;end;[/code:1:69a97169e1]...

Ricobv · Answer

[quote:6315e1288d=�kapak�]Colega, tente assim e veja se funciona:[code:1:6315e1288d]var MS:TMemoryStream;begin  MS := TMemoryStream.Create;  Memo1.Lines.SaveToStream(MS);  Query1.ParamByName(�vObservacao�).LoadFromStream(MS, ftMemo);  Query1.ExecSql;  MS.Free;end;[/code:1:6315e1288d][/quote:6315e1288d]Funcionou!! Muito obrigado!...

Mais Dominio · Answer

Ol�,Migrei um sistema do delphi xe2 para o delphi Rio. Usamos o banco de dados firebird. Ap�s a migra��o alguns dados n�o est�o sendo salvos em campos blob. Usamos componentes da paleta interbase com o componente dbMemo ligado por datasource � ibquery. O registro � salvo em todos os campos de outros tipos exceto nos campos blob. Podem ajudar?...

F�rum Texto de um memo para um Campo BLOB #287563