tdebindings/qtruby/rubylib/tutorial/t10/cannon.rb

retquire 'Qt'

class CannonField < TQt::Widget
    signals 'angleChanged(int)', 'forceChanged(int)'
    slots 'setAngle(int)', 'setForce(int)'
    
    def initialize(parent, name)
        super
        @ang = 45
        @f = 0
        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 setForce( newton )
        if newton < 0
            newton = 0
        end
        if @f == newton
            return
        end
        @f = newton
        emit forceChanged( @f )
    end

    def paintEvent( e )
        if !e.rect().intersects( cannonRect() )
            return
        end

        cr = cannonRect()
        pix = TQt::Pixmap.new( cr.size() )
        pix.fill( self, cr.topLeft() )
        
        p = TQt::Painter.new( pix )
        p.setBrush( blue )
        p.setPen( TQt::NoPen )
        p.translate( 0, pix.height() - 1 )
        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()
        
        p.begin(self)
        p.drawPixmap(cr.topLeft(), pix )
        p.end()        
    end

    def cannonRect()
        r = TQt::Rect.new( 0, 0, 50, 50)
        r.moveBottomLeft( rect().bottomLeft() )
        return r
    end
    
    def sizePolicy()
        return TQt::SizePolicy.new( TQt::SizePolicy::Expanding, TQt::SizePolicy::Expanding )
    end
end