Кибор :: Версия для печати

11. 007wan - 12 Сентября, 2019 - 07:08:59 - перейти к сообщению

Zireael пишет:

Цитата:

#definefile "C:\Users\Home\Desktop\МОЁ\Kibor\Constants.txt";

Ну да, у всех ведь есть этот файл.

Скачать Constants.txt [Яндекс Диск]

12. Zireael - 12 Сентября, 2019 - 07:21:05 - перейти к сообщению

Цитата:

while(window("Основной" ) == 0)
{
sleep(10);
}
else
{
//Window_Adjust();
//Window_Topmost();
}

else может быть в if, но не в while.

13. 007wan - 12 Сентября, 2019 - 07:26:48 - перейти к сообщению

Zireael пишет:

Цитата:

while(window("Основной" ) == 0)
{
sleep(10);
}
else
{
//Window_Adjust();
//Window_Topmost();
}

else может быть в if, но не в while.

Ок. Чисто теоретически - убрал. Проблема исчезла? Ползунок не мигает?
(Добавление)
Ошибка: Мигание ползунка.
1)мигание

Код (Отобразить)

CODE:

//C
external(INT, "CreateWindow", "CreateWindowExA", "User32.dll");
external(INT, "CreateMenu", "CreateMenu", "User32.dll");

//A
external(INT, "AppendMenu", "AppendMenuA", "User32.dll");

//S
external(INT, "SetMenuInfo", "SetMenuInfo", "User32.dll");
external(INT, "SetMenu", "SetMenu", "User32.dll" );
//-----------------------------------------------------------------------------------------------------------------------------------------------------
#definefile "C:\Users\Home\Desktop\МОЁ\Kibor\Constants.txt";

int Image_x[99], Image_y[99];
int Display_Color, Display_Width, Display_Height;
int MENUINFO[7] = {28, MIM_STYLE, 0, 0, 0, 0, 0};
int HMENU, HMENU1, HMENU2, HMENU3, HMENU4, SelectMenu;
win MainWindow, SecondaryWindow;

int Object_Scrollbar1;
int Srollbar1_Min = 0, Srollbar1_Max = 100, Srollbar1_Pos = 0, Up_Controls, Down_Controls;
//-----------------------------------------------------------------------------------------------------------------------------------------------------
getdisplay(Display_Color, Display_Width, Display_Height);

createdialog(0);
createdialog(1);

showdialog(0, "Основной", Display_Width/2-450, Display_Height/2-400, 700, 400, 4, 1);
setwindowparam(MainWindow);
//-----------------------------------------------------------------------------------------------------------------------------------------------------
while(window("Основной") == 0)
{
sleep(10);
}
else
{
//Window_Adjust();
//Window_Topmost();
}
//-----------------------------------------------------------------------------------------------------------------------------------------------------
loop()
{
sleep(10);
}
//-----------------------------------------------------------------------------------------------------------------------------------------------------
function getmessage(0, WM_CREATE)
{
MainWindow = formatiw(gethwnd(0));

HMENU = CreateMenu();
AppendMenu(HMENU, MF_POPUP, 1, "Настройки" );
AppendMenu(HMENU, MF_POPUP, 211, "Обновить" );
AppendMenu(HMENU, MF_POPUP, 111, "О программе" );
SetMenuInfo(HMENU, address(#MENUINFO[0]));
SetMenu(gethwnd(0), HMENU);
}
//-----------------------------------------------------------------------------------------------------------------------------------------------------
function getmessage(0, WM_COMMAND)
{
if(loword(message.wparam) == 1)
{
MainWindow = window("Основной");

showdialog(1, "Настройки", MainWindow.left+100, MainWindow.top+100, 525, 500, 4, 1);
setwindowparam(SecondaryWindow);
}
}
//-----------------------------------------------------------------------------------------------------------------------------------------------------
function getmessage(1, WM_CREATE)
{
Object_Scrollbar1 = CreateWindow(0, "SCROLLBAR", 0, WS_VISIBLE | WS_CHILD | SBS_VERT, 10, 10, 20, 200, gethwnd(1), 0, 0, 0);
}
//-----------------------------------------------------------------------------------------------------------------------------------------------------

2)Нету

Код (Отобразить)

CODE:

//C
external(INT, "CreateWindow", "CreateWindowExA", "User32.dll");
external(INT, "CreateMenu", "CreateMenu", "User32.dll");

//A
external(INT, "AppendMenu", "AppendMenuA", "User32.dll");

//S
external(INT, "SetMenuInfo", "SetMenuInfo", "User32.dll");
external(INT, "SetMenu", "SetMenu", "User32.dll" );
//-----------------------------------------------------------------------------------------------------------------------------------------------------
#definefile "C:\Users\Home\Desktop\МОЁ\Kibor\Constants.txt";

int Image_x[99], Image_y[99];
int Display_Color, Display_Width, Display_Height;
int MENUINFO[7] = {28, MIM_STYLE, 0, 0, 0, 0, 0};
int HMENU, HMENU1, HMENU2, HMENU3, HMENU4, SelectMenu;
win MainWindow, SecondaryWindow;

int Object_Scrollbar1;
int Srollbar1_Min = 0, Srollbar1_Max = 100, Srollbar1_Pos = 0, Up_Controls, Down_Controls;
//-----------------------------------------------------------------------------------------------------------------------------------------------------
getdisplay(Display_Color, Display_Width, Display_Height);

createdialog(0);

showdialog(0, "Основной", Display_Width/2-450, Display_Height/2-400, 700, 400, 4, 1);
setwindowparam(MainWindow);
//-----------------------------------------------------------------------------------------------------------------------------------------------------
while(window("Основной") == 0)
{
sleep(10);
}
else
{
//Window_Adjust();
//Window_Topmost();
}
//-----------------------------------------------------------------------------------------------------------------------------------------------------
loop()
{
sleep(10);
}
//-----------------------------------------------------------------------------------------------------------------------------------------------------
function getmessage(0, WM_CREATE)
{
MainWindow = formatiw(gethwnd(0));
/*
HMENU = CreateMenu();
AppendMenu(HMENU, MF_POPUP, 1, "Настройки" );
AppendMenu(HMENU, MF_POPUP, 211, "Обновить" );
AppendMenu(HMENU, MF_POPUP, 111, "О программе" );
SetMenuInfo(HMENU, address(#MENUINFO[0]));
SetMenu(gethwnd(0), HMENU);
*/
Object_Scrollbar1 = CreateWindow(0, "SCROLLBAR", 0, WS_VISIBLE | WS_CHILD | SBS_VERT, 10, 10, 20, 200, gethwnd(0), 0, 0, 0);
}
//-----------------------------------------------------------------------------------------------------------------------------------------------------
function getmessage(0, WM_COMMAND)
{
if(loword(message.wparam) == 1)
{
MainWindow = window("Основной");

showdialog(0, "Настройки", MainWindow.left+100, MainWindow.top+100, 525, 500, 4, 1);
setwindowparam(SecondaryWindow);
}
}
//-----------------------------------------------------------------------------------------------------------------------------------------------------

//-----------------------------------------------------------------------------------------------------------------------------------------------------

Мигание из-за того, что добавлено меню панельное. Как исправить хрен знает, а без него, как без руки)
(Добавление)
Точнее когда выводу в другой диалог
(Добавление)
А хотя не, не то... короче что-то с менюшками, созданием диалогов как-то так.

14. Nikanr - 12 Сентября, 2019 - 09:17:34 - перейти к сообщению

Поставь

CODE:

createdialog(1);

в коде до строчки

CODE:

showdialog(1, "Настройки", MainWindow.left+100, MainWindow.top+100, 525, 500, 4, 1);

(в коде где мигает)
А там где стоял - удали. И мигать не будет

15. Zireael - 12 Сентября, 2019 - 17:28:36 - перейти к сообщению

Цитата:

else может быть в if, но не в while.
Ок. Чисто теоретически - убрал. Проблема исчезла? Ползунок не мигает?

Я не говорил что это решит вопрос с миганием, просто указал на синтаксическую ошибку.
По поводу мигания, надо фокус убрать с ползунка.

Цитата:

external(INT, "SetFocus", "SetFocus", "User32.dll" ); // в начало

showdialog(1, "Настройки", MainWindow.left+100, MainWindow.top+100, 525, 500, 4, 1);
SetFocus(0);

16. 007wan - 13 Сентября, 2019 - 05:06:57 - перейти к сообщению

И что мне каждый раз снимать фокус при запуске? раньше не приходилось...
(Добавление)
Nikanr , Zireael , Помогло - Помогло, но лучше не ставить креатедиалог перед шоу, потому что по откртии меню он всегда будет создавать диалог, и запускать - не к чему.
(Добавление)
Почему тогда на этом примере не надо сбрасывать фокус?

Код (Отобразить)

17. Zireael - 13 Сентября, 2019 - 06:55:22 - перейти к сообщению

Цитата:

Почему тогда на этом примере не надо сбрасывать фокус?

Добавь createdialog(1); после createdialog(0); и будет мигать. Уже писал про этот баг, не исправлен.

18. 007wan - 13 Сентября, 2019 - 06:59:42 - перейти к сообщению

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

CODE:

[code]function getmessage(1, WM_VSCROLL)
{
if (message.lparam == Object_Scrollbar1)
{
if (Scrollbar1_Pos > 100 || Scrollbar1_Pos < 0)
{
Scrollbar1_Pos = 100;
}

if (Scrollbar1_Pos < 0)
{
Scrollbar1_Pos = 0;
}
//===========
if (message.wparam == 1 || message.wparam == SB_LINEDOWN)
{
Scrollbar1_Pos = Scrollbar1_Pos + 1;
SetScrollPos(Object_Scrollbar1, 2, Scrollbar1_Pos, 1);
}
//===========
if (message.wparam == 0 || message.wparam == SB_LINEUP)
{
Scrollbar1_Pos = Scrollbar1_Pos - 1;
SetScrollPos(Object_Scrollbar1, 2, Scrollbar1_Pos, 1);
}
//===========
if (loword(message.wparam) == SB_THUMBTRACK)
{

}

}
}

[/code]
(Добавление)
Надеюсь, после армии всё исправят и даже новое добавят))

19. 007wan - 15 Сентября, 2019 - 01:34:18 - перейти к сообщению

CODE:

function getmessage(0, WM_CREATE)
{
//для первого диалога
}

function getmessage(1, WM_CREATE)
{
//для второго диалога
}

function getmessage(2, WM_CREATE)
{
//для третьего диалога
}
//максимум их 3

function getmessage(0, WM_COMMAND)
{
//так же... Как для второго
}

function getmessage(2, WM_COMMAND)//Почему?
{
//Ошибка создания контрола. Код 1
}

(Добавление)
Мне уже начинает раздражать эти ошибки, и иногда кажется, что большие куски кода походу не запустятся, программу не сделаешь по желанию из-за ошибок.

20. Zireael - 15 Сентября, 2019 - 02:13:26 - перейти к сообщению

Цитата:

Мне уже начинает раздражать эти ошибки

Если хотите чтобы ошибки исправили, выкладывайте код, который позволяет их воспроизвести. Приведённый кусок кода не приводит к ошибкам.