diff options
Diffstat (limited to 'tools.pas')
-rw-r--r-- | tools.pas | 15 |
1 files changed, 13 insertions, 2 deletions
@@ -31,6 +31,7 @@ type function gleicheNamenWie(dmd: tDateienMitDaten): boolean; function toString: string; override; procedure append(dmd: tDateienMitDaten); + function toMyStringList: tMyStringList; end; function min(a1,a2: tAktualitaet): tAktualitaet; inline; overload; @@ -123,7 +124,16 @@ begin end; end; -// allgemeine Funktionen +function tDateienMitDaten.toMyStringList: tMyStringList; +var + i: longint; +begin + result:=tMyStringList.create; + for i:=0 to count-1 do + result.add(items[i].name); +end; + +// allgemeine Funktionen ******************************************************* function min(a1,a2: tAktualitaet): tAktualitaet; begin @@ -260,7 +270,8 @@ begin (exe='epstopdf') or (exe='latexmk') or (exe='mpost') or - (exe='pdflatex') then + (exe='pdflatex') or + (exe='sed') then exit else begin regex:=''; |