Алгоритм прост до безобразия, например:
1. Выделите в программе перманентно пустую область
2. Разместите там компонент TImage либо TWebBrowser, или что-нибудь подобное, что может отображать картинки, видео или интернет-страничку.
3. По таймеру подгружайте из жестко закрепленных ссылок (либо динамически со своего сайта загружайте список URL-ов) картинки с рекламой или веб-странички (с соответствующим масштабированием).
4. Если человек купил программу, то отключайте таймер и вышеуказанные компоненты + делайте их невидимыми.
5. Отдельную форму с баннером можете отображать на несколько секунд при закрытии программы.
ЗЫ
Для загрузки используйте нативные функции типа Windows.URLDownload, idHTTP.Get, WebBrowser1.Navigate, либо сторонние компоненты типа Synapse. Желательно все оформить в потоке, чтобы не завешивать прогу при скачке контента.
|