CommonControls (Replacement of the MS common controls)

Important/Critical update released, when using the CoolBar control.

There were some major mistakes done on the update from 13-Jul-2014. Sorry..
Now everything should work.

Quote:

---

Originally Posted by Krool

When you put a normal VB.CommandButton on the Form. Are the visual themes visible in your IDE?

---

i think yes, it's visible
here's more information from procmon(process monitor tools) when i drag your stylish button to the form
http://pastebin.com/raw.php?i=bdPVa0tN

Judging by the about form, the obvious answer is no, because its buttons are not styled, either.

Quote:

---

Originally Posted by Cube8

Judging by the about form, the obvious answer is no, because its buttons are not styled, either.

---

so what should i do to make this custom component work?

It is a good idea to have 2 copies of Vb6.exe
One is the original.
Second is with embedded resource for Theme support so you can see Themed controls in the IDE without needing to compile every time.
Then it is just a matter copying the desired Vb6.exe to "C:\Program Files (x86)\Microsoft Visual Studio\VB98" folder.

There is obviously something wrong with your Manifest or it didn't get embedded.
Your about screen should look like this?

Attachment 116439

Quote:

---

Originally Posted by lrd_VB6

Hello

I proceeded a "few" changes to routines TreeView and Node(s).
I submit for your approval.

Now the Image and SelectedImage properties function as in the original.
You can use the keys as text or numeric.

Everything seems to work fine, but you never know ... :o

best regards

---

I think for the moment I will not change this as in the original.
As this would result in a big overhead. Also for "design time visible" controls, e.g. TabStrip.
And it would propably slow down some controls, e.g. ListView control...

Update. ActiveX Control Version 1.1 released.

good job krool
thank you

Thanks for the update krool also thanks for the help before guys
now i think i know my problem because of manifest & comctl32.dll
i got this error

Attachment 116717

Could anyone help me to fix this please?
i'm new with vb6 need tutorial to fix this error.
thank you.

- Create a copy of "VB6.EXE" and rename to "VB6_XP.EXE".
- copy attached file in the same folder. (manifest).
- Rename VB6_XP.EXE.manifest.txt in VB6_XP.EXE.manifest
- execute "VB6_XP.EXE"
You have VB6 with the theme and not error. :D

Quote:

---

Originally Posted by lrd_VB6

- Create a copy of "VB6.EXE" and rename to "VB6_XP.EXE".
- copy attached file in the same folder. (manifest).
- Rename VB6_XP.EXE.manifest.txt in VB6_XP.EXE.manifest
- execute "VB6_XP.EXE"
You have VB6 with the theme and not error. :D

---

It's working great. Thank you.
btw why we should change it to VB6_XP.EXE ? is it effect to deployment?

Hi!
Is there a way to modify the Tag property so as to use a Variant instead of a String?
Thanks

Quick question, I did a search on this thread first and didnt return any results.

On the textbox control, I can change the alignment at runtime on windows 7 but on xp it refuses to change, it even shows the alignment has changed yet does take effect (I use a msgbox to tell me the current alignment and it shows it changed). But on a newer OS it does are works fine. The normal textbox does it just fine on xp, so I am not sure if this is simply needing the v6 like some of the other features do.

So I have a simple drop down list that the user can set the alignment. In the IDE it doesnt work and it doesnt work when complied on xp. But it works fine on 7.

Am I missing something?

Any info would be great, and keep up the great work.

-Shane

Quote:

---

Originally Posted by SMC1979

On the textbox control, I can change the alignment at runtime on windows 7 but on xp it refuses to change, it even shows the alignment has changed yet does take effect (I use a msgbox to tell me the current alignment and it shows it changed). But on a newer OS it does are works fine. The normal textbox does it just fine on xp, so I am not sure if this is simply needing the v6 like some of the other features do.

---

I have tested the 'Alignment' property in the TextBoxW control. Worked on XP and 7. (Whether comctl32.dll v5.8x or v6.x)
Anyone else other results?

Just to clarify, this is when the program is running and not in the IDE, in the IDE it works fine of course. Only changing it after it is running does it not work. But I have only tested on my XP in VMware that I program in, on 7 and 8 it works just fine. So the comctrl32 on the XP machine is 5.8 and of course the other OS's it is v6.

If it all helpful I could make a small short video showing it.

Shane

Another thing as well. The combo box. When I have a large list of items in a normal combo box I can start typing and it will pull up the best result. When I do that with the combo box with this one it is only taking the first letter and if I type a 2nd letter after it goes to a different item instead of using the first letter with it.

So say you have a combo box with these list items

Apple
Grape
Pie

And the combo current text is blank. You have focus on the combo box and start typing, as soon as you hit "a" apple shows up in the list, then just as quickly you hit "p" after the "a" and instead of staying on apple it goes right to "Pie"

So is there is a setting or option for the combo box that needs to be set so that it accepts more than just 1 letter when typing into it?

Shane

Halo Krool,

in the RichTextBox control (VBCCR11.OCX) there is no SelChange routine.

Thanks for your attention.

Quote:

---

Originally Posted by akogan

in the RichTextBox control (VBCCR11.OCX) there is no SelChange routine.

---

There is a SelChange event on VBCCR11.OCX. (Even on VBCCR10.OCX is this event available)

Code:

---

Private Sub RichTextBox1_SelChange(ByVal SelType As Integer, ByVal SelStart As Long, ByVal SelEnd As Long)

---

Quote:

---

Originally Posted by SMC1979

Another thing as well. The combo box. When I have a large list of items in a normal combo box I can start typing and it will pull up the best result. When I do that with the combo box with this one it is only taking the first letter and if I type a 2nd letter after it goes to a different item instead of using the first letter with it.

So say you have a combo box with these list items

Apple
Grape
Pie

And the combo current text is blank. You have focus on the combo box and start typing, as soon as you hit "a" apple shows up in the list, then just as quickly you hit "p" after the "a" and instead of staying on apple it goes right to "Pie"

So is there is a setting or option for the combo box that needs to be set so that it accepts more than just 1 letter when typing into it?

---

This problem occurs because the ComboBox search is based on one character instead of the complete character set.

Is it possible to set the RTB background to transparent?

The following seems to work for the original Rich Text Box, but for some reason not the new one:

SetWindowLong richtextbox1.hwnd, GWL_EXSTYLE, WS_EX_TRANSPARENT


Thanks again for all your hard work

Quote:

---

This problem occurs because the ComboBox search is based on one character instead of the complete character set.

---

I was able to code a fix around for it. I had to change the combo from a list to a dropdown box, so the user could type in it. As they type the best result shows up (I have it set to show the drop down when they start typing) then, since I needed it as a list and not let them type in something, I have the combo do a find after the drop down closes and if there is a result it sets it, if there isnt it blanks out the text the typed in. So I get the effect that I need if the combo box was set back to a drop down list.

So I was able to do the effect I was looking for that way :-)

I dug in some more and think I know how the normal combo box does it. It holds a variable that if another key is pressed under a certain amount of time then it looks for that string, after a small amount of time pasts it resets back to the first letter that is typed next.

Just like how when you are typing text into the combo box it works fine as the best result comes up. When in drop down list mode you would have to have a variable and a timer to hold what the user is typing and then clear it after say, 1 sec.

If you like I could do that into the control for you and send your way to see if it is something you could add.

Shane

Quote:

---

Originally Posted by I-Like-Toast

Is it possible to set the RTB background to transparent?

The following seems to work for the original Rich Text Box, but for some reason not the new one:

SetWindowLong richtextbox1.hwnd, GWL_EXSTYLE, WS_EX_TRANSPARENT

---

It actually works. But, as there is a underlying UserControl under the RichTextBox it will always show the background of the UserControl. Thus it is not visible transparent. But again, the actual RichTextBox is indeed transparent with this.

I could make a 'Transparent' property for the RichTextBox which would do two things.
1. Set the WS_EX_TRANSPARENT extended style to the RichtTextBox control.
2. Make the background of the UserControl a replica of the underlying background to simulate transparency.

Update released.

Quote:

---

Originally Posted by Krool

Update released.

---

Hey Krool,

Is it free for commercial use as well ?

Quote:

---

Originally Posted by stum

Hey Krool,

Is it free for commercial use as well ?

---

Feel free to use it for commercial use. But only embedded in an application. Not the controls on its own.

very cool controls 1 thing i noticed that is missing (which i use alot)
RightToLeft Property

{{Ok I have noticed that the separator work as a placeholder, but the separator doesn’t exist}}
After Playing around i noticed that Separator and Placeholder are the same depending on the CustomWidth. Also the toolbar Style hast to be Flat In order to see the divider Line


A bug in the ocx version is on the buttons property page keeps messing things up.

Quote:

---

Originally Posted by ishalom

A bug in the ocx version is on the buttons property page keeps messing things up.

---

The bug was in the 1.1 OCX version. It is now fixed.
Thanks for this.

I also fixed another problem; that the HighLighted property of a Button in the ToolBar control did not consider the design time state at run time.

Update released.

I have been using visual basic since version 3, I now use version 6 and I can say it does (almost) everything a good programming language needs.
It does although happen that I need to browse around the internet for custom control code, most of the time, I need to tinkle with the code to make it bug free, and to suite my needs
EXCEPT: for these controls, they are very comprehensive and delivers the FULL set of tools. No bugs. I am now including your OCX with all my applications. Just using the compiled version, no need to play around with the code.
Thank you!
What credits should I include in my compile applications, you deserve it?
PS. Do you have any plans to add any controls to the collection?

Quote:

---

Originally Posted by ishalom

What credits should I include in my compile applications, you deserve it?

---

Not any mandatory one. Maybe you can just add a link to this thread.

Quote:

---

Originally Posted by ishalom

Do you have any plans to add any controls to the collection?

---

What do you mean exactly?

Quote:

---

Originally Posted by Krool

Not any mandatory one. Maybe you can just add a link to this thread.

---

i think it's a decent thing to do..

Quote:

---

Originally Posted by Krool

What do you mean exactly.

---

Any plans for a Splitter Control, Property List or to Create a combobox with the AutoComplete interface

Quote:

---

Originally Posted by ishalom

Create a combobox with the AutoComplete interface

---

You can already do this. By using my AutoComplete (Using the IAutoComplete interface) and pass the .hWndEdit of the ComboBoxW to it.

Update released.

Info: The bugfix for the internal CheckHeaderControl function in the ListView control is relevant when changing the 'View' property at run time. The CheckHeaderControl function assures that the header related properties are set accordingly when the 'View' property was set back and forth from/to 'Report'. Prior to bugfix this worked only once.

Download doesn't work for me...
Trying to unzip without success, a message box say (in french) :
[Window Title] : Dossiers compressés
[Content] :Insérez le dernier disque de l’ensemble multi-volumes, et cliquer sur OK pour continuer.

In my poor english it's the same problem with a rar file ... with multi files ... when you got only the first one...

You need to cut off the ".zip" extension and then open the .rar file. (e.g. with WinRAR)

Thanks a lot for your answer and ... for this great code !

Hi,
thank you for your work. I'm not familiar with VB, and I have a problem hope I can find a solution for it here.
We have an old VB6 application, which uses mscomct2.ocx to show date picker. we don't have it's source code. is it possible that without change it's code, replace mscomct2.ocx reference with your controls?
Main problem is we want to change Calendar to support a local calendar which not include in MS windows. so hope with your date picker we can customize date and month view. Can we make an ocx with all mscomct2.ocx functionality with your control to replace this ocx file?

Best regards
Mehdi

What is DoubleBuffer on the Toolbar Control

Quote:

---

Originally Posted by ishalom

What is DoubleBuffer on the Toolbar Control

---

It reduces the flickering.

Is there a way to automaticly upgrade all Microsoft common control in a project to use the controls from here?

Quote:

---

Originally Posted by ishalom

Is there a way to automaticly upgrade all Microsoft common control in a project to use the controls from here?

---

Not really. But you can do it like this:

1. Include all the controls you want to your project.
2. Open the .frm file in the notepad editor (like by .txt files) and do a 'Replace All', for instance: VB.TextBox with [Your project name here].TextBoxW (e.g. "Project1.TextBoxW").

Quote:

---

Originally Posted by Krool

2. Open the .frm file in the notepad editor (like by .txt files) and do a 'Replace All', for instance: VB.TextBox with [Your project name here].TextBoxW (e.g. "Project1.TextBoxW").

---

Yes. I thought of that, but it wouldn't work on toolbar, statusbar, imagelist

Also. if you have set the font property, you have to change

undefined Code:

BeginProperty Font

as

undefined Code:

BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}

Quote:

---

Originally Posted by ishalom

Yes. I thought of that, but it wouldn't work on toolbar, statusbar, imagelist

---

Yes. The property bag is not compatible. For those you need to remove and create new from scratch.

Update released.

I included the IMEMode property in the TextBoxW control.
I did some tests (e.g. japanese Hiragana <> Katakana) and it worked.
But maybe someone who is more familiar with this at whole can do tests and report me when something is done wrong or so. Would be grateful. :)

Hi, and thanks for excellent work.

I'm evaluating the statusbar control. I seem unable to change panel widths from code. It says "383 Property is write only" whenever I try. This happens regardless of the panel autosize setting. I assumed that at least the autosize=None should allow width changes from code like I'm used to.

I was also looking for the ability to have individual font settings (like bold) in the panels so that panel 1 is bold while the others are not. I have found the workaround using the picture property with a picture containing the bold text, but it would be nicer to have it done directly by the control. Would that be possible?

Quote:

---

Originally Posted by TomasEss

I seem unable to change panel widths from code. It says "383 Property is write only" whenever I try. This happens regardless of the panel autosize setting. I assumed that at least the autosize=None should allow width changes from code like I'm used to.

I was also looking for the ability to have individual font settings (like bold) in the panels so that panel 1 is bold while the others are not. I have found the workaround using the picture property with a picture containing the bold text, but it would be nicer to have it done directly by the control. Would that be possible?

---

For adjusting the panel width you can use the MinWidth property. (Width property is meant to only receive the actual width)

The panels on my StatusBar control are owner drawn. So yes it would be possible do include a 'Bold' property. You want this? ;-)

Thanks. I was able to get it working using the MinWidth property. This is however not the same as with the MS StatusBar Control where Width is writable. No problem for me though, so no worries.
I also thought about using the backcolor set to black, but noticed that there's no forecolor so I got black on black.
So, to be usable for me, yes I would like to have a bold property aswell as a forecolor or ultimately the ability to set the back and font color separately per pane.

Dear Krool,
I was working last week on a VBA OCX version... an i was quite happy with it, it work with few changes of your code...
Is there anybody working/interesting to the same target ?
Thousand thanks
Thierry

PS1 I still got problem with the properties pages of all usercontrol (except the imagelist), do you have a clue ?
PS2 At this time I working on a mecanism to selftregister it on HKCU on a very protected version of Windows (LUA, GPO etc)
PS3 Could I share the resulte of my work here ?

Quote:

---

Originally Posted by Thierry76

I was working last week on a VBA OCX version... an i was quite happy with it, it work with few changes of your code...
Is there anybody working/interesting to the same target ?

PS3 Could I share the resulte of my work here ?

---

Yes and Yes. ;)

Update released.

All controls in VBCCR10.OCX and VBCCR11.OCX are now marked as "Safe for Initialization and Scripting" by the IObjectSafety interface.
The Std-EXE project is untouched as it is not necessary to implement this.

hello

I'm a little annoyed. I can not seem to install "VBCCR11.OCX" version 9!
Attached is a picture of the problem during installation.
Attachment 119627
There are special handling to do?
I think a "OLEGuids.tlb" in particular.

I replaced the old with the new, but it does not work ...:(

kind regards

Quote:

---

Originally Posted by lrd_VB6

hello

I'm a little annoyed. I can not seem to install "VBCCR11.OCX" version 9!
Attached is a picture of the problem during installation.
Attachment 119627
There are special handling to do?
I think a "OLEGuids.tlb" in particular.

I replaced the old with the new, but it does not work ...:(

kind regards

---

The OLEGuids.tlb is not needed to run VBCCR11.OCX. It is just needed to compile it.
The only change between v8 and v9 is the new IObjectSafety interface. Can you please search in your registry if you can find the clsid of IObjectSafety?

Maybe just put the v8 again in place. Unregister it and replace with v9 and then register.

Does anybody else have the same problem?

Quote:

---

Originally Posted by Krool

The OLEGuids.tlb is not needed to run VBCCR11.OCX. It is just needed to compile it.
The only change between v8 and v9 is the new IObjectSafety interface. Can you please search in your registry if you can find the clsid of IObjectSafety?

Maybe just put the v8 again in place. Unregister it and replace with v9 and then register.

Does anybody else have the same problem?

---

I had already tried the method

Code:

---

REGSVR32 / u VBCCR11_v7.OCX
REGSVR32 VBCCR11_9.OCX

---

but it does not work

here is the part of the register of the object IObjectSafety

Code:

---

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Interface\{CB5BDC81-93C1-11CF-8F20-00805F2CD064}]
@="IObjectSafety"

[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Interface\{CB5BDC81-93C1-11CF-8F20-00805F2CD064}\NumMethods]
@="5"

[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Interface\{CB5BDC81-93C1-11CF-8F20-00805F2CD064}\ProxyStubClsid32]
@="{B8DA6310-E19B-11D0-933C-00A0C90DCAA9}"

---

I was too confident!
I forgot to make a copy of version 8.
It works very well, only V9 gives me problems!

I think I know the problem. When a interface is implemented into a UserControl then this makes no dependancy. But when a interface is implemented into a class module, like the CommonDialog.cls, then this interface is somehow dependant. Thus indeed the correct OLEGuids.tlb were necessary to run the latest VBCCR10.OCX and/or VBCCR11.OCX.
In order to solve this (to be independent to the OLEGuids.tlb) it is necessary to remove this new IObjectSafety from the CommonDialog.cls.
So we have then to live with the situation that only the actual controls are now marked as "safe".

I updated the OCX projects accordingly.

@lrd_VB6,
does the new OCX versions now work?

I just test it has now, everything seems to work normally.:thumb:
Sorry for the delay, but without electricity, it is not easy:bigyello:

hello,

Just a question:
Why keep the VBCCR10.OCX version?

I wrote (quickly) a converter to go from version 1.0 to 1.1.
I have used it to transform my sources without much effort.
This requires that be improved!:rolleyes:

Kind regards.

I have a added a .reg file on the post of each OCX version that will mark the CommonDialog class also "Safe for Initialization and Scripting".
It is necessary to do like this as contrary to the controls it is not possible to include the IObjectSafety interface in the CommonDialog class and to be also independent of the OLEGuids.tlb.

hello

I wish I could have access to the positioning of the box CommonDialog
I refer in particular to the message INIT_DIALOG (I think).
Is that possible?

Or a simpler something like a variable "StartupPosition"
CenterScreen or CenterWindow.
But the first idea allows more thing!

kind regards

Say Krool,

FANTASTIC work. I love the idea of having absolutely no OCX dependencies, without losing programming features.

I saw a comment above though about Unicode on the standard button. Actually, this is no biggie at all. I've attached a small project that does it. The BAS module even has several other calls for doing Unicode things.

Also, it's not in there, but it's quite easy to write a CTL control based on little more than the button that saves Unicode from the IDE. There are two tricks to getting this done: 1) You have to save the .Caption property into a byte array in the PropertyBag so that it's coerced into the .FRX file when you do a save. The .FRM files are strictly ASCII so you can't save Unicode properties in them. The second trick is that the actual Property Window won't handle Unicode either, so you have to design a custom property window for the button .Caption property using the RTF control with its Unicode turned on.

However, neither of those is terribly difficult.

Take Care,
Elroy
Attachment 119885

Edit: Ahhh, and I've actually done this but not cleaned it up for distribution. In my opinion, if you're going to write a custom user control for a Unicode button, it should have the RTF box (for the Unicode property) actually on the control itself (in other words, no extra forms as support for the control). Maybe you'll be motivated to do this with your API version of the RTF box. Again, great work though.

Hi Krool,

Outstanding job with the common controls replacement OCX. It works great (.exe) on XP, Win7 and Win10. I'm trying to use your OCX with ActiveX form contols I access with Script BASIC via it's COM OLE interface. Can the OCX be used in this way?

John Spikowski
Script BASIC open source project manager
www.scriptbasic.org