L
li__lu
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TMainF.OpenClick(Sender: TObject);
begin
if OpenPictureDialog1.Execute then
begin
Label1.Caption:=OpenpictureDialog1.FileName;
Image1.Picture.LoadFromFile(OpenpictureDialog1.FileName);
end;
end;
-------------------------------------------------
以上为源码一部分
运行时发现
label的caption 根本没变
也显示不出任何图片
为什么？
begin
if OpenPictureDialog1.Execute then
begin
Label1.Caption:=OpenpictureDialog1.FileName;
Image1.Picture.LoadFromFile(OpenpictureDialog1.FileName);
end;
end;
-------------------------------------------------
以上为源码一部分
运行时发现
label的caption 根本没变
也显示不出任何图片
为什么？