[Ankor]

Всем привет.

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

Что ни делаю, а открывается всё время старое, запомнившееся окно.

[NumLock]

Код:

  OpenDialog1.InitialDir:='c:\Program Files\Borland\Delphi7\Demos';
  if OpenDialog1.Execute then

[Ankor]

Сообщение от NumLock

Код:

  OpenDialog1.InitialDir:='c:\Program Files\Borland\Delphi7\Demos';
  if OpenDialog1.Execute then

Может я не так делаю?

Код:

 OpenDialog1.InitialDir:='Images';
  if OpenDialog1.Execute then 

Папка Images у меня лежит вместе с программой.
При вызове OpenDialog открывается старое окно, всегда одно и тоже, может предыдущее открывание как-то стирать надо

[NumLock]

укажи полный путь

[Ankor]

Сообщение от NumLock

укажи полный путь

Надо, чтобы из каталога программы открывала.
Если её на другом компе откроют например, там путь и другой может быть.

Смысл в том, чтобы OpenDialog1 всегда открывался в папке, лежащей в каталоге с программой.

[dr. F.I.N.]

OpenDialog1.InitialDir:=ExtractFilePath(Applicatio n.ExeName) + '\Images';

[NumLock]

укажи полный путь каталога из которого запущена программа с конкатенацией дочернего каталога