<?php
if (!class_exists('gtk')) {
        if (strtoupper(substr(PHP_OS, 0,3) == 'WIN')) {
                dl('php_gtk.dll');
        } else {
                dl('php_gtk.so');
        }
}

function abrir() {
        global $fs;
        $fs->show_all();
}

function abrir_cancel() {
        global $fs;
        $fs->hide();
}

function abrir_ok() {
        global $window;
        global $fs;
        global $conteudo;
        global $arquivo;
        $arquivo = $fs->get_filename();
        $window->set_title("PGpad ($arquivo)");
        $conteudo->set_point(0);
        $conteudo->forward_delete($conteudo->get_length());
        $f_cont = @fopen($fs->get_filename(), "r");
        $conteudo->insert(null, null, null, str_replace("
","",fread($f_cont, filesize($fs->get_filename()))));
        @fclose($f_cont);
        unset($f_cont);
        $fs->hide();
}

function destroy() {
        gtk::main_quit();
}

function delete_event() {
        return false;
}

$fs = &new GtkFileSelection("Abrir");
$ok_button = $fs->ok_button;
$ok_button->connect("clicked", "abrir_ok", $fs);
$cancel_button = $fs->cancel_button;
$cancel_button->connect("clicked", "abrir_cancel");

$window = &new GtkWindow();
$window->connect("destroy", "destroy");
$window->connect("delete-event", "delete_event");
$window->set_border_width(5);
$window->set_title("PGpad");
$window->set_position(GTK_WIN_POS_CENTER);
$window->set_default_size((gdk::screen_width()-40), (gdk::screen_height()-40));

$grid = &new GtkTable(1, 2);
$grid->set_row_spacings(4);
$grid->set_col_spacings(4);
$window->add($grid);

$botao_abrir = &new GtkButton("Abrir");
$botao_abrir->connect("clicked","abrir");
$grid->attach($botao_abrir, 0, 1, 0, 1, GTK_FILL, GTK_SHRINK);

$conteudo = &new GtkText();
$conteudo->set_editable(false);
$scrolled_window = &new GtkScrolledWindow();
$scrolled_window->set_policy(GTK_POLICY_ALWAYS, GTK_POLICY_ALWAYS);
$scrolled_window->add($conteudo);
$grid->attach($scrolled_window, 0, 1, 1, 2);

$conteudo->insert(null, null, null, "Clique no botão Abrir para escolher o arquivo a ser visualizado.");

$window->show_all();

Gtk::main();
?>