[DuMaHc]

Помогите сократить действия с OpenDialog, в моей программе сначала прописывается:

Код:

if OpenDialog1.Execute then
                        Edit1.Text:=OpenDialog1.FileName; 

для открытия файла и указания пути файла в Edit1, но потом у меня открывается файл для дальнейшей выгрузки его в StringGrid, с помощью следующих команд:

Код:

if OpenDialog1.InitialDir = '' then
    OpenDialog1.InitialDir := ExtractFilePath(Application.ExeName);

Тем самым окно с выбором файла открывается дважды, можно ли сделать так, чтобы и путь прописывался и файл выгружался в Excel после одного выбора файла???

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