Hiho,
habe eben noch einen klein Fehler berichtigt, der verursachte, dass die TextPos von Entitites in einer Klasse, die ein Interface implementierte nicht korrekt waren.
Die verbesserten Archive sind im ersten Beitrag zu finden
Wer sich die Datei eben selbst patchen möchte, der ändere bitte folgende Zeile (befindet sich hinter dem "implementation")
Delphi-Quellcode:
CLASSSTR = '((((\s+)(extends)(\s+)(\w+?)|)(((\s+)(implements)(\s+)' +
'(.*)(\s*)(?:\{))|))|)';
zu
Delphi-Quellcode:
CLASSSTR = '((((\s+)(extends)(\s+)(\w+?)|)(((\s+)(implements)(\s+)' +
'(.*)(\s*)(?=\{))|))|)';
mfG
mirage228