Important alert: (current site time 7/16/2013 2:56:01 AM EDT)
 

winzip icon

WinXPC Engine (Optimized drawing technique in buttons 16/02/04 )

Email
Submitted on: 2/1/2004 2:47:24 AM
By: MArio Flores G 
Level: Advanced
User Rating: By 137 Users
Compatibility: VB 6.0
Views: 67896
(About the author)
 
     Give your Visual Basic Controls a Windows Xp Visual Style,WinXPC Engine is the largest collection of Subclass routines , uses only code (no Images) No need to replace any control of your app,or add any other control to support VisualStyles, Controls that are supported: ListView,Slider,ProgressBar,StatusBar,TabStrip,ComboBox,OptionButton,CheckBox,CommandButton,TextBox...and much more even subclass MsgBoxes and InputBoxes without adding any extra lines to your code. Some of the controls support System Color Theme,some XP Colors may vary but they look close Enough. Im Working on adding support for external classes so you can subclass other pre-made ocx automatically..but right now you must do this manually, C++ or Windows Classes are easy to get,but i recommend using Spy ++ if you don't know the name of the class. Mainly the Logical Structure of the code is a Visual C++ one, because of the use of so many messages and APIS ,but its no big deal actually.. If you follow the code carefully you will find this as easy as 1,2,3. The Engine supports Win 98,Me,2000,XP, but i haven't tested fully on all OS version ..almost every test was made on XP Pro Remember This is Full Source code and Free (Not Fully Completed)..so mainly one of my objectives is that coders see & test the code so they can give me they point of view and Suggestions...then finish the ocx with a better code.! ... Full code included no external dependencies. Enjoy and leave your votes!

 

Windows API/Global Declarations:

Can't Copy and Paste this?
Click here for a copy-and-paste friendly version of this code!
'**************************************
'Windows API/Global Declarations for :WinXPC Engine (Optimized drawing technique in buttons 16/02/04 )
'**************************************
A lot ;)
winzip iconDownload 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 Winzip to 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 23 submission(s) by this author

 


Report Bad Submission
Use this form to tell us if this entry should be deleted (i.e contains no code, is a virus, etc.).
This submission should be removed because:

Your Vote

What do you think of this code (in the Advanced category)?
(The code with your highest vote will win this month's coding contest!)
Excellent  Good  Average  Below Average  Poor (See voting log ...)
 

Other User Comments
2/1/2004 4:16:16 AM

Bloody hell - that was a lot of work, eh?

Works brilliant. 5 globes from me. Keep up the great work.
(If this comment was disrespectful, please report it.)

 
2/1/2004 4:29:53 AM

BTW: any chance to make this work with the sstab (tabctl32.ocx) control?

I bet this will be 'Code of the month'. :-)
(If this comment was disrespectful, please report it.)

 
2/1/2004 4:50:01 AMThorben Linneweber

WOW !!!
(If this comment was disrespectful, please report it.)

 
2/1/2004 6:04:48 AM

Would it be possible to make the ocx available. I have the learning edition so i can't make a ocx.


(If this comment was disrespectful, please report it.)

 
2/1/2004 6:16:51 AMLight Templer

Cool! Without any closer look; 5 from me!
Thx for!
LiTe
(If this comment was disrespectful, please report it.)

 
2/1/2004 1:22:31 PMMArio Flores G

To: guy with VB Learning Edition ..

http://www.geocities.com/marioflores_code/WinXPC/WinXPC.zip

This is The Install Ocx..

BTW:..Thanks every one for your Votes
(If this comment was disrespectful, please report it.)

 
2/1/2004 2:46:42 PM

Thank you for sending the zip file. 5 from me also.
(If this comment was disrespectful, please report it.)

 
2/1/2004 4:51:50 PM

This is indeed a superb submission; unfortunately, I lose all my button graphics when running the control.

4 globes because of that, but 5 globes for effort - an amazing achievement.

Gavin.
(If this comment was disrespectful, please report it.)

 
2/1/2004 4:58:54 PMKenneth Foster

Will you be added scrollbars to textbox and border to frames soon? This is really nice code.
(If this comment was disrespectful, please report it.)

 
2/1/2004 5:04:54 PMKevin Erna

5 globes from me ;)
(If this comment was disrespectful, please report it.)

 
2/1/2004 5:47:53 PMquak

fantastic work!
things that need work on are the statusbar as it does look out of place. also when the tabstrip control placement is set to buttom it totally screws up. and buttons, checkboxes, radioboxes need to be set when systemcolors are set, other than that top job, 5 from me :D
(If this comment was disrespectful, please report it.)

 
2/1/2004 7:46:42 PMMArio Flores G

Gavin:
Oks I Forgot to Tell This..I'm Working on adding Bitmap Support for Controls that use bitmaps (Buttons,tabStrips,etc)..
(If this comment was disrespectful, please report it.)

 
2/1/2004 8:24:41 PMCodeClub

you are a freak!!!! 5 balls! but, the ui will slightly flicker when the mouse is hovering
(If this comment was disrespectful, please report it.)

 
2/2/2004 6:52:45 AM

Great code Mario.
5 globes for me !!!
Five Great Suggestions :

1)SSTab XP Style
2)Scrollbars XP Style
3)Bitmap support
4)Frame XP Style
5)Form Header XP Style

Saudações do Brasil
Heilan Percio Cardoso
(If this comment was disrespectful, please report it.)

 
2/2/2004 12:58:59 PMMirko Kressmann

Wow .. nothing more to say!

5 from me...

Mirko
(If this comment was disrespectful, please report it.)

 
2/3/2004 1:21:08 AMjoyprakash saikia

Hi Mario,
This is awesome and awe-inspiring Component and a manifestation Application.
Thank you for sharing :)
5 globes from me.

-Joy
(If this comment was disrespectful, please report it.)

 
2/3/2004 6:26:14 AM

It's FANTASTIC !!!!!!
You're great !
(If this comment was disrespectful, please report it.)

 
2/3/2004 3:16:14 PMBattleStorm

Shawn Hawk must be jealous ;)
(If this comment was disrespectful, please report it.)

 
2/3/2004 3:22:00 PM

hey i really like this code..it is very useful...i can feel the XP experience on my controls...yeahh...tnx a lot to the author....
(If this comment was disrespectful, please report it.)

 
2/3/2004 11:28:46 PM

very good... thank you for code.
5 globe from me
(If this comment was disrespectful, please report it.)

 
2/4/2004 6:35:37 AMCodeClub

bug: hscrollbar/vscrollbar not render;

how about the menu?
(If this comment was disrespectful, please report it.)

 
2/4/2004 6:07:13 PMMArio Flores G

Some Of The Controls Now Support The Olive Green XP Style Color Scheme..
Note: External Controls.. (MsgBox-Buttons & CommonDialog-Buttons) stay XP Blue.. For Now ;)
(If this comment was disrespectful, please report it.)

 
2/4/2004 6:11:31 PMMArio Flores G

Code Club:
BUG????
hscrollbar/vscrollbar are not coded yet!!
It may be posible to render the scrolls but i still don't have the code..

(If this comment was disrespectful, please report it.)

 
2/5/2004 3:51:02 AM

Brilliant - this gets better and better with every update. Thanks for sharing!
(If this comment was disrespectful, please report it.)

 
2/5/2004 6:45:07 AMCodeClub

how about the menu?
(If this comment was disrespectful, please report it.)

 
2/5/2004 9:56:52 AMLight Templer

rehi,
the compiled OCX works well with VB5, but the demo slider controls are leaving a 'Trail' ... Any ideas?
Regards LiTe
(If this comment was disrespectful, please report it.)

 
2/6/2004 7:42:36 PM

dude, i haven't tried your code yet, but if you haven't put a menu subclass in then have a look at the code at http://www.planet-source-code.com/vb/scripts/showcode.asp?txtCodeId=50849&lngWId=1, as it has a menu subclass that looks pretty good.
(If this comment was disrespectful, please report it.)

 
2/6/2004 9:27:28 PMCodeClub

tabstrip image is not transparent
(If this comment was disrespectful, please report it.)

 
2/7/2004 8:28:59 PMMArio Flores G

About Making the Image Tranparent..I know its Possible.But the regular TabStripControl doesn't have a MaskColor Property so If i Added a Function that turned the image transparent the user must provide the tranparent color in some extra code besides the all ready coded app :S But You are right Code Club its nicer with tranparent images..may be ill think on some way to fix this.. Thanks for the FeedBack
(If this comment was disrespectful, please report it.)

 
2/8/2004 10:53:06 AM

Very good. Thanks for sharing.
(If this comment was disrespectful, please report it.)

 
2/8/2004 12:36:50 PMCraig Thomson

This rubbish doesnt work for me :(

It is intended for OS other than XP, like Win98 which im using?

Would be good if it worked
(If this comment was disrespectful, please report it.)

 
2/8/2004 8:57:42 PMMArio Flores G

-FIX: ADODC Control Supports Multiple Controls in Each Form ----- Thanks to jkozee@bowser-morner.com for the tip.
-FIX: There Was a Problem With MsgBoxes and Other Controls that aren't VB objects when ADODC MoveEvent was Fired...(VB Crash)
-ADD: Some Controls Now Support the Silver Scheme Color.

(If this comment was disrespectful, please report it.)

 
2/8/2004 9:01:47 PMMArio Flores G

Craig Thomson..What is exactly the problem you are getting with the code?

(If this comment was disrespectful, please report it.)

 
2/9/2004 11:48:24 AM

Just wondering: any chance to add support for the sstab control?
(If this comment was disrespectful, please report it.)

 
2/13/2004 1:37:18 AMMasino Sinaga

Yup, I am agree with Percio Cardoso:

Please add new class for:
1)SSTab XP Style
2)Scrollbars XP Style
3)Bitmap support
4)Frame XP Style
5)Form Header XP Style

Anyway, 5 globes from me.

(If this comment was disrespectful, please report it.)

 
2/15/2004 8:08:46 AMLefteris Eleftheriades

Excellent,btw where did you get SP6?
(If this comment was disrespectful, please report it.)

 

2/16/2004 4:14:40 PM

Stu:

it looks like you never tried this code here, as Paul Saunders code does something completely different.

LOL
(If this comment was disrespectful, please report it.)

 
2/17/2004 1:01:20 AMMArio Flores G

Stu?...do you even know what subclass is???...im not sure if you even look at the code or yust judge it for the look on the preview pic..but this is different from Paul Saunders..
(If this comment was disrespectful, please report it.)

 
2/17/2004 1:04:39 AMMArio Flores G

!!!!!!IMPORTANT!!!!!!
New Drawing technique on buttons SEE REVISIONS txt file
New Update is now ready to download..
(If this comment was disrespectful, please report it.)

 
2/17/2004 3:22:27 AM

Nice update, Mario. Thanks again for all your work. :-)
(If this comment was disrespectful, please report it.)

 
2/17/2004 12:43:57 PMJeffery Taylor

i must say that you truly deserve to win this months contest, great job on the code, i only wish my rpg was as code efficent as yours. :)
(If this comment was disrespectful, please report it.)

 
2/18/2004 12:30:14 AMMasino Sinaga

Mario, I think PSC must give you not just the winner of the month, but THE WINNER OF THE YEAR. Oh, by the way, we are still waiting for your update so this will support with SSTab, Frame, Scrollbar, Form, etc. Thanks. :)
(If this comment was disrespectful, please report it.)

 
2/18/2004 3:10:06 AMJim K

Must have missed this beaty work. Sorry, Mario F G. Here comes the well deserved 5.
(If this comment was disrespectful, please report it.)

 
2/18/2004 5:59:10 AMStu.

No idea what subclassing really is but having spent a long time going through your code I see your point and why it is well worth 5
(If this comment was disrespectful, please report it.)

 
2/18/2004 6:12:51 PMMArio Flores G

Masino... Frame??..I don't know what your are talking about. its already supported since the first time ;).. or what kind of frame control do you have in mind?

(If this comment was disrespectful, please report it.)

 
2/19/2004 2:14:29 PM

Some of the greatest coding I have ever seen. 5 globes
(If this comment was disrespectful, please report it.)

 
2/24/2004 11:53:16 AMAli Akbar

Hi Mario,
Great coding. How about extending ur program to change the entire windows looks n feel :)
probably by installing a system hook which get the WM_PAINT message and paints ur control over the hwnd
Kind of like WindowsBlinds.

Good work.

5 * from me.

(If this comment was disrespectful, please report it.)

 
2/25/2004 1:14:22 AMMArio Flores G

Thanks Ali..I am working on giving the engine a different look and feel,but is going to be released after i fully tested and coded , all sugestions are going to be taken on consideration and i hope to make this one a looot better thanks all people who really support this,and thanks for your votes and personal emails..cheers

(If this comment was disrespectful, please report it.)

 
2/29/2004 7:26:15 PM

5...
(If this comment was disrespectful, please report it.)

 
3/7/2004 4:38:28 PMgurpreetsingh

Great Code. I downloaded the code from another website. But had no resource to Thank U then. But Now is the chance 5 from me also. I wonder That will it work on 95 also ?? Well its more than enough pleasure to know that it works in 98 whihc is more common.
Regards
Er. Gurpreet Singh
CEO Sukhmani Software
New Delhi
(If this comment was disrespectful, please report it.)

 
3/15/2004 6:53:45 PM

5 Globes from me, excellent code.
(If this comment was disrespectful, please report it.)

 
3/17/2004 11:04:45 PM

excellent code! how about support for msforms 2 controls? how can i modify it to support msforms 2 object library?
(If this comment was disrespectful, please report it.)

 
3/18/2004 1:41:36 AM

i do find a bug. if the command button is set to graphical, and displays a form using that button. after you close the new form. the button is changed in normal button. you have to hover on it to display it back on xp style.
(If this comment was disrespectful, please report it.)

 
3/19/2004 5:40:29 PM

excellent 1st i will check it n then ok
(If this comment was disrespectful, please report it.)

 
3/24/2004 1:42:10 AM

where can get newest engine?
(If this comment was disrespectful, please report it.)

 
3/24/2004 4:59:44 AM

Works brilliant. 5 globes from
me.
What about Treeview & Unicode version?

Thanks very much and Keep up the great work!

TuanHai
(If this comment was disrespectful, please report it.)

 
3/24/2004 1:48:06 PM^_^

Great!
(If this comment was disrespectful, please report it.)

 
3/25/2004 9:20:05 AM

Very great work!! 5 globe!
BUT is not very well use in chinese,please update it.
And Where I can get the newest verison?
Please Email to me!!
(If this comment was disrespectful, please report it.)

 
3/30/2004 4:03:33 PMJTR

superb! just what i needed!! the last time i thought of doing this was to do superclassing of vb buttons
(If this comment was disrespectful, please report it.)

 
4/3/2004 5:04:20 AM

Great Job, from Me, but little bug when we press button with the help of Space bar, its turn into Normal button to revert it to XpStyle we have to hover it with the help of moust, & one thing you forget what abt if someone want to add picture. with button & what about Caption & Picture alignment like (Left,Center,Right/top,middle,bottom).
but still very very good job, keep it up
(If this comment was disrespectful, please report it.)

 
4/5/2004 8:57:03 AMcsf23

Can someone teach me how to run this program? Thx.
(If this comment was disrespectful, please report it.)

 
4/5/2004 2:08:14 PMHavoc

Excellent code 5 out of 5 :-)
Just one thing i noticed. When you use it to subclass a font choice box, most of the dialog box shows up black?

Other than that, sheer genius
(If this comment was disrespectful, please report it.)

 
4/6/2004 1:07:38 AM

5 globes from Me. Keep it up.
(If this comment was disrespectful, please report it.)

 
4/7/2004 7:43:09 AMDaniel Pramel

Great job and a good idea Mario,
the only thing i am missing is, that the scollbars of a listbox and listview are not "skinned". In the combobox, this is already done by you.
Is there a version coming, which does it?
I vote with the full 5 stars.

regards,
Daniel
(If this comment was disrespectful, please report it.)

 
4/10/2004 2:23:47 AM

i am not able to make ocx ....can you plzz provide with it..... thanx...
(If this comment was disrespectful, please report it.)

 
4/10/2004 10:42:58 AM

Good Work!!!
5 globes for me.
I think that it will be better if you add a function to get the actual color scheme in win_xp.

(If this comment was disrespectful, please report it.)

 
4/11/2004 6:54:21 AM

Hi! I am not an advanced programmer. I appreciate your work but i have a doubt.
If we create a manifest file and use windows common controls 6.0 in VB we can acheive skinning in VB! what do u say?

(If this comment was disrespectful, please report it.)

 
4/11/2004 2:14:58 PMMArio Flores G

Thanks irshad...

Its True you can do the manifest file step..to acheive skinning in VB! ..but only in Windows XP OS... so if you want to use other Os versions (me,98,2000) you cant use manifest oks ;)



Mario Flores


(If this comment was disrespectful, please report it.)

 
4/22/2004 3:27:21 AM

5 * from me, but little bug
when we press arrow key to select radio buttons, its turn into Normal radio button to revert it to XpStyle we have to hover it with the help of mouse.
again Great Job keep it up
(If this comment was disrespectful, please report it.)

 
5/30/2004 8:57:07 AM

I see that you have adjust compile to P-Code in OCX. It is much slow. I suggest to set Project/WinXPC Properies/Compile/ and set "Compile to native code". It will increase speed.

I found some bugs in starting (showing form) of program. Program get all CPU and refresh control ONLY when you move mouse over it (control).
I use VB6, VB SP6, WinXP Pro with SP1.

Anywhay - you have 5 globes from me.
Do you have new version of engine ?

Please write to me at dvplay@dir.bg
(If this comment was disrespectful, please report it.)

 
7/9/2004 7:07:29 AM

Indeed Great work::::::
I am new to VB programing...Mr. Mario! can you please write me the procedure of its implementation into my Application....Really i am very much intrested to such stunnig look to my application.
Once again pleas guide me:(:(:(
(If this comment was disrespectful, please report it.)

 
7/9/2004 7:14:19 AM

Indeed Great work::::::
I am new to VB
programing...Mr. Mario! can you please
write me the procedure of its
implementation into my
Application....Really i am very much
intrested to give such stunnig look to my
application.
5+5555555555555555555 from me
Once again please guide
me:(:(:(

(If this comment was disrespectful, please report it.)

 
7/12/2004 12:41:34 PMR. Deepu

Dear Sir/Madam
Im using your code in my project.

I tried writing your code for DBcombo. But when i saw the "Thunder" word and referred to book, i think it will not work out. Can the windows xpc engine be done for Forms with XP visual style,Dbcombo,Treeview,Msflexgrid. Please help. reply

Thanking you

Deepu
(If this comment was disrespectful, please report it.)

 
7/27/2004 2:51:01 AM

Thanks Real it is cool OCX, bat ther is one Thing missing (Right to left) in comboBox.
(If this comment was disrespectful, please report it.)

 
8/29/2004 12:02:15 PMMuhammed Arif

Wow what a hard work, and all done for us... thats really great of u. U could have easily made a commercial OCX of it and would have made good money.... thats excellent, infact u deserve 500 globes but unfortunately PSC allows only 5, here u go all 5 for u....
(If this comment was disrespectful, please report it.)

 
9/2/2004 2:20:19 AM

fantastic work!
Great Control...
Will you keep us informed for latest versions???
I saw the revision and the version is on 1.06, but the control is on 1.044... Where can we find the 1.06???
(If this comment was disrespectful, please report it.)

 
9/12/2004 6:35:16 PMSVF Soft

Briliant code. Will definetly use it in my applications
(If this comment was disrespectful, please report it.)

 
9/13/2004 12:17:14 AM

I've been searching for a long time for this. Your work is great!!! Do you have a website to publish updates?
Congratulations for your effort and contribution!!!
(If this comment was disrespectful, please report it.)

 
10/12/2004 4:21:58 AM

ÄãÕæÊǺÜÅ£X°¡¡£
ÎÒÅå·þµÄºÜ°¡¡£
(If this comment was disrespectful, please report it.)

 
10/12/2004 4:24:18 AM

²»¹ý²»ÖªµÀÄãÃÇÄܲ»ÄÜ¿´¶®ÖÐÎÄ
Èç¹ûÄÜ¿´¶®Ï£ÍûÄܺÍÄãÃdzÉΪÅóÓÑ
ÎÒµÄÓ¢ÎĺÜÀÃËùÒԾͲ»´ò Ó¢ÎÄÁË
ÎÒµÄEmail:52061601@QQ.COM
Èç¹ûÓпÉÄÜÀ´CHINAÎÒÕдýÄã

(If this comment was disrespectful, please report it.)

 
10/13/2004 4:01:53 PM

Great...great...great
But please make the DataCombo work.
(If this comment was disrespectful, please report it.)

 
10/26/2004 10:22:24 AMVJA

Mucho gracias siñor !
I was considering using your ButtonShemeEngine before I saw WinXPC. But where are all button schemes in BSE gone ? The OfficeXP scheme was the one I wanted to use. Not important anyway.
BTW, in function cWinXPCEngine::SubclassMessage() there is a line "If Not m_MsgBox Or Not m_CommonD Or Not m_TabStrip Or Not m_ListView Then". Shouldn't be "If Not m_MsgBox And Not m_CommonD And Not m_TabStrip And Not m_ListView Then" (And instead of Or) ? because this test always evaluate to True.
(If this comment was disrespectful, please report it.)

 
1/27/2005 10:52:06 PMTan Jiunn Yann

I've discovered a bug there: While using the XPC and turn on the StatusBar support, the status bar control that using in the VB app. is very odd!!! especially when u got 2 or more panels in the status bar, there will be 2 lines or 3 lines (depend on how many panels inserted) appear in the center of the status bar. This must be checked, and hope to get the reply or update soon. thanks!
(If this comment was disrespectful, please report it.)

 
2/23/2005 3:42:37 AMDarxide

When I try to run the Sample App I get a compile error: variable not defined and it highlights the
(If this comment was disrespectful, please report it.)

 
2/23/2005 3:44:22 AMDarxide

*Sorry, got cut off for some reason*

When I try to run the Sample App I get
a compile error: variable not defined
and it highlights the "WindowsXPC1" part of combo1_click even though I've compiled the OCX to the system32 directory, regeistered it and then included it in the projects components list. Any ideas, or does this not work on Win2k?
(If this comment was disrespectful, please report it.)

 
3/10/2005 6:41:14 AM

Hi Mario,
excellent work!!! You announced a new version. Is there a new version available already? Where can i get it?
Thanks for your assistance.
Keep the brillant work going!!
regards
Christoph schmitt
(If this comment was disrespectful, please report it.)

 
4/11/2005 7:44:48 AM

This is a nice control, you did good! I just found some minor bugs in your control. 1) The caption of frame control doesn't appear the word "Category" correctly. 2) The listbox control is not themed on its initial load, I still need to drag the scroll bar to make the theme to take effect.

Request :)
I would be very greatful if it will support the datepicker.

Dennis
(If this comment was disrespectful, please report it.)

 
5/30/2005 9:08:07 AM

It's Great.....
Easy Way to Use ...
(If this comment was disrespectful, please report it.)

 
6/15/2005 10:48:58 AMJitesh_d

This is amzing stuff!! Five Diamond stars! Waht a diamond geezer!
(If this comment was disrespectful, please report it.)

 
8/30/2005 7:46:35 AMburuss

Exellent!! fantastic!!
But resource-leak in windows 98 is a critical problem.
I would really appreciate it if you fix this problem and share it with us.
thank you.
(If this comment was disrespectful, please report it.)

 
9/3/2005 12:07:47 AMburuss

Finally, I found the bug(memory leak problem) and fixed it;)

If you downloaded this source code,

1) open cWinXPCEngine.PostPaintCOntrol procedure and add this line at the bottom of the procedure
ReleaseDC m_hWnd, DestDC

2) open Functions.SelectFont procedure, and you'll see the SelectObject function. there is the problem. you should return the old font object returned from SelectObject function call by change the procedure type of "SelectFont" to [function].
and every functions that call "SelectFont" function, should select the old font object after drawing completed, and delete the used font object.

I've tested it on win98 se, and there's no resource leak now.
(If this comment was disrespectful, please report it.)

 
12/3/2005 10:49:53 PMtingin

Great stuff man! 5 from me... It's really good! If you have an update, please share it... Thanks for sharing...
(If this comment was disrespectful, please report it.)

 
12/6/2005 3:40:00 AMGuy DETIENNE

Good engine but there are many bugs, e.g. if I change the position of the Tabs in a TabStrip (on bottom or other), tabs are not diplayed correctly.
The same thing for the Statubar. All the separators are not correctly displayed.
(If this comment was disrespectful, please report it.)

 
12/9/2005 3:15:09 AMkurtcs

Excellent!!!
(If this comment was disrespectful, please report it.)

 
12/9/2005 3:17:21 AMkurtcs

Excellent :)!
(If this comment was disrespectful, please report it.)

 
1/19/2006 7:58:06 PMahmed elsheshtawy

Well Done 5+++
(If this comment was disrespectful, please report it.)

 
3/18/2006 8:19:01 AMstar

well thats an excellent submission
i just wanted to use that ocx in my own
custom control that usercontrol.parent.controls loop in initsubclassing function is not wrking any suggestions

(If this comment was disrespectful, please report it.)

 
5/2/2007 12:46:49 AMChinker

you have structed excellent codes, the effect is wonderful!
but i find a bug, that is when click a button to show another form, the button will show it's old appearance- the standard VB control colors, i try my best to find the reason but get nothing.
Could you tell me why?
thank you very much.
looking forwards to your answer.
(If this comment was disrespectful, please report it.)

 
5/2/2007 4:04:25 AMChinker

you have structed excellent codes, the effect is wonderful!
well, i find a bug here, that is when clicking a button to show a form, the button will show normal, i want to know how this hanppened, and how to improve it.
thank you for your codes, and i looking forwards to your anwser.
(If this comment was disrespectful, please report it.)

 
1/2/2008 2:55:20 AMJeffShang

you have structed excellent codes, the effect is wonderful!
But,sometime the app using your code crashed!
The test code is:
dim i as long
For i = 1 To 1000
Form2.Show

Unload Form2

Next
(If this comment was disrespectful, please report it.)

 
9/25/2011 4:03:27 AMchidam

Excellent 5*
(If this comment was disrespectful, please report it.)

 

Add Your Feedback
Your feedback will be posted below and an email sent to the author. Please remember that the author was kind enough to share this with you, so any criticisms must be stated politely, or they will be deleted. (For feedback not related to this particular code, please click here instead.)
 

To post feedback, first please login.