I figured the best way for me to learn Delphi was to start from scratch.
Although I did borrow John's code for the drive space slider calculations.
Here's a preview of my new menu. SmithTechPortableMenu
Things that work so far..
Loads background and icons from theme folder specified in xml settings file.
Loads apps and paths from xml settings file.
Saves settings from options window to xml settings file(not all options set up yet).
Right click tray icon menu (options & exit)
Now if I can just get the ShellExecute to work I'll be in good shape
Comments & Suggestions appreciated.
The source and executable are in the zip file.
You are here
SmithTech Portable Menu Alpha Preview 6 - all "primary" functions now work
June 30, 2007 - 10:21am
#1
SmithTech Portable Menu Alpha Preview 6 - all "primary" functions now work
maybe it would be cool if all menu builders work together, maybe
netroids menu is very cool in progress and it has many options so far.
so it would be nice if you can put all ideas together.
greetz
Well, I am doing this to learn delphi.
My approach is a little different, using an xml file to save all settings.
Plus by having multiple people creating menus, the users can choose which one they like the best and use it.
From what I've seen they are all pretty similar and compatible with each other, just with slightly different options and interfaces.
-----------------------------------------------------------------------------------------------
Because they stand on a wall and say nothing is going to hurt you tonight. Not on my watch.
"Because they stand on a wall and say, 'Nothing is going to hurt you tonight. Not on my watch.'" (A Few Good Men)
Coincidence is God's way of remaining anonymous.(Albert Einstein)
shouldnt be an critical post only an idea.
sure more menus more choices.
greetz
c[x. whao this has soo many options. it would be great if these are integrated with netdroid's menu. you'd end up with a menu with every single feature you could ever want. great version of PAM, SmithTech.
---
| SanDisk Cruzer Micro 1.0 GB | TekQ 512MB | Kingston Data Traveler 128MB | Maxtor OneTouch III 40GB | 2nd Generation Orange iPod Shuffle | 5th Generation iPod Video 30GB |
_________________________
"A $5000 Computer... and it can't do a task as simple as killing Flanders!" -Homer
that was my intention getting one cool big menu that rocks
greetz
and had a whole list of apps that aren't mine.
How do I get the Menu to reload the apps so it only has mine in it???
“Science is the belief in the ignorance of the experts” - Richard P. Feynman
"What about Love?" - "Overrated. Biochemically no different than eating large quantities of chocolate." - Al Pacino in The Devils Advocate
That's where I found the "extra" stuff.
Cancer Survivors -- Remember the fight, celebrate the victory!
Help control the rugrat population -- have yourself spayed or neutered!
its a test list, the add function is not written yet.(but you can edit the spm.xml manually if you are up to it)
hopefully I will get the add into alpha 3.
-----------------------------------------------------------------------------------------------
Because they stand on a wall and say nothing is going to hurt you tonight. Not on my watch.
"Because they stand on a wall and say, 'Nothing is going to hurt you tonight. Not on my watch.'" (A Few Good Men)
Coincidence is God's way of remaining anonymous.(Albert Einstein)
I may be interested in learning Delphi again too (bought the first two version years ago and took Pascal in college).
Which version are you using?
http://www.codegear.com/products/delphi/win32
http://en.wikipedia.org/wiki/Borland_Delphi
Cancer Survivors -- Remember the fight, celebrate the victory!
Help control the rugrat population -- have yourself spayed or neutered!
Disable the "Maximize" and "Minimize" buttons on the "Options" menu. You don't want the user to change the size of the dialog box (or at least I wouldn't think you would). Shouldn't the "save settings" button close out the window rather then having to do "save settings" then go click on the close button at the top right.
Also, if you run the exe with no .xml files present, when you click on the "options" button the spm.xml file is created, but the others aren't and the user receives a "list index out of bounds (0)" error.
Cancer Survivors -- Remember the fight, celebrate the victory!
Help control the rugrat population -- have yourself spayed or neutered!
I will change it in alpha 3
-----------------------------------------------------------------------------------------------
Because they stand on a wall and say nothing is going to hurt you tonight. Not on my watch.
"Because they stand on a wall and say, 'Nothing is going to hurt you tonight. Not on my watch.'" (A Few Good Men)
Coincidence is God's way of remaining anonymous.(Albert Einstein)
Uploaded the 2nd revision of the alpha preview.
Clicking on a menu item now launches it, however it also seems to launch the last item you clicked as well.
the autorun function now works if autorun is set to 'true' in the spm.xml.
added the application section on the options form, although the add/edit function isn't implemented yet.
Thanks to all who made comments and suggestions.
-----------------------------------------------------------------------------------------------
Because they stand on a wall and say nothing is going to hurt you tonight. Not on my watch.
"Because they stand on a wall and say, 'Nothing is going to hurt you tonight. Not on my watch.'" (A Few Good Men)
Coincidence is God's way of remaining anonymous.(Albert Einstein)
But what would really sell it for me is if you could add right-click and desktop icon functionality to it (like in PStart).
════════
PAM > U3
Please Make TiLP Portable
I'm not familiar with those options in PStart, can you elaborate?
-----------------------------------------------------------------------------------------------
Because they stand on a wall and say nothing is going to hurt you tonight. Not on my watch.
"Because they stand on a wall and say, 'Nothing is going to hurt you tonight. Not on my watch.'" (A Few Good Men)
Coincidence is God's way of remaining anonymous.(Albert Einstein)
The PStart Tray Icon when right-clicked on, displays a context menu from which you can launch your apps
And in the menu itself, when you right-click on the Pstart Menu itself, a context menu appears with options to "add an application", "add a shortcut to a folder", "create a new group", etc.
(Also, I don't like being confined to the PAF format, which is why I use PStart)
????????
PAM > U3
Please Make TiLP Portable
aren't confined to the paf format.
“Science is the belief in the ignorance of the experts” - Richard P. Feynman
"What about Love?" - "Overrated. Biochemically no different than eating large quantities of chocolate." - Al Pacino in The Devils Advocate
Right click "convenience" menu's are planned for adding/removing apps, changing folder paths, changing theme, etc. The menu is still in alpha stage which means that all of its functionality isn't done yet.
As for the right click menu for apps on the tray icon, it probably won't be done.
There isn't much difference between right click to display a "PStart" style menu and a left click to display a "PAM" style menu, the steps, motions, and effort are essentially the same. Only the visual of the menu is different.
-----------------------------------------------------------------------------------------------
Because they stand on a wall and say nothing is going to hurt you tonight. Not on my watch.
"Because they stand on a wall and say, 'Nothing is going to hurt you tonight. Not on my watch.'" (A Few Good Men)
Coincidence is God's way of remaining anonymous.(Albert Einstein)
Ok man, thanks alot.
(I know better than to piss and moan about the tray Icon, since this will be open-source (I think) I can just learn Delphi on my own time and take a stab at doing it myself.)
════════
PAM > U3
Please Make TiLP Portable
Alpha 3...
Fixed "sticky click" on the menu,(it doesn't launch your last click anymore)
Added exit argument option (close apps with the menu if they support an exit argument, i.e. conveyportable.exe -exit)
Re-Arranged the folder options, needed room for planned functionality.
Options window is no longer sizable.
Added "Save & Close" button.
Alpha 4...
Added Add/Remove buttons to Options/Applications
Added Completed Menu Title Option
Added Options/Theme Options (not fully functional)
At this point all of the basic functions should work (onStart,onClick,onExit,etc.)
The app scan still needs to be written so you will have to use the add/remove for now, the included settings file has most of the PortableApps apps and several more.
I'm going to take a few days off, my fiencee is ready to strangle me for spending so much time on the computer.
Comments & Suggestions are always welcome.
Enjoy
-----------------------------------------------------------------------------------------------
Because they stand on a wall and say nothing is going to hurt you tonight. Not on my watch.
"Because they stand on a wall and say, 'Nothing is going to hurt you tonight. Not on my watch.'" (A Few Good Men)
Coincidence is God's way of remaining anonymous.(Albert Einstein)
This is quite nice. I can't wait until it's in beta.
here
my server provider loves me more after this weekend
lol
greetz
When you are in the Options -> Applications section and you highlight an application and hit the "Remove" button, the item is removed, but it also triggers a "List index out of bounds()" error dialog every time you remove an item.
Suggestions for future releases:
-UPX compress the .exe file (it'll compress down to around 604KB)
-Put the source code in a separate download.
Cancer Survivors -- Remember the fight, celebrate the victory!
Help control the rugrat population -- have yourself spayed or neutered!
Ok I had some extra time while the fiencee was playing video games.
Fixed the list index out of bounds.
Started on the icons in the menu list, but the its not working as expected
-----------------------------------------------------------------------------------------------
Because they stand on a wall and say nothing is going to hurt you tonight. Not on my watch.
"Because they stand on a wall and say, 'Nothing is going to hurt you tonight. Not on my watch.'" (A Few Good Men)
Coincidence is God's way of remaining anonymous.(Albert Einstein)
Fiencee playing video games?
Nice.
And we're still having spell check problems with "Fiencee" eh.
It suggests "Patience" which works for me.
_______________________________________________
It's kinda scary when my desktop is messier than my room...
You had to get in there somewhere, didn't you
----
Ryan McCue.
Blog.
So all that Airbus-delay trouble over here in Europe is because of YOU!
Simeon.
"If you're not part of the solution, you're part of the precipitate."
i run this on my laptop the menu isnt usable anymore
its totally messed up at this res.
can u fix this maybe
greetz
I your dpi set to 120 by any chance?
I know PAM had problems with that setting and John had to fix it.
Seems 120 DPI causes issues with quite a few apps.
I will look into it. No promises though, I'm still learning delphi.
-----------------------------------------------------------------------------------------------
Because they stand on a wall and say nothing is going to hurt you tonight. Not on my watch.
"Because they stand on a wall and say, 'Nothing is going to hurt you tonight. Not on my watch.'" (A Few Good Men)
Coincidence is God's way of remaining anonymous.(Albert Einstein)
youre right i mean only if it works not all will use 1920 x 1200 and 120 dpi
Fixed the icons in the menu display.
-----------------------------------------------------------------------------------------------
Because they stand on a wall and say nothing is going to hurt you tonight. Not on my watch.
"Because they stand on a wall and say, 'Nothing is going to hurt you tonight. Not on my watch.'" (A Few Good Men)
Coincidence is God's way of remaining anonymous.(Albert Einstein)
yap this looks better.
greetz