No.1ベストアンサー
- 回答日時:
# strict を使ってなくて雑ですが・・こんなんどうでしょう。
# after というのでインターバルを設定できるようです(下から5行目)。
# あとは、表示するのを oval から画像に変えればいいと思います。
use Tk;
$top = MainWindow->new();
$canvas = $top->Canvas( width => 300, height => 300 );
$canvas->pack();
$oval = $canvas->create( 'oval', 10, 10, 50, 50 );
$canvas->itemconfigure( $oval, -fill => 'blue', -outline => 'blue' );
$btn = $top->Button( -text => 'Start', -width=>10, -command => \&start_move );
$btn ->pack();
$self->{'MainWindow'} = $top;
$self->{'Canvas'} = $canvas;
MainLoop();
sub start_move{
for($i=0;$i<5;$i++){
$canvas->after('200');
$canvas->move($oval,10,10);
$self->{'MainWindow'}->update();
}
}
参考URL:http://www.ie.u-ryukyu.ac.jp/~kono/lecture/softw …
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Perl perlをバージョンアップしたら、今まで正常に動いていたプログラムが、エラーになってしまった 3 2022/10/05 15:44
- その他(プログラミング・Web制作) pythonで、tkinterとpillowの組み合わせ 2 2022/08/16 17:42
- その他(プログラミング・Web制作) awkのtoupper() 1 2022/10/21 20:39
- CGI 古ーくからフリーのtree.cgi掲示板を利用させてもらって来ましたが、最新でなにか復活できないか? 2 2023/04/07 10:43
- その他(行事・イベント) パーティーのチケット販売・返金について 1 2022/07/21 22:43
- 写真 小さな画像を劣化なく大きくしたい 7 2022/07/07 18:14
- 冷蔵庫・炊飯器 炊飯器のタイマー 7 2022/12/15 21:05
- その他(悩み相談・人生相談) 失敗に落ち込んでいます 10 2023/01/01 20:18
- Ameba(アメーバブログ) アメブロは、HTMLのタグの入力を許さないブログ・サイトですか? 1 2023/06/18 18:48
- ホームページ作成・プログラミング アメーバ・ブログは"HTMLタグ"を許可してないのですか? 2 2023/06/17 21:08
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCEL VBA 複数のImageコントロ...
-
uwscの画像認識に失敗します。
-
スマホでサイトの画像を長押し→...
-
UWSC 画像認識で条件分岐
-
Excel ユーザーフォームで表示...
-
jqueryスライダーを2段でスライ...
-
HTMLでサイトの模写をしていま...
-
HTMLです。画像をHTMLで表した...
-
画像のピクセルデータの取得
-
HTMLで画像をポップアップで表...
-
gif 画像上の ボタンに リン...
-
画像を表示するには
-
【EXCEL VBA】ダブルクリックで...
-
vb.net 画像の透過について
-
VBA シート毎に画像挿入
-
マクロ教えてください
-
UWSCの画像認識と条件分岐につ...
-
VB6でプリントスクリーンを無効...
-
HSPの初歩的な質問
-
ペットボトルがあるかどうか。
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
HTMLでこの画像を表示したいで...
-
背景画像の繰り返しについて
-
HTMLです。画像をHTMLで表した...
-
【EXCEL VBA】ダブルクリックで...
-
jqueryスライダーを2段でスライ...
-
EXCEL VBA 複数のImageコントロ...
-
UWSC 画像認識で条件分岐
-
UWSC 画像判定と条件分岐について
-
PowerPoint VBA で画像の鮮明度...
-
gif 画像上の ボタンに リン...
-
Excel ユーザーフォームで表示...
-
「using Windows」でエラーが出る
-
UWSC「画像が無い場合」
-
vb.net 画像の透過について
-
uwcs のマクロで画像認識をして...
-
UWSCの画像認識と条件分岐につ...
-
uwscの画像認識に失敗します。
-
画像処理したBitmapをピクチャ...
-
VBA シート毎に画像挿入
-
VBAのユーザーフォームのイメー...
おすすめ情報