0
我有一个Perl Tk应用程序。Perl tk主窗口错误
如果是这样,它不是一直到屏幕的最上部,那么下一次执行下面的代码,我将主窗口,脚本失败:
$canvas_fimage_real=$canvas_fimage->Subwidget('canvas');
$canvas_fimage_real=$canvas_fimage unless $canvas_fimage_real;
my $canvas_id=$canvas_fimage_real->id;
my $canvas_fimage_photo=$main_window::main_window->Photo(-format=>'Window', -data=>oct $canvas_id);
,也未能与以下错误消息:
X Error of failed request: BadMatch (invalid parameter attributes)
Major opcode of failed request: 73 (X_GetImage)
Serial number of failed request: 2796
Current serial number in output stream: 2796
脚本崩溃的照片命令。
我该如何解决这个问题?