Автоматизация и боты

 Помощь      Поиск      Пользователи
Сайт Кибор     Программируемый кликер Кибор     Видео обучение     Заказать бот

 Страниц (1): [1]   

> Описание: внутри...
ivantu
Отправлено: 01 Апреля, 2021 - 14:48:16
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 732
Дата рег-ции: Нояб. 2013  
Репутация: 14




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

CODE:

function getmessage(0, WM_CLOSE){
char buffer1[255];

GetWindowText(tab2_ctrl[2][0], address(#buffer1[0]), sizearray(buffer1));
if(formatsn(format(#buffer1[0]))>0){
WritePrivateProfileString ("TAB_2_tab3", "energy_social", format(no_enr_korm[0][0]), path_to_ini); //Записали в ini значение
}
GetWindowText(tab2_ctrl[2][1], address(#buffer1[0]), sizearray(buffer1));
if(formatsn(format(#buffer1[0]))>0){
WritePrivateProfileString ("TAB_2_tab3", "energy_chess", format(no_enr_korm[1][0]), path_to_ini); //Записали в ini значение
}
GetWindowText(tab2_ctrl[2][2], address(#buffer1[0]), sizearray(buffer1));
if(formatsn(format(#buffer1[0]))>0){
WritePrivateProfileString ("TAB_2_tab3", "energy_cristal", format(no_enr_korm[2][0]), path_to_ini); //Записали в ini значение
}

}


В чем может быть проблема? Почему выдает такой не приятный звук...?
(Добавление)
Хм... сейчас проверил по лучше, проблема не в этом а в закрытии скомпилированного exe, если запускаю скрипт через кибор закрывает програму без звуков, все нормально, если exe звучит тын - дын, буду рыть еще пока не понятно....
 
 Top
Kibor
Отправлено: 01 Апреля, 2021 - 15:01:03
Post Id



Администратор
Эксперт


Покинул форум
Сообщений всего: 8098
Дата рег-ции: Март 2013  
Откуда: Одесса
Репутация: 355




Где то ошибка.. При работе exe

Но проверять не буду.
Данный код не запускаем. Дописывать не буду..
 
 Top
ivantu
Отправлено: 01 Апреля, 2021 - 15:03:27
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 732
Дата рег-ции: Нояб. 2013  
Репутация: 14




Я нашел тын-дын, он возникает из за таймера, при закрытии exe он видимо как то не коректно завершается, я сейчас проверил закомментировав в начале скрипта таймер
//enabletimer(0);

Тын-дын при закрытии exe исчез, теперь понять как это исправить...
(Добавление)
В таймере ничего сверхъестественного:

CODE:

CREATE_TIMER(0, 50){
textbkcolor(255, 65280);
textout(0, 100, 150, "Выбрана вкладка: "+format(current_tab), 0);
textout(1, 100, 170, "Выбрана вкладка: "+format(current_tab2), 0);

getmouse(mouse_posX, mousePosY);
if(current_tab != sendmessage(TCM_GETCURSEL, 0, 0, formatiw(tab)))
{
if(WindowFromPoint(mouse_posX, mousePosY)==tab)control_on_off(tab, #tab_ctrl[0][0], sizearray(tab_ctrl), #count_control_tab[0], #current_tab); // если был клик по табу
control_on_off2(); // отключить контролы второго таба
}

if(current_tab2 != sendmessage(TCM_GETCURSEL, 0, 0, formatiw(tab2)))
{
// сохранить Номер вкладки ТАБ 2
if(WindowFromPoint(mouse_posX, mousePosY)==tab2){
control_on_off(tab2, #tab2_ctrl[0][0], sizearray(tab2_ctrl), #count_control_tab2[0], #current_tab2); // если был клик по табу, который на Вкладке1
WritePrivateProfileString ("Tabs", "TAB_2_Cur", format(current_tab2), path_to_ini); //Записали в ini значение
}
}
}

(Добавление)
Поковырявшись еще понял что тындын из за

 Цитата:

textbkcolor(255, 65280);
textout(0, 100, 150, "Выбрана вкладка: "+format(current_tab), 0);
textout(1, 100, 170, "Выбрана вкладка: "+format(current_tab2), 0);


закомментировав это, тындын пропал.
(Добавление)
Т.Е таймер не причем... виноват textout при закрытии в таймере .
(Добавление)
Владимир вот Вам код, рабочий который тын-дын делает при закрытии собранного EXE
(Добавление)
CODE:

enabletimer(0);

createdialog(0);
showdialog(0, "тест", 100, 100, 400, 698, 3, 1); // 3-закрыть 1-остановить

loop(){sleep(100);}

CREATE_TIMER(0, 50){
textbkcolor(255, 65280);
textout(0, 100, 150, "Выбрана вкладка: ", 0);
textout(1, 100, 170, "Выбрана вкладка: ", 0);
}
 
 Top
Kibor
Отправлено: 01 Апреля, 2021 - 15:53:32
Post Id



Администратор
Эксперт


Покинул форум
Сообщений всего: 8098
Дата рег-ции: Март 2013  
Откуда: Одесса
Репутация: 355




И в Кибор тоже..
Посмотрю..
(Добавление)
Пока не знаю..
 
 Top
Zireael
Отправлено: 02 Апреля, 2021 - 01:59:48
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 4398
Дата рег-ции: Нояб. 2017  
Репутация: 580




Ошибка только в win7, в журнале можно посмотреть код события 3002. В win10 всё нормально.
 
 Top
ivantu
Отправлено: 02 Апреля, 2021 - 07:26:45
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 732
Дата рег-ции: Нояб. 2013  
Репутация: 14




У меня 8.1, ошибка не только в семёрке.
 
 Top
Страниц (1): [1]
Сейчас эту тему просматривают: 1 (гостей: 1, зарегистрированных: 0)
« Вопросы и решение проблем »


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




Powered by