Blame examples/scrolledwin/scrolledwin.c

Packit Service fb6fa5
Packit Service fb6fa5
#include <stdio.h>
Packit Service fb6fa5
#include <gtk/gtk.h>
Packit Service fb6fa5
Packit Service fb6fa5
static void destroy( GtkWidget *widget,
Packit Service fb6fa5
                     gpointer   data )
Packit Service fb6fa5
{
Packit Service fb6fa5
    gtk_main_quit ();
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
int main( int   argc,
Packit Service fb6fa5
          char *argv[] )
Packit Service fb6fa5
{
Packit Service fb6fa5
    static GtkWidget *window;
Packit Service fb6fa5
    GtkWidget *scrolled_window;
Packit Service fb6fa5
    GtkWidget *table;
Packit Service fb6fa5
    GtkWidget *button;
Packit Service fb6fa5
    char buffer[32];
Packit Service fb6fa5
    int i, j;
Packit Service fb6fa5
    
Packit Service fb6fa5
    gtk_init (&argc, &argv);
Packit Service fb6fa5
    
Packit Service fb6fa5
    /* Create a new dialog window for the scrolled window to be
Packit Service fb6fa5
     * packed into.  */
Packit Service fb6fa5
    window = gtk_dialog_new ();
Packit Service fb6fa5
    g_signal_connect (G_OBJECT (window), "destroy",
Packit Service fb6fa5
		      G_CALLBACK (destroy), NULL);
Packit Service fb6fa5
    gtk_window_set_title (GTK_WINDOW (window), "GtkScrolledWindow example");
Packit Service fb6fa5
    gtk_container_set_border_width (GTK_CONTAINER (window), 0);
Packit Service fb6fa5
    gtk_widget_set_size_request (window, 300, 300);
Packit Service fb6fa5
    
Packit Service fb6fa5
    /* create a new scrolled window. */
Packit Service fb6fa5
    scrolled_window = gtk_scrolled_window_new (NULL, NULL);
Packit Service fb6fa5
    
Packit Service fb6fa5
    gtk_container_set_border_width (GTK_CONTAINER (scrolled_window), 10);
Packit Service fb6fa5
    
Packit Service fb6fa5
    /* the policy is one of GTK_POLICY AUTOMATIC, or GTK_POLICY_ALWAYS.
Packit Service fb6fa5
     * GTK_POLICY_AUTOMATIC will automatically decide whether you need
Packit Service fb6fa5
     * scrollbars, whereas GTK_POLICY_ALWAYS will always leave the scrollbars
Packit Service fb6fa5
     * there.  The first one is the horizontal scrollbar, the second, 
Packit Service fb6fa5
     * the vertical. */
Packit Service fb6fa5
    gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_window),
Packit Service fb6fa5
                                    GTK_POLICY_AUTOMATIC, GTK_POLICY_ALWAYS);
Packit Service fb6fa5
    /* The dialog window is created with a vbox packed into it. */								
Packit Service fb6fa5
    gtk_box_pack_start (GTK_BOX (GTK_DIALOG(window)->vbox), scrolled_window, 
Packit Service fb6fa5
			TRUE, TRUE, 0);
Packit Service fb6fa5
    gtk_widget_show (scrolled_window);
Packit Service fb6fa5
    
Packit Service fb6fa5
    /* create a table of 10 by 10 squares. */
Packit Service fb6fa5
    table = gtk_table_new (10, 10, FALSE);
Packit Service fb6fa5
    
Packit Service fb6fa5
    /* set the spacing to 10 on x and 10 on y */
Packit Service fb6fa5
    gtk_table_set_row_spacings (GTK_TABLE (table), 10);
Packit Service fb6fa5
    gtk_table_set_col_spacings (GTK_TABLE (table), 10);
Packit Service fb6fa5
    
Packit Service fb6fa5
    /* pack the table into the scrolled window */
Packit Service fb6fa5
    gtk_scrolled_window_add_with_viewport (
Packit Service fb6fa5
                   GTK_SCROLLED_WINDOW (scrolled_window), table);
Packit Service fb6fa5
    gtk_widget_show (table);
Packit Service fb6fa5
    
Packit Service fb6fa5
    /* this simply creates a grid of toggle buttons on the table
Packit Service fb6fa5
     * to demonstrate the scrolled window. */
Packit Service fb6fa5
    for (i = 0; i < 10; i++)
Packit Service fb6fa5
       for (j = 0; j < 10; j++) {
Packit Service fb6fa5
          sprintf (buffer, "button (%d,%d)\n", i, j);
Packit Service fb6fa5
	  button = gtk_toggle_button_new_with_label (buffer);
Packit Service fb6fa5
	  gtk_table_attach_defaults (GTK_TABLE (table), button,
Packit Service fb6fa5
	                             i, i+1, j, j+1);
Packit Service fb6fa5
          gtk_widget_show (button);
Packit Service fb6fa5
       }
Packit Service fb6fa5
    
Packit Service fb6fa5
    /* Add a "close" button to the bottom of the dialog */
Packit Service fb6fa5
    button = gtk_button_new_with_label ("close");
Packit Service fb6fa5
    g_signal_connect_swapped (G_OBJECT (button), "clicked",
Packit Service fb6fa5
			      G_CALLBACK (gtk_widget_destroy),
Packit Service fb6fa5
			      G_OBJECT (window));
Packit Service fb6fa5
    
Packit Service fb6fa5
    /* this makes it so the button is the default. */
Packit Service fb6fa5
    
Packit Service fb6fa5
    gtk_widget_set_can_default (button, TRUE);
Packit Service fb6fa5
    gtk_box_pack_start (GTK_BOX (GTK_DIALOG (window)->action_area), button, TRUE, TRUE, 0);
Packit Service fb6fa5
    
Packit Service fb6fa5
    /* This grabs this button to be the default button. Simply hitting
Packit Service fb6fa5
     * the "Enter" key will cause this button to activate. */
Packit Service fb6fa5
    gtk_widget_grab_default (button);
Packit Service fb6fa5
    gtk_widget_show (button);
Packit Service fb6fa5
    
Packit Service fb6fa5
    gtk_widget_show (window);
Packit Service fb6fa5
    
Packit Service fb6fa5
    gtk_main();
Packit Service fb6fa5
    
Packit Service fb6fa5
    return 0;
Packit Service fb6fa5
}