Another ExplorerBarGadget [Update]

Developed or developing a new product in PureBasic? Tell the world about it.
Post Reply
wayne-c
Enthusiast
Enthusiast
Posts: 337
Joined: Tue Jun 08, 2004 10:29 am
Location: Zurich, Switzerland

Another ExplorerBarGadget [Update]

Post by wayne-c »

Hi all,

Scroll down for the Update

the ExplorerBarGadget seems to be very popular, and I could not resist and quickly hacked together a version by myself.

Image

For easy use the ExplorerBarGadget is coded in a PureBasic-Include file called ExplorerBarGadget.pbi. I'm sorry for the bad programming style in ExplorerBarGadget.pbi, but as mentioned above I hacked this together very quickly. Take it as a black box and have fun :-)

There's one thing still missing: the ScrollBar. My attempt (see ExplorerBarGadget_DoScrollBar() inside ExplorerBarGadget.pbi) failed. If you can get it running -> Great! Post it here... 8) *** SOLVED in latest version ***

In the Zip-File you will find all sources and required images. *** EDIT: Scroll down for the new version ***.

Bye,
Wayne-C
Last edited by wayne-c on Fri Jul 28, 2006 8:56 pm, edited 5 times in total.
As you walk on by, Will you call my name? Or will you walk away?
Top
srod
PureBasic Expert
PureBasic Expert
Posts: 10589
Joined: Wed Oct 29, 2003 4:35 pm
Location: Beyond the pale...

Post by srod »

Very nice. :D

About the scrolling, did you not originally use a scroll area gadget?

**EDIT - sorry, confusing your work with lucky luke's!

A closer look at the code, this is very good indeed. Well done.
Last edited by srod on Thu Jul 27, 2006 2:11 pm, edited 2 times in total.
I may look like a mule, but I'm not a complete ass.
Top
User avatar
yoxola
Enthusiast
Enthusiast
Posts: 386
Joined: Sat Feb 25, 2006 4:23 pm

Post by yoxola »

This is GREAT, and the look is the same in my Win2K.

Works good, thanks for sharing :D
Top
wayne-c
Enthusiast
Enthusiast
Posts: 337
Joined: Tue Jun 08, 2004 10:29 am
Location: Zurich, Switzerland

Post by wayne-c »

srod wrote:A closer look at the code, this is very good indeed. Well done.
Thank you!
This is especially good to hear from you (you saved my life many many times in this forum, direct or indirect) :D
srod wrote:A closer look at the code
but don't go too deep, or you will find out about the "y + 10, yy + 15, y + yy + 10 + 5"-stuff that even I do not understand anymore by today (and this is only 1 day after I did code it) :lol:
As you walk on by, Will you call my name? Or will you walk away?
Top
srod
PureBasic Expert
PureBasic Expert
Posts: 10589
Joined: Wed Oct 29, 2003 4:35 pm
Location: Beyond the pale...

Post by srod »

...-stuff that even I do not understand anymore by today (and this is only 1 day after I did code it)
Then get some comments in there! :lol:
I may look like a mule, but I'm not a complete ass.
Top
User avatar
ts-soft
Always Here
Always Here
Posts: 5756
Joined: Thu Jun 24, 2004 2:44 pm
Location: Berlin - Germany

Post by ts-soft »

Very nice, but some Redraw problems (XP SP2 GeForce 4)
PureBasic 5.73 | SpiderBasic 2.30 | Windows 10 Pro (x64) | Linux Mint 20.1 (x64)
Old bugs good, new bugs bad! Updates are evil: might fix old bugs and introduce no new ones.
Image
Top
KarLKoX
Enthusiast
Enthusiast
Posts: 681
Joined: Mon Oct 06, 2003 7:13 pm
Location: France
Contact:
Contact KarLKoX

Post by KarLKoX »

Image
"Qui baise trop bouffe un poil." P. Desproges

http://karlkox.blogspot.com/
Top
wayne-c
Enthusiast
Enthusiast
Posts: 337
Joined: Tue Jun 08, 2004 10:29 am
Location: Zurich, Switzerland

Post by wayne-c »

ts-soft wrote:Very nice, but some Redraw problems (XP SP2 GeForce 4)
What kind of? Can you give more details please?
And: Let's eliminate them! (You, me, anybody else: this is open source! :wink: )
As you walk on by, Will you call my name? Or will you walk away?
Top
wayne-c
Enthusiast
Enthusiast
Posts: 337
Joined: Tue Jun 08, 2004 10:29 am
Location: Zurich, Switzerland

Post by wayne-c »

srod wrote:
...-stuff that even I do not understand anymore by today (and this is only 1 day after I did code it)
Then get some comments in there! :lol:
Ok here's the deal:
Help me with the ScrollBar stuff, and I'll put as many comments in there to make it a useable Include file for all PB users in the world :D
As you walk on by, Will you call my name? Or will you walk away?
Top
srod
PureBasic Expert
PureBasic Expert
Posts: 10589
Joined: Wed Oct 29, 2003 4:35 pm
Location: Beyond the pale...

Post by srod »

No deal! :) It's your baby!

Have you tried a scroll area gadget? One way of avoiding the scroll messages etc.
I may look like a mule, but I'm not a complete ass.
Top
User avatar
ts-soft
Always Here
Always Here
Posts: 5756
Joined: Thu Jun 24, 2004 2:44 pm
Location: Berlin - Germany

Post by ts-soft »

wayne-c wrote:What kind of? Can you give more details please?
And: Let's eliminate them! (You, me, anybody else: this is open source! :wink: )
It seems me it's a memoryleak. I cann't make a snapshot before close the
exe :oops:
PureBasic 5.73 | SpiderBasic 2.30 | Windows 10 Pro (x64) | Linux Mint 20.1 (x64)
Old bugs good, new bugs bad! Updates are evil: might fix old bugs and introduce no new ones.
Image
Top
gnozal
PureBasic Expert
PureBasic Expert
Posts: 4229
Joined: Sat Apr 26, 2003 8:27 am
Location: Strasbourg / France
Contact:
Contact gnozal

Post by gnozal »

Very nice !
No problems here with NT4 :wink:
For free libraries and tools, visit my web site (also home of jaPBe V3 and PureFORM).
Top
wayne-c
Enthusiast
Enthusiast
Posts: 337
Joined: Tue Jun 08, 2004 10:29 am
Location: Zurich, Switzerland

Post by wayne-c »

srod wrote:Have you tried a scroll area gadget?
I will have a look at this tonight.

Originally I wanted to use the scrollbars that every window class has got - I did this with VisualBasic's PictureBox many times, but somehow the ImageGadget in PureBasic always "overpaints" the bar: try un-commenting the ExplorerBarGadget_DoScrollBar() procedure and call it when #WM_SIZE occurs in ExplorerBarGadget.pbi. When you resize the image, the scrollbar shows for a very (!) small time, but immediately gets painted over by the image the gadget contains.

Bye,
Wayne-C
As you walk on by, Will you call my name? Or will you walk away?
Top
wayne-c
Enthusiast
Enthusiast
Posts: 337
Joined: Tue Jun 08, 2004 10:29 am
Location: Zurich, Switzerland

Post by wayne-c »

Status Update:

I have completed the ScrollBar work; also the dynamic resize of the Group-Boxes when there is the vertical ScrollBar. I am gonna add some features I need for my Project (Big Details-Thumbnail, Static Texts, Custom Colors) and then gonna re-upload the Source.

For those who can't wait till then:

Demo.pb

Code: Select all

*** Code Removed ***
ExplorerBarGadget.pbi

Code: Select all

*** Code Removed ***
Download Zip-File instead: ExplorerBarGadget.zip

Wayne-C
Last edited by wayne-c on Fri Jul 28, 2006 4:36 pm, edited 3 times in total.
As you walk on by, Will you call my name? Or will you walk away?
Top
oridan
Enthusiast
Enthusiast
Posts: 128
Joined: Tue Oct 12, 2004 12:14 am
Location: Italy
Contact:
Contact oridan

Post by oridan »

Error in ExplorerBarGadget.pbi
Line 107: Syntax error!

Code: Select all

If *qrc\Right <8> 0
:cry:
Top
Post Reply

Return to “Announcement”