perl/tk を使用して GUI を実装しています。
最初のウィンドウのエントリボックスに値を入力した後、[OK] ボタンを押したいと思います。OKボタンを押すと、別のウィンドウがポップアップし、いくつかの新しい入力フィールドが表示されます。同じように、もう一度 OK ボタンを押すと、終了ボタンが来るまで別の新しいウィンドウが開きます。また、前のウィンドウに移動するための前のボタンも必要です。
これはどのように実装できますか?
perl/tk を使用して GUI を実装しています。
最初のウィンドウのエントリボックスに値を入力した後、[OK] ボタンを押したいと思います。OKボタンを押すと、別のウィンドウがポップアップし、いくつかの新しい入力フィールドが表示されます。同じように、もう一度 OK ボタンを押すと、終了ボタンが来るまで別の新しいウィンドウが開きます。また、前のウィンドウに移動するための前のボタンも必要です。
これはどのように実装できますか?
user1468315 は尋ねました:
クリアボタンを押したときに入力フィールドの値を空に設定するにはどうすればよいですか?
私はこのような何かがそれを行うべきだと信じています。
$entry = $mw->Entry()->pack;
$button = $mw->Button(
-command => sub{$entry->delete(0, 'end');}
)->pack;
あなたは Tk でウィンドウを作成する方法を知っていると思いますが、ここで誰かがその質問であなたのためにそれをコーディングすることを期待していません.
そうは言っても、そのクラスのインスタンスでこれを行うには、クラスを作成する必要があります。インスタンスは任意のプロパティ (または単一のプロパティ内の複数の値) を保持でき、Tk アプリケーションはそのインスタンスと連携して新しい値を割り当て、プロセスを前後に移動する必要がある場合にそれらを読み取ることができます。
Tk アプリケーションに関しては、クラス インスタンスとステップ番号を引数として使用するサブを作成するか、別のクラスを作成して別のプロパティで適切なステップを制御し、現在のステップまたはシグナルに従って適切なメソッドをトリガーすることができます。 「次へ」または「前へ」ボタンの。
このTkチュートリアルを参照してください。とても良いです。より多くの Tk の例を Google で検索できます。
この Perl OOP チュートリアルを参照して、Perlでのクラスの作成とオブジェクト指向プログラミングの基本を学んでください。繰り返しになりますが、Google でこの件に関する詳細を確認できます。
また、Perl でもっと多くのことを学び、よりモダンで優れた GUI を作成したい場合は、 wxWidgets Projectの CPAN ライブラリであるAlien::wxWidgetsを調べることを強くお勧めします。
HTH
フランシスコ