This commit is contained in:
Steffen Schröder 2014-01-05 14:12:32 +01:00
parent 7aa53eda87
commit 5f27ab3e4a

View File

@ -396,51 +396,60 @@ Void " . self::FUNCTION_SETTOOLTIPTEXT . "(CMlControl _TooltipControl, CMlContro
if (!$this->tooltips) return ""; if (!$this->tooltips) return "";
$mouseOverScript = " $mouseOverScript = "
if (Event.Control.HasClass(\"" . self::CLASS_TOOLTIPS . "\")) { if (Event.Control.HasClass(\"" . self::CLASS_TOOLTIPS . "\")) {
if (Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_ONCLICK . "\")) break; if (!Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_ONCLICK . "\")) {
declare Invert = Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_INVERT . "\"); declare Invert = Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_INVERT . "\");
foreach (ControlClass in Event.Control.ControlClasses) { foreach (ControlClass in Event.Control.ControlClasses) {
declare TooltipControl <=> Page.GetFirstChild(ControlClass); declare TooltipControl <=> Page.GetFirstChild(ControlClass);
if (TooltipControl == Null) continue; if (TooltipControl == Null) continue;
TooltipControl.Visible = !Invert; TooltipControl.Visible = !Invert;
" . self::FUNCTION_SETTOOLTIPTEXT . "(TooltipControl, Event.Control); " . self::FUNCTION_SETTOOLTIPTEXT . "(TooltipControl, Event.Control);
}
} }
}"; }";
$mouseOutScript = " $mouseOutScript = "
if (Event.Control.HasClass(\"" . self::CLASS_TOOLTIPS . "\")) { if (Event.Control.HasClass(\"" . self::CLASS_TOOLTIPS . "\")) {
declare FML_Clicked for Event.Control = False; if (!Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_ONCLICK . "\")) {
declare StayOnClick = Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_STAYONCLICK . "\"); declare FML_Clicked for Event.Control = False;
if (StayOnClick && FML_Clicked) break; declare StayOnClick = Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_STAYONCLICK . "\");
declare Invert = Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_INVERT . "\"); if (!StayOnClick || !FML_Clicked) {
foreach (ControlClass in Event.Control.ControlClasses) { declare Invert = Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_INVERT . "\");
declare TooltipControl <=> Page.GetFirstChild(ControlClass); foreach (ControlClass in Event.Control.ControlClasses) {
if (TooltipControl == Null) continue; declare TooltipControl <=> Page.GetFirstChild(ControlClass);
TooltipControl.Visible = Invert; if (TooltipControl == Null) continue;
" . self::FUNCTION_SETTOOLTIPTEXT . "(TooltipControl, Event.Control); TooltipControl.Visible = Invert;
" . self::FUNCTION_SETTOOLTIPTEXT . "(TooltipControl, Event.Control);
}
}
} }
}"; }";
$mouseClickScript = " $mouseClickScript = "
if (Event.Control.HasClass(\"" . self::CLASS_TOOLTIPS . "\")) { if (Event.Control.HasClass(\"" . self::CLASS_TOOLTIPS . "\")) {
declare Handle = True;
declare Show = False; declare Show = False;
declare OnClick = Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_ONCLICK . "\"); declare OnClick = Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_ONCLICK . "\");
if (OnClick) { if (!OnClick) {
Show = !Event.Control.Visible;
} else {
declare StayOnClick = Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_STAYONCLICK . "\"); declare StayOnClick = Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_STAYONCLICK . "\");
if (StayOnClick) { if (StayOnClick) {
declare FML_Clicked for Event.Control = False; declare FML_Clicked for Event.Control = False;
FML_Clicked = !FML_Clicked; FML_Clicked = !FML_Clicked;
if (FML_Clicked) break; if (FML_Clicked) {
Show = False; Handle = False;
} else {
Show = False;
}
} else { } else {
break; Handle = False;
} }
} }
declare Invert = Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_INVERT . "\"); if (Handle) {
foreach (ControlClass in Event.Control.ControlClasses) { declare Invert = Event.Control.HasClass(\"" . self::OPTION_TOOLTIP_INVERT . "\");
declare TooltipControl <=> Page.GetFirstChild(ControlClass); foreach (ControlClass in Event.Control.ControlClasses) {
if (TooltipControl == Null) continue; declare TooltipControl <=> Page.GetFirstChild(ControlClass);
TooltipControl.Visible = Show && !Invert; if (TooltipControl == Null) continue;
" . self::FUNCTION_SETTOOLTIPTEXT . "(TooltipControl, Event.Control); if (OnClick) Show = !TooltipControl.Visible;
TooltipControl.Visible = Show && !Invert;
" . self::FUNCTION_SETTOOLTIPTEXT . "(TooltipControl, Event.Control);
}
} }
}"; }";
$tooltipsLabels = Builder::getLabelImplementationBlock(self::LABEL_MOUSEOVER, $mouseOverScript); $tooltipsLabels = Builder::getLabelImplementationBlock(self::LABEL_MOUSEOVER, $mouseOverScript);