double-click the error report item can not locate source

contains all delphi packages mentioned below
Post Reply
advwang
Posts: 11
Joined: Fri Mar 15, 2019 4:48 am

double-click the error report item can not locate source

Post by advwang »

Issue:

When the error report is displayed, double-click the error report item.
If it is a Project item, you can locate it. If it is Delphi's own Source,
it can't be positioned, no response.

Fix:

madExceptWizard.pas

Read lib option need add platform param

Code: Select all

function GetLibraryStr(const CurrentPlatForm: UnicodeString; str: UnicodeString) : UnicodeString;
var s1 : UnicodeString;
begin
  result := '';
  s1 :=
    (BorlandIDEServices as IOTAServices).GetBaseRegistryKey + UnicodeString('\Library\') + CurrentPlatform;
  if (s1 <> '') and (s1[1] = '\') then
    Delete(s1, 1, 1);
  result := RegReadStr(HKEY_CURRENT_USER, s1, str);
end;
madshi
Site Admin
Posts: 10749
Joined: Sun Mar 21, 2004 5:25 pm

Re: double-click the error report item can not locate source

Post by madshi »

Thank you! :D
Post Reply