TImage控件，如何自适应装入的图片的大小？(50分)

H

heping

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-21

• #1

我在一个FORM中只放了一个TImage，
TImage，占满整个FORM。
但是，TImage装入的图片大小未知。
要：让：TImage的大小，就是：装入的图片的大小，
（不改变装入的图片的大小）
FORM的大小，也根据TImage的大小来自适应。
请教：如何作？谢谢。

 

L

lcl_003

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-21

• #2

autosize为true不行吗

 

H

heping

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-21

• #3

谢谢。只用这个条件。不行的呀。

 

C

c2008

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-21

• #4

是啊，用autoexec不错不过图片太大就不好了还有个proportional和center可以用哦

 

L

linsb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-21

• #5

procedure TForm1.FormCreate(Sender: TObject);
begin
Image1.top:=0;
Image1.left:=0;
Form1.height:=Image1.height+20;
Form1.width:=Image1.width+10;
end;
设置：
Image1：
AutoSize为true
Form1:
AutoSize为false
AutoScroll为false
BorderStyle为bsSingle

 

H

heping

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-29

• #6

多人接受答案了。