Delphi.TRichView. Сохраняем TAudioPanel как тег audio

Я разбил эту статью на 2 части. Одна из них – научимся в принципе сохранять не текстовые элементы (item) в HTML, другая – сохраним ранее созданный контрол TAudioPanel как тег audio. Наша задача получить такой результат

5

 

8

Сохраняем не текстовые элементы в HTML

Пусть у нас есть некоторый контрол, добавленный в TRichView

5

 

Наша задача сделать так…

6

 

Я не сразу пришел к простому решению, но Вам покажу его сразу, так как оно очевидное, и не стоит на этом терять много времени. Итак, что нам понадобится?

Событие OnSaveItemToFile. В справке написано (completely change HTML code for certain items using OnSaveItemToFile event;). Вот какой пример дается в самой справке.

Example 2: saving pictures as ‘<PIC>’ (in text files, HTML and RTF)

Что у нас в данном отрезке кода? В параметр OutStr мы выводим необходимую нам строку, если элемент является картинкой и сохраняемый формат является HTML.

Также интересно заглянуть на страницу констант.

7

Действуя по аналогии, в нашей программе мы можем объявить вот такое событие

Вставляем тег audio

Я думаю Вы уже догадались как вставить тег аудио, чтобы получить вот такой результат

8

 

Это можно сделать, например так…

И присвоить событие например в OnCreate

Сам обработчик сохранения в HTML выглядит следующим образом

Вот в принципе и всё !!! Ничего такого сложного.

This entry was posted in Delphi. Bookmark the permalink.