Journal
Returns the journal text at the specified line index.
StringIndex — the line index (as returned by InJournal, HighJournal, LowJournal, etc.).
After a successful retrieval, the Line* properties are updated with data from the found entry.
Returns an empty string if the line index does not exist. Line* properties are cleared in this case.
Возвращает текст журнала по указанному индексу строки.
StringIndex — индекс строки (как возвращают InJournal, HighJournal, LowJournal и т.д.).
После успешного извлечения свойства Line* обновляются данными из найденной записи.
Возвращает пустую строку, если строка с указанным индексом не существует. В этом случае свойства Line* очищаются.
function Journal(StringIndex: Integer): String;
def Journal(StringIndex: int) -> str: ...
var
i, Lo, Hi: Integer;
begin
Lo := LowJournal;
Hi := HighJournal;
AddToSystemJournal('Journal entries: ' + IntToStr(Hi - Lo + 1));
for i := Hi downto Max(Lo, Hi - 4) do
AddToSystemJournal('[' + IntToStr(i) + '] ' + Journal(i));
end.
lo = LowJournal()
hi = HighJournal()
AddToSystemJournal(f'Journal entries: {hi - lo + 1}')
for i in range(hi, max(lo, hi - 4) - 1, -1):
AddToSystemJournal(f'[{i}] {Journal(i)}')