MSL: функція mGetAdvOptions, отримати налаштування рекламного HTML-банеру для користувачів
Отримати налаштування рекламного HTML-банера, вбудованого в MyChat Client. Банер може бути будь-яким HTTP(s) посиланням або html-файлом, розташованим у папці "C:\ProgramData\All Users\MyChat Server\node\userdata\".
Синтаксис
procedure mGetAdvOptions(var bEnable: boolean; var sAdvLink: string; var iAdvHeight, iAdvQuantity: integer);
Параметри та значення, що повертаються
|
Параметр |
Тип |
Значення |
|
var bEnable |
boolean |
увімкнено або вимкнено банер в даний момент; |
|
var sAdvLink |
string |
ім'я файлу або HTTP(s) посилання для банера; |
|
var iAdvHeight |
integer |
розмір банера у точках по вертикалі; |
|
var iAdvQuantity |
integer |
частота, з якою програма користувача повинна оновлювати банер із сервера, у хвилинах. |
Приклад
var
bEnable: boolean;
sAdvLink: string;
iAdvHeight, iAdvQuantity: integer;
begin
mGetAdvOptions(bEnable, sAdvLink, iAdvHeight, iAdvQuantity);
if bEnable then begin
mLogScript('MyChat adverts engine enabled', '');
mLogScript('Link or filename: "' + sAdvLink + '"', '');
mLogScript('Banner height in pixels: ' + IntToStr(iAdvHeight), '');
mLogScript('Updates quantity, every ' + IntToStr(iAdvQuantity) + ' minutes', '');
end else mLogScript('MyChat adverts engine disabled', '');
end.
Результат роботи скрипту
[15:48:08] (Log "mGetAdvOptions"): MyChat adverts engine enabled
[15:48:08] (Log "mGetAdvOptions"): Link or filename: "example.html"
[15:48:08] (Log "mGetAdvOptions"): Banner height in pixels: 60
[15:48:08] (Log "mGetAdvOptions"): Updates quantity, every 90 minutes
[15:48:08] (Run "mGetAdvOptions"): Час виконання скрипту: 8 мс
[15:48:08] (Run "mGetAdvOptions"): Скрипт виконано успішно.