VPF::TK ошибка - Форум программистов

FreeGanzter

Дата 11.5.2011, 01:47 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 23
Регистрация: 4.5.2011

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

Код


use Tk;
$mw = tkinit;
$b = Button::new($mw, -text => 'Hello World');
$b->configure(-method => sub {exit});
tkpack($b);
tkmainloop;

Undefined subroutine &Button::new called at C:\script.pl line 3.
вот такая ошибка код из книги мастеринг Tk
Модуль установлен другие коды к примеру коды участников форума работают нормально

dixoNICH

Дата 11.5.2011, 06:34 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 222
Регистрация: 20.3.2011

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

Цитата(FreeGanzter @ 11.5.2011, 01:47)

Код


use Tk;
$mw = tkinit;
$b = Button::new($mw, -text => 'Hello World');
$b->configure(-method => sub {exit});
tkpack($b);
tkmainloop;

Код

use Tk;
my $mw = MainWindow->new();
     $mw->geometry("400x200");
my $b = $mw->Button( 
    -text => "Hello world!",
    -command => sub{exit;})->pack();
MainLoop;

попробуйте так

Это сообщение отредактировал(а) dixoNICH - 11.5.2011, 14:05

FreeGanzter

Дата 11.5.2011, 23:11 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 23
Регистрация: 4.5.2011

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

А как придать форме фиксированный размер :?? чтоб она не растягивалась ?

dixoNICH

Дата 12.5.2011, 10:48 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 222
Регистрация: 20.3.2011

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

Код


$mw -> resizable(0,0);

FreeGanzter

Дата 12.5.2011, 21:33 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 23
Регистрация: 4.5.2011

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

Спасибо за помощь, а возможно ли сделать чтоб консолька не выскакивала при запуске ??

dixoNICH

Дата 12.5.2011, 21:48 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 222
Регистрация: 20.3.2011

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

только если сделать *.exe
а так - нет, нельзя)

shamber

Дата 13.5.2011, 14:10 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1422
Регистрация: 5.9.2006
Где: Россия

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

dixoNICH, зачем неправду говорить? Можно.

Добавлено через 7 минут и 35 секунд
консольку можно закрывать.

FreeGanzter

Дата 14.5.2011, 02:54 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 23
Регистрация: 4.5.2011

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

Цитата(shamber @ 13.5.2011, 14:10)

dixoNICH, зачем неправду говорить? Можно.

Добавлено @ 14:18
консольку можно закрывать.

А вопрос был : чтоб она не выскакивала при запуске smile

shamber

Дата 14.5.2011, 08:12 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1422
Регистрация: 5.9.2006
Где: Россия

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

use wperl

FreeGanzter

Дата 14.5.2011, 08:22 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 23
Регистрация: 4.5.2011

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

Цитата(shamber @ 14.5.2011, 08:12)

use wperl

А можно подробней в cpan посмотрел такова модуля нет :(

а если так добавить строку в скрипт компилятор ругается strawbery +padre perl

Я новичек не ругайтесь много ещё не понимаю

shamber

Дата 14.5.2011, 22:35 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1422
Регистрация: 5.9.2006
Где: Россия

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

Это не модуль. Это perl, только без окошка консольки. Посмотрите у себя в каталоге установки. и запускайте программу не perl.exe myscript.pl, a wperl.exe myscript.pl

dixoNICH

Дата 16.5.2011, 22:30 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 222
Регистрация: 20.3.2011

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

извеняюсь) спасибо, хорошая вещь.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: GUI \| Следующая тема »