Forth и другие саморасширяющиеся системы программирования Locations of visitors to this page
Текущее время: Сб дек 16, 2017 01:38

...
Google Search
Forth-FAQ Spy Grafic

Часовой пояс: UTC + 3 часа [ Летнее время ]




Начать новую тему Ответить на тему  [ Сообщений: 17 ]  На страницу 1, 2  След.
Автор Сообщение
 Заголовок сообщения: Quark: Еще немного GUI
СообщениеДобавлено: Вт фев 10, 2009 00:53 
Не в сети
Administrator
Administrator
Аватара пользователя

Зарегистрирован: Вт май 02, 2006 22:48
Сообщения: 6100
Благодарил (а): 14 раз.
Поблагодарили: 96 раз.
На базе программно реализованного буфера глубины.
Изображение

А вот как это сделано с точки зрения прикладной программы:
Код:
0 32 1400 48 SET-XYWH
NEW-PANEL MENU

0 WINDOW.Y @ 100 - 1400 100 SET-XYWH
NEW-PANEL CONSOLE
CONSOLE ANCHOR-DOWN SET-ANCHORS

0 81 150 WINDOW.Y @ 182 - SET-XYWH
NEW-PANEL TOOLS
TOOLS ANCHOR-HEIGHT SET-ANCHORS

WINDOW.X @ 160 - 81 160 WINDOW.Y @ 182 - SET-XYWH
NEW-PANEL BOOKMARKS
BOOKMARKS ANCHOR-RIGHT ANCHOR-HEIGHT OR SET-ANCHORS

2 35 80 40 SET-XYWH

NEW-BUTTON BTN1
BTN1 " New" SET-CAPTION
BTN1 USE RRR SET-ACTION

NEW-BUTTON BTN2
BTN2 " Open" SET-CAPTION
BTN2 USE BBB SET-ACTION

NEW-BUTTON BTN3
BTN3 " Save" SET-CAPTION
BTN3 USE FFF SET-ACTION

WINDOW.X @ 158 - 85 156 25 SET-XYWH
NEW-BUTTON BOOK1
BOOK1 ANCHOR-RIGHT SET-ANCHORS
BOOK1 " Новый файл" SET-CAPTION

20 100 100 20 SET-XYWH
NEW-CHECKBOX YESNO
YESNO " Нажми меня" SET-CAPTION
                                 


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Ср фев 11, 2009 16:58 
Не в сети

Зарегистрирован: Ср июл 05, 2006 14:44
Сообщения: 231
Благодарил (а): 0 раз.
Поблагодарили: 7 раз.
Добрый день!

Довольно неплохо, вот здесь
BTN1 USE RRR SET-ACTION
RRR - следует понимать слово, которое будет запущено при нажатии на кнопку?
нажатие кнопки это когда
1. указатель над кнопкой и произошло нажатие или
2. указатель над кнопкой и произошло отпускание или
3. указатель над кнопкой и последовательно происходит нажатие а затем отпускание кнопки?

спасибо.


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Ср фев 11, 2009 17:58 
Не в сети
Administrator
Administrator
Аватара пользователя

Зарегистрирован: Вт май 02, 2006 22:48
Сообщения: 6100
Благодарил (а): 14 раз.
Поблагодарили: 96 раз.
Alex писал(а):
BTN1 USE RRR SET-ACTION
RRR - следует понимать слово, которое будет запущено при нажатии на кнопку?

Совершенно верно. USE является алиасом для ['] - выглядит симпатишно :)

Alex писал(а):
нажатие кнопки это когда

Когда произошло отпускание. В действительности у каждого объекта есть набор векторов, последовательно вызываемых при активности мышки. Нажатие, отпускание, вход и выход - все это отдельные слова, на которые можно что-то назначить. Объекты BUTTON при создании получают универсальные обработчики, которые при нажатии ЛКМ рисуют "утопленную" границу, при входе подсвечивают Caption другим цветом (устанавливаемая глобально для движка VALUE-переменная), и при выходе рисуют надпись стандартным цветом. При отпускании по умолчанию не делается ничего, SET-ACTION есть просто некая удобная для прикладного программиста обертка.


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Ср фев 11, 2009 19:19 
Не в сети

Зарегистрирован: Ср июл 05, 2006 14:44
Сообщения: 231
Благодарил (а): 0 раз.
Поблагодарили: 7 раз.
Замечательно, вполне стандартное поведение и еще можно кое-что заточить под нужды.
и кнопку одну и ту же можно юзать многократно пользуя SET-CAPTION и SET-ACTION :)
а планируются ли выпадающие списки, гриды, таб-вкладки?
спасибо.


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Ср фев 11, 2009 19:53 
Не в сети
Administrator
Administrator
Аватара пользователя

Зарегистрирован: Вт май 02, 2006 22:48
Сообщения: 6100
Благодарил (а): 14 раз.
Поблагодарили: 96 раз.
Пока ближайшие планы:
1) Радиокнопки
2) Невыпадающие списки
3) Кнопки с "глифом" (bmp)
4) Статический текст, статические bmp
5) Progress bar
6) Просмотр текста с прокруткой (пример в рядом лежащей теме)
7) Перекрывающиеся закладки (центральное поле на скриншоте, переключаемые кнопками серии BOOKMARKS).

Собственно, на данном этапе я точно могу дать подробное изложение, как это все делалось, если кому-то захочется "такое же, только немного не такое", тем более что в ядро кварка встроены ассемблерные слова, ускоряющие проверку рисования объектов с учетом перекрытия. Система нужна для большого, оплаченного и даже частично сданного проекта, так что я специально хочу аккуратно дистанцироваться от призывов "бросайте все и развивайте МойФорт". Поэтому, за неимением аргументированных запросов на "ранний доступ", я планирую сначала подождать обкатки запущенного движка, и только потом предоставить свободный доступ к нему на условиях freeware либо GPL.


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Ср фев 11, 2009 22:59 
Не в сети

Зарегистрирован: Сб май 06, 2006 12:01
Сообщения: 959
Откуда: Украина, Харьков
Благодарил (а): 2 раз.
Поблагодарили: 7 раз.
Хищник писал(а):
Собственно, на данном этапе я точно могу дать подробное изложение, как это все делалось,
Хотелось бы глянуть... ;)
Хищник писал(а):
если кому-то захочется "такое же, только немного не такое",
Уже хочется! Да и посмотреть, может, подойдет реализация. Или хотя бы чтоб было базовое решение для переделки и сравнения, получилось лучше или хуже.

_________________
With best wishes, in4.


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Ср фев 11, 2009 23:54 
Не в сети
Administrator
Administrator
Аватара пользователя

Зарегистрирован: Вт май 02, 2006 22:48
Сообщения: 6100
Благодарил (а): 14 раз.
Поблагодарили: 96 раз.
in4 писал(а):
Хотелось бы глянуть...

Уфф... ну это мне сесть и писать, писать, писать... :shuffle; Можно в чате... или тогда уж до первой моей вылазки в документирование.


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Пт фев 13, 2009 18:58 
Не в сети
Аватара пользователя

Зарегистрирован: Вт мар 20, 2007 23:39
Сообщения: 1252
Благодарил (а): 3 раз.
Поблагодарили: 16 раз.
Хищник писал(а):
Собственно, на данном этапе я точно могу дать подробное изложение, как это все делалось, если кому-то захочется "такое же, только немного не такое", тем более что в ядро кварка встроены ассемблерные слова, ускоряющие проверку рисования объектов с учетом перекрытия.

Хищник писал(а):
Уфф... ну это мне сесть и писать, писать, писать... Можно в чате... или тогда уж до первой моей вылазки в документирование.

Лучше в форуме - Тирекс-то на больничном. Вобщем ждем :)

_________________
Cтоимость сопровождения программного обеспечения пропорциональна квадрату творческих способностей программиста.
Роберт Д. Блисc


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Вс фев 15, 2009 15:15 
Не в сети
Administrator
Administrator
Аватара пользователя

Зарегистрирован: Вт май 02, 2006 22:48
Сообщения: 6100
Благодарил (а): 14 раз.
Поблагодарили: 96 раз.
Это Progress bar, статический текст и статическая bmp-картинка.
Изображение


Последний раз редактировалось Hishnik Вс фев 15, 2009 21:01, всего редактировалось 1 раз.

Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Вс фев 15, 2009 18:30 
Не в сети

Зарегистрирован: Ср июл 05, 2006 14:44
Сообщения: 231
Благодарил (а): 0 раз.
Поблагодарили: 7 раз.
Лепота, хочется попробовать :)


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Вс фев 15, 2009 19:00 
Не в сети
Administrator
Administrator
Аватара пользователя

Зарегистрирован: Вт май 02, 2006 22:48
Сообщения: 6100
Благодарил (а): 14 раз.
Поблагодарили: 96 раз.
Надо еще какое-то количество элементов оформления и побороть лень, вставив проверку размеров :)


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Вс фев 15, 2009 21:00 
Не в сети
Administrator
Administrator
Аватара пользователя

Зарегистрирован: Вт май 02, 2006 13:19
Сообщения: 3565
Откуда: St.Petersburg
Благодарил (а): 4 раз.
Поблагодарили: 72 раз.
этак и до Visual-Quark недалеко ;)

_________________
С уважением, WingLion
Forth-CPU . RuF09WE
Мой Форт
Отсутствие бана это не заслуга юзера, а недоработка модератора (с)


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Вс фев 15, 2009 21:04 
Не в сети
Administrator
Administrator
Аватара пользователя

Зарегистрирован: Вт май 02, 2006 22:48
Сообщения: 6100
Благодарил (а): 14 раз.
Поблагодарили: 96 раз.
WingLion писал(а):
этак и до Visual-Quark недалеко

Нуу... если разобраться, форму можно генерировать и из чего-нибудь стороннего, где несложно делать обработку Drag&Drop. Мне так кажется... Например, Delphi попробовать, не в смысле адаптировать, конечно, а написать на нем программку, которая позволит таскать по экрану объекты и сгенерирует потом текстик на Форте с их инициализацией.


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Вс фев 15, 2009 21:09 
Не в сети

Зарегистрирован: Вт май 09, 2006 12:31
Сообщения: 3438
Благодарил (а): 5 раз.
Поблагодарили: 16 раз.
WingLion писал(а):
этак и до Visual-Quark недалеко ;)

реальные кварки никогда не участвуют во взаимодействиях, которые позволили бы их видеть :D
придётся менять название :idea:

_________________
понимаю некоторую бестолковость некоторых вопросов


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Вс фев 15, 2009 21:12 
Не в сети
Administrator
Administrator
Аватара пользователя

Зарегистрирован: Вт май 02, 2006 13:19
Сообщения: 3565
Откуда: St.Petersburg
Благодарил (а): 4 раз.
Поблагодарили: 72 раз.
Antivisual-Quark :)

_________________
С уважением, WingLion
Forth-CPU . RuF09WE
Мой Форт
Отсутствие бана это не заслуга юзера, а недоработка модератора (с)


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 17 ]  На страницу 1, 2  След.

Часовой пояс: UTC + 3 часа [ Летнее время ]


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

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


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

cron
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
phpBB сборка от FladeX // Русская поддержка phpBB