Оберон-клуб «ВЄДАsoft»

Твердыня модульных языков
Текущее время: 16 июн 2025, 17:45

Часовой пояс: UTC + 2 часа




Начать новую тему Ответить на тему  [ Сообщений: 3 ] 
Автор Сообщение
СообщениеДобавлено: 13 июл 2017, 19:02 
Не в сети

Сообщения: 116
Откуда: Каменск-Уральский
Я пытаюсь добавить на форму кнопку но она почему-то не видна:
Код: "OBERON"
  1. mainWnd := WinApi.CreateWindowEx( WinApi.WS_EX_TOPMOST + WinApi.WS_EX_CONTROLPARENT, "MoveWin", "MoveWin", WinApi.WS_OVERLAPPEDWINDOW, 100, 100, 100, 500, 0, 0, instance, 0 );
  2. mainWnd2:= WinApi.CreateWindowEx(WinApi.WS_EX_TOPMOST , "BUTTON", "MyBUTTON", WinApi.WS_CHILD, 0, 150, 50, 50, 0, 0,0, mainWnd );
  3. res := WinApi.ShowWindow(mainWnd, WinApi.SW_SHOWDEFAULT);
  4. res := WinApi.UpdateWindow(mainWnd);

Что я делаю не так? И ещё: почему на компилятор в ВВ ругается на метод WinApi.CreateWindow?


Вернуться к началу
 Профиль  
Ответить с цитатой  
СообщениеДобавлено: 15 июл 2017, 05:30 
Не в сети

Сообщения: 116
Откуда: Каменск-Уральский
Всем спасибо за помощь :D Заработало:
Код: "OBERON"
  1. mainWnd := WinApi.CreateWindowEx(WinApi.WS_EX_TOPMOST, "MoveWin", "MoveWin", WinApi.WS_OVERLAPPEDWINDOW, 100, 100, 100, 500, 0, 0, instance, 0);
  2. mainWnd2 := WinApi.CreateWindowEx(WinApi.WS_EX_TOPMOST, "BUTTON", "MyButton", WinApi.WS_CHILD + WinApi.WS_VISIBLE + WinApi.WS_GROUP + WinApi.WS_TABSTOP + WinApi.BS_PUSHBUTTON, 0, 150, 50, 50, mainWnd, 1, instance, o);
  3. res := WinApi.ShowWindow(mainWnd, WinApi.SW_SHOWDEFAULT);
  4. res := WinApi.UpdateWindow(mainWnd);


Вернуться к началу
 Профиль  
Ответить с цитатой  
СообщениеДобавлено: 15 июл 2017, 09:26 
Не в сети
Администратор
Аватара пользователя

Сообщения: 189
Не обижайся... :D
Просто если сам не разберёшся с АПИ, очень сложно будет...
Особенно если есть кому что подсказать.

Сам так надеялся, что кто-то, что-то... В итоге когда разобрался и попробывал, все пошло как по маслу...

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

Вот тут как раз на WinApi обёртка для активного оберона и компилятор (в 1 посте)
viewtopic.php?f=15&t=268#p1588


Вернуться к началу
 Профиль  
Ответить с цитатой  
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 3 ] 

Часовой пояс: UTC + 2 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 18


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
Создано на основе phpBB® Forum Software © phpBB Group
© VEDAsoft Oberon Club