Модераторы: ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Tk::Table, Как ее правильно выводить? 
V
    Опции темы
OutlawZ
Дата 12.5.2010, 11:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Awaiting Authorisation
Сообщений: 269
Регистрация: 19.10.2007

Репутация: нет
Всего: нет



Народ а как вы таблицу выводите? у меня что то не получается ее показать на форме:

Код

use Tk;
use Tk::Table;

my ($mw,%wg, );

$mw = MainWindow->new('-title' => "Table");

$wg{'Table1'} = $mw->Table(
 -rows             => 5,
 -columns        => 5,
 -scrollbars      => 'oe',
 -fixedrows      => 5,
 -fixedcolumns => 5,
)->pack();
                          

$wg{'Table1'}->put(5,5,"Table");

MainLoop;


Выводит тока надпись Table и scrollbar, использовал методы see и get но так же не помогло.

Это сообщение отредактировал(а) OutlawZ - 12.5.2010, 11:36


--------------------
user posted image
user posted image
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: GUI | Следующая тема »


 




[ Время генерации скрипта: 0.0513 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.