OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [insight/] [tix/] [tests/] [itcl/] [itk.tcl] - Blame information for rev 1765

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 578 markom
# This file tests the pixmap image reader
2
#
3
 
4
proc About {} {
5
    return "This file performs tests with ITK mega widgets"
6
}
7
 
8
proc Test {} {
9
    frame .f
10
    pack .f
11
    tixPanedWindow .f.tpw
12
    pack .f.tpw -side left -expand yes -fill both
13
    set p1 [.f.tpw add t1 -min 20 -size 120 ]
14
    set p2 [.f.tpw add t2 -min 20  -size 80 ]
15
    frame $p1.t1
16
    frame $p2.t2
17
    pack $p1.t1 $p2.t2
18
    tixScrolledListBox $p1.t1.list
19
    tixScrolledListBox $p2.t2.list
20
    pack  $p1.t1.list  $p2.t2.list
21
 
22
    Combobox .ibox -labeltext "ItkBox" -items {one two three}
23
    pack .ibox
24
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.