открыть файл из системной папки

[-=Virus=-]

Суть такова нужно открыть файл из системной папки ProgramData в windows 7.Подкиньте пример открытия файла из этой папки.

[GunSmoker]

Так же, как из любой другой папки.

[glGizma]

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

Так же, как из любой другой папки.

Ты имеешь ввиду: C:\win32\file.txt ???

Как я понял, парень хочер таким путём: function GetProgDat(): String;

[Serge_Bliznykov]

GunSmoker, glGizma
ребят, а Вы с Vista или Window Seven сталкивались?
Попробуйте просто ручками (из Far или проводника) записать файлик в папку Windows или в папку Program Files...
насколько мне известно, для этого нужно запустить программу от имени Администратора системы (причём, подчёркиваю, то, что пользователь является Администратором (входит в группу Администраторы) на этих ОС - недостаточно!

Правда, это касается записи. Для чтения не знаю, надо проверить, но под рукой этих ОС нет..

Поэтому, думаю, что для решения нужно каким-то образом запросить пользователя на запуск программы с правами администратора и, только после этого, будут все права на запись в эту папку.

p.s. -=Virus=- если Вам нужно открыть файл ТОЛЬКО на чтение, попробуйте при открытии указать, что Вы его открываете readonly. Например, так:

var FS : TFileStream;
begin
  if FileExists(s) then begin
      try
        try
          FS := TFileStream.Create(s,fmOpenRead or fmShareDenyNone);
          ... тут чтение и работа с FS
        except
          ... тут обработка ошибки открытия файла
        end
      finally
        FreeAndNil(FS);
      end;

[GunSmoker]

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

Попробуйте просто ручками (из Far или проводника) записать файлик в папку Windows или в папку Program Files...

Кто хоть слово сказал про запись?