Библиотека XP_Menu_Lib

Пётр · **Добавлено:** Пт ноя 21, 2008 9:07 pm

Да там больше API знать нужно, 90% на чистом API написанно.
А вот с API у меня проблемы, поэтому и так долго (2 недели) писал.

Да и рисование происходит по контексту экрана, а не окна.
Я просто ошибся и переменная содержала не хендл окна а ноль, и поэтому функции GetWindowDC и GetWindowRect работали с экраном, а не окном.
Но это в принципе ошибкой назвать нельзя.

Пётр · **Добавлено:** Сб ноя 22, 2008 8:46 pm

Библиотека в архиве
Произошли довольно сощественые изменения во внутреней структуре библиотеки. Это нужно было для добавления новых возможностей.
Появилось пару примочек, запустите пример, сами увидите.
Скрины не выкладываю, кому интересно, можете здесь посмотреть http://www.purebasic.fr/english/viewtopic.php?p=268134#268134 или запустить пример в библиотеке.

Артём · **Добавлено:** Сб ноя 22, 2008 11:47 pm

Классно! Я скачал. Пока придержу, нет программ, для нее...

Fdisk · **Добавлено:** Вс ноя 23, 2008 12:11 am

Артём писал(а):

Классно!

Мне тоже понравилось.
Чётко работает.

All_Creater · **Добавлено:** Вс ноя 23, 2008 1:34 am

Здорово, Петр!!! Спасибо за компонент! =)

Люди, и не надо спорить о том, хорошо или плохо регистрироваться на оф. форуме и указыавать свою национальность честно. Как правильно было сказано, люди везде одновременно одинаковые и разные, и зачастую принимают в штыки чужих. Но вообще-то, всегда работало правило "относись к другим так, как хочешь, чтобы относились к тебе", это - многовековая и проверенно работающая практика. Открытого и доброжелательного человека примут в любом нормальном месте. (Тем более, на форуме кодеров, всё-таки там нет всяких "гопников") Хотя в настоящее время это немного сложнее, всё-таки после истории с Грузией и информационной войны...

(кстати, один пурик на весь форум это действительно нечестно, тут они правы =) С другой стороны, в основном мы пишем Freeware, а это более-менее справедливо: зачем платить за то, что не приносит прибыли?)

ЗЫ:Жалко, не хватает знания английского, чтобы эту самую доброжелательность проявлять...

Пётр · **Добавлено:** Вс ноя 23, 2008 6:20 pm

Работа над ощибками.
В самой библиотеке пока ошибок не обнаружено, но есть одна при инициализации стиля "Офис 200".
Если при этом не заблокировано изменение стиля заголовка меню, то внизу заголовка остаётся синяя полоса при выборе пунктов.
Лечится это просто, достаточно добавить после строки

Код:

1
XP_SetMenuStyle(#XP_StyleNormal) ; Стиль "Офис 200"

такой код

Код:

1
2
3
4
StyleMenu.xp_menudata ; Объявляем структуру
XP_GetMenuStructure(StyleMenu) ; Читаем данные из библиотеки
StyleMenu\TitleFrameState=0    ; Стандартное обрамление заголовка главного меню
XP_SetMenuStructure(StyleMenu) ; Возвращаем данные в библиотеку

В следующей версии библиотеки это исправлю.

PS.
Я вот одного понять не могу. Почему в большенстве офисных надстроек над меню есть утечка ресурсов (короче памяти).
"Страдает", этим, скажем, знакомая нам прога ApiViewer2004, PB библиотека ProGUI (за которую буржуй 40$ просит :shock:

), код, который Fdisk выложил в теме про офисное меню.

Чтобы понаблюдать такую утечку запустите диспетчер задач и начните открывать и закрывать меню у тестируемой проги одновременно наблюдая за количеством требуемой памяти для приложения. Так вот, размер памяти будет постоянно расти...

kaligraf · **Добавлено:** Вс ноя 23, 2008 9:29 pm

Может это из-за инициализации памяти внутри процедур?
Что происходит, когда делается AllocateMemory в процедуре и память при выходе из процедуры не освобождается FreeMemory...
Возможно инициализированная память остаётся, а указатель при выходе из процедуры теряется. при повторной инициализации - новый участок памяти, и предыдущий тоже занят. Так по кругу - может причина в этом?

kaligraf · **Добавлено:** Вс ноя 23, 2008 9:40 pm

Создал EXE-шник вот к этому коду:

Код:

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Procedure.l Any(MemRazmer)
*TempMem=AllocateMemory(MemRazmer)
Rez.l=*TempMem
ProcedureReturn Rez.l
EndProcedure
 
For k=0 To 100000
Rez=Any(1000)
Debug Str(Rez)
Delay(100)
Next k
 

Посмотрел в диспетчере задач - эффект похожий.

Пётр · **Добавлено:** Вс ноя 23, 2008 11:09 pm

Да это понятно, вопрос в том, почему они память не освобождают, ведь ApiViewer2004 писали не дилетанты!
Кстати, там скорее всего не освобождаются контексты, созданные с помощью API функций GetDC, CreateCompatibleDC или других аналогичных.
Кисти и перья созданные с помощью CreateSolidBrush, CreatePen тоже освобождать нужно, а иначе нименуемо будет утечка памяти.
Если хоть один объект не закрыть, то будет полная

Могут возникнуть глюки из-за исчерпания лимита объектов для данного приложения. Видел уже такое, что происходило из-за этой надстойки меню http://www.purebasic.fr/english/viewtopic.php?t=27233&highlight=office+menu
Всё окно чернело и пропадали гаджеты! :shock:

Поэтому я уделил особое внимание этому вопросу в своей библиотеке, т. е. надёжность прежде всего.

Вот скрин проги до глюка.

Вот после глюка. Тут ещё открыто окно "О программе".

А вот как заглючил OpenFileRequester :shock:

Саму прогу можете здесь http://www.ikarab.narod.ru/KS0108.html качнуть (торопитесь, скоро её заменю, нужно этот глюк "прибить").

Для возникновения подобного глюка просто открывайте и закрывайте меню и водите мышкой по открытому меню. В общем делайте так, чтобы работал код, модифицирующий меню.
Через пару минут глюк появися.

Пётр · **Добавлено:** Сб ноя 29, 2008 1:26 pm

Fdisk писал(а):

Для них неважно, как именно, но, русского уколоть им надо, просто будут молчанием обходить, как будто тебя нет

Задал им вопрос http://www.purebasic.fr/english/viewtopic.php?t=35347, а они молчат - партизаны.
Хотя может вопрос не простой.

Morganolla · **Добавлено:** Сб ноя 29, 2008 1:39 pm

Петр, твой английский оставляет желать лучшего...

Я сам не понял, что ты хотел спросить, а они уж и подавно... И кликуху свою лучше переделай не User_Russian а Crazy_Russian - они так тебя быстрее поймут...

А что ты вообще хотел спросить у них?

Morganolla · **Добавлено:** Сб ноя 29, 2008 1:41 pm

е-мое, я уже профессор!!!!!!!!!!!!

Пётр · **Добавлено:** Сб ноя 29, 2008 2:01 pm

Morganolla писал(а):

А что ты вообще хотел спросить у них?

Как скопировать текст в формате RTF из редактора Scintilla.dll

Morganolla писал(а):

Петр, твой английский оставляет желать лучшего

Да я его вообще не знаю, перевожу "Сократом".

Morganolla писал(а):

Crazy_Russian

Сам ходи под таким ником

Morganolla · **Добавлено:** Сб ноя 29, 2008 2:20 pm

А Scintilla.dll поддерживает RTF??? И куда ты его хочешь скопировать? И как т.е., типа программно??? Твой вопрос выглядит абстрактно и совершенно неопределенно :shock:

Твой вопрос должен звучать примерно так: How can I copy RTF text from Scintilla...

Пётр · **Добавлено:** Сб ноя 29, 2008 2:41 pm

Morganolla писал(а):

А Scintilla.dll поддерживает RTF

Официально у неё нет такой функции (по крайней мере я не нашёл в описании), но в одной проге я такое видел

Morganolla писал(а):

Твой вопрос должен звучать примерно так

Спасибо, сейчас отредактирую пост.

purebasic.info

Библиотека XP_Menu_Lib

Кто сейчас на форуме