Ruby/Qte : メッセージボックスでユーザーに選択させる

  0
  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136

#!/usr/bin/env ruby
require 'qte'
require 'qpe'
 
include Qte
include Qpe
 
$KCODE = "UTF8"
 
class MainWindow < QMainWindow
  def initialize
    super
    self.setCaption(tr("(10) QMessageBox さんぷる"))
    @mybox    = QVBox.new(self)
      self.setCentralWidget(@mybox) 
      @mybox.setMargin(5)                        #外側の５ピクセル空け指定
      @label   = QLabel.new(tr("さんぷる"),    @mybox)                         #ラベル 配置
      @btn_ok  = QPushButton.new(tr("About ダイアログを出す"), @mybox)         #ボタン1配置
        connect(@btn_ok, QSIGNAL("clicked()"), self, 'dlg_ok')
      @btn_2   = QPushButton.new(tr("ボタン２つ のダイアログを出す"), @mybox)  #ボタン2配置
        connect(@btn_2, QSIGNAL("clicked()"), self, 'dlg_yn')
      @btn_ext = QPushButton.new(tr("ボタン３つ のダイアログを出す"), @mybox)  #ボタン3配置
        connect(@btn_ext, QSIGNAL("clicked()"), self, 'dlg_ext')
      @btn_sw  = QPushButton.new(tr("条件分岐のサンプルを実行する"), @mybox)   #ボタン4配置
        connect(@btn_sw, QSIGNAL("clicked()"), self, 'dlg_sw')
 
  end
 
  def dlg_ok
    result = QMessageBox.about(self, tr("About ダイアログのテスト"), tr("情報ダイアログのテストです。"))
    #puts result.class #=>NilClass
  end
 
  def dlg_yn
    #.critical の仲間に .information や .warning がいます。
    result = QMessageBox.critical(
      self,
      tr("２ボタンのテスト"),
      tr("どれかボタンを押してください。"),
      tr("第１ボタン"),
      tr("第２ボタン"))
    puts result.class
    puts result.to_s   #=> -1 or 0 or 1 (第ｎボタンなら n-1、Cancel で -1)
    @label.setText(tr("QMessageBoxは "+result.to_s+" を返しました。"))
  end
 
  #説明用のサンプルメソッド(呼ばれません)
  def dlg_dummy
    #ボタン無し、ボタンひとつ、みっつもできます。
    result = QMessageBox.information(
      self,
      tr("OKだけのテスト"),
      tr("どれかボタンを押してください。"))
    puts result.class
    puts result.to_s   #=> 0
 
    result = QMessageBox.information(
      self,
      tr("１ボタンのテスト"),
      tr("どれかボタンを押してください。"),
      tr("第１ボタン"))
    puts result.class
    puts result.to_s   #=> 0
 
    result = QMessageBox.information(
      self,
      tr("３ボタンのテスト"),
      tr("どれかボタンを押してください。"),
      tr("第１ボタン"),
      tr("第２ボタン"),
      tr("第３ボタン"))
    puts result.class
    puts result.to_s   #=> 0～2 (第ｎボタンなら n-1)
  end
 
  def dlg_ext
    msg_ext = QMessageBox.new(
      tr("３ボタンのテスト"),
      tr("どれかボタンを押してください。"),
      QMessageBox::Information,                     #アイコン指定。
#     QMessageBox::Ok,                              #「OK」    #=> 1 (Fixnum)
      QMessageBox::Yes    | QMessageBox::Default,   #「はい」  #=> 3 (Fixnum)
      QMessageBox::No,                              #「いいえ」#=> 4 (Fixnum)
#     QMessageBox::Abort,                           #「中断」  #=> 5 (Fixnum)
#     QMessageBox::Retry,                           #「再試行」#=> 6 (Fixnum)
#     QMessageBox::Ignore,                          #「無視」  #=> 7 (Fixnum)
      QMessageBox::Cancel | QMessageBox::Escape )   #「中止」  #=> 2 (Fixnum)
    #msg_ext.setButtonText( QMessageBox::Yes,    tr("はいをカスタマイズ") )
 
    result = msg_ext.exec
    puts result.class #=>Fixnum (0 or 1～7。Cancel ボタン時は 0 か QMessageBox::Escape と紐付けされたボタン。)
    puts result.to_s
    @label.setText(tr("QMessageBoxは "+result.to_s+" を返しました。"))
  end
 
  def dlg_sw
    msg_sw = QMessageBox.new(
      tr("条件分岐のテスト"),
      tr("どれかボタンを押してください。"),
      QMessageBox::Warning,
      QMessageBox::Abort,                           #「中断」  #=> 5 (Fixnum)
      QMessageBox::Retry,                           #「再試行」#=> 6 (Fixnum)
      QMessageBox::Ignore)                          #「無視」  #=> 7 (Fixnum)
 
    result = msg_sw.exec
 
    btn_label = ""
 
    case result
    when QMessageBox::Abort
      btn_label = "「中断」"
    when QMessageBox::Retry
      btn_label = "「再試行」"
    when QMessageBox::Ignore
      btn_label = "「無視」"
    else
      @label.setText(tr("Cancel されました。"))
      return
    end
 
    @label.setText(tr(btn_label +" ボタンが押されました。"))
  end
 
 
end
 
class MyApplication < QPEApplication
  def initialize
    super([$0]+ARGV)
    self.setDefaultCodec(QTextCodec::codecForName("utf-8"))
  end
end
 
app = MyApplication.new
win = MainWindow.new()
app.showMainWidget(win)
app.exec