Transferir conteúdo de texto
Bom dia pessoal.
Estou com uma situação. Tenho um DBRichEdit com um texto formatado e preciso transferir esse texto para um RichEdit.
Tento assim:
DBRichEdit1.SelectAll;
DBRichEdit1.CopyToClipboard;
RichEdit1.PasteFromClipboard;
Só que tem vezes que funciona e outras não.
Alguém tem alguma ideia?
Estou com uma situação. Tenho um DBRichEdit com um texto formatado e preciso transferir esse texto para um RichEdit.
Tento assim:
DBRichEdit1.SelectAll;
DBRichEdit1.CopyToClipboard;
RichEdit1.PasteFromClipboard;
Só que tem vezes que funciona e outras não.
Alguém tem alguma ideia?
Leandro Carvalho
Curtidas 0
Respostas
Emerson Nascimento
04/08/2020
algo assim não funciona?
RichEdit1.Text := DBRichEdit1.Text
ou ainda:
RichEdit1.Text := DBRichEdit1.Field.AsString;
RichEdit1.Text := DBRichEdit1.Text
ou ainda:
RichEdit1.Text := DBRichEdit1.Field.AsString;
GOSTEI 0
Leandro Carvalho
04/08/2020
algo assim não funciona?
RichEdit1.Text := DBRichEdit1.Text
ou ainda:
RichEdit1.Text := DBRichEdit1.Field.AsString;
RichEdit1.Text := DBRichEdit1.Text
ou ainda:
RichEdit1.Text := DBRichEdit1.Field.AsString;
O primeiro não vem a formatação.
Esse deu certo: RichEdit1.Text := DBRichEdit1.Field.AsString;
Porém preciso fazer o inverso.
DBRichEdit1.Field.AsString := RichEdit1.Text;
Já nessa situação não funcionou, não vem a formatação.
GOSTEI 0