Форум » GUI » Графические примитивы в WINDOWTYPE PANEL ? » Ответить
Графические примитивы в WINDOWTYPE PANEL ?
SadStar2019: Правильно ли понял что команды типа DRAW LINE IN WINDOW Win_2 AT 0,0 TO 100,200 PENCOLOR {255,0,0} PENWIDTH 1 при рисовании в окне-панели используют координаты клиентской области а не панели? [more] [pre2] #include "minigui.ch" Function Main DEFINE WINDOW Win_1 ; ROW 0 ; COL 0 ; WIDTH 400 ; HEIGHT 400 ; TITLE 'Panel Window Demo' ; WINDOWTYPE MAIN DEFINE WINDOW Win_2 ; ROW 30 ; COL 30 ; WIDTH 300 ; HEIGHT 200 ; VIRTUAL WIDTH 400 ; VIRTUAL HEIGHT 600 ; WINDOWTYPE PANEL DEFINE LABEL LABEL_1 ROW 10 COL 10 VALUE 'Panel window...' WIDTH 300 END LABEL DEFINE TEXTBOX TEXT_5 ROW 240 COL 10 WIDTH 350 VALUE 'Test5' END TEXTBOX END WINDOW DEFINE BUTTON BUTTON_1 ROW 300 COL 10 WIDTH 200 CAPTION 'Draw Line' ACTION MyLine() END BUTTON DEFINE TEXTBOX TEXT_1 ROW 340 COL 10 WIDTH 450 VALUE 'Test5' END TEXTBOX END WINDOW Center Window Win_1 // Panel windows are automatically activated through its parent // so, only Win_1 must be activated. Activate Window Win_1 Return Nil //--------------------- function MyLine() DRAW LINE IN WINDOW Win_2 AT 0,0 TO 100,200 PENCOLOR {255,0,0} PENWIDTH 1 //нарисуем линию над текстом DRAW LINE IN WINDOW Win_2 AT Win_2.TEXT_5.Row-2,Win_2.TEXT_5.Col TO Win_2.TEXT_5.Row-2,Win_2.TEXT_5.Col+200 PENCOLOR {255,0,0} PENWIDTH 1 //нарисуем такую же линию на строке 20 DRAW LINE IN WINDOW Win_2 AT 20,Win_2.TEXT_5.Col TO 20,Win_2.TEXT_5.Col+200 PENCOLOR {255,0,0} PENWIDTH 1 return Nil //--------------------- [/pre2] [/more] Как заставить рисовать по координатам окна-панели? 2. Почему не появился нижний СкроллБар ведь для Win_2 WIDTH 300 а VIRTUAL WIDTH 400? Он появляется только если VIRTUAL WIDTH > 400. Т.е. сравнивает с шириной родительского окна? Еще прикольнее получается если превысить ширину родительского окна. Например так [pre2] DEFINE WINDOW Win_2 ; ROW 30 ; COL 30 ; WIDTH 420 ; HEIGHT 200 ; VIRTUAL WIDTH 450 ; VIRTUAL HEIGHT 600 ; WINDOWTYPE PANEL [/pre2]
Ответов - 0
полная версия страницы