如何更新面板框中的分隔值?大家好,
我想更新文字編輯框在面板框中。我試圖通過使用設置項目 (例如,對於面板框應該起作用),或者如果一個人具有列錶框並且沒有從列表中分離值或要在面板框的不同位置顯示的值,則似乎可行。我很高興為您提供解決該問題的提示。最好的祝福。
//example values that will be updated each time when certain process is selected from the list (not shown here)
param1 = 1;
param2 = 2;
param3 = 3;
param4 = 4;
data_to_display = evallist({param1, param2, param3, param4}); //list of values to be displayed
infos = Panel Box("Module Infos",
V List Box(
H List Box(
V List Box(
Text Box( "Param1:" ),
Spacer Box(Size(10, 6)),
Text Box( "Param2:" ),
),
Spacer Box(Size(15, 5)),
V List Box(
Text Edit Box( Char( data_to_display[1] ), << Set Width( 130 ) ),
Spacer Box(Size(10, 3)),
Text Edit Box( Char( data_to_display[2] ), << Set Width( 130 ) ),
),
Spacer Box(Size(40, 5)),
V List Box(
Text Box( "Param3:" ),
Spacer Box(Size(10, 6)),
Text Box( "Param4:" ),
),
Spacer Box(Size(15, 5)),
V List Box(
Text Edit Box( Char( data_to_display[3] ), << Set Width( 100 ) ),
Spacer Box(Size(10, 3)),
Text Edit Box( Char( data_to_display[4] ), << Set Width( 100 ) ),
),
),
),
),
),
infos << Set items( data_to_display );
回复:如何更新面板框中的分隔值?消息沿著鏈條向上,而不是向下。到信息引用的對象的消息丟失。您需要保存由調用以創建文本框的函數返回的引用,然後使用該變量將Set()消息直接發送到該文本框。
tb1 = Text Box( "Param1:" )
tb1 << Set( ... );
回复:如何更新面板框中的分隔值?面板框僅包含其他對象。 您可以設置面板框的標題,僅此而已。 腳本編制索引非常適合找出在哪些顯示對像上起作用的方法。
回复:如何更新面板框中的分隔值?感謝您的答复。我設法更新了文本編輯框。在我的情況下,要顯示的文本取決於先前在列錶框中選擇的內容,並且由於我希望在應用程序啟動時使用空白文本框,所以將文本框變量的更新轉移到了面板框之前,其中文本編輯框位於列錶框的選項之後。我得到了預期的效果。最好的祝福
new window("example",
H List Box(
Panel Box("Params",
params = List Box(
unique_param_list,
max selected( 1 ),
//todo..
//and then update of variables
t1 << set text(var1);
t2 << set text(var2);
t3 << set text(var3);
t4 << set text(var4);
),
),
Panel Box("Module Infos",
V List Box(
H List Box(
V List Box(
Text Box( "Param1:" ),
Spacer Box(Size(10, 6)),
Text Box( "Param2:" ),
),
Spacer Box(Size(15, 5)),
V List Box(
t1 = Text Edit Box( " ", << Set Width( 130 ) ),
Spacer Box(Size(10, 3)),
t2 = Text Edit Box( " ", << Set Width( 130 ) ),
),
Spacer Box(Size(40, 5)),
V List Box(
Text Box( "Param3:" ),
Spacer Box(Size(10, 6)),
Text Box( "Param4:" ),
),
Spacer Box(Size(15, 5)),
V List Box(
t3 = Text Edit Box( " ", << Set Width( 100 ) ),
Spacer Box(Size(10, 3)),
t4 = Text Edit Box( " ", << Set Width( 100 ) ),
),
),
),
),
);