Форум: "Прочее";
Текущий архив: 2013.07.07;
Скачать: [xml.tar.bz2];

Вниз

Оформление окна об ошибки   Найти похожие ветки 

← →
Andrey869   (2013-02-21 11:30) [0]

есть идеи или может кто то что то подобное делал такое как например добавить кнопку "Details>>" как в EuricLog"е что бы данные стека и информация о машине и програмулине, которая допустила ошибку, показывались в окне ошибки только после нажатия на эту кнопку, т.е. как выпадающее поле с информацией, а то сейчас когда роняешь программу выводит сразу все в кучу..

---

← →
O'ShinW ©   (2013-02-21 12:02) [1]

Саму же Эврику и припахать к этому делу

как то так встать самому в обработку
ExceptionLog.ExceptionActionNotify := uLogger.MyActionNotify;

а потом имеем на руках текст и записываем/показываем, по желанию
доступ к конкретной секции - тоже есть поди, дальше не копал
в крайнем случае, можно пропарсить сам текст

procedure MyActionNotify(EurekaExceptionRecord: TEurekaExceptionRecord; EurekaAction: TEurekaActionType; var Execute: Boolean);
begin
 if EurekaAction <> atShowingExceptionInfo then
   Exit;
 Execute := False;
 LastEurekaTxtErr := EurekaExceptionRecord.LogText;
 Assert(Log <> nil);
 Log.AddToLog(LastEurekaTxtErr);
 if Log.SaveOnExcept then
   Log.SaveNow;
 if Assigned(Log.FOnExcept) then
   Log.FOnExcept(nil, LastEurekaTxtErr);
 if Log.CallExcept then
   EurekaExceptionRecord.CurrentModuleOptions.BehaviourOptions := EurekaExceptionRecord.CurrentModuleOptions.BehaviourOptions + [boCallRTLExceptionEvent] else
   EurekaExceptionRecord.CurrentModuleOptions.BehaviourOptions := EurekaExceptionRecord.CurrentModuleOptions.BehaviourOptions - [boCallRTLExceptionEvent];
end;

---

Страницы: 1 вся ветка

Форум: "Прочее";
Текущий архив: 2013.07.07;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.002 c