From 50716e0e0c005bbaa47529dc856ddbbebfaeb28d Mon Sep 17 00:00:00 2001 From: Erich Eckner Date: Thu, 7 Jan 2016 12:59:44 +0100 Subject: beendeExterneBefehleWennFertig neu --- epost.lpr | 3 +++ 1 file changed, 3 insertions(+) (limited to 'epost.lpr') diff --git a/epost.lpr b/epost.lpr index 820cd96..b6fcd3f 100644 --- a/epost.lpr +++ b/epost.lpr @@ -69,6 +69,9 @@ begin gibAus('Syntaxtest bestanden!',3); inf.rewind; while inf.metaReadln(s,false) do begin + for i:=0 to length(wertes)-1 do + wertes[i].beendeLeseThreadWennFertig; + beendeExterneBefehleWennFertig; if s='streng warnen' then begin Warnstufe:=wsStreng; continue; -- cgit v1.2.3-70-g09d2