» Indigo Rose AutoPlay Media Studio

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

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

Tana37 -- я б на вашем месте попросил клиентов проверить карантин антивируса или запускать авторан от имени администратора.
ЗЫ. Вопрос для гадалок.

Цитата:

я б на вашем месте попросил клиентов проверить карантин антивируса

-- Cпасибо за совет!

Вот русская справка по AMS.
http://rghost.ru/46150963
Перевел "Руководство пользователя" полностью. Думаю, еще перевести "Объекты" и на этом закончить с переводом.

collagen Спасибо огромное!

LEDRA

Цитата:

Подскажите есть функция или плагин, который позволяет делать снимки экрана?

Написал кучу WinAPI-функций для этого. Чуть с ума не сошел..
Причешу код и выложу для пользования. Пока сохраняет только весь экран в BMP/PNG/GIF-файл. Планирую добавить поддержку JPEG/TIFF и сохранение снимка указанного окна.

Цитата:

воспользуйся плагином от tavria2 SmtpT

Подскажите кто сталкивался, тоже пользуюсь данным плагином, но на winXP все работает а на Win7 нет, в чем проблема, как можно победить?

rokhlin

Цитата:

Подскажите кто сталкивался, тоже пользуюсь данным плагином, но на winXP все работает а на Win7 нет, в чем проблема, как можно победить?

Возможно у тебя в системе отсутствует библиотека cdosys.dll.
Проверь наличие файла: Диск:\WINDOWS\System32\cdosys.dll.

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

Привет, можно ли функциями или плагинами отключить или заблокировать кнопки "Правка", "Вид", "Справка" в калькуляторе ?

В WinApi поискал EnableMenuItem , увы нету ...

Возник вопрос: можно ли в объекте web использовать другой браузер? Или можно как-то запустить другой браузер "внутри" страницы проекта Autoplay?
Хотели чтобы при запуске приложения в объекте web показывалась наше видео с YouTube, причем воспроизведение начиналось автоматически. (Это должна быть именно страничка youtube, страничка с кодом вставки видео не подойдет.) Во всех браузерах воспроизведение начинается автоматически, но в объекте web такого нет.

PAVELNEXT
[more=Код]
Код: MENUITEMINFO = MemoryEx.DefineStruct{UINT('Size');UINT('Mask');UINT('Type');UINT('State');
UINT('ID');INT('SubMenu');INT('BmpChecked'); INT('BmpUnchecked');
UINT('ItemData');INT('TypeData');INT('CCH');INT('BmpItem');
};

Menu_GetItemInfo = function (hMenu, nItem)
local tInfo = MENUITEMINFO:New();
tInfo.Size = MemoryEx.StructSize(MENUITEMINFO);
tInfo.Mask = 0x0000003F;
DLL.CallFunction("User32.dll", "GetMenuItemInfoA", hMenu..","..nItem..",1,"..tInfo:GetPointer(), DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL);
return tInfo;
end

Menu_GetItemStateEx = function (hMenu, nItem)
local tInfo = Menu_GetItemInfo(hMenu, nItem);
local nRet = tInfo.State;
tInfo:Free();
return nRet;
end

Menu_SetItemInfo = function (hMenu, nItem, tInfo)
DLL.CallFunction("User32.dll", "SetMenuItemInfoA", hMenu..","..nItem..",1,"..tInfo:GetPointer(), DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL);
end

Menu_SetItemState = function (hMenu, nItem, nState, bState)
if (bState == nil) then bState = true; else bState = false; end
local nFlag = Menu_GetItemStateEx(hMenu, nItem);
if bState then
nState = Bitwise.Or(nFlag, nState);
else
nState = Bitwise.And(nFlag, Bitwise.Not(nState));
end
local tInfo = MENUITEMINFO:New();
tInfo.Size = 48;
tInfo.Mask = 1;
tInfo.State = nState;
Menu_SetItemInfo(hMenu, nItem, tInfo);
tInfo:Free();
end

Menu_SetItemDisabled = function (hMenu, nItem, bState)
Menu_SetItemState(hMenu, nItem, 3, bState);
end

Menu_DrawMenuBar = function (hWnd)
DLL.CallFunction("User32.dll", "DrawMenuBar", hWnd, DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL);
end

--++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
--Test

File.Run(_SystemFolder.."\\calc.exe", "", _SystemFolder, SW_SHOWNORMAL, false);

local hWnd
repeat
hWnd = tonumber(DLL.CallFunction("user32.dll", "FindWindowA", "\"SciCalc\",0", DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL));
until (hWnd ~= 0);

local hMenu = tonumber(DLL.CallFunction("User32.dll", "GetMenu", hWnd, DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL));

Menu_SetItemDisabled(hMenu, 0);
Menu_SetItemDisabled(hMenu, 1);
Menu_SetItemDisabled(hMenu, 2);
Menu_DrawMenuBar(hMenu);

Action Plugin : ScreenCapture

Functions that assist with Screen Capture management.
This module allows you to copy the screen or a region of the screen and save it to file. Depending on the type of image, you can set various image parameters such as pixel format, quality and compression.

Features :

Save bitmap to file
Capture full screen
Capture region
Capture window
Set various image parameters such as pixel format, quality and compression

Plugin does not include third-party libraries. Written using WinAPI and plug Imagine MemoryEx and compiled in Action Plugin Compiler.

PS. Do not forget to activate the plugin Imagine MemoryEx. Usage examples can be found in help.

Tested on WinXP SP3 and Win8 x86.

Download From: RGhost.Net

---

Автор -Я.

TashiBK

Цитата:

Возник вопрос: можно ли в объекте web использовать другой браузер? Или можно как-то запустить другой браузер "внутри" страницы проекта Autoplay

Web объект, использует именно браузер IE --- который уже встроен в ОС Windows.

Как я знаю, не объектом задаётся авто воспроизведение видео, а кодом на сайте, странице и т.д - можно просто погуглить "html автоматический запуск видео".

<object width="560" height="315"><param name="movie" value="http://www.youtube.com/v/y1jnTX8VQVc?hl=ru_RU&amp;version=3&amp;rel=0&autoplay=1"></param><param name="allowFullScreen" value="true"></param><param name="allowscriptaccess" value="always"></param><embed src="http://www.youtube.com/v/y1jnTX8VQVc?hl=ru_RU&amp;version=3&amp;rel=0&autoplay=1" type="application/x-shockwave-flash" width="560" height="315" allowscriptaccess="always" allowfullscreen="true"></embed></object>

в коде именно &autoplay=1 --- отвечает за загрузку и соответственно запуск видео.

Цитата:

Хотели чтобы при запуске приложения в объекте web показывалась наше видео с YouTube, причем воспроизведение начиналось автоматически.

Я не советую вам данное, вы "убъёте" своих пользователей, вспомните о тех, у кого "слабый" Интернет или поставьте себя на их место, вам бы понравилось, если при каждом запуске, проект вис, загружая метры видео? Моё мнение - это провальный вариант при всех раскладах.

Такая проблема. При конвертировании проекта, созданного в 7.0 версии сабжа, восьмая версия все русские надписи в коде проекта (ключевые слова, описания и названия страниц) превратила в вопросительные знаки. Проект, соответственно запускаться не хочет. Что делать? Как заставить 8.0 правильно сконвертировать проект, не угробив русский текст??

qqwwrr
пользуешься оригинальной английской версией или русифицированной?

Robby

Русифицированной

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

Robby

Залил. Ссылку на файл кинул в ЛС

qqwwrr
смотри в ЛС.

Здравствуйте, есть проект.

В поле ввода (input), нужно избежать ввод символов ( \ / ") , как это осуществить?

Пробивал в On Char добавлять это:

if e_Char == 102 then
Input.Delete("SERVICE_I");
end

и e_Key пробивал, в On Key не получается =(.

в принципе работает но только при нажатым шифтом.

Octanium

On Char объекта Input:

Код: local tExcludeChars = {'(', '\\', '/', '"', ')'};
local tSel
for i = 1, #tExcludeChars do
if (e_Char == tonumber(String.Asc(tExcludeChars[i]))) then
tSel = Input.GetSelection(this);
Input.SetSelection(this, tSel.Start - 1, tSel.Start);
Application.Sleep(10);
Input.Delete(this);
break;
end
end

Hello ,
I have 3 datas that i have to save to xml and read it !!!

Main data and 2 sub datas
Customer name (type and date)

i have tried like that but it doesnt work !!!


Код: XML.Load(_TempFolder .. "\\Future.xml");
XML.InsertXML("root/coming/cust:"..XML.Count("root/coming/", "cust"), "<cust>"..Input.GetText("Input1").."</cust>", XML.INSERT_AFTER);
XML.InsertXML("root/coming/cust/type:"..XML.Count("root/coming/"..Input.GetText("Input1"), "type"), "<type>"..Input.GetText("Input2").."</type>", XML.INSERT_AFTER);
XML.InsertXML("root/coming/cust/date:"..XML.Count("root/coming/"..Input.GetText("Input1"), "date"), "<date>"..Input.GetText("Input3").."</date>", XML.INSERT_AFTER);
XML.Save(_TempFolder .. "\\Future.xml");

ListBox.DeleteItem("ListBox", LB_ALLITEMS);
XML.Load(_TempFolder .. "\\Future.xml");
local nLinks = XML.Count("root/coming", "cust");
if (nLinks ~= -1) then
for i = 1, nLinks do     
ListBox.AddItem("ListBox", XML.GetValue("root/coming/cust:"..i)..XML.GetValue("root/coming/cust/type:"..i)..XML.GetValue("root/coming/cust/date:"..i), "");

end
end

Привет, подскажите, как узнать стоит ли галоча на "Автоматически скрывать панель задач" и какая высота у этой панели, пробовал через WinApi добиться - ничего не получается

И второй вопрос, как получить высоту заголовка у окна, WinApi.GetSystemMetrics(SM_CYCAPTION); --- так же не нашёл ...

PAVELNEXT
Код: APPBARDATA = MemoryEx.DefineStruct{DWORD('cbSize');
INT('hWnd');
UINT('uCallbackMessage');
UINT('uEdge');
INT('left');
INT('top');
INT('right');
INT('bottom');
INT('lParam');
};

WinAPI_GetTaskBarState = function ()
local ABM_GETSTATE = 0x4;
local hTaskBar = tonumber(DLL.CallFunction("user32.dll", "FindWindowA", "\"Shell_TrayWnd\", \"\"", DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL));
local tAPPBARDATA = APPBARDATA:New();
tAPPBARDATA.cbSize = MemoryEx.StructSize();
tAPPBARDATA.hWnd = hTaskBar;
local nRes = tonumber(DLL.CallFunction("shell32.dll", "SHAppBarMessage", ABM_GETSTATE..","..tAPPBARDATA:GetPointer(), DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL));
tAPPBARDATA:Free();
return nRes;
end

WinAPI_GetSystemMetrics = function (nIndex)
return tonumber(DLL.CallFunction("user32.dll", "GetSystemMetrics" ,nIndex, DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL));
end

-- *** Test *********************************************************************************************************************************

ABS_AUTOHIDE = 0x1;
SM_CYCAPTION = 0x4;

local nState = WinAPI_GetTaskBarState();
if (Bitwise.And(nState, ABS_AUTOHIDE) == ABS_AUTOHIDE) then
Dialog.Message("", "Панель задач автоматически скрывается.");
end

local nHeightCaption = WinAPI_GetSystemMetrics(SM_CYCAPTION);
Dialog.Message("", "Высота заголовка окна = " .. nHeightCaption .. "px");

Screen size help needed;

When i maximize the screen listbox is coming over button, how can stop it when it is over button ?

I tried in example but it is not doing it...

Example attached;
http://speedy.sh/VgTMw/screen.apz

thanks in advance

Zloy_Gelud
Огромное спасибо, извини за нескромность, а как узнать какая высота у панели задач?
Что дописать в этом коде ?

huismori
You can contact the official English Forum. The language of communication in this forum - Russian.

PAVELNEXT

Цитата:

а как узнать какая высота у панели задач?

Window.GetSize. Как получить дескриптор панели задач, я приводил выше.

Hi Zloy_Gelud,

I dont like the english forum, you hardly get answers there, most of them just want to sell plugins...
I am a memeber of your site since 2009 and sometimes I ask questions, I searched but I couldnt find solution for it...


Thanks anyway