summaryrefslogtreecommitdiffstats
path: root/PerlQt/tutorials/t2/t2.pl
diff options
context:
space:
mode:
Diffstat (limited to 'PerlQt/tutorials/t2/t2.pl')
-rw-r--r--PerlQt/tutorials/t2/t2.pl16
1 files changed, 0 insertions, 16 deletions
diff --git a/PerlQt/tutorials/t2/t2.pl b/PerlQt/tutorials/t2/t2.pl
deleted file mode 100644
index c7b76e4..0000000
--- a/PerlQt/tutorials/t2/t2.pl
+++ /dev/null
@@ -1,16 +0,0 @@
-#!/usr/bin/perl -w
-use strict;
-use blib;
-use TQt;
-
-my $a = TQt::Application(\@ARGV);
-
-my $quit = TQt::PushButton("Quit", undef);
-$quit->resize(75, 30);
-$quit->setFont(TQt::Font("Times", 18, &TQt::Font::Bold));
-
-$a->connect($quit, TQT_SIGNAL('clicked()'), TQT_SLOT('quit()'));
-
-$a->setMainWidget($quit);
-$quit->show;
-exit $a->exec;