Показать сообщение отдельно
  #1  
Старый 23.01.2015, 15:05
DuMaHc DuMaHc вне форума
Прохожий
 
Регистрация: 23.01.2015
Сообщения: 2
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию Помогите сократить действия c OpenDialog

Помогите сократить действия с OpenDialog, в моей программе сначала прописывается:
Код:
if OpenDialog1.Execute then
                        Edit1.Text:=OpenDialog1.FileName; 
для открытия файла и указания пути файла в Edit1, но потом у меня открывается файл для дальнейшей выгрузки его в StringGrid, с помощью следующих команд:
Код:
if OpenDialog1.InitialDir = '' then
    OpenDialog1.InitialDir := ExtractFilePath(Application.ExeName);
Тем самым окно с выбором файла открывается дважды, можно ли сделать так, чтобы и путь прописывался и файл выгружался в Excel после одного выбора файла???

MAD: Учимся пользоваться тегами.
Ответить с цитированием