Место общения программистов, форум разработчиков БД на Clarion
https://forum.clarionlife.net/
Я, помнится, этот темплейт использовал:Игорь Столяров писал(а): 29 Октябрь 2025, 8:27 Современная наука предлагает 2 (два) варианта решения вопроса:
1. Сборка приложения с RunTime C10 и выше.
От версии Windows проблема не зависит.
2. Замена полноэкранного разворачивания окон на растягивание по текущему размеру рабочей области AppFrame.
Код: Выделить всё
#! ****************************************************************************************************
#!
#! Made by JORGE ALEJANDRO LAVERA in ARGENTINA - Visit us in www.ClarionTemplates.com
#!
#! ****************************************************************************************************
#Template(JALPseudoMax,'PseudoMax v1.03 12/07/2010'),FAMILY('ABC')
#!=====================================================================================================
#EXTENSION(JAL_PM,'JAL: PseudoMax v1.03 12/07/2010 - Global Extension'),Application(JALExtPseudoMax(JALPseudoMax))
#DISPLAY(' PseudoMax '),AT(3,0,194,12), PROP(PROP:FontColor, 0FFFFFFH), PROP(PROP:Color,0844231H), PROP(PROP:FontSize,11), PROP(PROP:Font,'Verdana'), PROP(PROP:FontStyle,700)
#DISPLAY(' v1.03 '),AT(70,3), PROP(PROP:FontColor, 0FFFFFFH), PROP(PROP:Color,0844231H), PROP(PROP:FontSize,8), PROP(PROP:Font,'Verdana'), PROP(PROP:FontStyle,700)
#SHEET
#TAB('Windows')
#BOXED('Pseudo-Maximize'),CLEAR,SECTION
#DISPLAY()
#PROMPT('Replace Maximize function',CHECK),%JALReplaceMax,AT(20),DEFAULT(%TRUE)
.
.
.