fun SCSGUI_FillInGUIstructure (Channel) = let THEME_getParamsByTheme GD_THEME "TOOLTIP_BG_ICONE" -> [path1 _ _ _ _ _ _ _ _ ]in let exec GD_FUNCTIONHANDLER_LOADBITMAP with [path1 Channel] -> motif in let THEME_getParamsByTheme GD_THEME "TOOLTIP_BG_ICONE2" -> [path2 _ _ _ _ _ _ _ _ ] in let exec GD_FUNCTIONHANDLER_LOADBITMAP with [path2 Channel] -> motif2 in { set scsgui.SCSGUIstaticToolTip = TOOLTIP_Create scsgui.SCSGUIsmallFont [GD_TOOLTIP_TEXT_COLOR 0 0 0] GD_DEFAULT_BACKGROUNDCOLOR motif [5 2 15 18] "TOOLTIP_IS_USER_HELP_ENABLED"; set scsgui.SCSGUIdynamicToolTip = TOOLTIP_Create scsgui.SCSGUIsmallFont [GD_TOOLTIP_TEXT_COLOR 0 0 0] GD_DEFAULT_BACKGROUNDCOLOR motif2 [5 2 15 18] "TOOLTIP_IS_DYNAMIC_INFO_ENABLED"; set scsgui.SCSGUIwindowManager = WINMANAG_Create Channel; set scsgui.SCSGUIeditorsManager = EDITORSMANAGER_Create ; REFLEX_CBmoduleSelected @SCSGUI_ChangeViewOnModuleSelection; REFLEX_CBzoneSelected @SCSGUI_ChangeViewOnZoneSelection; } ;;