CHM и .Net Framework Initialization Error

@snake32 · Регистрация: 26.02.2009

Author24 — интернет-сервис помощи студентам

Доброго времени!

Не могу понять как убрать эту ошибку:
После запуска программы нажимаю F1 и тут же вижу такую ошибку(см аттач).
Нажимаю Ок и справка адекватно работает. Только любое переключение темы справки опять приводит к появлению этого сообщения.

Когда компилю приложение как x64 то ошибки не возникает. Как так? Куда копать? И что теперь без НетФрэймворка даже справку не посмотришь?

PS: Delphi XE2; Win 7 x64

@Rius · 29.06.2015, 17:38

Приложите этот файл chm к посту. Вы его сами делали? Как запускаете?

@snake32 · 29.06.2015, 17:53 **[ТС]**

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

Приложите этот файл chm к посту. Вы его сами делали? Как запускаете?

там 27 Мб. Да он самопальный. Но я так же пробывал на другом файле CHM(QTime7.chm) - всё так же ошибка на x86, а на x64 всё норм.

Сейчас ради эксперемента сделал чистый проект где прописал только

Delphi    
        
            
                
                
                
                
            
        
    Скопировано
1
2
3
4
5
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.HelpFile := ExtractFilePath(Application.ExeName) + 'Help.chm'; // добавил
  Application.CreateForm(TMainForm, MainForm);
  Application.Run;

Но по F1 ничего не происходит. Как запустить справку?

@Rius · 29.06.2015, 18:02

Вы в этом chm ничего лишнего не используете?
Всегда можно вызвать через ShellExecute: Кнопка справки в делфи, Вызов справки chm в FireMonkey, только контекстная справка не будет работать.

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

Но по F1 ничего не происходит.

Наверное, не хватает разделителя '/' или '\\' в пути.

@snake32 · 29.06.2015, 18:26 **[ТС]**

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

Наверное, не хватает разделителя '/' или '\\' в пути.

Путь правильный.(chm лежит рядом с exe)

Начал явно вызывать

Delphi    
        
    Скопировано
1
2
3
4
procedure TFormMain.Button1Click(Sender: TObject);
begin
  Application.HelpContext( 0 );
end;

Выдаёт:
No context-sensitive help installed
Что за фигня? Почему так сложно показать справку?

@Rius · 29.06.2015, 18:28

Ссылки почитайте. Контекстной не будет, просто файл откроется.
Это дельфи, проверить на нас чем..

@snake32 · 29.06.2015, 19:02 **[ТС]**

Delphi    
        
            
                
                
                
                
            
        
    Скопировано
1
2
3
4
5
procedure TFormMainOptions.Button1Click(Sender: TObject);
begin
    //Application.HelpContext( 0 );
    HtmlHelp( GetDesktopWindow, Application.HelpFile, 0, 0 );
end;

Так вроде показывает без ошибок.

Добавлено через 2 минуты

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

Ссылки почитайте.

Почитал - меня так не устраивает. Не буду я же на каждой форме(коих +100500) явно писать ShellExecute или HtmlHelp

Добавлено через 27 минут
Как вызвать контекстную справку без глюков не используя ShellExecute или HtmlHelp?
Есть пошаговая инструкция?
Application.HelpFile := ExtractFilePath(Application.ExeName) + 'Help.chm';
явно не достаточно.

@Rius · 29.06.2015, 19:30

Тут официальная инструкция, но слегка (лет на 8) устаревшая: http://edn.embarcadero.com/article/27842

Тут поновее официально: http://docwiki.embarcadero.com... _HTML_Help
И упоминание о настройке: http://www.helpscribble.com/delphi-bcb.html на стороннем сайте

Если разберётесь - опишите.

@snake32 · 02.07.2015, 17:05 **[ТС]**

Вообщем в чистом проекте Всё отлично работает. Действительно, необходимо указать только HelpFile и HelpContext на интересующем нас компоненте/форме. Всё остальное Delphi сделает сама. Не нужно вызывать ни ShellExecute, ни HtmlHelp, ни Application.HelpContext, ни ShotCut := VK_F1. Это всё костыли программеров которым влом было вникнуть в работу Delphi со справками.(Хотя возможно в Delphi 7 ситуация была другой)

НО моя проблема НЕ решена(см первый пост). Ошибка кроется где-то в +100500 тыщах строк говнокода. И возникает только внутри справочной системы Windows. Как выявить причину такой ошибки?
У меня все варианты закончились

Добавлено через 1 час 59 минут
Короче, сделал через ShellExecute так как это единственный способ который не вызывал ошибки

Delphi    
        
            
                
                
                
                
            
        
    Скопировано
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
function TfmMainForm.FormHelp(Command: Word; Data: NativeInt;
  var CallHelp: Boolean): Boolean;
 
    var s:string;
begin
{$IFDEF CPUX64}
    Result := true;
  CallHelp := true;
{$ELSE !CPUX64}
{$IFDEF CPUX86}
    CallHelp := false;
    Result := false;
    if Data = 0 then Data := 1;
    s := '-mapid '+IntToStr(Data)+' "'+Application.HelpFile+'"';
    ShellExecute( GetDesktopWindow, nil, 'hh.exe', PChar(s), nil, SW_RESTORE );
{$ENDIF CPUX86}
{$ENDIF !CPUX64}
end

;

Новые блоги и статьи Все статьи Все блоги /
Миграция монолита в Event-Driven микросервисную архитектуру на C# stackOverflow 11.04.2025 Монолитная архитектура – классический подход к разработке программного обеспечения. Это приложение, построенное как единое целое, где все компоненты тесно связаны между собой. Большинство проектов. . .	Go в Kubernetes: Управление ресурсами golander 11.04.2025 Разработчики Go-приложений в Kubernetes часто сталкиваются с неожиданными проблемами производительности и даже внезапными отказами контейнеров. Причина этого кроется в особенностях взаимодействия. . .	Агрегаты и сущности в DDD микросервисах Javaican 10.04.2025 Разработка современных программных систем часто приводит на распутье: монолит или микросервисы? Даже при выборе микросервисной архитектуры многие команды сталкиваются с проблемой правильного. . .	Многопоточность в C#: Task и параллельное программирование UnmanagedCoder 10.04.2025 Современные процессоры уже давно перестали наращивать тактовую частоту в пользу увеличения количества ядер. Это создало интересную ситуацию: разработчики, привыкшие к последовательному. . .	Линейное решение нелинейной задачи будет иметь приблизительный результат вычисления для метода обработки данных из double buffering. Hrethgir 10.04.2025 В продолжение Вообще изначально я пренебрёг квадратурой числа, но потом понял, что для вычисления приблизительного значения - сгодится, формулу можно будет корректировать по ходу. Это потому что. . .
Переменные в Python py-thonny 10.04.2025 Переменная в программировании — это символическое имя, связанное с областью памяти, в которой хранится значение. Она позволяет получать доступ к данным через понятные человеку идентификаторы, а не. . .	Многопоточность в C#: Task и асинхронные операции UnmanagedCoder 10.04.2025 Многопоточность позволяет выполнять несколько операций одновременно, что важно для решения двух основных задач: повышения скорости выполнения вычислительно-сложных операций и сохранения отзывчивости. . .	Линейное решение не линейной задачи (емкость вычислений в сравнении с традиционными решениями пока не определена). Hrethgir 10.04.2025 В рамках предстоящих вычислений пришлось (да, я тоже знаю про корень числа, и про степеня, и прочие теоремы, но. . . ) найти способ нахождения отношения двух углов. . . .	Запуск контейнеров Docker на ARM64 Mr. Docker 09.04.2025 Появление таких решений, как Apple M1/ M2, AWS Graviton, Ampere Altra и Raspberry Pi, сделало использование ARM-систем обыденностью для многих разработчиков и DevOps-инженеров. При этом Docker,. . .	Vue SFC компонент на PHP с Fusion Jason-Webb 09.04.2025 PHP на сервере и JavaScript на клиенте — классическое сочетание, которое, несмотря на свою эффективность, создает определенный когнитивный диссонанс при разработке. В этом контексте появляются. . .

@snake32 3474 / 1658 / 236 Регистрация: 26.02.2009 Сообщений: 8,140 Записей в блоге: 6

	CHM и .Net Framework Initialization Error 29.06.2015, 17:24. Показов 2019. Ответов 8 Метки нет (Все метки) Доброго времени! Не могу понять как убрать эту ошибку: После запуска программы нажимаю F1 и тут же вижу такую ошибку(см аттач). Нажимаю Ок и справка адекватно работает. Только любое переключение темы справки опять приводит к появлению этого сообщения. Когда компилю приложение как x64 то ошибки не возникает. Как так? Куда копать? И что теперь без НетФрэймворка даже справку не посмотришь? PS: Delphi XE2; Win 7 x64 Миниатюры 0

@Rius 11422 / 7303 / 1617 Регистрация: 25.05.2015 Сообщений: 22,072 Записей в блоге: 14
	29.06.2015, 17:38
	Приложите этот файл chm к посту. Вы его сами делали? Как запускаете? 0

@Rius 11422 / 7303 / 1617 Регистрация: 25.05.2015 Сообщений: 22,072 Записей в блоге: 14
	29.06.2015, 18:02
	Вы в этом chm ничего лишнего не используете? Всегда можно вызвать через ShellExecute: Кнопка справки в делфи, Вызов справки chm в FireMonkey, только контекстная справка не будет работать. Сообщение от snake32 Но по F1 ничего не происходит. Наверное, не хватает разделителя '/' или '\\' в пути. 0

@Rius 11422 / 7303 / 1617 Регистрация: 25.05.2015 Сообщений: 22,072 Записей в блоге: 14
	29.06.2015, 18:28
	Ссылки почитайте. Контекстной не будет, просто файл откроется. Это дельфи, проверить на нас чем.. 0

@Rius 11422 / 7303 / 1617 Регистрация: 25.05.2015 Сообщений: 22,072 Записей в блоге: 14
	29.06.2015, 19:30
	Тут официальная инструкция, но слегка (лет на 8) устаревшая: http://edn.embarcadero.com/article/27842 Тут поновее официально: http://docwiki.embarcadero.com... _HTML_Help И упоминание о настройке: http://www.helpscribble.com/delphi-bcb.html на стороннем сайте Если разберётесь - опишите. 0