TclTk图像宽度总是返回零

Question

Linux Debian Jessie

我在TclTk中创建了一张图片。创建后，我想查询实际的宽度，以便使用它。我在MWE中使用常数500的地方，在实际程序中却不太明显。

% puts $tcl_version
8.6
% package require Tk
8.6.2
% set i [image create photo p0 -width 500]
p0
% #not correct
% image width p0
0
% #correct
% p0 cget -width
500

从图片手册的页面上看

图像宽度 名称

返回一个十进制字符串，给出图像的宽度。名称 以像素为单位。

所以我希望

image width p0

也返回宽度的十进制值。的 cget 命令确实返回了我所期望的东西。

我到底做错了什么？

Answer 1

试试。

set i [image create photo p0 -width 500 -height 1]

显然高度无效的图片没有宽度。