hi grizzly,
wollte mal kurz nachfragen, ob du noch verbesserungen brauchst ...
hab noch eines beim RTF export
DelDirective.pas / 891
Delphi-Quellcode:
FUNCTION ProcessInclude(FileName: string): integer;
{ Handles recursive procedure call to process an include file }
BEGIN
Result := -1;
if ExtractFileExt(FileName) = '' then
ChangeFileExt(FileName, '.pas');
FileName := FileSearch(FileName, SearchPath);
IF FileName = '' then
EXIT;
Result := RemoveDeadCodeEx(FileName, SourceFileName, Row, SLOriginal, SLProcessed, [b]SLSourceRTF[/b], SLRoutines, ParseAction, SearchPath, DefList, ErrMsg); << SLSourceRTF
END; {ProcessInclude}
und hab auch noch (zwar ein etwas Quick and Dirty reingebaut (aber habs auf die schnelle gebraucht und funkt auch) das er bei den uses im projekt Source file die in erkennt und das richtige file lädt (beim alten hat er IMMER im Search Pfad gesucht) .. sind aber ein paar kleinere Änderungen an verschiedene Stellen ...