Отправляет email-рассылки с помощью сервиса Sendsay

[TC] Как слушать и записывать спектакли на "старом радио".

Приветствую вас, уважаемые участники дискуссионного листа.

Тут совсем недавно была дискуссия на тему: как слушать и чем возможно
записать спектакли с сайта "старое радио".
Я выложил программу, "Screamer radio", в которой можно выбрать радиостанцию,
слушать её
и записать в свою папку. Туда можно добавить свои любимые радиостанции
(там помимо старого радио находятся ещё несколько станций).
Может кто-либо тоже пополнит эту программу своими любимыми станциями и
перевыложит её.
А вот прямая сылка на программу:
http://dl.dropbox.com/u/6450333/Screamer%20radio%20v%204%201%20portable%20with%20russian%20language.exe

Для установки просто запустите файл и после распаковки на "рабочем
столе" появится ярлык для запуска этой программы.

Ответить   Wed, 28 Apr 2010 17:04:56 +0400 (#1061973)

 

Ответы:

всем привет!
подскажите пожалуйста глупому юзеру, как просмотреть события в скайпе.
благодарю всех откликнувшихся.

с уважением, надежда.

Ответить   Wed, 28 Apr 2010 19:42:13 +0400 (#1062017)

 

Всем по привету и вам Надежда! Вы пишете : подскажите пожалуйста глупому
юзеру, как просмотреть события в скайпе.

Всё очень просто - если есть скрипты - то в окошке программы нажимаем
комбинацию ctrl+1 или 2 и так далее , всё зависит от того какая версия
скайпа и сколько вкладок в меню вид включено , таким образом вы попадёте на
вкладку история - здесь вертикальными стрелками всё увидите. Второй
вариант - если нету скриптов - то стандартно контрол табом выходите на
вкладку история и так же просматриваете её. Со всем почтением sambukas

Ответить   Wed, 28 Apr 2010 19:56:32 +0300 (#1062155)

 

приветствую.
в скрипте работаю с полем "тема:" , приложение outlook express.
окно письма , где в поле "тема:" есть нужный мне текст.
итак, стою на строке "тема:" , и причём jaws курсором на нужном (начальном) символе
, и хочу выделить всё до конца

строки начиная с jaws курсора.
для этого стоя на нужном начальном символе зажымаю левую кнопку мыши по "LeftMouseButtonLock
()
" и далее хочу отметить всё до конца по "JawsEnd ()
".
всё хорошо, но к моему огорчению последний символ в строке остаётся не отмеченным.
всеголишь одна буква (символ) не отмечен, но не порядок.
как сделать и чем чтобы в поле "тема:" всё отмечалось до самого конца начиная
от положения jaws курсора.
илиже передовалось как значение string какой нибудь функцией или скриптом.
ведь естьже функция "SayFromCursor ()"?
хотя в каком я поле нахожусь не имеет значение.
аналогичная сетуация происходит и в поле "дата:".
может есть более правельный путь решения этой проблемы?
за ранее спасибо тем кто ответит.

Ответить   "evgeniy" Wed, 28 Apr 2010 18:22:33 +0400 (#1062035)

 

Привет Евгений!

ц

как сделать и чем чтобы в поле "тема:" всё отмечалось до самого конца начиная

от положения jaws курсора.

это не правильный путь.

к JAWS курсору вообще стоит прибегать только когда PC невидимый и прочие методы
не помогли.

ц

илиже передовалось как значение string какой нибудь функцией или скриптом.

тоесть вам нужно из любого места считать тему письма.

вы пишите письмо или отвечаете на письмо или просто нажали на нём энтер.

тогда получаем что поле темы имеет контрол ид 1004

и скрипт читающий содержимое поля темы не взирая что тема видна на экране не
полностью выглядит например так:

Script SayFieldTheme ()

var

handle hWND,

string str

let hWND=FindDescendantWindow (GetRealWindow (GetCurrentWindow ()), 1004)

if hWnd then

SaveCursor ()

InvisibleCursor ()

MoveToWindow (hWND)

let str =GetObjectValue (1, 0)

RestoreCursor ()

SayString (str )

EndIf

EndScript

функция SayString приведена для простоты восприятия, в реальных скриптах используйте
функцию Say

так же скорее всего есть более простой вариант, но функция

GetObjectValue (1, 0)

первой дала искомый результат и я далее не стал пробовать.

Виктор Горелов

Ответить   Wed, 28 Apr 2010 20:16:45 +0400 (#1062101)

 

Доброго времени суток, Виктор и Евгений.

Из сообщения от 28.04.2010 19:20:

Используя msaa:

include "msaaConst.jsh"

Script SayFieldTheme ()
var
handle hWND,
int cID,
object o

let hWND=FindDescendantWindow (GetRealWindow (GetCurrentWindow ()), 1004)
if hWnd then
let o = GetObjectFromEvent (hWnd, OBJID_WINDOW , cID,
0).accNavigate(NAVDIR_FIRSTCHILD , 0)
if o then
sayString(o.accValue)
endIf
endIf
EndScript

С уважением, Руслан Усачев

Ответить   Wed, 28 Apr 2010 20:47:46 +0300 (#1062246)

 

Приветствую всех.
Руслан пишет:

Нельзя ли прокомментировать, зачем через OBJID_WINDOW?
Ведь
say(GetObjectFromEvent (hWnd, OBJID_CLIENT, 0, 0).accValue,ot_user_requested_information)
работает.
Кроме того, тему можно взять из заголовка окна (тоже через MSAA), тогда можно
вообще обойтись без ID элемента управления и функции Find...

Успехов. Анатолий.

Ответить   "i_chay" Thu, 29 Apr 2010 02:38:33 +0400 (#1062425)

 

приветствую.
Виктор Горелов пишет:

тоесть вам нужно из любого места считать тему письма.

вы пишите письмо или отвечаете на письмо или просто нажали на нём энтер.

тогда получаем что поле темы имеет контрол ид 1004

и скрипт читающий содержимое поля темы не взирая что тема видна на экране не
полностью выглядит например так:
точка точка точка

очень признателен за такой подробный ответ.
но немного поясню мою проблему:
письмо в списке писем открывается по "enter" , и мне надо из поля "тема:" взять
только нужные мне символы, точнее то что идёт после
закрывающийся квадратной скобки, конечно если она присутствует в этом поле.
так сказать произвести выборочное копирование.
тем самым возникает вопрос а как мне узнать сколько символов (знаков) находится
в текущий момент в string

переменной, содержащей поле "тема:"?
а также как из этой переменной выделять отдельные символы для проведения сравнения
с квадратной закрывающийся

скобкой?
и после того как я найду её перенести оставшыеся символы в другую string переменную,
предназначеную для
окончательной переменной "темы:", которая и будет вставлена в ответное письмо?
за ранее благодарю за ответы.

Ответить   "evgeniy" Thu, 29 Apr 2010 17:15:00 +0400 (#1063113)

 

Привет Евгений!
ц
мне надо из поля "тема:" взять
только нужные мне символы, точнее то что идёт после
закрывающийся квадратной скобки, конечно если она присутствует в этом поле.
в этот раз ответ будет не столь подробным,
вот например конструкция отрезающая от начала строки всё по квадратную закрывающуюся
скобку включая и её саму
let str =stringChopLeft (str, StringLength (StringSegment (str , "]", 1))+1)

но вот если как в том письме на которое я вам отвечаю тема имеет два раза квадратные
скобки
Re: [TC] Re[2]: проблема с отметкой последнего символа в строке при выполнении
скрипта

тут предлагаю вам поэксперементировать самостоятельно.
вообще подобное скриптование дело не благодарное и представьте что в теме тоже
прописали скобку и тогда может стереть по эту скобку.
тоесть я бы просто по старинке стирал вручную и не парился.

ц
так сказать произвести выборочное копирование.
обрезаете строку как вам нужно и вставляете переменную в поле
например так:
TypeString (str)

но для этого вы должны находится в поле редактирования и выделить всё его содержимое,

например вот так:

TypeKey (cksControlA)

TypeKey (cksDelete)
(впрочем удалять не обязательно, вставляемая строка по идее сотрёт всё что выделено.)
не забыв написать проверку текущего окна что это поле темы чтобы не стереть например
письмо.

ц
а как мне узнать сколько символов (знаков) находится
в текущий момент в string
выше в составе конструкции была функция
StringLength
дословно с английского
длина строки.
Виктор Горелов

Ответить   Thu, 29 Apr 2010 18:23:33 +0400 (#1063145)

 

всем здравствовать.
если кто имеет опот оформления и печати на принтере конвертов помогите как с
софтом, так и с настройками , а также практическими советами.
типа какие конверты лучше подходят для этих целей и прочее.
за ранее спасибо.

Ответить   "evgeniy" Fri, 30 Apr 2010 12:24:18 +0400 (#1063961)

 

Salve, evgeniy!

Вы писали 30 апреля 2010 г., 12:24:18:

Любые стандартные, лишь бы Ваш принтер умел на них печатать. Никакого
спецсофта не требуется. Выставляем в настройка принтера тип бумаги -
конверты нужного формата, выставляем под этот формат направляющие
лотка подачи бумаги и печатаем.

Ответить   Fri, 30 Apr 2010 13:24:55 +0400 (#1064058)

 

приветствую.
Виктор Горелов пишет:

тут предлагаю вам поэксперементировать самостоятельно.
вообще подобное скриптование дело не благодарное и представьте что в теме тоже
прописали скобку и тогда может стереть по эту скобку.
тоесть я бы просто по старинке стирал вручную и не парился.

безусловно я попробую все варианты, как свой , так и ваш.
речь не об этом.
во первых очень благодарен вам Виктор за этот мастер класс.
лучше и представить нельзя.
кстати и подробнее тоже нельзя было написать чем вы это делали.
вы практически всё сделали за меня, тоесть написали скрипт
но тем не менее я узнал кучу крайне полезных функций и так сказать получил позетив
на дальнейшое изучение это го сервиса jaws.
а уж практическую ценность вообще нельзя оценить.
ещё рас крайне вам признателен.
также спасибо кто мне хотел помочь.
да не оскудеет земля русская.
с уважением, евгений.

Ответить   "evgeniy" Fri, 30 Apr 2010 19:28:25 +0400 (#1064407)

 

Здравствуйте, aphod.

Вы писали 28 апреля 2010 г., Время - 19:04:

Это позволит записать основной эфир.
Речь, наверное, шла о возможности выбора определённого спектакля и его
записи.

Ответить   Wed, 28 Apr 2010 21:33:02 +0600 (#1062066)