Autoplay Media Studio

Автор: Zloy_Gelud
Дата сообщения: 04.02.2009 16:38

Pazan

Код: strText = TextFile.ReadToString("C:\\MAC.txt");
strMAC = String.Mid(strText, 3, 2);
strMAC = strMAC..String.Mid(strText, 8, 3);
strMAC = strMAC.. String.Mid(strText, 15, 4);
strMAC = strMAC..String.Right(strText, 3);
if (strMAC == System.GetLANInfo().NIC) then

else

end

Автор: Yakim777
Дата сообщения: 05.02.2009 22:45

lorents

Цитата:

нажимал на кнопку например Free user

Я тоже этим интересуюсь (не файлообменником, но кнопку надо чтоб нажимало) может что-нибудь вместе придумаем, например у кнопки есть ссылка, может просто загрузить в ВЕБ объект эту ссылку, а потом после ожидания переходило по ссылке из ВЕБа, но как я знаю, на ЛетИтБит.нет ссылка доступна сразу, без ожидания, а показывается только через минуту.

Автор: lorents
Дата сообщения: 06.02.2009 10:09

Yakim777
ЛетИтБит сейчас еще просит вводить код зашиты, так что сейчас о нем можно забыть
я сейчас толком и не представляю как сделать

Автор: Pazan
Дата сообщения: 06.02.2009 12:42

Zloy_Gelud
на выходных потестю. спс

Автор: Yakim777
Дата сообщения: 06.02.2009 17:17

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

Автор: lorents
Дата сообщения: 06.02.2009 20:34

Yakim777
к сложалению нет, не показывает,

Автор: Zloy_Gelud
Дата сообщения: 10.02.2009 20:29

Можно ли добавить иконку из DLL/EXE файла в объект Tree или ListBoxEx?

Добавлено:
Интересуют любые средства, т.к. стандарными это невозможно..
Или же..получить контекст иконки, а затем нарисовать ее с помощью API в проекте?

Добавлено:
Что здесь не так?

Код: hWND = Application.GetWndHandle();
Result = DLL.CallFunction("shell32.dll", "ExtractIcon", hWND..",\"".._SystemFolder.."\\shell32.dll\",-1", DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL);

Автор: tavria2
Дата сообщения: 10.02.2009 23:28

Zloy_Gelud
Имя API-функции нужно указывать то, что в Alias: "ExtractIconA".

Автор: Zloy_Gelud
Дата сообщения: 10.02.2009 23:33

tavria2 -- отлично!

Добавлено:
Помоему получился довольно любопытный примерчик.

Код: hWND = Application.GetWndHandle();                -- дескриптор окна
hDC = WinApi.GetDC(hWND);                        -- контекст устройства
strPathFile = _SystemFolder.."\\shell32.dll";    -- путь к библиотеке
nXPos = 30;    nYPos = 30;                            -- верхний левый угол иконки
for i=1, 10 do                                    -- выборка первых 10 значков
    -- дескриптор значка
    hIcon = DLL.CallFunction("shell32.dll", "ExtractIconA", hWND..",\""..strPathFile.."\","..i, DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL);
    -- рисуем значок
    DLL.CallFunction("user32.dll", "DrawIcon", hDC..","..nXPos..","..nYPos..","..hIcon, DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL);
    -- освобождаем память, связанную со значком
    DLL.CallFunction("user32.dll", "DestroyIcon", hIcon, DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL);
    nYPos = nYPos + 32;
end

Автор: tavria2
Дата сообщения: 11.02.2009 09:37

Zloy_Gelud

Цитата:

Появилась еще проблема..при разворачивании проекта иконки не перерисовываются. Как пофиксить?

Иконки будут исчезать при каждой перерисовке окна проекта.
Когда окну необходимо перерисоваться, то Windows посылает определённое сообщение WM_PAINT, следовательно нужно поместить отрисовку графики в обработчик этого события, но так, как в AMS невозможно сделать обработку WM_PAINT, то естественно не сможешь сделать отрисовку.

Автор: Zloy_Gelud
Дата сообщения: 11.02.2009 12:12

Вот это жаль конешно!

Автор: Pazan
Дата сообщения: 11.02.2009 15:44

Zloy_Gelud
все путём. работаить...

такое как сделать?
1. диск с:
2. файл с расширением *.txt
3. имя файла постоянно будет произвольным
4. количество строк = 9
5. кликаем кнопку button1, считываем 9 строку
6. заносим значение в перем, скажем -- raw_data_9
... потом чего-то мутим с этой переменной
кликаем button2:
7. записываем значение переменной result_9 в файл result.txt на диск с:.

P.S.
Цитата:

а можно как-то в AMS7 подавлять окна ошибок сценария Web (JS)

Zloy_Gelud

Цитата:

ИМХО, нет.

есть косвенное решение может кому пригодится. суть -- в добавлении кода в HTML-файлы между тегами

Код:
<head>
...
<script language="JavaScript">
function blockError(){return true;}
window.onerror = blockError;
</script>
...
</head>

Автор: Zloy_Gelud
Дата сообщения: 11.02.2009 18:59

Pazan

Цитата:

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

Не совсем хорошо..Ведь в твоем случае придется использовать File.Find(), в котором придется использовать первый найденный файл, а если этот файл окажется не тем который надо? Т. к у юзера на диске С:\ уже будет существовать файл с именем раньшем, чем твой файл?

Автор: Pazan
Дата сообщения: 12.02.2009 12:42

Zloy_Gelud

Цитата:

Не совсем хорошо..Ведь в твоем случае придется использовать File.Find(),

я, вообще-то, думал через открыть файл через

Код: files = Dialog.FileBrowse(true, "Открыть файл", с:\\, "Text File (*.txt)|*.txt|All Files(*.*)|*.*|", "", "", false, false);

Автор: Zloy_Gelud
Дата сообщения: 12.02.2009 15:45

Pazan
Через диалог сработает..

Код: raw_data_9 = ""; result_9 = "";

local tblFilePaths = Dialog.FileBrowse(true, "Locate File", _DesktopFolder, "TXT Files (*.txt)|*.txt|All Files (*.*)|*.*|", "", "dat", false, false);
if (tblFilePaths ~= nil) and (tblFilePaths[1] ~= "CANCEL") then
    local tblLines = TextFile.ReadToTable(tblFilePaths[1]);
    raw_data_9 = tblLines[9];
end
------------------------
if (raw_data_9 ~= "") then
    -- здесь ты что-то мутишь
    -- result_9 =
end
-----------------------
TextFile.WriteFromString("C:\\Result.txt", result_9, false);

Автор: Djon1970
Дата сообщения: 13.02.2009 08:25

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

Автор: Lexua
Дата сообщения: 13.02.2009 11:53

Никто не сталкивался с такой проблемой? Меню проекта (Точнее только подменю) в русской раскладке отображается крякозябрами в WinXP SP3. Причем именно только в этой ОС! Во всех остальных вариантах все путём, т.е. висте, хр сп2, сп1, 2000 - ок!. Как лечится?

Автор: tavria2
Дата сообщения: 13.02.2009 12:07

Djon1970
Цитата:

мне надо, чтобы был переход на страницу (Page) и не по двойному клику, а по одинарному. Возможно такое?

Возможно, но с извращением. Если не используется событие "On Focus" объекта Tree, то можно его приспособить для обработки одиночного клика мышки.

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

Событие страницы On Show:
Код: Page.StartTimer(10); -- запуск таймера

Автор: Yakim777
Дата сообщения: 13.02.2009 14:52

Lexua
в меню шрифт надо выбрать кирилический

Автор: lorents
Дата сообщения: 13.02.2009 15:06

не подскажите как убрать меню (которая появляется при нажатии на правую кнопку мыши) во флеш (я понимаю что две последнии строчки все равно останутся)?
и еще изменить меню в объекте Web или в плагине IExplorer?

Добавлено:
Lexua
у меня WinXP SP3, ничего такого я не замечал

Автор: Zloy_Gelud
Дата сообщения: 13.02.2009 15:36

lorents
Если средствами АМС, то только навешевать свою меню при клике правой кн. мыши, но в ряде случаев, такое меню не успевает перекрывать контекстное меню флеша/веба.
Лучше, имхо, для Веба будет добавлять некоторый кусок кода в тело (<body></body>), к-ый будет блокировать/изменять контекстное меню, вызываемой нажатием пр. кн. мыши.

Автор: lorents
Дата сообщения: 13.02.2009 16:03

Zloy_Gelud
спасибо, тогда сделаю как ты говоришь

Автор: Djon1970
Дата сообщения: 13.02.2009 19:12

tavria2

Цитата:

Возможно, но с извращением. Если не используется событие "On Focus" объекта Tree, то можно его приспособить для обработки одиночного клика мышки.

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

Автор: tavria2
Дата сообщения: 13.02.2009 19:38

Djon1970

Цитата:

...работает, но как-то неправильно

Например?

Автор: Zloy_Gelud
Дата сообщения: 13.02.2009 19:40

Djon1970
Конкретного для твоего случая..
Глобальные функции:

Код: function SetJump()
    e_NodeIndex = Tree.GetSelectedNode("Tree1");
    if e_NodeIndex == "1.1" then
    Page.Jump("Page2");
    end
    if e_NodeIndex == "1.2" then
    Page.Jump("Page3");
    end
    if e_NodeIndex == "1.3" then
    Page.Jump("Page4");
    end
    if e_NodeIndex == "1.4" then
    Page.Jump("Page5");
    end
if e_NodeIndex == "1.5" then
    Page.Jump("Page6");
    end
    if e_NodeIndex == "1.6" then
    Page.Jump("Page7");
    end
end

Автор: Lexua
Дата сообщения: 13.02.2009 20:05

Цитата:

у меня WinXP SP3, ничего такого я не замечал

Да вобщем-то лечится, но вот что-то в этом диске СП3 не то в реестре или установках шрифта по умолчанию. Попробую другой, отпишусь.

Автор: Zloy_Gelud
Дата сообщения: 13.02.2009 20:26

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

Может что для себя выцепишь.
ЗЫ. Проект претерпел некоторые существенные изменения с момента последней публикации в топике.

Забрать: SOFT.apz - [602 кб]

Автор: Djon1970
Дата сообщения: 14.02.2009 04:37

Zloy_Gelud

Цитата:

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

Как всегда круто. Я уже раз пользовался твоим проектом, маленько под себя только затачивал. Но только, видишь в чем дело, у тебя жесткие рамки для каждой страницы.
Допустим, мне надо на странице "Ashampoo Burning Studio" воткнуть четыре программы, а у тебя уже этого не сделать. У меня получается почти каждая страница индивидуально, ну почти каждая.

Автор: Pazan
Дата сообщения: 14.02.2009 12:19

lorents

Цитата:

не подскажите как убрать меню (которая появляется при нажатии на правую кнопку мыши) ... в объекте Web или в плагине IExplorer?

на счёт флеша не вкурсе, там я нуб, а вот для HTML могу подсказать, делал когда-то для сайта. СОРРИ, за ОФФТОП...
итак, например:
1. импортируем стили для меню (меняй на своё усмотрение) между тегами <head>

Код:
<link HREF="sources/rightClick.css" REL="stylesheet" TYPE="text/css">

Автор: lorents
Дата сообщения: 14.02.2009 13:05

Pazan
спасибо!

Добавлено:
возможно ли объединить несколько html страниц в одну средствами AMS?
страницы однотипные и не динамические
просто соединить их

» Autoplay Media Studio