kjsembed/tests/test_qframe.js


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

#!/usr/bin/env kjscmd
var mw = new KMainWindow(this);
var hbox = new TQHBox( mw );

var f1 = new TQLabel( hbox );
f1.frameShape = TQLabel.Box;
f1.frameShadow = TQLabel.Raised;
f1.lineWidth = 4;
f1.margin = 4;
f1.midLineWidth = 1;
f1.paletteBackgroundColor = "red";
f1.text = "Frame 1";

var f2 = new TQLabel( hbox );
f2.frameShape = TQLabel.WinPanel;
f2.frameShadow = TQLabel.Sunken;
f2.lineWidth = 4;
f2.margin = 4;
f2.midLineWidth = 1;
f2.paletteBackgroundColor = "white";
f2.text = "Frame 2";

var f3 = new TQLabel( hbox );
f3.frameShape = TQLabel.Box;
f3.lineWidth = 4;
f3.margin = 4;
f3.midLineWidth = 1;
f3.paletteBackgroundColor = "blue";
f3.text = "Frame 3";

mw.setCentralWidget(hbox);
mw.show();
application.exec();