Неужели ты забыл создать TBitmap перед тем как применять к нему изображение.
function ReadBitmapFromFile(FileName:String):TBitmap;
var bmp:TBitmap;
begin
bmp:=TBitmap.Create;
bmp.LoadFromFile(FileName);
Form1.Image1.Picture.LoadFromFile(FileName);;
Result.Assign(bmp);
end;
......
map[1]:=TBitmap.Create;
if OpenDialog1.Execute then
map[1].Assign(ReadBitmapFromFile(OpenDialog1.FileName));
|