Часть строки в Memo сделать жирным шрифтом

Digetix

Из кода Delphi передаю данные в Memo

TfrxMemoView(frxReport1.FindComponent('Memo3')).Memo[0] := 'Согласно  договора № '+ Edit1.Text +' от '+ #39 + #39+ Day + #39 + #39 + ' '+ Month + ' ' + Year + ' г.';

Как Edit1.Text сделать жирным шрифтом в Memo в дизайнере?

Nightmareterrible

1) Memo1.Text := 'Обычный текст, в котором жирная часть текста';
2) Memo1.AllowHTMLTags := true;

Digetix

Nightmareterrible написал: »

1) Memo1.Text := 'Обычный текст, в котором жирная часть текста';
2) Memo1.AllowHTMLTags := true;

Спасибо, попробую. А подскажете, как в эту жирную часть передать из кода Delphi текст из Edit1.Text ?

TfrxMemoView(frxReport1.FindComponent('Memo3')).Memo[0] := 'Согласно  договора № '+ Edit1.Text +' от '+ #39 + #39+ Day + #39 + #39 + ' '+ Month + ' ' + Year + ' г.';

То есть всю строку передать в Memo, но при этом Edit1.Text сделать в мемо жирной. Пробовал через переменные, не получается

Nightmareterrible

Точно также, это же так просто:
TfrxMemoView(frxReport1.FindComponent('Memo3')).Memo[0] := 'Согласно договора № '+ Edit1.Text +' от '+ #39 + #39+ Day + #39 + #39 + ' '+ Month + ' ' + Year + ' г.';

Не понимаю, что здесь трудного?

Digetix

Nightmareterrible написал: »

Точно также, это же так просто:
TfrxMemoView(frxReport1.FindComponent('Memo3')).Memo[0] := 'Согласно договора № '+ Edit1.Text +' от '+ #39 + #39+ Day + #39 + #39 + ' '+ Month + ' ' + Year + ' г.';

Не понимаю, что здесь трудного?

Оказывается всё просто, огромное Вам спасибо