CAMPO TStringList

[dreamsoft_PR]

OI omo faço para pegar de um campo normal para um variavel tipo TStringList

 

esta dando como nao compativel 

var

_CamposVazios: TStringList;

begin

_CamposVazios := dmFiscal.cdsNFSeTXT.AsString;

[dreamsoft_PR]

na verdade é salvar um memo no campo  formato blob subtype text 

 

var

texto:TMemoryStream;

begin

    

 

 Memo3.Lines.LoadFromFile('C:\teste.tx2');
     texto := Tmemorystream.Create;
       Memo3.Lines.SaveToStream(texto);
       dmFiscal.cdsNFSeTXT.LoadFromStream(texto);

 

so que da erro 

[dreamsoft_PR]

ja tentei assim 

 

TBlobField(dmFiscal.cdsNFSeTXT).LoadFromFile('C:\Dream Soft\Coram Deo\NFSe\arquivos\NFSE'+IntToStr( dmFiscal.cdsNFSeID_LOTE.AsInteger)+'.tx2');

Editado 19 Março, 2019 por dreamsoft_PR

[dreamsoft_PR]

na verdade um um erro "table inknown for"  ja  pesquisei.. ja colqouei tudo maiúsculo e nao vai  (sql) 

 

[Juliomar Marchetti]

Explica o que quer fazer e porque?

[datilas]

11 horas atrás, dreamsoft_PR disse:

na verdade é salvar um memo no campo  formato blob subtype text 

 

var

texto:TMemoryStream;

begin

    

 

 Memo3.Lines.LoadFromFile('C:\teste.tx2');
     texto := Tmemorystream.Create;
       Memo3.Lines.SaveToStream(texto);
       dmFiscal.cdsNFSeTXT.LoadFromStream(texto);

 

so que da erro 

ja tentou assim?

dmFiscal.cdsNFSeTXT.AsString := Memo3.Text;

[dreamsoft_PR]

o campo na base é um blob 

mas pode ser por conta de outro erro , vou ver o que esta causando isso . obrigado

10 horas atrás, Juliomar Marchetti disse:

Explica o que quer fazer e porque?

vou pegar o resultado o (xml) e salvar em forma de txt no campo 

[dreamsoft_PR]

deu certo fiz assim 

 

  TBlobField(dmFiscal.cdsInse_NFSeTXT).LoadFromFile('C:\Dream Soft\Coram Deo\NFSe\arquivos\NFSE'+IntToStr( dmFiscal.cdsNFSeID_LOTE.AsInteger)+'.tx2');

[Felipe E. Resende Mesquita]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.