summaryrefslogtreecommitdiff
path: root/tools.pas
diff options
context:
space:
mode:
Diffstat (limited to 'tools.pas')
-rw-r--r--tools.pas15
1 files changed, 13 insertions, 2 deletions
diff --git a/tools.pas b/tools.pas
index e07be8b..63d88cb 100644
--- a/tools.pas
+++ b/tools.pas
@@ -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:='';