Мне нужно научиться вставлять HTML текст в TRichViewEdit, так чтобы потом он корректно отображался в браузере. Подробную инструкцию о том как этого добиться, я увидел здесь.
В сущности, нужно следующее
|
1 2 3 4 5 6 7 8 9 10 11 |
In TRVStyle, add item in TextStyles collection, set its Options property > > to > > > > [rvteoHTMLCode]. Remember its index in the collection. > > > > (for example, HTMLCodeStyleNo). > > > > Then, for example, make a command "Insert HTML Code", > > > > > > > > RichViewEdit.CurTextStyleNo := HTMLCodeStyleNo; > > > > RichViewEdit.InsertText('ENTER YOUR HTML CODE HERE'); > > > > > > > > Text of this style will be saved in HTML without replacing <>& |
Или по русски, подробно и с картинками…
В компоненте RVStyle необходимо создать новый стиль, и добавить в его опции rvteoHTMLCode…
RVStyle>>TextStyles>>Add
Как этим пользоваться?
|
1 2 3 4 5 6 7 8 |
procedure TMainForm.bTestClick(Sender: TObject); begin RichViewEdit1.GetCurrentItem.StyleNo:=6; //rvActionsResource.rvActionInsertTable1.ExecuteTarget(RichViewEdit1); end; |
И вот какой результат у нас получится после сохранения в HTML формат