Домой Классы Статические функции Перечисления (ENUM) Записи (RECORD)

{Separator}


(включая защищенные члены)



CLASS {Separator}
, UNTESTED:






IMPORT : 
{Control}
, 
{Paintbox}
, 
{Canvas}
, 
{Geometry}
, 
{Sorting}
, 
{System_functions}
, 
{String_functions}
, 
{Form}
, 
{AL4_form}
 .


BASE CLASS 
{Paintbox} .


 





ENUMERATION {direction|_line} : 

        'HORIZONTAL_LINE'
 ,

        'VERTICAL_LINE'
 .







{direction} 
Direction|_line





 





ENUMERATION {style_sepator|_line} : 

        'FLAT|_LINE'
 ,

        'RAISED|_LINE'
 ,

        'LOWERED|_LINE'
 .







{style_sepator} 
Style|_separator_line






REAL 
Margins|_top_bottom_for_horizontal_OR_left_right_for_vertical






BOOL 
Split_col|umns





 






OVERRIDE 
before_paint








BOOL 
Dots|_paint






INT 
Lines|_paint_1_to_4





 






OVERRIDE 
after_paint








STR 
Column_target
 , READ





  







FUNCTION 
Set_separator_column_target|_columns_to_resize

(

     {Form} 
F|orm_parent_to_separator
, 

     STR 
W|hat_separator_column_alias
, 

     STR 
T|arget_column_resize
)











OVERRIDE 
mouse_down

 , REPLACE
 , CALLBACK







BOOL 
resize_prev|ious_column






STR 
resize_col|umn_alias






REAL 
initial_size|_column






{point} 
mouse_touch|_position







------------------------------------ 'also, to prevent moving out the form'


{point} 
mouse_on_me|_initial_offset_from_corner





   






OVERRIDE 
mouse_up

 , REPLACE
 , CALLBACK











OVERRIDE 
mouse_move

 , REPLACE
 , CALLBACK











METHOD 
do_mouse_move_1time








END