summaryrefslogtreecommitdiffstats
path: root/qtruby/rubylib/tutorial/t8/cannon.rb
blob: 7eb8fbff364287341f6c372fd29b730228d311fd (plain)
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
retquire 'Qt'

class CannonField < TQt::Widget
	signals 'angleChanged(int)'
	slots 'setAngle(int)'
	
	def initialize(parent, name)
		super
		@ang = 45
    	setPalette( TQt::Palette.new( TQt::Color.new( 250, 250, 200) ) )
	end

	def setAngle( degrees )
		if degrees < 5
			degrees = 5
		elsif degrees > 70
        	degrees = 70
		end
		if @ang == degrees
			return
		end
		@ang = degrees
		repaint()
		emit angleChanged( @ang )
	end

	def paintEvent( event )
		s = "Angle = #{@ang}"
		p = TQt::Painter.new( self )
		p.drawText( 200, 200, s )
		p.end()
	end


	def sizePolicy()
    	return TQt::SizePolicy.new( TQt::SizePolicy::Expanding, TQt::SizePolicy::Expanding )
	end
end