Page 1 of 1
Запись в обычную книгу...
Posted: 21.08.2011 13:06
by volhram
У вендора продаются обычные книги, как бы для заметок..их три типа.
Хочу скриптом делать и удалять в ней записи....
открывается даблкликом, но курсор в неё не переводится, нужно кликнуть мышкой..
не хочется кликаньем заниматься, есть ли способ забросить курсор в книгу как то иначе?
MenuPresent говорит что это не меню, и GetGumpSerial возвращает ноль..
может кто уже решал эту задачу?)

- 123.JPG (34.38 KiB) Viewed 10872 times
Re: Запись в обычную книгу...
Posted: 21.08.2011 23:55
by Vizit0r
как я уже ответил в асе - нет поддержки книг, и не будет. ибо смысла нет.
Re: Запись в обычную книгу...
Posted: 22.08.2011 7:44
by volhram
Vizit0r wrote:как я уже ответил в асе - нет поддержки книг, и не будет. ибо смысла нет.
я понял...нет и не надо))....может есть хитрое сочетание клавиш, которым курсор в книгу забрасывается....хотел народ послушать.
ну если нету....найдём другой способ...
потестил доску объявлений, нормальный гамп...обойдусь им
Re: Запись в обычную книгу...
Posted: 22.08.2011 11:12
by Vizit0r
куда можно забросить курсор, если ни один из пакетов книги вообще не обрабатывается?

Стелс вообще не знает, что такое книги...
Re: Запись в обычную книгу...
Posted: 22.08.2011 17:01
by volhram
что бы новую тему не заводить...
скрипт второй раз слетает, не понял пока в чём дело но в систем-журнал пишет
Exception: List index out of bounds (0) at 34.1072
Re: Запись в обычную книгу...
Posted: 22.08.2011 18:19
by Vizit0r
Re: Запись в обычную книгу...
Posted: 23.08.2011 9:14
by Fenix
Если не ошибаюсь, данная ошибка происходит при выходе за границы списка. Тобишь обращаешься по индексу, которого в списке нет.
Re: Запись в обычную книгу...
Posted: 23.08.2011 20:43
by volhram
всё в порядке, Vizit0r хорошую ссылку дал, я разобрался...
читал многостраничный гамп и заносил в список...забыл на сейв проверку поставить....видимо страница гампа не сменялась вовремя, а потом я пытался читать список....в котором пусто
Re: Запись в обычную книгу...
Posted: 23.08.2011 23:55
by Vizit0r
и список по окончанию использования освобождать не забудь...
Re: Запись в обычную книгу...
Posted: 28.08.2011 1:50
by volhram
научите как этим пользоваться?
property Objects[Index: Integer]: TObject; // Открывает доступ к объекту, связанному со строкой с индексом Index
хотя бы пару строк...
хочу с UseObject() использовать...
но несоответствие типов...
Re: Запись в обычную книгу...
Posted: 28.08.2011 2:42
by Vizit0r
Code: Select all
Program New;
var b,c : TStringList;
begin
b := TStringList.Create;
c := TStringList.Create;
c.Add('test');
c.Add('test2');
b.AddObject('1',TObject(c));
AddToSystemJournal(TStringList(b.Objects[0]).Strings[0]);
AddToSystemJournal(TStringList(b.Objects[0]).Strings[1]);
b.Free;
c.Free;
end.
01:37:54:515 [Local - Test2]: Compiling
01:37:54:531 [Local - Test2]: Compiled succesfully
01:37:54:531 [Local - Test2]: test
01:37:54:531 [Local - Test2]: test2
01:37:54:531 [Local - Test2]: Succesfully executed
01:37:54:531 [Local - Test2]: Script 1313.sc stopped successfuly
с UseObject вряд ли получится, разве что через костыли вроде тех, что я описал. Ни строку, ни число паскальскрипт в кач-ве TObject не принимает, в отличие от дельфей.
Re: Запись в обычную книгу...
Posted: 28.08.2011 12:32
by volhram
решил проблему...спасибо)