Название: res8
Версия: 1.0
Автор: YellowAfterlife
Описание: Эта библиотека реализует простой интерфейс для чтения строк из файлов в кодировке UTF-8 (в основном вам это может понадобится для корректной загрузки русского текста). Библиотека в основном предназначена для пользователей MidletPascal3.*, поскольку в нем загрузка русского текста из файла не представляется возможной.
Скачать:
(ссылка) (mirror - см. вложения)
Функции:
res8.load(filename: string) - загружает в память строки из файла.
res8.unload - выгружает строки из памяти (освобождая ее).
res8.loaded: integer - возращает, загружены ли строки.
res8.length: integer - возращает количество строк.
res8.line(index: integer): string - возращает строку с указанным индексом
|
Пример кода:
program res8;
uses res8;
var
tmp: resource;
str: string;
i, h: integer;
begin
// Загружаем строки:
res8.load('/data.txt'); // файл с текстом
// Выводим все на экран:
setColor(42, 42, 42);
fillRect(0, 0, getWidth, getHeight);
setColor(240, 240, 240);
h := getStringHeight('');
for i := 1 to res8.length do
drawText(res8.line(i), 4, 4 + (i - 1) * h);
rePaint;
// Выгружаем строки (если они больше не нужны):
res8.unload;
// Ждем.
repeat delay(1000); forever;
end.
__________________
Мой сайт-блог. Игры, обновления, примеры для Haxe, JavaScript(+HTML5), GameMaker, Love2d...