Como Salvar o TMemo no banco de dados

Delphi

21/08/2015

Galera bom dia, não estou conseguindo salvar um Memo no banco de dados usando o Button.

o comando no Button entra assim:


DMBancos.IBTable1.Insert; 

DMBancos.IBTable1.FieldByName('PRESCRICAO').Assign(medPrescricao.lines);

DMBancos.IBTable1.post;



Alguém pode me ajudar?
Rodrigo Carlos

Rodrigo Carlos

Curtidas 0

Respostas

Thiago Santana

Thiago Santana

21/08/2015

Qual erro é gerado?
Posta aqui pra facilitar!
GOSTEI 0
Rodrigo Carlos

Rodrigo Carlos

21/08/2015

Opa o erro este

Assign a tmemo tstrings a tstringfield
GOSTEI 0
Thiago Santana

Thiago Santana

21/08/2015

Se o seu campo no banco de dados for string tenta assim:


DMBancos.IBTable1.FieldByName('PRESCRICAO').Assign(medPrescricao.Lines.Text);


GOSTEI 0
Rodrigo Carlos

Rodrigo Carlos

21/08/2015

Não foi, da o seguinte erro.

[dcc32 Error] untFrmPrescricao.pas(84): E2014 Statement expected, but expression of type 'TStrings' found
GOSTEI 0
Rodrigo Carlos

Rodrigo Carlos

21/08/2015

Não foi, da o seguinte erro.

[dcc32 Error] untFrmPrescricao.pas(84): E2014 Statement expected, but expression of type 'TStrings' found
GOSTEI 0
Thiago Santana

Thiago Santana

21/08/2015

Tenta assim:
DMBancos.IBTable1.FieldByName('PRESCRICAO').AsString := medPrescricao.Lines.Text
;

Vai depender do tipo que está seu campo no BD!
GOSTEI 0
Rodrigo Carlos

Rodrigo Carlos

21/08/2015

Boa tarde!

Muito obrigado, deu certo.

Valeu mesmo.
GOSTEI 0
POSTAR