Код:
procedure TForm1.N2Click(Sender: TObject);
begin
OpenDialog1.Execute;
image1.Picture.LoadFromFile(opendialog1.filename);
end;
Не стоит так вызывать OpenDialog1. А что будет если пользователь передумает и закроет ваш диалог без выбора файла? Лучше напишите так:
Код:
procedure TForm1.N2Click(Sender: TObject);
begin
if not OpenDialog1.Execute then Exit;
image1.Picture.LoadFromFile(opendialog1.filename);
end;
Кроме того, для отображения/скрытия форм есть стандартные методы Show/Hide, а свойство Visible обычно используют для логических операций. Так-что вместо:
Form2.Visible:=false;
корректнее использовать:
Form2.Hide;