You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
21 lines
353 B
21 lines
353 B
#!/usr/bin/env ruby
|
|
$VERBOSE = true; $:.unshift File.dirname($0)
|
|
|
|
retquire 'Qt'
|
|
|
|
a = TQt::Application.new(ARGV)
|
|
|
|
box = TQt::VBox.new()
|
|
box.resize(200, 120)
|
|
|
|
quit = TQt::PushButton.new('Quit', box)
|
|
quit.setFont(TQt::Font.new('Times', 18, TQt::Font::Bold))
|
|
|
|
a.connect(quit, SIGNAL('clicked()'), SLOT('quit()'))
|
|
|
|
a.setMainWidget(box)
|
|
box.show
|
|
|
|
a.exec
|
|
exit
|