Показать сообщение отдельно
  #9  
Старый 06.12.2012, 13:20
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от juraman1
Код:
//Определение пути каталога
sPath:= ''; 
 if TreeView1.Selected=nil then   
 Memo1.Lines.Add('Ошика! Вы не выбрали каталог!')  
else begin                                            
while TreeView1.Selected <> nil do  
begin   
sPath:= TreeView1.Selected.Text +'\'+sPath;  
TreeView1.Selected:= TreeView1.Selected.Parent;  
end;  
Delete(sPath, length(sPath), 1);

вот в этом фрагменте уже сканится выбрана директория или нет, т.е если она selected, то мы "верстаем" в цикле путь к ней, а выбраная директория уже является директорией по умолчанию, вот как я думаю
И как у тебя fileopen понимает, что нужно открыть файл не из текущей папки, а из папки путь к которой записан в какой-то там переменной sPath?
Ответить с цитированием