summaryrefslogtreecommitdiffstats
path: root/qtruby/rubylib/tutorial/t9/cannon.rb
blob: 2464991696bed6758171b1bbdb146fa17ae550a7 (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
39
40
41
42
43
require '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 )
		p = TQt::Painter.new( self )

		p.setBrush( blue )
		p.setPen( TQt::NoPen )
		p.translate( 0, rect().bottom() )
		p.drawPie( TQt::Rect.new(-35, -35, 70, 70), 0, 90*16 )
		p.rotate( - @ang )
		p.drawRect( TQt::Rect.new(33, -4, 15, 8) )
		p.end()		
	end


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