怎么样取得图片的长与宽(20分)

潮

潮州人

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-16

• #1

想实现双击图片的缩略图弹出窗口，显示该图片的实际大小，需知道图片的长与宽。

 

D

dadabox

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-16

• #2

Image.picture.width;
Image.Picture.Height;

 

卷

卷起千堆雪tyn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-16

• #3

你将图片放在Image里，设置Image.AutoSize :=True,就OK～～～

 

潮

潮州人

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-17

• #4

想问多几个简单的问题:
在我FORM1中的IMAGE1的双击事件中SHOW FORM2,
在FORM2中显示FORM1的实现图片,还要取得应图片的路径.代码如下:
procedure TPictureListForm.FormCreate(Sender: TObject);
begin
Image1.Picture := ProductsAddForm.Image1.Picture; //没有显示,IMAGE1.PICTURE是通过OpenDialog1找来的.
Edit1.Text :='图片的位置' + Image1.GetNamePath; //怎么找到图片的路径
end;

 

Y

yuzhizhi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-17

• #5

你可以用一个临时变量来存放“通过OpenDialog1中打开的图象文件的文件名”

 

潮

潮州人

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-19

• #6

多人接受答案了。