|
| 
| Submitted on: 2/3/2000
By: Mark Joyal
Level: Intermediate
User Rating:
By 16 Users
Compatibility:VB 5.0, VB 6.0
Users have accessed this code 15628 times.
| |
| | | This is a splitter control with 2 panes. I found the initial code out on the web somewhere, but it had a few bugs and was missing a few features I wanted, so I added the ability to colorize the splitter bar and the code now fires an event when the splitter is resized to allow for controls within controls to handle a resize. I also cleaned up the code and fixed a few bugs.
BTW : You can add splitters within splitters to create more than just 2 panes.
| |
| |
|
Download code
Note: Due to the size or complexity of this submission, the author has submitted it as a .zip file to shorten your download time. Afterdownloading it, you will need a program like Winzipto decompress it.
Virus note:All files are scanned once-a-day by Planet Source Code for viruses,but new viruses come out every day, so no prevention program can catch 100% of them.
FOR YOUR OWN SAFETY, PLEASE:
1)Re-scan downloaded files using your personal virus checker before using it.
2)NEVER, EVER run compiled files (.exe's, .ocx's, .dll's etc.)--only run source code.
3)Scan the source code with Minnow's Project Scanner
If you don't have a virus scanner, you can get one at many places on the net including:McAfee.com
|
Terms of Agreement:
By using this code, you agree to the following terms...
1) You may use
this code in your own programs (and may compile it into a program and distribute it in compiled format for languages that allow it) freely and with no charge.
2) You MAY NOT redistribute this code (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.
3) You may link to this code from another website, but ONLY if it is not wrapped in a frame.
4) You will abide by any additional copyright restrictions which the author may have placed in the code or code's description. |
Other 2 submission(s) by this author
|
|
| |
| Report Bad Submission |
|
| |
| Your Vote! |
|
See Voting Log |
| |
| Other User Comments |
2/3/2000 11:27:58 AM:Carl Pinto
this is great I was looking for
something to do this!
|
4/15/2000 7:07:39 AM:cris
How can i use it to split a form and
make 2 controls, listview and textbox,
resize height in the way windows
explorer does, but in the other
direction?
|
5/14/2000 9:28:22 AM:Eric Tomlinson
Can you give some idea on how to set it
up for use? I'm a novice and can't get
it to split correctly. Tried inserting
controls into it etc. HELP!!!
|
5/15/2000 9:37:54 AM:Phace
No documentation. How do you use it?
I see two child objects, how do they
work. This would be a nice piece if
there was even some small
documentation. I mean there's not even
a sample application using this control!
|
5/25/2000 4:47:13 AM:john
Definitely needs some documentation. A
quick and dirty sample app with some
comments on usage would be sufficient.
|
7/4/2000 3:39:26 PM:Elco
jeah I can't get this thing to work..
some comments in the source that's all
no docs whatsoever :(
|
7/4/2000 4:31:03 PM:author
dear god people, this isnt brain
science. it doesnt get too much easier
than this.
|
7/4/2000 4:32:00 PM:Mark Joyal
okay, my reply got truncated so
try#2
1) drop splitter control on
form
2) drop controls to split onto
splitter container
3) set
splitter.child1 =
control_to_split_1
4) set
splitter.child2 =
control_to_split_2
5) run
jeez, it
doesnt get much easier unless you want
to pay big money to sheridan software.
|
8/14/2000 10:26:53 AM:Rich
Is there anyway to make a child2 a Form?
|
12/16/2000 4:07:18 AM:yvikram
this is a great stuff. but i need
to know how fixed length columns can be
imported as such in ms excell or in dts
wizard in MS-Sql...ie., splitting the
columns
|
3/29/2001 1:08:23 PM:Dave
Brilliant! 5 stars.
|
8/10/2001 1:58:48 PM:kcain
I am having trouble resizing the
control in the my forms resize sub, if
there are any splitter1.width = ? or
.height changes it doesnt work, the
form tries to resize but wont work
|
9/4/2001 3:18:45 AM:Joo-Haeng Lee (aka Lixter)
Combination of vertical and horizontal
bars (3 areas) works so easily.
*****
Option Explicit
Private Sub
Form_Load()
Splitter1.Orientation
= splitVertical
Splitter1.SplitPercent = 50
Set
Splitter1.Child1 = TreeView1
Set
Splitter1.Child2 = Splitter2
Splitter2.Orientation =
splitHorizontal
Set
Splitter2.Child1 = ListView1
Set
Splitter2.Child2 = Text1
End
Sub
Private Sub
Form_Resize()
Me.Splitter1.Height =
Me.ScaleHeight - 2 *
Me.Splitter1.Top
Me.Splitter1.Width =
Me.ScaleWidth
End Sub
|
5/17/2002 7:29:27 AM:Dan F
Excellent piece of code.
|
6/25/2002 4:13:50 PM:Andrew Saturn
kcain: divide the width and height by
15, then go from there :]
it seems
the control forces TWIP
maybe?...
heres what I used (but I
have a weird form)
Splitter1.Width =
(Me.Width / 15) - (Splitter1.Left +
8)
Splitter1.Height = (Me.Height / 15)
- (Splitter1.Top + 8)
sorry of
this reply is wayyy too late
|
1/30/2003 7:54:38 PM:Ray Ward
nice work!
exactly what i was looking
for.
|
|
| Add Your Feedback! |
Note:Not only will your feedback be posted, but an email will be sent to the code's author in your name.
NOTICE: The author of this code has been kind enough to share it with you. If you have a criticism, please state it politely or it will be deleted.
For feedback not related to this particular code, please click here.
|
|
