Es gibt hier einen Patch von Embarcadero, der das verspricht:
http://cc.embarcadero.com/item/26161
Ich habe es versucht, in Delphi Berlin 10.1 zu installieren. Während das Compilieren und Erzeugen fehlerfrei ging, kam beim Installieren dieser Fehler zum Vorschein:
---------------------------
Error
---------------------------
Registration procedure, Showpath.Register in
package C:\Users\Public\Documents\Embarcadero\Studio\18.0\
Bpl\ShowProjectPath.bpl raised
exception class EAccessViolation:
Access violation at address 650928E2 in module 'ShowProjectPath.bpl'. Read of address 00000000.
---------------------------
OK
---------------------------
Habe dann versucht,
ShowProjectPath.bpl manuell zu installieren, dabei kam wieder der Fehler:
---------------------------
ShowProjectPath - Delphi 10.1 Berlin - ShowProjectPath.dproj [Built]
---------------------------
Registration procedure, Showpath.Register in
package C:\Users\Public\Documents\Embarcadero\Studio\18.0\
Bpl\ShowProjectPath.bpl raised
exception class EAccessViolation:
Access violation at address 46A028E2 in module 'ShowProjectPath.bpl'. Read of address 00000000.
---------------------------
OK
---------------------------
Das ist die Registration procedure:
Code:
procedure Register;
begin
OriginalTitle := Application.Title;
Index := (BorlandIDEServices as IOTAServices).AddNotifier( TShowPath.Create );
Application.Title := ExtractFilePath( ToolServices.GetProjectName );
end;
Syntaxmäßig ist hier kein Fehler, deswegen wurde es auch anstandslos kompiliert.
Wo ist hier der Fehler?