| 1 |
#! /usr/bin/ruby |
| 2 |
|
| 3 |
#==============================================================================# |
| 4 |
# $Id: common_dialog.rb,v 1.2 2004/02/13 15:05:04 yuya Exp $ |
| 5 |
#==============================================================================# |
| 6 |
|
| 7 |
require 'etk/etk' |
| 8 |
|
| 9 |
#==============================================================================# |
| 10 |
|
| 11 |
class MyForm < Etk::Form |
| 12 |
|
| 13 |
def initialize |
| 14 |
self.suspend_layout { |
| 15 |
self.text = "$Id: common_dialog.rb,v 1.2 2004/02/13 15:05:04 yuya Exp $" |
| 16 |
self.border_style = Etk::Form::BORDER_STYLE_FIXED_SINGLE |
| 17 |
self.maximize_box = false |
| 18 |
self.set_client_size(170, 230) |
| 19 |
|
| 20 |
self << Etk::Button.new(:btn1, "OpenFileDialog", 10, 10, 150, 30) |
| 21 |
self << Etk::Button.new(:btn2, "SaveFileDialog", 10, 40, 150, 30) |
| 22 |
self << Etk::Button.new(:btn3, "FolderBrowserDialog", 10, 70, 150, 30) |
| 23 |
self << Etk::Button.new(:btn4, "ColorDialog", 10, 100, 150, 30) |
| 24 |
self << Etk::Button.new(:btn5, "FontDialog", 10, 130, 150, 30) |
| 25 |
self << Etk::Button.new(:btn6, "PageSetupDialog", 10, 160, 150, 30) |
| 26 |
self << Etk::Button.new(:btn7, "PrintDialog", 10, 190, 150, 30) |
| 27 |
} |
| 28 |
end |
| 29 |
|
| 30 |
def on_btn1_click(arg) |
| 31 |
dialog = Etk::OpenFileDialog.new |
| 32 |
p(dialog.show) |
| 33 |
p(dialog.filename) |
| 34 |
end |
| 35 |
|
| 36 |
def on_btn2_click(arg) |
| 37 |
dialog = Etk::SaveFileDialog.new |
| 38 |
p(dialog.show) |
| 39 |
p(dialog.filename) |
| 40 |
end |
| 41 |
|
| 42 |
def on_btn3_click(arg) |
| 43 |
dialog = Etk::FolderBrowserDialog.new |
| 44 |
p(dialog.show) |
| 45 |
end |
| 46 |
|
| 47 |
def on_btn4_click(arg) |
| 48 |
dialog = Etk::ColorDialog.new |
| 49 |
p(dialog.show) |
| 50 |
end |
| 51 |
|
| 52 |
def on_btn5_click(arg) |
| 53 |
dialog = Etk::FontDialog.new |
| 54 |
p(dialog.show) |
| 55 |
end |
| 56 |
|
| 57 |
def on_btn6_click(arg) |
| 58 |
dialog = Etk::PageSetupDialog.new |
| 59 |
p(dialog.show) |
| 60 |
end |
| 61 |
|
| 62 |
def on_btn7_click(arg) |
| 63 |
dialog = Etk::PrintDialog.new |
| 64 |
p(dialog.show) |
| 65 |
end |
| 66 |
|
| 67 |
end |
| 68 |
|
| 69 |
#==============================================================================# |
| 70 |
|
| 71 |
Etk.main(MyForm.new) |
| 72 |
|
| 73 |
#==============================================================================# |
| 74 |
#==============================================================================# |