RU/2: Форум. Общение пользователей и разработчиков OS/2 (eCS). : Ответить на сообщение
Имя:
e-mail:
FIDO:
Home page:
сохранить данные о вас
Тема:
> > Ну, вот такой скрипт у меня фон десктопа меняет: > > > > /* -- Changing desktop background -- */ > > > > path = "C:\OS2\BITMAP\DESKBACK\*.bmp" > /* > > timeout = 600 > */ > > > > call rxFuncAdd "SysLoadFuncs" , "RexxUtil" , "SysLoadFuncs" > > call SysLoadFuncs > > > /* > > do forever > */ > > rc = SysFileTree( path , "files" , "OF" ) > /* > > do i = 1 to files.0 > */ > i=random(1, files.0) > > rc=SysSetObjectData("<WP_DESKTOP>","BACKGROUND="||files.i||",N,1,I") > /* > > call SysSleep timeout > > end > > end > */ > > > > А сетап-стринги для различных типов объектов есть в доках к XFolder'у. (XWorkplace). Я там смотрел. > Ага! Вот оно! > Именно это я и хотел сделать, тока с небольшими доработками: типа, читаем ЕА .LastMode, если нет такого, ставим бимап растянутым 1х1, перед загрузкой нового, старому привинчиваем ЕА .LastMode, с информацией и режиме натягивания. А запускать скрипт объектом WPS по расписанию (у меня EBCSheduler).
_, _, _,
/ \ (_ / ~ )
\ / , ) / /
~ ~ ~~~
Programmed by
Dmitri Maximovich
,
Dmitry I. Platonoff
,
Eugen Kuleshov
.
25.09.99 (c) 1999,
RU/2
. All rights reserved.
Rewritten by
Dmitry Ban
. All rights ignored.