Вот эта DLL не подойдёт? Она была в комплекте с программой. http://rghost.ru/40773480
» Indigo Rose AutoPlay Media Studio
Zloy_Gelud А как? хотя-бы примерчик. И за что овечат эта строчка: Page.StartTimer(100);, в On Preload ?
Zloy_Geludбуду разбираться!
Объясните, пожалуйста, в чем разница между replace и update в SQLite.
В форму (input fileds) загружаю строку из БД.
Юзер их редактирует.
Затем считываю данные из каждого Input поляпри нажатии на кнопку Сохранение и делаю запрос к базе:
Никаких ошибок при это мне выдается, но данные в таблице БД не обновляются.
Почему так происходит?
В форму (input fileds) загружаю строку из БД.
Юзер их редактирует.
Затем считываю данные из каждого Input поляпри нажатии на кнопку Сохранение и делаю запрос к базе:
Никаких ошибок при это мне выдается, но данные в таблице БД не обновляются.
Почему так происходит?
Здравствуйте. Проблема вот в чем. Стоит терминал в нем меню, сдалеаное с помощью AMS, но стоит он в институте и многие рукастые студенты творят всякие гадости через экранную клавиатуру(сделали запуск клавиатуры, так как необходимо вводить данные). Как мне объяснили они запускают через нее справку, а дальше пошло поехало. меняют фоны, запускают разные видео. Поэтому вопрос. Как сделать "свою" клавиатуру только с буквами через AMS? Как я понимаю необходим какой-то блок в котором будут кнопки с буквами и при нажатии на них будет посылаться команда встать такой-то символ... Скажите как это лучше сделать. Спасибо.
Добавлено:
Здравствуйте. Проблема вот в чем. Стоит терминал в нем меню, сдалеаное с помощью AMS, но стоит он в институте и многие рукастые студенты творят всякие гадости через экранную клавиатуру(сделали запуск клавиатуры, так как необходимо вводить данные). Как мне объяснили они запускают через нее справку, а дальше пошло поехало. меняют фоны, запускают разные видео. Поэтому вопрос. Как сделать "свою" клавиатуру только с буквами через AMS? Как я понимаю необходим какой-то блок в котором будут кнопки с буквами и при нажатии на них будет посылаться команда встать такой-то символ... Скажите как это лучше сделать. Спасибо.
Добавлено:
Здравствуйте. Проблема вот в чем. Стоит терминал в нем меню, сдалеаное с помощью AMS, но стоит он в институте и многие рукастые студенты творят всякие гадости через экранную клавиатуру(сделали запуск клавиатуры, так как необходимо вводить данные). Как мне объяснили они запускают через нее справку, а дальше пошло поехало. меняют фоны, запускают разные видео. Поэтому вопрос. Как сделать "свою" клавиатуру только с буквами через AMS? Как я понимаю необходим какой-то блок в котором будут кнопки с буквами и при нажатии на них будет посылаться команда встать такой-то символ... Скажите как это лучше сделать. Спасибо.
bigbrain
Я почему не используешь команду "INSERT OR REPLACE"?
А чем различаются REPLACE И UPDATE - гугл в помощь.
Я почему не используешь команду "INSERT OR REPLACE"?
А чем различаются REPLACE И UPDATE - гугл в помощь.
Проверьте кому не лень.. просмотр DjVu-файлов в проекте.
http://yadi.sk/d/pGeKAOgz07YoS
Обертку для всех действий я не делал, только для некоторых. Все возможные события и методы перечислены в справке к DjVuCntl.dll (справка идет в комплекте).
http://yadi.sk/d/pGeKAOgz07YoS
Обертку для всех действий я не делал, только для некоторых. Все возможные события и методы перечислены в справке к DjVuCntl.dll (справка идет в комплекте).
Zloy_Gelud, матюгается: Objects\ACTIVEX\ACTIVEX.APO" is not licensed for re-distribution
У тебя какая версия AMS? На восьмёрке работает.
ra700 -- у тебя плага ActiveX нету.
KerberX, у меня 8-ка, но как сказал Zloy_Gelud и о чем матюгнулась прога, нет плагина ActiveX. Порылся по сусекам, плагин оказался commercial, а прям щас приобретать необходимости нет
ra700
Цитата:
А ты думаешь мы его купили?
Ставь поверпак от Kindly.
Цитата:
Порылся по сусекам, плагин оказался commercial, а прям щас приобретать необходимости нет
А ты думаешь мы его купили?
Ставь поверпак от Kindly.
Код: А ты думаешь мы его купили?
Подскажите пожалуйста.
Есть обьект Tree в нем включены Show CheckBoxes.
Необходимо создать
Кнопку - Выделить, все в обьекте Tree – Show CheckBoxes с подсветкой Show CheckBoxes
Нашел ответ:
Создаем кнопку Button1 и вставлем следующий код
On Click
Код:
if Button.IsEnabled(this) then
Tree.SetNode("Tree1", "1", {Checked = true});
Tree.SetNode("Tree1", "2", {Checked = true});
Tree.SetNode("Tree1", "3", {Checked = true});
Button.SetVisible("Button1", false);
Button.SetVisible("Button2", true);
end
Есть обьект Tree в нем включены Show CheckBoxes.
Необходимо создать
Кнопку - Выделить, все в обьекте Tree – Show CheckBoxes с подсветкой Show CheckBoxes
Нашел ответ:
Создаем кнопку Button1 и вставлем следующий код
On Click
Код:
if Button.IsEnabled(this) then
Tree.SetNode("Tree1", "1", {Checked = true});
Tree.SetNode("Tree1", "2", {Checked = true});
Tree.SetNode("Tree1", "3", {Checked = true});
Button.SetVisible("Button1", false);
Button.SetVisible("Button2", true);
end
Цитата:
[/q][q]bigbrain
Я почему не используешь команду "INSERT OR REPLACE"?
А чем различаются REPLACE И UPDATE - гугл в помощь.
Большое спасибо, Zloy_Gelud, за наставления на путь истинный. Я пробовал и так как ты говоришь и другие методы, дейстительно нужно Insert or replace, в функции именно так и было использовано раньше. Проблема была в том, что одной записи в первой таблице было сопоставлено несколько записей во второй и нужно было удалять данные в двух таблицах, а recordID обоих таблиц писался в одну и ту же переменную ))))
Можно вопрос? Как можно распечатать содержимое окна программы. Хотелось бы реализовать один из вариантов:
1) печать формы отображенной в DialogEx (несколько строчек текста, фото и таблица)
2) создать вместо п. 1 pdf либо rtf документ с нужным оформлением и открыть его юзеру для печати.
Нашел DLL с примером - PDFOut, там нельзя делать таблицы и проблема с кириллицей.
Есть еще проект от AMS 7, где создается RTF из введенного в форму текста, но опять же таки проблема с кириллицей и AMS не корректно переводит его в версию 8.
Кто-то сталкивался с такими задачами?
Всем доброго дня,
Никто не подскажет как назначить "windows title" из *.ini файла ???
Делаю вот так:
Window.SetText(app_handle, INIFile.GetValue(_SourceFolder .."\\config.ini", "windows", "title"));
но это не работает
Никто не подскажет как назначить "windows title" из *.ini файла ???
Делаю вот так:
Window.SetText(app_handle, INIFile.GetValue(_SourceFolder .."\\config.ini", "windows", "title"));
но это не работает
Может через WinApi? Там масса примеров есть.
Или посмотри дебаг, может заголовок назначается правильно, а потом заменяется на системный. Разные случаи бывают.
Или посмотри дебаг, может заголовок назначается правильно, а потом заменяется на системный. Разные случаи бывают.
Вопрос снят.
этот код работает
Может пригодится кому...
nWindowHandle = Application.GetWndHandle();
sTitle = Window.EnumerateTitles(false)[nWindowHandle];
Window.SetText(nWindowHandle, INIFile.GetValue(_SourceFolder .."config.ini", "windows", "title"));
этот код работает
Может пригодится кому...
nWindowHandle = Application.GetWndHandle();
sTitle = Window.EnumerateTitles(false)[nWindowHandle];
Window.SetText(nWindowHandle, INIFile.GetValue(_SourceFolder .."config.ini", "windows", "title"));
sjdb45
Можно одной строкой
Код: Window.SetText(Application.GetWndHandle(), INIFile.GetValue(_SourceFolder .."\\config.ini", "windows", "title"));
Можно одной строкой
Код: Window.SetText(Application.GetWndHandle(), INIFile.GetValue(_SourceFolder .."\\config.ini", "windows", "title"));
Цитата:
Проверьте кому не лень.. просмотр DjVu-файлов в проекте.
http://yadi.sk/d/pGeKAOgz07YoS
Обертку для всех действий я не делал, только для некоторых. Все возможные события и методы перечислены в справке к DjVuCntl.dll (справка идет в комплекте).
Попробовал, и это круто, единственное что не могу понять как реализовать переход на следующую(предидущую) старницу документа и зум.В справке, вроде, идет реч о том что можна включать не полную панель управления а отдельные кнопки,но как это прописать не пойму(((. Может подскажите?
chymax3m
Цитата:
Код: -- отображаем страницу №3
DjVu.Ctrl.Page = 3;
Цитата:
не могу понять как реализовать переход на следующую(предидущую) старницу документа
Код: -- отображаем страницу №3
DjVu.Ctrl.Page = 3;
Цитата:
Код:-- отображаем страницу №3
DjVu.Ctrl.Page = 3;
Спасибо, но я имел в виду переход на следующую страницу (текущая+1, неопределенная) не создавать же кнопки для каждой страницы отдельно.
chymax3m
Цитата:
Ну так создай переменную, присвой ей первоначальное значение равное номеру страницы DJVU-документа открытого при запуске проекта. Ну а дальше уменьшай или увеличивай переменную на единицу и получишь следующую или предыдущую страницу соотвественно.
Цитата:
но я имел в виду переход на следующую страницу (текущая+1, неопределенная) не создавать же кнопки для каждой страницы отдельно.
Ну так создай переменную, присвой ей первоначальное значение равное номеру страницы DJVU-документа открытого при запуске проекта. Ну а дальше уменьшай или увеличивай переменную на единицу и получишь следующую или предыдущую страницу соотвественно.
Цитата:
Ну так создай переменную, присвой ей первоначальное значение равное номеру страницы DJVU-документа открытого при запуске проекта. Ну а дальше уменьшай или увеличивай переменную на единицу и получишь следующую или предыдущую страницу соотвественно.
Я бы рад, но как я уже говорил я не программист(((...идею я понял, но никак не найду как определить текущую страницу документа.
chymax3m
OnContCreate объекта:
Код: -- глоб. перем. - номер текущей страницы
DjVu.CurrentPage = -1;
-- таблица регистрируемых событий
DjVu.Events = {};
function DjVu.Events:PageChange(newpage)
DjVu.CurrentPage = newpage;
end
-- навигация по страницам
DjVu_PAGE_NEXT = 0;
DjVu_PAGE_PREVIOUS = 1;
function DjVu.Navigate (nNavigateType)
local nPages = DjVu.Ctrl:GetDocPagesCount();
if (nNavigateType == 0) and (DjVu.CurrentPage < nPages) then
DjVu.Ctrl.Page = DjVu.CurrentPage + 1;
elseif (nNavigateType == 1) and (DjVu.CurrentPage > 1) then
DjVu.Ctrl.Page = DjVu.CurrentPage - 1;
end
end
local bDjVu = DjVu.CreateCtrl("Plugin1");
if bDjVu then
ActiveX.JoinEvents("Plugin1", DjVu.Ctrl, DjVu.Events);
DjVu.LoadFile("AutoPlay\\Docs\\realview.djvu");
local nBut = Dialog.Message("", "Перейти на следующую страницу?", MB_YESNO, MB_ICONINFORMATION, MB_DEFBUTTON1);
if nBut == 6 then
DjVu.Navigate(DjVu_PAGE_NEXT);
end
end
OnContCreate объекта:
Код: -- глоб. перем. - номер текущей страницы
DjVu.CurrentPage = -1;
-- таблица регистрируемых событий
DjVu.Events = {};
function DjVu.Events:PageChange(newpage)
DjVu.CurrentPage = newpage;
end
-- навигация по страницам
DjVu_PAGE_NEXT = 0;
DjVu_PAGE_PREVIOUS = 1;
function DjVu.Navigate (nNavigateType)
local nPages = DjVu.Ctrl:GetDocPagesCount();
if (nNavigateType == 0) and (DjVu.CurrentPage < nPages) then
DjVu.Ctrl.Page = DjVu.CurrentPage + 1;
elseif (nNavigateType == 1) and (DjVu.CurrentPage > 1) then
DjVu.Ctrl.Page = DjVu.CurrentPage - 1;
end
end
local bDjVu = DjVu.CreateCtrl("Plugin1");
if bDjVu then
ActiveX.JoinEvents("Plugin1", DjVu.Ctrl, DjVu.Events);
DjVu.LoadFile("AutoPlay\\Docs\\realview.djvu");
local nBut = Dialog.Message("", "Перейти на следующую страницу?", MB_YESNO, MB_ICONINFORMATION, MB_DEFBUTTON1);
if nBut == 6 then
DjVu.Navigate(DjVu_PAGE_NEXT);
end
end
Цитата:
chymax3m
OnContCreate объекта:
Добавил к общему коду, но что прописовать для кнопок в раздел OnClick?
Цитата:
Код:-- верхний тулбар из кнопок doublepage,thumbnail,pagecombo
-- другие кнопки перечислены в справке
DjVu.Ctrl.Toolbar = "top+doublepage,thumbnail,pagecombo"
Добавил firstlastpage (first and last page) и prevnextpage (previous and next page) и получилось включить в тулбаре стандартные кнопки переключения страниц. Но все ровно хотелось бы попробовать реализировать через кнопки в AMS.
chymax3m -- думал сам из примера разберешься, но раз нет то..
Добавить в Глобальные функции:
Код: -- глоб. перем. - номер текущей страницы
DjVu.CurrentPage = -1;
-- таблица регистрируемых событий
DjVu.Events = {};
function DjVu.Events:PageChange(newpage)
DjVu.CurrentPage = newpage;
end
-- навигация по страницам
DjVu_PAGE_NEXT = 0;
DjVu_PAGE_PREVIOUS = 1;
function DjVu.Navigate (nNavigateType)
local nPages = DjVu.Ctrl:GetDocPagesCount();
if (nNavigateType == 0) and (DjVu.CurrentPage < nPages) then
DjVu.Ctrl.Page = DjVu.CurrentPage + 1;
elseif (nNavigateType == 1) and (DjVu.CurrentPage > 1) then
DjVu.Ctrl.Page = DjVu.CurrentPage - 1;
end
end
Добавить в Глобальные функции:
Код: -- глоб. перем. - номер текущей страницы
DjVu.CurrentPage = -1;
-- таблица регистрируемых событий
DjVu.Events = {};
function DjVu.Events:PageChange(newpage)
DjVu.CurrentPage = newpage;
end
-- навигация по страницам
DjVu_PAGE_NEXT = 0;
DjVu_PAGE_PREVIOUS = 1;
function DjVu.Navigate (nNavigateType)
local nPages = DjVu.Ctrl:GetDocPagesCount();
if (nNavigateType == 0) and (DjVu.CurrentPage < nPages) then
DjVu.Ctrl.Page = DjVu.CurrentPage + 1;
elseif (nNavigateType == 1) and (DjVu.CurrentPage > 1) then
DjVu.Ctrl.Page = DjVu.CurrentPage - 1;
end
end
Zloy_Gelud извините за невнимательность, не заметил вкладки Global Functions и не туда добавлял код. Спасибо большое все работает!!!
Добрый день. Подскажите, возможно ли через AMS определять тип диска, Hard Drive или SSD? К сожалению в интернете не нашел ответа.
Страницы: 1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980
Предыдущая тема: память не может быть written
Форум Ru-Board.club — поднят 15-09-2016 числа. Цель - сохранить наследие старого Ru-Board, истории становления российского интернета. Сделано для людей.