MyChat Scripts: функція mDBStorageSetData, зберегти в базу дані за ключем
Зберегти рядок у вбудовану базу даних за вказаним ключем.
Синтаксис
function mDBStorageSetData(sKey, sData: string): integer;
Параметри та значення, що повертаються
|
Параметр |
Тип |
Значення |
|
sKey |
string |
текстовий ключ, за яким відбуватиметься запис даних. Регістр літер має значення, обмежень на назви немає; |
|
sData |
string |
вміст ключа, текстовий рядок. Може бути порожнім. |
Результат функції
|
0 |
функція виконана успішно; |
|
-1 |
значення ключа не може складатися із пробілів або бути порожнім. |
Приклад
const
TOTAL = 12;
var
i: integer;
sKey, sData: string;
dt: double;
begin
mLogScript('Start saving month names to database...', '');
for i := 1 to TOTAL do begin
dt := EncodeDate(2018, i, 1);
sData := FormatDateTime('mmmm', dt); // name of month
mDBStorageSetData('month_name_' + IntToStr(i), sData);
end;
mLogScript('Ready. Start reading:', '');
for i := 1 to TOTAL do begin
sKey := 'month_name_' + IntToStr(i);
mLogScript('Key: ' + sKey + ', value: "' + mDBStorageGetData(sKey) + '"', '');
end;
end.
Результат роботи скрипту
[19:36:15] (Log "DBStorage"): Start saving month names to database...
[19:36:15] (Log "DBStorage"): Ready. Start reading:
[19:36:15] (Log "DBStorage"): Key: month_name_1, value: "Січень"
[19:36:15] (Log "DBStorage"): Key: month_name_2, value: "Лютий"
[19:36:15] (Log "DBStorage"): Key: month_name_3, value: "Березень"
[19:36:15] (Log "DBStorage"): Key: month_name_4, value: "Квітень"
[19:36:15] (Log "DBStorage"): Key: month_name_5, value: "Травень"
[19:36:15] (Log "DBStorage"): Key: month_name_6, value: "Червень"
[19:36:15] (Log "DBStorage"): Key: month_name_7, value: "Липень"
[19:36:15] (Log "DBStorage"): Key: month_name_8, value: "Серпень"
[19:36:15] (Log "DBStorage"): Key: month_name_9, value: "Вересень"
[19:36:15] (Log "DBStorage"): Key: month_name_10, value: "Жовтень"
[19:36:15] (Log "DBStorage"): Key: month_name_11, value: "Листопад"
[19:36:15] (Log "DBStorage"): Key: month_name_12, value: "Грудень"
[19:36:15] (Run "DBStorage"): Час виконання скрипту: 199 мс
[19:36:15] (Run "DBStorage"): Скрипт виконано успішно.