Passar conteúdo para um campo Memo em tempo de execução

[vinizioWOW]

Boa tarde pessoal,

estou executando o seguinte código:

TabGlobal.Dminhatabela.Abrir;
TabGlobal.Dminhatabela.Inclui(nil);
TabGlobal.Dminhatabela.sequencia.Conteudo := sequencia;
TabGlobal.Dminhatabela.item.Conteudo := i;
for z := 0 to Memo1.Lines.Count - 1 do
TabGlobal.Dminhatabela.texto.Conteudo.Add(Memo1.Lines.Strings[z]);
TabGlobal.Dminhatabela.Salva;

No código em vermelho estou tentando passar um texto para o Conteúdo de um campo Memo, que todos sabem, no Xmaker é um StringList.
Já tentei de tudo mas não salva. O Registro é salvo mas o conteudo do campo memo fica vazio...

Alguém ai tem um exemplo para me passar?

[Gilberto]

Estava tendo problemas em gravar campos memo.
Resolvi alterando a rotina "depois de modificar" incluindo o CommitRetaining conforme abaixo:

procedure TFormPagamentos.DepoisdeModificar;
begin
if TabelaPrincipal.State in [dsEdit] then
begin
TabelaPrincipal.Post;
TabelaPrincipal.Transaction.CommitRetaining;
end;
end;


Att
Gilberto