Разработка приложений в системе Delphi. Шейкер Т.Д. - 66 стр.

ним можно связать протокол выбора имён (свойство HistoryList). Пополнять
этот список надо программно.
   Специализированные диалоги открытия и сохранения графических файлов
OpenPictureDialog   и   SavePictureDialog   отличаются   от   OpenDialog   и
SaveDialog удобной возможностью просматривать изображения и заданным
значением свойства Filter. Причём в фильтре по умолчанию перечислены все
разрешённые форматы. При необходимости откорректировать фильтр на этапе
проектирования очень просто: достаточно удалить лишние строки.
OpenPictureDialog1.Filter:='Графические файлы bmp|*.bmp|'+
'Все файлы|*.bmp;*.jpg;*.jpeg;*.ico;*.emf;*.wmf';
OpenPictureDialog1.InitialDir:='F:\A_Slide';
if OpenPictureDialog1.Execute then
   Image1.Picture.LoadFromFile(OpenPictureDialog1.fileName);

               6.3. Использование модального окна
   Поведение модальной формы определяется свойством ModalResult. Это
свойство доступно только во время выполнения приложения. При открытии
формы методом ShowModal свойство ModalResult приобретает значение,
равное нулю. Как только это свойство получит положительное значение –
модальное окно будет закрыто.
   Требуемое    значение   ModalResult      можно   задать    программно   в
обработчиках событий для компонентов модальной формы. Однако проще
воспользоваться свойством ModalResult кнопок Button и BitBtn. В кнопках
BitBtn это свойство имеет значение, соответствующее назначению кнопки. Для
кнопки Button свойству ModalResult можно задать нужное значение. При
использовании кнопки для закрытия окна её свойство ModalResult
определяет, какое значение будет иметь одноимённое свойство формы.
   Для облегчения трактовки результата в Delphi объявлены именованные
константы (смотри таблицу). Чаще требуемые значения свойства ModalResult
для кнопок задаются на этапе проектирования. Однако в некоторых случаях
целесообразно установить значения во время работы приложения. Например,
чтобы запретить закрытие модального окна.

                                    66