Здраствуйте! У меня один вопрос может кто подскажет, как сделать "поиск" со вставкой нужного для этого слова или значения в окно и выводом данных на другой странице? Заранее благодарен!
» Autoplay Media Studio
tavria2 18:18 28-07-2009
Цитата:
Может так:
Код: _GetAMS70InstallPath = function()
local sResult="";
local sType = Registry.GetValue(HKEY_LOCAL_MACHINE, "SOFTWARE\\\Classes\\.am7", "", true);
if (sType ~= "") then
local sCLSID = Registry.GetValue(HKEY_LOCAL_MACHINE, "Software\\Classes\\"..sType.."\\CLSID", "", true);
if (sCLSID ~= "") then
local sPath = Registry.GetValue(HKEY_LOCAL_MACHINE, "Software\\Classes\\CLSID\\"..sCLSID.."\\LocalServer32", "", true);
if (sPath ~= "") then
local tPaths = String.SplitPath(sPath);
if tPaths then
sResult = String.TrimRight(tPaths.Drive..tPaths.Folder, "\\");
end
end
end
end
return sResult;
end
Dialog.Message("", _GetAMS70InstallPath(), MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
Цитата:
Как получить этот CLSID? Или я вообще не в ту сторону копаю?
Может так:
Код: _GetAMS70InstallPath = function()
local sResult="";
local sType = Registry.GetValue(HKEY_LOCAL_MACHINE, "SOFTWARE\\\Classes\\.am7", "", true);
if (sType ~= "") then
local sCLSID = Registry.GetValue(HKEY_LOCAL_MACHINE, "Software\\Classes\\"..sType.."\\CLSID", "", true);
if (sCLSID ~= "") then
local sPath = Registry.GetValue(HKEY_LOCAL_MACHINE, "Software\\Classes\\CLSID\\"..sCLSID.."\\LocalServer32", "", true);
if (sPath ~= "") then
local tPaths = String.SplitPath(sPath);
if tPaths then
sResult = String.TrimRight(tPaths.Drive..tPaths.Folder, "\\");
end
end
end
end
return sResult;
end
Dialog.Message("", _GetAMS70InstallPath(), MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
lorents
Цитата:
У меня не нормально... и не только MSMediaPlayer...
Цитата:
нормально ли он изменяет размер плагина MSMediaPlayer?
У меня не нормально... и не только MSMediaPlayer...
Zloy_Gelud
Спасибо! Будет ли этот код актуален для 5 и 6 версии, если соответственно указывать в классах: .am5 и am.6? Или там был другой подход?
Спасибо! Будет ли этот код актуален для 5 и 6 версии, если соответственно указывать в классах: .am5 и am.6? Или там был другой подход?
А в русифицированный никак плагины не вставить? Может есть какой нить хитрый бубен?
tavria2
Цитата:
понятно, спасибо, а ты случайно не делал тоже самое что делает плагин Frames?
и хотел сказать что протестировал много примеров с плагином таймер все работает, выходит я ошибся, прошу прошения за ложную информацию.
Jonne brava
Цитата:
скачай нормальный русификатор, он есть в варезнике
Цитата:
У меня не нормально... и не только MSMediaPlayer...
понятно, спасибо, а ты случайно не делал тоже самое что делает плагин Frames?
и хотел сказать что протестировал много примеров с плагином таймер все работает, выходит я ошибся, прошу прошения за ложную информацию.
Jonne brava
Цитата:
А в русифицированный никак плагины не вставить? Может есть какой нить хитрый бубен?
скачай нормальный русификатор, он есть в варезнике
tavria2 все работает
Действительно local SETMAXTIPWIDTH = 0; Win2k не понимает как безразмерную строку.
Кстати не подкинешь ссылочку, где можно популярно почитать про всякие dll функции?

Кстати не подкинешь ссылочку, где можно популярно почитать про всякие dll функции?
неужели из всех русскоговорящих и русскопишущих разработчиков никому не нужна поддержка кириллицы в плагине sqlite?
Lexua
Цитата:
Цитата:
Кстати не подкинешь ссылочку, где можно популярно почитать про всякие dll функции?У меня такой не имеется - всегда использую поисковики.
lorents
Цитата:
likbez
А с чего ты взял, что sqlite не поддерживает кириллицу? Как-то попадался мне пример, кажется CustomerDB - в нем прекрасно работал поиск русских значений.
Цитата:
а ты случайно не делал тоже самое что делает плагин Frames?Нет.
likbez
А с чего ты взял, что sqlite не поддерживает кириллицу? Как-то попадался мне пример, кажется CustomerDB - в нем прекрасно работал поиск русских значений.
Собрал небольшой примерчик, чисто накидал для любопытных. Реализовано:
- поддержка скина
- прогрессбар WinProgress
- ресайз (в том числе размеров превьюшек в ThubmList)
- подключение Flash10b.ocx
использованы наработки и подсказки tavria2, Zloy_Gelud
Скачать файл resize_sample.rar
Попался на глаза пример для тестирования скинов, автора не помню, подложил в проект немного скинов для примера. Как этим пользоваться:
- давим Browse...
- давим OK
- в левом окне выбираем скин
- в правом окне выбираем файл настроек *.ini
Скачать файл SkinTest.rar
- поддержка скина
- прогрессбар WinProgress
- ресайз (в том числе размеров превьюшек в ThubmList)
- подключение Flash10b.ocx
использованы наработки и подсказки tavria2, Zloy_Gelud
Скачать файл resize_sample.rar
Попался на глаза пример для тестирования скинов, автора не помню, подложил в проект немного скинов для примера. Как этим пользоваться:
- давим Browse...
- давим OK
- в левом окне выбираем скин
- в правом окне выбираем файл настроек *.ini
Скачать файл SkinTest.rar

Помогите, пожалуйста, исправить ошибки в проекте:
http : // depositfiles . com / files / 8mzaa8rr2
В проекте наблюдаются следующие ошибки:
1. Ни одна ссылка в веб-объекте не открывает заданный объект (в итоге проект хочу реализовать в скомпилированном виде - *.exe)
2. Хотел бы убрать вызов контекстного меню нажатием правой кнопки мыши на любой его области.
3. В меню, например таком:
- ..Конфигурации
- Другие продукты
- Дополнительные библиотеки
- Утилиты
при переходе с пункта на пункт ранее посещенные пункты отображаются не подчеркнутыми. Это исправляется только после подведения курсора к данному пункту, т.е. он снова становится подчеркнутый.
Если заметите еще какие-нибудь ошибки, опишите их пожалуйста и дайте свой вариант решения
http : // depositfiles . com / files / 8mzaa8rr2
В проекте наблюдаются следующие ошибки:
1. Ни одна ссылка в веб-объекте не открывает заданный объект (в итоге проект хочу реализовать в скомпилированном виде - *.exe)
2. Хотел бы убрать вызов контекстного меню нажатием правой кнопки мыши на любой его области.
3. В меню, например таком:
- ..Конфигурации
- Другие продукты
- Дополнительные библиотеки
- Утилиты
при переходе с пункта на пункт ранее посещенные пункты отображаются не подчеркнутыми. Это исправляется только после подведения курсора к данному пункту, т.е. он снова становится подчеркнутый.
Если заметите еще какие-нибудь ошибки, опишите их пожалуйста и дайте свой вариант решения
tavria2
Будет. Но..с 5 версией сабжа путь выглядит в формате записи 8.3 (Восемь символов для имени файла и три символа для расширения).
Будет. Но..с 5 версией сабжа путь выглядит в формате записи 8.3 (Восемь символов для имени файла и три символа для расширения).
Zloy_Gelud
Понял, большое спасибо за полезную инфу.
Понял, большое спасибо за полезную инфу.
Alexey87
Цитата:
См. шапку: Запуск/открытие файлов из Web объекта от tavria2.
Цитата:
Ни одна ссылка в веб-объекте не открывает заданный объект (в итоге проект хочу реализовать в скомпилированном виде - *.exe)
См. шапку: Запуск/открытие файлов из Web объекта от tavria2.
tavria2 -- рад был помочь
2All
Кстати новый плагин AMSWaves - Memory оказался очень полезным. C его помощью можно сконвертировать OEM-строку в ANSI.
Код: OemToChar = function (strOEM)
local strANSI="";
-- Выделяем некоторое количество памяти в адресном пространстве для
-- строки в ANSI-кодировке, равное кол-ву символов в OEM-строке
-- (т.е. 1 символ равен 1 байту).
-- (Для UTF-8 кодировкки - 1 символ равен 2 байтам)
local hMemory = Memory.Allocate(String.Length(strOEM));
local nResult = DLL.CallFunction("user32.dll", "OemToCharA", "\""..strOEM.."\","..hMemory, DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL);
if (nResult ~= 0) then
strANSI = Memory.GetString(hMemory, -1);
end
-- освобождаем выделенную память
Memory.Free(hMemory);
return strANSI;
end
-- Тест
Shell.Execute("cmd.exe", "open", "/C tree C:\Windows /A > \"".._TempFolder.."\\OEM.txt\"", "", SW_HIDE, false);
Application.Sleep(1000);
if File.DoesExist(_TempFolder.."\\OEM.txt") then
TextFile.WriteFromString(_TempFolder.."\\ANSI.txt", OemToChar(TextFile.ReadToString(_TempFolder.."\\OEM.txt")), false);
File.Open(_TempFolder.."\\ANSI.txt", "", SW_SHOWNORMAL);
end

2All
Кстати новый плагин AMSWaves - Memory оказался очень полезным. C его помощью можно сконвертировать OEM-строку в ANSI.
Код: OemToChar = function (strOEM)
local strANSI="";
-- Выделяем некоторое количество памяти в адресном пространстве для
-- строки в ANSI-кодировке, равное кол-ву символов в OEM-строке
-- (т.е. 1 символ равен 1 байту).
-- (Для UTF-8 кодировкки - 1 символ равен 2 байтам)
local hMemory = Memory.Allocate(String.Length(strOEM));
local nResult = DLL.CallFunction("user32.dll", "OemToCharA", "\""..strOEM.."\","..hMemory, DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL);
if (nResult ~= 0) then
strANSI = Memory.GetString(hMemory, -1);
end
-- освобождаем выделенную память
Memory.Free(hMemory);
return strANSI;
end
-- Тест
Shell.Execute("cmd.exe", "open", "/C tree C:\Windows /A > \"".._TempFolder.."\\OEM.txt\"", "", SW_HIDE, false);
Application.Sleep(1000);
if File.DoesExist(_TempFolder.."\\OEM.txt") then
TextFile.WriteFromString(_TempFolder.."\\ANSI.txt", OemToChar(TextFile.ReadToString(_TempFolder.."\\OEM.txt")), false);
File.Open(_TempFolder.."\\ANSI.txt", "", SW_SHOWNORMAL);
end
шапку я смотрел
tavria2, если я правильно понимаю в шапке указан пример кода, на случай когда при нажатии на ссылку появляеется окно с запросом на открытие или сохранение данного объекта.
И если это так, то странно почему у меня этого окна нет.
В проекте я использовал код Вашего примера WebRunFile с сайта gooseweb.ru
Как мне кажется, в проекте не правильно прописаны ссылки.
Предположим, что временные файлы моего проекта находятся в папке по умолчанию С:
Сам проект я буду компилировать в exe-файл на D:
Файлы для запуска тоже находятся на D:
Как правильно прописать ссылки, чтобы проект работал?
tavria2, если я правильно понимаю в шапке указан пример кода, на случай когда при нажатии на ссылку появляеется окно с запросом на открытие или сохранение данного объекта.
И если это так, то странно почему у меня этого окна нет.
В проекте я использовал код Вашего примера WebRunFile с сайта gooseweb.ru
Как мне кажется, в проекте не правильно прописаны ссылки.
Предположим, что временные файлы моего проекта находятся в папке по умолчанию С:
Сам проект я буду компилировать в exe-файл на D:
Файлы для запуска тоже находятся на D:
Как правильно прописать ссылки, чтобы проект работал?
Alexey87
Цитата:
Цитата:
Цитата:
если я правильно понимаю в шапке указан пример кода, на случай когда при нажатии на ссылку появляеется окно с запросом на открытие или сохранение данного объекта.Данный код позволяет запускать или открывать файл, при клике на ссылку, без окна запроса.
Цитата:
В проекте я использовал код Вашего примера WebRunFile с сайта gooseweb.ruЯ не советую использовать этот пример - много недостатков.
Уважаемые доброго времени суток!
Подскажите новичку где подводные камни, создал свой проект назначил кнопке действие запускать файл *.ехе указываю папку к примеру Drivers но прога все равно сохраняет в папку свою по умолчанию Docs, как мне назначать свои папки для файлов?
скрин http://i051.radikal.ru/0907/d2/e34044fc7906.jpg
Подскажите новичку где подводные камни, создал свой проект назначил кнопке действие запускать файл *.ехе указываю папку к примеру Drivers но прога все равно сохраняет в папку свою по умолчанию Docs, как мне назначать свои папки для файлов?
скрин http://i051.radikal.ru/0907/d2/e34044fc7906.jpg
Вставил код из шапки - Запуск/открытие файлов из Web объекта от tavria2
ничего не изменилось, ссылки также не работают
Цитата:
ничего не изменилось, ссылки также не работают
Цитата:
Как мне кажется, в проекте не правильно прописаны ссылки.
Предположим, что временные файлы моего проекта находятся в папке по умолчанию С:
Сам проект я буду компилировать в exe-файл на D:
Файлы для запуска тоже находятся на D:
Как правильно прописать ссылки, чтобы проект работал?
VoodooHaker 23:31 31-07-2009
Цитата:
Вкладка Script кнопки. Туда скопируй примерно нижеследующее:
Код: File.Run("AutoPlay\\Driver\\NovatelU720.exe", "", "", SW_SHOWNORMAL, false);
Цитата:
Уважаемые доброго времени суток!
Подскажите новичку где подводные камни, создал свой проект назначил кнопке действие запускать файл *.ехе указываю папку к примеру Drivers но прога все равно сохраняет в папку свою по умолчанию Docs, как мне назначать свои папки для файлов?
скрин http://i051.radikal.ru/0907/d2/e34044fc7906.jpg
Вкладка Script кнопки. Туда скопируй примерно нижеследующее:
Код: File.Run("AutoPlay\\Driver\\NovatelU720.exe", "", "", SW_SHOWNORMAL, false);
Alexey87
У тебя, похоже действительно проблема с путями.
Где находятся файлы для запуска по ссылкам: в одной из подпапок AutoPlay или в одной папке с иcполняемым файлом проекта?
В каком режиме компилируешь проект: Hard drive folder или Web/Email executable?
У тебя, похоже действительно проблема с путями.
Где находятся файлы для запуска по ссылкам: в одной из подпапок AutoPlay или в одной папке с иcполняемым файлом проекта?
В каком режиме компилируешь проект: Hard drive folder или Web/Email executable?
Zloy_Gelud
Цитата:
Что-то это не помогает.
Должно быть вот так насколько я понял
http://s56.radikal.ru/i151/0908/e1/61bcf75eb4ca.jpg
Если я не задаю действие кнопки с этой припиской в кладке скрипт кнопки
http://s60.radikal.ru/i169/0908/cd/974805d56940.jpg
тогда ничего не происходит кнопка не производит запуск файла, а если задаю кнопке Ran Program
http://i039.radikal.ru/0908/45/4efc2300aae3.jpg
в проекте все равно копируется в папку Docs мой файл exe
я в ручную переношу файл из папки Docs в папку Driver ( в кладке скрипт кнопки код ваш прописан) и когда нажимаю на кнопку все равно сохраняется путь к этой зловещей папке Docs
http://s51.radikal.ru/i133/0908/88/30fbbd5936a2.jpg
Нашел один свой старенький проект там я создавал себе несколько папок и без проблем назначал пути - открываю проект этот старенький путь прописан правильно но только стоит мне нажать на кнопку обзор и все путь опять назначается в папку Docs - хотя до этого в этом проекте был путь к папке к примеру Soft - Может это что то с настройками какими то самой программы - гуру дайте совет....((
Цитата:
Вкладка Script кнопки. Туда скопируй примерно нижеследующее:
Код:
File.Run("AutoPlay\\Driver\\NovatelU720.exe", "", "", SW_SHOWNORMAL, false);
Где "AutoPlay\\Driver\\NovatelU720.exe"
- путь к твоим драйверам.
Что-то это не помогает.
Должно быть вот так насколько я понял
http://s56.radikal.ru/i151/0908/e1/61bcf75eb4ca.jpg
Если я не задаю действие кнопки с этой припиской в кладке скрипт кнопки
http://s60.radikal.ru/i169/0908/cd/974805d56940.jpg
тогда ничего не происходит кнопка не производит запуск файла, а если задаю кнопке Ran Program
http://i039.radikal.ru/0908/45/4efc2300aae3.jpg
в проекте все равно копируется в папку Docs мой файл exe
я в ручную переношу файл из папки Docs в папку Driver ( в кладке скрипт кнопки код ваш прописан) и когда нажимаю на кнопку все равно сохраняется путь к этой зловещей папке Docs
http://s51.radikal.ru/i133/0908/88/30fbbd5936a2.jpg
Нашел один свой старенький проект там я создавал себе несколько папок и без проблем назначал пути - открываю проект этот старенький путь прописан правильно но только стоит мне нажать на кнопку обзор и все путь опять назначается в папку Docs - хотя до этого в этом проекте был путь к папке к примеру Soft - Может это что то с настройками какими то самой программы - гуру дайте совет....((
Цитата:
Где находятся файлы для запуска по ссылкам:
в одной из подпапок с иcполняемым файлом проекта
Цитата:
В каком режиме компилируешь проект:
Web/Email executable
помогите пожалуйста решить следующую проблему с плагином MediaPlayer:
есть видео, и оно состоит из нескольких частей, и надо сделать возможность перехода к этим частям, для этого я взял объект "Tree" и прописал в Item data необходимое время, а в on Select:
Код: strSelectedNode = Tree.GetSelectedNode("Tree1");
if strSelectedNode ~= "" then
strData = Tree.GetNode("Tree1", strSelectedNode);
if (strData ~= nil) or (strData ~= "") then
MediaPlayer.Seek("Plugin1", SEEK_SPECIFIC, strData.Data);
end
end
есть видео, и оно состоит из нескольких частей, и надо сделать возможность перехода к этим частям, для этого я взял объект "Tree" и прописал в Item data необходимое время, а в on Select:
Код: strSelectedNode = Tree.GetSelectedNode("Tree1");
if strSelectedNode ~= "" then
strData = Tree.GetNode("Tree1", strSelectedNode);
if (strData ~= nil) or (strData ~= "") then
MediaPlayer.Seek("Plugin1", SEEK_SPECIFIC, strData.Data);
end
end
VoodooHaker
не пользуйся кнопкой "обзор" - зло
пиши путь вручную, и файл ложи куда надо тоже вручную
не пользуйся кнопкой "обзор" - зло

Спасибо кто откликнулся! Я разобрался, и даром вам голову морочил)))
может кому будет полезно
нужно просто было в проекте создать свою папку и скопировать туда файлы которые будут предназначены для запуска из кнопки и указывать файл в свойствах кнопки не посредственно из папки где мы скопировали в проект файлы, а я допускал ошибку у меня файлы лежали совсем на другом диске и я указывал этот каталог
может кому будет полезно
нужно просто было в проекте создать свою папку и скопировать туда файлы которые будут предназначены для запуска из кнопки и указывать файл в свойствах кнопки не посредственно из папки где мы скопировали в проект файлы, а я допускал ошибку у меня файлы лежали совсем на другом диске и я указывал этот каталог
Alexey87
Если ты компилируешь в режиме Web/Email executable, то исполняемый файл твоего проекта будет SFX-архивом (самораспаковывающийся архив). Т.е. после запуска этого SFX-архива - все его содержимое будет распакованно во временную директорию и естественно _SourceFolder вернет путь к файлу проекта во временной папке. Тебе нужно получить путь к SFX-архиву и относительно его строить остальные пути к файлам.
Код: function GetSFX()
if Table.Count(_CommandLineArgs) == 0 then return nil end; -- если нет параметров
-- получаем путь к SFX-файлу
string.gsub(_CommandLineArgs[Table.Count(_CommandLineArgs)], "SFXSOURCE:(.+)\\.+", function (Match) sPathSFX = Match; end);
return sPathSFX; -- возвращаем путь к SFX-файлу
end
sPathSFX = GetSFX(); -- путь к SFX-архиву
if sPathSFX then -- если получен путь к SFX-архиву
sPath = sPathSFX.."\\Моя папка\\Мой файл.txt"; -- полный путь к файлу для открытия или запуска
end
Если ты компилируешь в режиме Web/Email executable, то исполняемый файл твоего проекта будет SFX-архивом (самораспаковывающийся архив). Т.е. после запуска этого SFX-архива - все его содержимое будет распакованно во временную директорию и естественно _SourceFolder вернет путь к файлу проекта во временной папке. Тебе нужно получить путь к SFX-архиву и относительно его строить остальные пути к файлам.
Код: function GetSFX()
if Table.Count(_CommandLineArgs) == 0 then return nil end; -- если нет параметров
-- получаем путь к SFX-файлу
string.gsub(_CommandLineArgs[Table.Count(_CommandLineArgs)], "SFXSOURCE:(.+)\\.+", function (Match) sPathSFX = Match; end);
return sPathSFX; -- возвращаем путь к SFX-файлу
end
sPathSFX = GetSFX(); -- путь к SFX-архиву
if sPathSFX then -- если получен путь к SFX-архиву
sPath = sPathSFX.."\\Моя папка\\Мой файл.txt"; -- полный путь к файлу для открытия или запуска
end
Ребят, кто-нибудь может подсказать, как сделать так чтобы в SetupFactory можно было вставить свою музыку в проект, и как сделать так, чтобы фоновые картинки на заднем плане менялись?
tavria2, спасибо за код и помощь по созданию проекта!
Подскажите пожалуйста режим Web/Email executable - это единственный способ не размещать на компакт-диске кнопочки, звуки, графические оформления или есть еще варианты?
P.S.: А куда нужно вставить выше приведенный код?
Подскажите пожалуйста режим Web/Email executable - это единственный способ не размещать на компакт-диске кнопочки, звуки, графические оформления или есть еще варианты?
P.S.: А куда нужно вставить выше приведенный код?
Страницы: 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132
Предыдущая тема: PHP RapidGet Pro V
Форум Ru-Board.club — поднят 15-09-2016 числа. Цель - сохранить наследие старого Ru-Board, истории становления российского интернета. Сделано для людей.