gDesign - Visual Gadget Designer

[ts-soft]

The same lib without need of init function

You don't call gDesign_Init(). Set the name ob the lib to gDesign.pbi, the call is automatic by using any Function

I see, you have renamed the initfunction, that doesn't work

ProcedureDLL MyLib_Init()
; Do some initializing stuff, allocate memory, etc.
EndProcedure

ProcedureDLL MyLib_End()
; Do some cleaning, free memory, unload third party DLLs, etc.
EndProcedure

[Droopy]

@Ts-Soft : gDesignInit is called by the gDesignMaxItem function internally.
I think it's the first function the user call .

It works, here the lib File:1->GDesign


and a test for the Lib :

Code: Select all

Dim ItemIndex.l(gDesignMaxItem(?gadgets))

;/ Spécify Windows options / Windows Title
OpenWindow(0, 0, 0,gDesignClientWidth(?gadgets) ,gDesignClientHeight(?gadgets), #PB_Window_MinimizeGadget|#PB_Window_ScreenCentered, "Template gDesign")
CreateGadgetList(WindowID())
gDesign(?gadgets,@ItemIndex(),0,0)

;/ N° of Gadget is given by ToolTip
Repeat
  Event=WaitWindowEvent()
  
  If Event = #PB_EventGadget
    Debug EventGadgetID()
  EndIf
Until Event=#PB_Event_CloseWindow

DataSection
gadgets: IncludeBinary "new.gdf"
EndDataSection

[Mischa]

@Droopy

You don't need the gDesignMaxItem function for creating gDesign,
if you KNOW the Result before. = Highest ItemNumber.

You should make the initcall in beginning of gDesign() function.

Regards

[ts-soft]

@Droopy
When you use my original-version, there is no call required of Init.
The Name of Lib must: gDesign
The automatic Initfunction must: gDesign_Init()
Initfunction without Parameters and without ProcedureReturn. It was called automatic bei using the lib

TailBite create descfile like this:

gDesign_Init ()
InitFunction | StdCall
;
gDesignClientWidth, Long (*gdata)
Long | StdCall
;
gDesignClientHeight, Long (*gdata)
Long | StdCall
;
gDesignMaxItem, Long (*gdata)
Long | StdCall
;
gDesign, Long, Long, Long, Long (*gdata, *gitems, goffx, goffy)
None | StdCall
;

[Droopy]

I agree and Add init function ( the lib of Ts-soft )

[Droopy]

Add gDesign to the New menu (aka ShellNew entries) ?

http://windowsxp.mvps.org/shellnewadd.htm

[Intrigued]

Very compact, easy to use... from the couple minutes I have used it.

*thumbs up*

[Droopy]

It is possible reorder gadget number.
When i use Tab to navigate thru gadgets, the order is done by gadget order of creation.

[xgp]

Really nice;)

xgp

[rsts]

This will be quite handy.

Many thanks.

[dracflamloc]

Very nice. Its great when projects like this are created =)

[dagcrack]

Am I stupid or the gadgets moves when you click on them? I just loaded the included gui examples, clicked on a button and it moved to the left a little (and couldnt move it back to the original pos)

I believe it's the grid causing this (you designed the gui with a smaller grid for example, since the default grid is bigger / different sized, odd things might happen) you should store the grid settings on each gui file, are you doing it already?

cheers.
(I wouldnt switch the official editor for this one, however if you add a couple of more features I might).

also, set the window to foreground every time you reset its contents (for example new design, will "reset" the program, it might not come back to the top - the window -, so make sure..)

So far its kicking certain paid designer because of certain feature I requested for certain paid designer which was never added ehem.. jrk..

[Droopy]

You can move gadget with arrow key, can you add autorepeat function for keys ?

[Mischa]

Ok, i will work a few days more on gDesign.
First changes made. Update the next days.
But i will change the licence from freeware
to donationware, ok?

And now...let me work.

Regards,
Mischa

[Mischa]

Hi!

In a few days more, i will release beta 2.
For those, which can't await i will give an first impression.



Regards,
Mischa