On 25/02/10 16:18, Pritpal Bedi wrote:

I understand the question.

hbIDE is a powerful application demonstration
( if we take it in this context ) which exposes many-many constructs
of Qt.

Certainly, but for the beginner ( or old Clipper person like me ) that's too big a step.

What else you are asing for, or expecting ?


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.

Rgds
Barry

/*
 * $Id: button01.prg 396 2010-01-29 13:54:36Z marcosgambeta $
*/

/*

xHGTK sample
Copyright 2005 by Marcos Antonio Gambeta

*/

#include "gtk.ch"

PROCEDURE Main ()

   LOCAL pWindow // pointer to the widget GtkWindow
   LOCAL pButton // pointer to the widget GtkButton

   // initialize GTK+
   gtk_init()

   // create the main window
   pWindow := gtk_window_new( GTK_WINDOW_TOPLEVEL )
   // define width and height of the main window
   gtk_widget_set_size_request( pWindow, 250, 50 )
   // define title
   gtk_window_set_title( pWindow, "GtkButton - sample 1" )
   // define start position
   gtk_window_set_position( pWindow, GTK_WIN_POS_CENTER )

   // create the widget GtkButton
   pButton := gtk_button_new()
   // add the widget to the window
   gtk_container_add( pWindow, pButton )
   // turn the widget visible
   gtk_widget_show( pButton )

   // close the application if the window is destroyed
   gtk_signal_connect( pWindow, "destroy", {|| gtk_main_quit() } )
   // destroy the window if the button is clicked
gtk_signal_connect( pButton, "clicked", {|| gtk_widget_destroy( pWindow ) } )

   // show the window
   gtk_widget_show( pWindow )

   // start the main loop
   gtk_main()

RETURN
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to