summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--emails.lps93
-rw-r--r--unit1.pas1
2 files changed, 47 insertions, 47 deletions
diff --git a/emails.lps b/emails.lps
index ecd60e8..d0b9298 100644
--- a/emails.lps
+++ b/emails.lps
@@ -18,8 +18,9 @@
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="Unit1"/>
- <TopLine Value="121"/>
- <CursorPos X="23" Y="146"/>
+ <IsVisibleTab Value="True"/>
+ <TopLine Value="54"/>
+ <CursorPos X="20" Y="59"/>
<UsageCount Value="26"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
@@ -48,9 +49,7 @@
</Unit4>
<Unit5>
<Filename Value="../units/mystringlistunit.pas"/>
- <IsVisibleTab Value="True"/>
<EditorIndex Value="1"/>
- <TopLine Value="593"/>
<CursorPos X="35" Y="618"/>
<UsageCount Value="11"/>
<Loaded Value="True"/>
@@ -58,8 +57,8 @@
<Unit6>
<Filename Value="../units/lowlevelunit.pas"/>
<EditorIndex Value="2"/>
- <TopLine Value="616"/>
- <CursorPos X="18" Y="669"/>
+ <TopLine Value="367"/>
+ <CursorPos X="47" Y="403"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit6>
@@ -87,122 +86,122 @@
<JumpHistory Count="30" HistoryIndex="29">
<Position1>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="23" Column="23" TopLine="4"/>
+ <Caret Line="278" Column="39" TopLine="257"/>
</Position1>
<Position2>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="154" Column="42" TopLine="134"/>
+ <Caret Line="25" Column="25" TopLine="5"/>
</Position2>
<Position3>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="278" Column="39" TopLine="257"/>
+ <Caret Line="173" Column="32" TopLine="164"/>
</Position3>
<Position4>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="25" Column="25" TopLine="5"/>
+ <Caret Line="23" Column="23" TopLine="23"/>
</Position4>
<Position5>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="173" Column="32" TopLine="164"/>
+ <Caret Line="56" Column="13" TopLine="29"/>
</Position5>
<Position6>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="23" Column="23" TopLine="23"/>
+ <Caret Line="22" Column="12" TopLine="2"/>
</Position6>
<Position7>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="56" Column="13" TopLine="29"/>
+ <Caret Line="162" Column="34" TopLine="129"/>
</Position7>
<Position8>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="22" Column="12" TopLine="2"/>
+ <Caret Line="163" Column="10" TopLine="151"/>
</Position8>
<Position9>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="162" Column="34" TopLine="129"/>
+ <Caret Line="169" Column="10" TopLine="151"/>
</Position9>
<Position10>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="163" Column="10" TopLine="151"/>
+ <Caret Line="180" Column="21" TopLine="151"/>
</Position10>
<Position11>
<Filename Value="../units/popunit.pas"/>
- <Caret Line="169" Column="10" TopLine="151"/>
+ <Caret Line="521" Column="52" TopLine="508"/>
</Position11>
<Position12>
- <Filename Value="../units/popunit.pas"/>
- <Caret Line="180" Column="21" TopLine="151"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="39" Column="5" TopLine="39"/>
</Position12>
<Position13>
- <Filename Value="../units/popunit.pas"/>
- <Caret Line="521" Column="52" TopLine="508"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="107" Column="11" TopLine="75"/>
</Position13>
<Position14>
<Filename Value="unit1.pas"/>
- <Caret Line="39" Column="5" TopLine="39"/>
</Position14>
<Position15>
- <Filename Value="unit1.pas"/>
- <Caret Line="107" Column="11" TopLine="75"/>
+ <Filename Value="../units/popunit.pas"/>
+ <Caret Line="159" Column="68" TopLine="139"/>
</Position15>
<Position16>
- <Filename Value="unit1.pas"/>
+ <Filename Value="../units/popunit.pas"/>
+ <Caret Line="29" Column="26" TopLine="9"/>
</Position16>
<Position17>
- <Filename Value="../units/popunit.pas"/>
- <Caret Line="159" Column="68" TopLine="139"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="101" TopLine="62"/>
</Position17>
<Position18>
- <Filename Value="../units/popunit.pas"/>
- <Caret Line="29" Column="26" TopLine="9"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="147" Column="105" TopLine="82"/>
</Position18>
<Position19>
- <Filename Value="unit1.pas"/>
- <Caret Line="101" TopLine="62"/>
+ <Filename Value="../units/lowlevelunit.pas"/>
+ <Caret Line="82" Column="24" TopLine="60"/>
</Position19>
<Position20>
- <Filename Value="unit1.pas"/>
- <Caret Line="147" Column="105" TopLine="82"/>
+ <Filename Value="../units/lowlevelunit.pas"/>
+ <Caret Line="631" Column="47" TopLine="599"/>
</Position20>
<Position21>
<Filename Value="../units/lowlevelunit.pas"/>
- <Caret Line="82" Column="24" TopLine="60"/>
+ <Caret Line="647" Column="12" TopLine="609"/>
</Position21>
<Position22>
<Filename Value="../units/lowlevelunit.pas"/>
- <Caret Line="631" Column="47" TopLine="599"/>
+ <Caret Line="637" Column="30" TopLine="613"/>
</Position22>
<Position23>
<Filename Value="../units/lowlevelunit.pas"/>
- <Caret Line="647" Column="12" TopLine="609"/>
+ <Caret Line="635" Column="51" TopLine="613"/>
</Position23>
<Position24>
<Filename Value="../units/lowlevelunit.pas"/>
- <Caret Line="637" Column="30" TopLine="613"/>
+ <Caret Line="637" Column="51" TopLine="588"/>
</Position24>
<Position25>
<Filename Value="../units/lowlevelunit.pas"/>
- <Caret Line="635" Column="51" TopLine="613"/>
+ <Caret Line="83" Column="19" TopLine="61"/>
</Position25>
<Position26>
<Filename Value="../units/lowlevelunit.pas"/>
- <Caret Line="637" Column="51" TopLine="588"/>
+ <Caret Line="647" Column="21" TopLine="612"/>
</Position26>
<Position27>
- <Filename Value="../units/lowlevelunit.pas"/>
- <Caret Line="83" Column="19" TopLine="61"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="146" Column="23" TopLine="121"/>
</Position27>
<Position28>
- <Filename Value="../units/lowlevelunit.pas"/>
- <Caret Line="647" Column="21" TopLine="612"/>
+ <Filename Value="../units/mystringlistunit.pas"/>
+ <Caret Line="45" TopLine="7"/>
</Position28>
<Position29>
- <Filename Value="unit1.pas"/>
- <Caret Line="146" Column="23" TopLine="121"/>
+ <Filename Value="../units/lowlevelunit.pas"/>
+ <Caret Line="115" Column="18" TopLine="88"/>
</Position29>
<Position30>
- <Filename Value="../units/mystringlistunit.pas"/>
- <Caret Line="45" TopLine="7"/>
+ <Filename Value="unit1.pas"/>
+ <Caret Line="146" Column="23" TopLine="121"/>
</Position30>
</JumpHistory>
</ProjectSession>
diff --git a/unit1.pas b/unit1.pas
index 3730e0e..c5029f2 100644
--- a/unit1.pas
+++ b/unit1.pas
@@ -56,6 +56,7 @@ var
sl: tMyStringList;
s,ga: string;
begin
+ __ausgabenMaske:=1;
ga:='.*@eckner\.net' +'|'+
'(ee|intern|vorstand)@wurzel\.org' +'|'+
'erich\.eckner@uni-jena\.de' +'|'+