tk 0.1.10

Rust bindings for Tk GUI library
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

use crate::{
    InterpResult,
    TkInstance,
    TtkCommonTraits,
    Widget,
};

use std::os::raw::{
    c_double,
    c_int,
};

use tcl::Obj;

#[derive( Copy, Clone )]
pub struct TtkProgressbar<TK:TkInstance>( pub(crate) Widget<TK> );

pub struct TtkProgressbarInterval {
    milliseconds: c_int,
}

impl TtkProgressbarInterval {
    pub fn new( milliseconds: c_int ) -> Option<Self> {
        if milliseconds > 0 {
            Some( TtkProgressbarInterval{ milliseconds })
        } else {
            None
        }
    }
}

impl Default for TtkProgressbarInterval {
    fn default() -> Self {
        TtkProgressbarInterval{ milliseconds: 50 }
    }
}

impl From<TtkProgressbarInterval> for Obj {
    fn from( interval: TtkProgressbarInterval ) -> Obj {
        interval.milliseconds.into()
    }
}

impl<TK:TkInstance> TtkProgressbar<TK> {
    pub fn start( &self, interval: TtkProgressbarInterval ) -> InterpResult<()> {
        self.tk().run(( self.path, "start", interval ))
    }

    pub fn step( &self, amount: c_double ) -> InterpResult<()> {
        self.tk().run(( self.path, "step", amount ))
    }

    pub fn stop( &self ) -> InterpResult<()> {
        self.tk().run(( self.path, "stop" ))
    }
}

impl<TK:TkInstance> TtkCommonTraits<TK> for TtkProgressbar<TK> {}