forked from AuroraMiddleware/gtk
62 lines
1.9 KiB
C
62 lines
1.9 KiB
C
/* Text View/Tabs
|
|
*
|
|
* GtkTextView can position text at fixed positions, using tabs.
|
|
*/
|
|
|
|
#include <gtk/gtk.h>
|
|
#include <gdk/gdkkeysyms.h>
|
|
|
|
GtkWidget *
|
|
do_tabs (GtkWidget *do_widget)
|
|
{
|
|
static GtkWidget *window = NULL;
|
|
|
|
if (!window)
|
|
{
|
|
GtkWidget *view;
|
|
GtkWidget *sw;
|
|
GtkTextBuffer *buffer;
|
|
PangoTabArray *tabs;
|
|
|
|
window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
|
|
gtk_window_set_title (GTK_WINDOW (window), "Tabs");
|
|
gtk_window_set_screen (GTK_WINDOW (window),
|
|
gtk_widget_get_screen (do_widget));
|
|
gtk_window_set_default_size (GTK_WINDOW (window), 450, 450);
|
|
|
|
g_signal_connect (window, "destroy",
|
|
G_CALLBACK (gtk_widget_destroyed), &window);
|
|
|
|
view = gtk_text_view_new ();
|
|
gtk_text_view_set_wrap_mode (GTK_TEXT_VIEW (view), GTK_WRAP_WORD);
|
|
gtk_text_view_set_left_margin (GTK_TEXT_VIEW (view), 20);
|
|
gtk_text_view_set_right_margin (GTK_TEXT_VIEW (view), 20);
|
|
|
|
tabs = pango_tab_array_new (3, TRUE);
|
|
pango_tab_array_set_tab (tabs, 0, PANGO_TAB_LEFT, 0);
|
|
pango_tab_array_set_tab (tabs, 1, PANGO_TAB_LEFT, 150);
|
|
pango_tab_array_set_tab (tabs, 2, PANGO_TAB_LEFT, 300);
|
|
gtk_text_view_set_tabs (GTK_TEXT_VIEW (view), tabs);
|
|
pango_tab_array_free (tabs);
|
|
|
|
buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (view));
|
|
gtk_text_buffer_set_text (buffer, "one\ttwo\tthree\nfour\tfive\tsix\nseven\teight\tnine", -1);
|
|
|
|
sw = gtk_scrolled_window_new (NULL, NULL);
|
|
gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (sw),
|
|
GTK_POLICY_AUTOMATIC,
|
|
GTK_POLICY_AUTOMATIC);
|
|
gtk_container_add (GTK_CONTAINER (window), sw);
|
|
gtk_container_add (GTK_CONTAINER (sw), view);
|
|
|
|
gtk_widget_show_all (sw);
|
|
}
|
|
|
|
if (!gtk_widget_get_visible (window))
|
|
gtk_widget_show (window);
|
|
else
|
|
gtk_widget_destroy (window);
|
|
|
|
return window;
|
|
}
|