0

注：ちなみに、私はPerl5でPerl/Tkを使用してGUIを作成しています。

コードを実行しようとしましたが、次のエラーメッセージが表示されます。

COUNT 0
Invalid type '-' in pack at pack2.pl line 62.

これは私のアプリケーションの62行目です。

my $be = $f1->BrowseEntry(-label => "Widget $count:",
        -choices => ["right", "left", "top", "bottom"],
        -variable => \$packdirs[$count], -browsecmd => \&repack)
        -pack(-ipady => 5, -side => 'left');

コードに問題はありません。誰か助けてもらえますか？

4

1 に答える 1

10 
    -pack(-ipady => 5, -side => 'left');

->packこれは、ではなく、である必要があると思います-pack。メソッドを呼び出す代わりに->pack()、組み込みpack関数を呼び出して、->BrowseEntryの戻り値から結果を減算します。そのため、エラーが発生します。

于 2012-11-26T02:47:50.443 に答える