see CurrentDir() + nl
C:\Ring\calmosoft
QString getExistingDirectory(QWidget *,QString,QString, QFileDialog::Option)load "guilib.ring"
new qApp {
w = new qWidget() {
oFile = new qFileDialog(w)
cFolder = oFile.getExistingDirectory(w,"Open Directory","c:\",0)
w.setWindowTitle(cFolder)
show()
}
exec()
}load "guilib.ring"
new qApp {
win = new qwidget() {
setwindowtitle("Context Menu")
resize(400,400)
myfilter = new qAllEvents(win) {
setContextmenuEvent("mymenu()")
}
installeventfilter(myfilter)
show()
}
exec()
}
func mymenu
new qMenu(win) {
oAction = new qAction(win) {
settext("new")
SetCLickevent("See :New")
}
addaction(oAction)
oAction = new qAction(win) {
settext("open")
SetCLickevent("See :Open")
}
addaction(oAction)
oAction = new qAction(win) {
settext("save")
SetCLickevent("See :Save")
}
addaction(oAction)
oAction = new qAction(win) {
settext("close")
SetCLickevent("See :Close")
}
addaction(oAction)
oCursor = new qCursor()
exec(oCursor.pos())
}# Project : Right click
# Date : 2018/01/16
# Author : Gal Zsolt (~ CalmoSoft ~)
# Email : <calm...@gmail.com>
Load "guilib.ring"
click = 1
New qApp {
win1 = new qWidget() {
setwindowtitle("TreeWidget")
setGeometry(100,100,400,400)
layout1 = new qvboxlayout()
tree1 = new qtreewidget(win1) {
setGeometry(00,00,400,400)
setcolumncount(1)
myitem = new qtreewidgetitem()
myitem.settext(0,"The First Step")
addtoplevelitem(myitem)
for x = 1 to 10
myitem2 = new qtreewidgetitem()
myitem2.settext(0,"hello"+x)
myitem.addchild(myitem2)
for y = 1 to 10
myitem3 = new qtreewidgetitem()
myitem3.settext(0,"hello"+x)
myitem2.addchild(myitem3)
next
next
setheaderlabel("Steps Tree")
oFilter = new QAllEvents(win1)
click = string(oFilter.getButton())
setitemSelectionChangedEvent("pTreeKey()")
}
layout1.addwidget(tree1)
setlayout(layout1)
show()
}
exec()
}
func pTreeKey
click = string(oFilter.getButton())
see "click = " + click + nl
msgInfo("Hello","Yes you've right click the tree widget node")