Как достать цифры из журнала

[shinma]

Есть нечто такое
s:=Journal(InJournalBetweenTimes('available in about',jtime,now));
после этой фразы идет однозначное или двухзначное число.
Как можно это число красиво забрать в переменную integer.
Заранее спасибо.

[Vizit0r]

парсить ручками.

[shinma]

for i to lengt(s)
? так чтоль. Я просто думал куда нить подальше отойти от этого примитива.

[Vizit0r]

я могу прокинуть в скрипт функцию
function DeFormat(const Str : string; const Format: string; Args : array of const) : integer;


как оно в стелсе используется (парсинг элемента buttontileart в гампе)

Code: Select all

                            DeFormat(SubCommand,'%d %d %d %d %d %d %d %d %d %d %d',
                                     [@x,@y,@released_id,@pressed_id,
                                      @quit,@page_id,@return_value,
                                      @art_id,@Hue,@art_x,@art_y]);

но оно совсем не такое универсальное и всеядное, как scanf в сях.

[shinma]

будет кульно

[shinma]

Почему не могу задействовать такой код

const
MasNumb : array[1..10] of string = ('1','2','3','4','5','6','7','8','9','0');

как его сделать через var я знаю. Просто интересно почему с константами так не работает.

[Vizit0r]

пакс позволяет вроде.