I think that Rob's is going to be a lil bit more user friendly... hehe ... heres a test app...
Sync On
Sync Rate 60
FastSync
Load Dll "WinDll.dll",1
Call Dll 1,"AdvancedG",1
Call Dll 1,"OpenW",0,100,100,715,500,"Window","SystemMenu|MinimizeGadget|MaximizeGadget|SizeGadget|TitleBar"
ID=Call Dll(1,"WinID",0,1,"DarkBASIC Pro Project")
ID2=Call Dll(1,"WinID",0,1,"Window")
Call Dll 1,"CreateM",1,ID2
Call Dll 1,"MenuT","Title"
Call Dll 1,"MenuI",0,"Item"
Call Dll 1,"MenuB"
Call Dll 1,"MenuI",1,"Another Item"
Call Dll 1,"CToolBar",1,ID2
Call Dll 1,"ToolBarSB",1,"New"
Call Dll 1,"ToolBarSB",2,"Open"
Call Dll 1,"ToolBarSB",3,"Save"
Call Dll 1,"ToolBarSB",4,"Print"
Call Dll 1,"ToolBarS"
Call Dll 1,"ToolBarSB",5,"Find"
Call Dll 1,"ToolBarSB",6,"Replace"
Call Dll 1,"ToolBarS"
Call Dll 1,"ToolBarSB",7,"Cut"
Call Dll 1,"ToolBarSB",8,"Copy"
Call Dll 1,"ToolBarSB",9,"Paste"
Call Dll 1,"ToolBarS"
Call Dll 1,"ToolBarSB",10,"Undo"
Call Dll 1,"ToolBarSB",11,"Redo"
Call Dll 1,"ToolBarSB",12,"Delete"
Call Dll 1,"ToolBarS"
Call Dll 1,"ToolBarSB",13,"Properties"
Call Dll 1,"ToolBarSB",14,"Help"
Call Dll 1,"ToolBarS"
Call Dll 1,"GadgetL",ID2
ID4=Call Dll(1,"ButtonG",1,ID2,0,25,75,25,"Button","#WS_CHILD|#WS_VISIBLE|#WS_CLIPCHILDREN")
Call Dll 1,"TextG",2,0,55,75,25,"Text"
Call Dll 1,"StringG",3,0,80,75,25,"String"
Call Dll 1,"CheckBoxG",7,0,105,75,25,"Check Box"
Call Dll 1,"SButtonG",8,0,130,75,25,"Button","Toggle"
Call Dll 1,"GToolTip",8,"I'm a Button... and I'm Toggled"
`Call Dll 1,"PanelG",4,100,0,75,300
`>>Call Dll 1,"AddGadgetI",6,0,"Panel"
`Call Dll 1,"ContainerG",5,0,0,200,200
Call Dll 1,"CloseGadgetL"
Call Dll 1,"ParentW",ID,ID2,0,0,0,0
`Call Dll 1,"UseGadgetL",ID
`Call Dll 1,"MessageR","Message Request","Message",3
`ID3=Call Dll(1,"SubW",ID,200,200,100,100,"",1)
`Call Dll 1,"GadgetL",ID3
`ID5=Call Dll(1,"ButtonG",7,ID3,0,0,50,50,"Button","#WS_CHILD|#WS_VISIBLE|#WS_CLIPCHILDREN")
`Call Dll 1,"CloseGadgetL"
`R=Call Dll(1,"ColorR")
`E=Call Dll(1,"WinE",1)
`I$=Call Dll(1,"InputR","Input Request","Please enter some input:","Default")
`F=Call Dll(1,"FontR","Arial",10)
`P$=Call Dll(1,"PathR","Path Request","C:\")
`S$=Call Dll(1,"StringR",3)
O$=Call Dll(1,"OpenFileR","Open File Request","C:\","Text (*.txt)|*.txt;*.bat",1,1)
A$=Call Dll(1,"FileN",O$)
B$=Call Dll(1,"FileE",O$)
N$=Call Dll(1,"FileP",O$)
`X$=Call Dll(1,"SaveFileR")
Set Window Layout 0,0,0
Set Window Position 146.25,25
Set Window Size 568.75,455
Do
`Print ID3
`>>G=Call Dll(1,"GadgetI",1,ID2)
`>>C=Call Dll(1,"EventCloseW",ID2,1)
`If G=1 Then Print "Click"
`String$=Call Dll(1,"StringR",3)
`Print "Color: ",R
`Print "Red: ",RGBR(R)
`Print "Green: ",RGBG(R)
`Print "Blue: ",RGBB(R)
`Print O$
Print "File Name: ",A$
Print "File Extension: ",B$
Print "File Path: ",N$
`If C=1 Then Call Dll 1,"CloseW",ID2
`If G=1 Then Print "Click"
`Print String$
`Print G
`Print Screen Fps()
Sync
Loop
EVERYONE LOVES THE PUFF!... =\