Page 1 of 1

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

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

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

Posted: 19.02.2013 10:28
by Vizit0r
парсить ручками.

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

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

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

Posted: 19.02.2013 11:40
by 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 в сях.

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

Posted: 19.02.2013 12:50
by shinma
будет кульно

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

Posted: 20.02.2013 7:07
by shinma
Почему не могу задействовать такой код

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

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

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

Posted: 20.02.2013 10:05
by Vizit0r
пакс позволяет вроде.