getdir dir dir dir Image1 Picture LoadFromFile dir Image1 AutoSize tru

1
2
3
4
getdir(0,dir);
dir:=dir+'/';
Image1.Picture.LoadFromFile(dir);
Image1.AutoSize:=true;