MyChat Scripts: функция LoadTextFromFile, загрузить текст из файла
Загрузить содержимое текстового файла в переменную типа string с указанием кодировки файла.
Синтаксис
function LoadTextFromFile(sFileName: string; iEncodingType: integer): string;
Параметры и возвращаемые значения
|
Параметр |
Тип |
Значение |
|
sFileName |
string |
имя текстового файла с полным путём к нему; |
|
iEncodingType |
integer |
тип кодировки файла, число. |
Результат функции
Если файл существует и прочитался без ошибок, функция вернёт его содержимое, иначе будет возвращена пустая строка.
Пример
Функция читает содержимое текстового файла в формате UTF-8 из C:\Temp\testmessage.txt, затем выводит результат в консоль, используя декодирование и не используя его (файл должен существовать, можете создать его вручную для теста или скачать).
const
TEST_FILE = 'c:\temp\testmessage.txt';
var
s: string;
begin
if FileExists(TEST_FILE) then begin
s := LoadTextFromFile(TEST_FILE, 0);
mLogScript(s, 'AS IS');
s := LoadTextFromFile(TEST_FILE, 6);
mLogScript(s, 'UTF8');
end;
end.
Результат работы скрипта
[11:09:22] (Log "LoadTextFromFile"): [AS IS] Привет! Рто тестовое сообщение РІ формате UTF8!
[11:09:22] (Log "LoadTextFromFile"): [UTF8] Привет! Это тестовое сообщение в формате UTF8!
[11:09:22] (Run "LoadTextFromFile"): Время выполнения скрипта: 6 мс
[11:09:22] (Run "LoadTextFromFile"): Скрипт выполнен успешно.