perltk

    0熱度

    1回答

    如何將打印輸出發送到perl/tk列表框,可以有無限制的打印行。 我知道如何創建列表框,但現在不要如何調用列表框並打印到它。 這是逐行生成打印的代碼。 [code] #!/usr/bin/perl -w use strict; #Read input file a line at a time $mydelimiter=","; op

    0熱度

    1回答

    我創建了一個包含「Key」列,「Value」列和「New Value」列的表格,如下圖所示。 「鍵」和「值」列是作爲標籤實現的,「價值」列被包裝,你可以看到。 「新值」列作爲Entry小部件實現,因爲它應該是可編輯的。有一個複製粘貼按鈕,將該值複製到「新值」輸入字段。 我想將文本包裝在Entry小部件中,因此按下按鈕後,它將看起來像「Value」字段中的文本。 Image that shows t

    0熱度

    1回答

    我是Tk/Perl的新手。以下是我使用tk/perl創建的簡單GUI界面。 GUI INTERFACE 下面是代碼的一部分創建此GUI。 $f2_label=$f_frame_top0->Label(-text=>"File",-font=>[-family=>'MS Sans Serif',-size=>9,-weight=>'bold',-underline=>0],-justify=>'le

    2熱度

    1回答

    我正在執行perl腳本作爲其他更大代碼的一部分。 我的Perl代碼根據狀態值(成功或失敗)打開一個彈出窗口。這個問題是,腳本不會繼續執行代碼的其他部分,直到我關閉由perl創建的彈出窗口。我該如何解決這個問題。請幫忙。我想保持彈出窗口打開並繼續執行父腳本的其他部分。 我正在使用下面的perl腳本打開彈出。 #!/usr/local/bin/perl use Tk; my $status = s

    1熱度

    1回答

    我想掏錢一個cmd像執行的命令,在模具錯誤信息如下 my $h = IO::Handle->new; $self->{-handle} = $h; die "IO::Handle->new failed." unless defined $h; $self->{-pid} = open $h, $self->{-command} . ' 2>&1 |'; $self->fileevent

    0熱度

    1回答

    我剛啓動Perl Tk,我看了一些教程,但遇到了問題。當我點擊一個按鈕時,它會在條目窗口小部件上顯示我想要的標量。它可以工作,但是當我點擊其他時間時,它會保留條目上的內容。所以我有兩個你好。我知道它來自插入(0,「你好」),但我不放什麼,而不是0 #!/usr/local/bin/perl use Tk; my $mw = MainWindow->new; $mw->geometry("5

    0熱度

    1回答

    我在使用Perl/Tk的Perl中試圖使用GUI。我找不到使用任何小部件從用戶處獲取多行文本輸入的方法。對於單行「Entry」可以使用,但我無法找到多行輸入。有什麼辦法嗎?

    0熱度

    1回答

    我需要Perl程序的圖形輸出。該窗口有一個label狀態字段,並應顯示編程代碼決定的內容。 如何在沒有任何按鈕的情況下創建窗口後更改標籤字段的文本? 我有以下幾點: use Tk; $mw = Tk::MainWindow->new(-title => 'Status Window',-bg=>"white"); $mw->geometry ("400x200+0+0"); $lal

    1熱度

    1回答

    我使用的是FVWM2,它允許我通過窗口裝飾綁定將當前的X11 WindowID發送到任何我喜歡的腳本。 所以一個點擊可能會在下面的表格執行CLI程序: 的bash#example.pl 在這種情況下WINDOWID指的是一個已經存在的窗口。沒有一個是由example.pl生成的。 如果exam​​ple.pl是一個屏幕捕獲實用程序,例如,它將需要由標識的窗口的X11幾何字符串來運行捕獲。我可以從x

    0熱度

    2回答

    我使用循環創建perl tk中的checkbutton列表。 $i=1; $n=5; @x=1; while($i <= $n){ $mw->Checkbutton(->text=>$i,-variable=>\$ckval,->command=>sub{ if($ckval){print $i} })->pack; [e