OpenFileDialog предварительный просмотр файла

[RomanPavlovich]

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

Гуглил и нашел решения , ... программа... добавляем реестре нужное нам формат . и потом отображает OpenDialog

Общее направление понял, всё таки копать надо в сторону реестра.
Сейчас запущу эту программу на VirtualBox, сохраню реестр до и после, посмотрю какие ветки и как она меняет.

Мне надо, чтоб у всех, кто пользуется моей программой, также в диалоге открытия файлов в области предварительного просмотра содержимого файла, отображалось именно содержимое файла, а не надпись "просмотр не доступен". Спасибо, буду копать дальше.
---------------------------------------------------------------
А вот и решение вопроса: http://www.interface.ru/home.asp?artId=16851

[xxbesoxx]

Общее направление понял, всё таки копать надо в сторону реестра.

Вы на русском читайте ? не какой копать не надо ! Надо просто открыть программу и через {.} указать нужное вам формат

Мне надо, чтоб у всех, кто пользуется моей программой,

Включит надо Windows это . Почитайте силка который я выложил

[RomanPavlovich]

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

Вы на русском читайте ? не какой копать не надо ! Надо просто открыть программу и через {.} указать нужное вам формат
Включит надо Windows это . Почитайте силка который я выложил

Я Вас прекрасно понял, но:

1. что б данный формат PAS файлов отображался на других компьютерах, на них надо запустить эту программу.

2. Проверил, под Windows 7 действительно работает, а вот под Windows 8.1 нет.

А вот ТУТ уже интереснее, а ТУТ более подробно.

[xxbesoxx]

а вот под Windows 8.1 нет.

Нету у меня на данный момент установлены Windows 8.1 . Но все равно будет решения в и..нете . надо просто гуглить . Писать нечего не надо . надо просто включить сам Windows е

Если, удастся разобраться, как это работает, обязательно выложу исходник Unit файла,

Но смотрите .... Надо начало узнать где это прописать Windows 8.1 и потом написать программу что включил это . Но я думаю что вы сам себя усложняйте жизнь . Проще найти решения как на Windows7 и все

[RomanPavlovich]

Для вин 7, не работает на вин 8:

1. Ветвь реестра HKEY_CLASSES_ROOT содержит список многих расширений файлов, находим/создаём необходимый раздел.
2. Добавляем единственный параметр "PerceivedType" со значением "text", вот и всё. Содержимое файла отображается в окне предварительного просмотра)

Вам xxbesoxx спасибо, показав программу которая это делает, заставили меня обратить внимание на реестр.

Для вин 8 и вин 7, через несколько постов ниже.

[xxbesoxx]

Вам xxbesoxx спасибо, показав программу которая это делает, заставили меня обратить внимание на реестр.

RomanPavlovich Пожалуйста, Поздравляю Я скажу спасибо Stilet все его пост мне намекал на реестр

[northener]

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

Я скажу спасибо Stilet все его пост мне намекал на реестр

Нисколько не умаляя заслуг уважаемого Stilet следует всё же отметить, что уже в первом посте саша40 дал правильный толчок в нужном направлении.

[RomanPavlovich]

Дальнейшее изучение данного вопроса показало, что:
В вин7 действительно можно решить вопрос через HKEY_CLASSES_ROOT, а в вин8, у пользователя нет прав на изменение этой ветки реестра. Надо запускать программу с правами администратора, на что многие не соглашаются.

Поэтому вот, готовый Unit работающий и с в7 и с в8:

unit Reg;

{$mode objfpc}{$H+}
interface 
uses
  Registry;

Procedure P_RegAdd(PS:String);

implementation

//Передаём расширение файла в чистом виде "pas","gaz","kamaz"
Procedure P_RegAdd(PS:String);
Var
  Reg: TRegistry;
begin
  Reg := TRegistry.Create;
  Reg.RootKey:=HKEY_CURRENT_USER;
  Reg.OpenKey('\Software\Classes\.'+PS+'\shellex\{8895b1c6-b41f-4c1c-a562-0d564250836f}',True);
  Reg.WriteString('','{1531d583-8375-4d3f-b5fb-d23bbd169f22}');
  Reg.CloseKey();
  Reg.Free;
end;

end.

Позволяет зарегистрировать любой файл как текстовый и отображать его в окне предварительного просмотра OpenDialog.

[RomanPavlovich]

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

Нисколько не умаляя заслуг уважаемого Stilet следует всё же отметить, что уже в первом посте саша40 дал правильный толчок в нужном направлении.

Его совет, лезть в реестр - это как пойди туда х.з. куда.
А тут мне дали конкретно работающую программу, которая делает то, что мне надо. Запустив VirtualBox и сравнив реестр до и после, моментально обнаружил разницу в один параметр. Далее перенёс на вин8 и понял, что не работает, но общее направление, ключи и значения реестра уже у меня. А первый пост, я б сравнил с советом посмотри в гуугле, там точно есть.

В принципе тема закрыта.

[Stilet]

моментально обнаружил разницу в один параметр.

А ще удобнише это делать RegMon-ом.