| 21 |
How do I specify that an object should be moved not resized
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.ObjectsLT = "Command1" oSplitBar.ObjectsRB = "Command1" |
| 20 |
I've noticed some margins that are not painted. How can I prevent/remove that
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.BorderWidth = 0 oSplitBar.BorderHeight = 0 oSplitBar.SplitBackColor = 0 |
| 19 |
How can I change the shape of the cursor
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.Cursor = "exCross" |
| 18 |
How can I display a tooltip when cursor hovers the split bar (pictures)
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.Template = "HTMLPicture(`pic1`) = `c:\exontrol\images\zipdisk.gif`" // oSplitBar.HTMLPicture("pic1") = "c:\exontrol\images\zipdisk.gif" oSplitBar.ToolTipText = "<img>pic1</img>This is a bit of text that's displayed when the control hovers the split bar." |
| 17 |
How can I display a tooltip when cursor hovers the split bar (images)
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=") oSplitBar.ToolTipText = "<img>1</img>This is a bit of text that's displayed when the control hovers the split bar." |
| 16 |
Is it possible to move the associated objects once the user drags the split bar, not just when it ends
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.ObjectsLT = "Command1" oSplitBar.ObjectsRB = "Command2" oSplitBar.MoveOnDrop = .f. |
| 15 |
How do I know what events your control supports
' Notifies the application once the control fires an event. function Event as v (EventID as N) oSplitBar = topparent:CONTROL_ACTIVEX1.activex ? oSplitBar.EventParam(-2) end function Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex |
| 14 |
Is it possible to get notified once the user moves the split bar
' Notifies that the user drags the split bar. function Drag as v (Position as N) oSplitBar = topparent:CONTROL_ACTIVEX1.activex ? "New Position" ? Position end function Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex |
| 13 |
How do I get notified once the user drop the split bar to a new position
' Occurs once the user ends dragging the split bar. function DragEnd as v (Position as N,Cancel as L) oSplitBar = topparent:CONTROL_ACTIVEX1.activex ? "New Position" ? Position end function Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex |
| 12 |
How do I programmatically move the split bar, to the right/bottom most position
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.ObjectsLT = "Command1" oSplitBar.ObjectsRB = "Command2" oSplitBar.MoveTo(oSplitBar.Max) |
| 11 |
How do I programmatically move the split bar, to the left/top most position
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.ObjectsLT = "Command1" oSplitBar.ObjectsRB = "Command2" oSplitBar.MoveTo(oSplitBar.Min) |
| 10 |
How do I programmatically move the split bar
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.ObjectsLT = "Command1" oSplitBar.ObjectsRB = "Command2" oSplitBar.MoveTo(-10) |
| 9 |
I've noticed that the objects are hidden, when the split bar is closed to the limit. Is it possible to prevent that
' Occurs when an object requires to be shown or hidden. function Show as v (Object as A,Visible as L) oSplitBar = topparent:CONTROL_ACTIVEX1.activex ? Object ? Visible end function Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.ObjectsLT = "Command1" oSplitBar.ObjectsRB = "Command2" oSplitBar.HideOnLimit = .f. |
| 8 |
How can I specify the limit to move the splitbar (hard coded value)
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.LimitLT = "32D" oSplitBar.LimitRB = "32D" |
| 7 |
How can I specify the limit to move the splitbar (percent)
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.LimitLT = "50%" oSplitBar.LimitRB = "50%" |
| 6 |
How do I change the split bar's visual appearance using your EBN files (BASE64)
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.BeginUpdate() oSplitBar.BackColor = 16777215 oSplitBar.VisualAppearance.Add(1,"gBFLBCJwBAEHhEJAAEhABV0GACAADACAxSDEMQBQKAAzQFAYbhgHCGAAGUYBRgmFgAQhFcZQSKUOQTDKMIziaQIRDINQlSTJcQxHJEExZCKLACkKKwMgkEYfTLGUxQGAsXBgEoWRjkAYJADYBIJDCME7yHBJDSdGaYIRBGCZbiGOYxQjKMqwJJUfBLEAZKLnGRIbpOA5VSBVcT1VZlPTBHqxaxhED6SjaOJqRpcERTeJobT1FgWRpqUYRSwMMJqWjCNhABKsBgdO4AKpffIwAxNf4XSBIAIQSSBUjGOg6TiMWB4JRqOxCEzpUZDNBIUQTRoAJrgOCAYhcZJVXhAeTbXibZZ8RzgCj4Lg+AQ5cLHbxyPJHZxlHadZ7nOYPThXFMLBImudA7MEOQjiuFh1ngDQ+C6V4Thw/Z4B0eRnleMJXm6cp8DoHhzD+MZ0jWe52EkP4lC+cZNn4f5fkKFZ6BIXYSjoBgciCBxmAEP4gkgNgOgMIAXGQb4EkUWBVlkO5hggPgaD+IYDj2WQTmICBUFWBZhhgbgOgcXYRC4KoCAcJxkieC5iGgOgvCmXYYjGdwtF+F5tnwOojkidgBgDGpCEIfRemGLZxhGRBnk2dR3l4CQWEgdAeCGJZpHUXxZD2T4Sl2ZptlyEZdkkZZLHMXwXEoXhyFuY5JkWCIiCcFZHDwHRTi0UQABAECAg") oSplitBar.SplitBackColor = 16777216 oSplitBar.EndUpdate() |
| 5 |
How do I change the split bar's visual appearance using your EBN files (file)
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.BeginUpdate() oSplitBar.BackColor = 16777215 oSplitBar.VisualAppearance.Add(1,"C:\Program Files\Exontrol\ExSplitBar\Sample\EBN\vthumb.ebn") oSplitBar.SplitBackColor = 16777216 oSplitBar.EndUpdate() |
| 4 |
How do I specify the objects to be resized to left/top or right/bottom side of the split bar (method runtime)
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.AddObjectLT("Command1") oSplitBar.AddObjectRB("Command2") oSplitBar.AddObjectRB("SplitBar2") oSplitBar.AddObjectRB("Command3") |
| 3 |
How do I specify the objects to be resized to left/top or right/bottom side of the split bar (method design)
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.ObjectsLT = "Command1" oSplitBar.ObjectsRB = "Command2,SplitBar2,Command3" oSplitBar.AddObjectLT("Command1") oSplitBar.AddObjectRB("Command2") oSplitBar.AddObjectRB("SplitBar2") oSplitBar.AddObjectRB("Command3") |
| 2 |
How do I change the split bar's color
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.SplitBackColor = 65280 |
| 1 |
How do I change the control's background color
Dim oSplitBar as P oSplitBar = topparent:CONTROL_ACTIVEX1.activex oSplitBar.BackColor = 65535 oSplitBar.BorderWidth = 4 oSplitBar.BorderHeight = 4 |