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
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
|
# File 'lib/IFMapper/TranscriptDialogBox.rb', line 24
def initialize(transcript)
map = transcript.map
pos = [40, 40]
maxW = map.window.width - 390
maxH = map.window.height - 300
pos[0] = maxW if pos[0] > maxW
pos[1] = maxH if pos[1] > maxH
decor = DECOR_TITLE|DECOR_BORDER|DECOR_CLOSE
super( map.window, BOX_TRANSCRIPT, decor, pos[0], pos[1], 0, 0 )
mainFrame = FXVerticalFrame.new(self,
FRAME_SUNKEN|FRAME_THICK|
LAYOUT_FILL_X|LAYOUT_FILL_Y)
frame = FXHorizontalFrame.new(mainFrame, LAYOUT_SIDE_TOP|LAYOUT_FILL_X)
FXLabel.new(frame, BOX_TRANSCRIPT_STYLE, nil, 0, LAYOUT_FILL_X)
pane = .new(self)
TRANSCRIPT_SHORTNAME_TYPE.each { |t|
FXOption.new(pane, t, nil, nil, 0, JUSTIFY_HZ_APART|ICON_AFTER_TEXT)
}
@short = .new(frame, pane, FRAME_RAISED|FRAME_THICK|
JUSTIFY_HZ_APART|ICON_AFTER_TEXT|
LAYOUT_CENTER_X|LAYOUT_CENTER_Y)
frame = FXHorizontalFrame.new(mainFrame, LAYOUT_SIDE_TOP|LAYOUT_FILL_X)
FXLabel.new(frame, BOX_TRANSCRIPT_IDENTIFY, nil, 0, LAYOUT_FILL_X)
pane = .new(self)
TRANSCRIPT_IDENTIFY_TYPE.each { |t|
FXOption.new(pane, t, nil, nil, 0, JUSTIFY_HZ_APART|ICON_AFTER_TEXT)
}
@type = .new(frame, pane, FRAME_RAISED|FRAME_THICK|
JUSTIFY_HZ_APART|ICON_AFTER_TEXT|
LAYOUT_CENTER_X|LAYOUT_CENTER_Y)
frame = FXVerticalFrame.new(mainFrame, LAYOUT_SIDE_TOP|LAYOUT_FILL_X)
FXLabel.new(frame, BOX_TRANSCRIPT_EXPLANATION, nil, 0, LAYOUT_FILL_X)
@exp = FXText.new(frame, nil, 0, LAYOUT_FILL_X|LAYOUT_FILL_Y)
@exp.visibleRows = 4
@exp.visibleColumns = 60
@exp.backColor = mainFrame.backColor
@exp.disable
frame = FXVerticalFrame.new(mainFrame, LAYOUT_SIDE_TOP|LAYOUT_FILL_X)
FXLabel.new(frame, BOX_TRANSCRIPT_VERBOSE, nil, 0, LAYOUT_FILL_X)
@show = FXText.new(frame, nil, 0, LAYOUT_FILL_X|LAYOUT_FILL_Y)
@show.visibleRows = 9
@show.visibleColumns = 60
@show.disable
FXLabel.new(frame, BOX_TRANSCRIPT_BRIEF, nil, 0, LAYOUT_FILL_X)
@show2 = FXText.new(frame, nil, 0, LAYOUT_FILL_X|LAYOUT_FILL_Y)
@show2.visibleRows = 3
@show2.visibleColumns = 60
@show2.disable
@type.connect(SEL_COMMAND) { copy_to }
@short.connect(SEL_COMMAND) { copy_to }
copy_from(transcript)
end
|