Barry Jackson wrote: > > Any chance of "Hello_Qt_World.prg" with a push button. Nothing more. > Just to get started ? > > The xhgtk samples are the sort of thing I mean, see button01.prg below. >
REQUEST HB_QT STATIC s_qApp STATIC s_slots INIT PROCEDURE Qt_Start() hbqt_errorsys() s_qApp := QApplication():new() RETURN EXIT PROCEDURE Qt_End() s_qApp:quit() RETURN PROCEDURE Main() Local oWnd, oDA, oBtn s_slots := QT_SLOTS_NEW() oWnd := QMainWindow():new() oWnd:setWindowTitle( "Harbour-Qt Implementation Test Dialog" ) oWnd:setWindowIcon( "test" ) oWnd:resize( 900, 500 ) oDA := QWidget():new( oWnd ) oWnd:setCentralWidget( oDA ) oWnd:show() oBtn := QPushButton():new( oDA ) oBtn:move( 200, 100 ) oBtn:resize( 60, 30 ) oBtn:setText( "Hello World" ) oBtn:show() QT_SLOTS_CONNECT( s_slots, oBtn, "clicked()", {|| oWnd:close() } ) oWnd:Show() s_qApp:exec() RETURN A quick pullout of hbqt/tests/demoqt.prg, not tested, but surely you can grab the contents. ----- enjoy hbIDEing... Pritpal Bedi _a_student_of_software_analysis_&_design_ -- View this message in context: http://n2.nabble.com/Anyone-using-hbqt-tp4633339p4633795.html Sent from the harbour-devel mailing list archive at Nabble.com. _______________________________________________ Harbour mailing list (attachment size limit: 40KB) Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour