var
Image1: TImage; Image1 := TImage.Create(Self);
with Image1 do
begin
Name := 'Image1';
Parent := Notebook1;
Left := 80;
Top := 25;
Width := 240;
Height := 180;
AutoSize := True;
Picture.LoadFormFile('Your.bmp');
end;
Image1: TImage; Image1 := TImage.Create(Self);
with Image1 do
begin
Name := 'Image1';
Parent := Notebook1;
Left := 80;
Top := 25;
Width := 240;
Height := 180;
AutoSize := True;
Picture.LoadFormFile('Your.bmp');
end;
解决方案 »
- Delphi中代码编辑窗口最下面的信息提示窗口(Messages)是由什么组件构成的?
- 救命呀,一个关于自定公式解析的问题,救救我呀,问题解决马上给分,
- DCOM或SocketConnection在有防火墙的网络中如何运行
- 请问腾讯QQ是用什么开发的
- 问个问题,请大家帮帮忙!
- DELHPI5中ADO控件和SQLSERVER 2000的连接报错问题
- 奇怪,我的问题咋不见了?再问ADO的问题
- DBGridEh控件的使用问题
- 如何在delphi6中,通过bde连接sql server 2000?
- 我用9000换回3000分准备送分 ,结果最高分,只能给55,csdn怎么搞得
- ADO连接access数据库更新备注类型的字段,再post的时候报错
- 各位哪儿有介绍Delphi6.0全部控件的用法的东东下载?特别是WebService页
建议你使用TPageControl。
Image1: TImage;
begin
Image1 := TImage.Create(Self);
with Image1 do
begin
Name := 'Image1';
Parent := Notebook1;
Left :=intvalue;
Top := intvalue;
Width := intvalue;
Height := intvalue;
AutoSize := True;
if opendialog1.execute then
Picture.LoadFormFile('Your.bmp');
end;
var
Image1: TImage;
begin
Image1 := TImage.Create(Self);
with Image1 do
begin
Name := 'Image1';
Parent := Notebook1;
Left :=intvalue;
Top := intvalue;
Width := intvalue;
Height := intvalue;
AutoSize := True;
if opendialog1.execute then
Picture.LoadFormFile(opendialog1.filename);
end;
有可能是你的路径指的不对
图片载入后用Refresh刷新一下试试。
图片载入后用Refresh刷新一下试试。