diff options
| -rw-r--r-- | epost.lps | 104 | ||||
| -rw-r--r-- | werteunit.pas | 8 |
2 files changed, 55 insertions, 57 deletions
@@ -23,9 +23,9 @@ <Filename Value="epostunit.pas"/> <IsPartOfProject Value="True"/> <EditorIndex Value="2"/> - <TopLine Value="1308"/> - <CursorPos Y="911"/> - <FoldState Value=" T3of0C6 piXjG06A]9fjQ068 pjRk80}m011 pmbrf0;9[B4k1oW0{c1]X5lg0}04]Abng0{;11[M4Ipc0{5[A4NlR0~w0[M5Zr60{K1 T0j$E0{1{"/> + <TopLine Value="1075"/> + <CursorPos Y="1084"/> + <FoldState Value=" T3of0C6 piXjG06A]9fjQ068 pjRk80}m T0j$F0{1K"/> <UsageCount Value="201"/> <Loaded Value="True"/> </Unit2> @@ -41,9 +41,9 @@ <IsPartOfProject Value="True"/> <IsVisibleTab Value="True"/> <EditorIndex Value="3"/> - <TopLine Value="339"/> - <CursorPos X="8" Y="1210"/> - <FoldState Value=" T3iT059 pjBja0T113 poVuV036]KUk40R5]97k30*2 piekW0{22}"/> + <TopLine Value="320"/> + <CursorPos X="172" Y="331"/> + <FoldState Value=" T3iT059 pjBja0T113T"/> <UsageCount Value="200"/> <Loaded Value="True"/> </Unit4> @@ -66,9 +66,8 @@ <Unit7> <Filename Value="../units/mystringlistunit.pas"/> <EditorIndex Value="1"/> - <TopLine Value="255"/> + <TopLine Value="104"/> <CursorPos Y="104"/> - <FoldState Value=" T3i3075 piZjD0W513'"/> <UsageCount Value="12"/> <Loaded Value="True"/> </Unit7> @@ -97,121 +96,120 @@ <JumpHistory Count="30" HistoryIndex="29"> <Position1> <Filename Value="../units/matheunit.pas"/> - <Caret Line="49" Column="25" TopLine="29"/> + <Caret Line="73" Column="23" TopLine="53"/> </Position1> <Position2> <Filename Value="../units/matheunit.pas"/> - <Caret Line="55" Column="24" TopLine="35"/> + <Caret Line="86" Column="22" TopLine="66"/> </Position2> <Position3> - <Filename Value="../units/matheunit.pas"/> - <Caret Line="61" Column="22" TopLine="41"/> + <Filename Value="typenunit.pas"/> + <Caret Line="870" Column="28" TopLine="855"/> </Position3> <Position4> - <Filename Value="../units/matheunit.pas"/> - <Caret Line="73" Column="23" TopLine="53"/> + <Filename Value="typenunit.pas"/> + <Caret Line="201" Column="62" TopLine="181"/> </Position4> <Position5> - <Filename Value="../units/matheunit.pas"/> - <Caret Line="86" Column="22" TopLine="66"/> + <Filename Value="typenunit.pas"/> + <Caret Line="875" Column="18" TopLine="855"/> </Position5> <Position6> <Filename Value="typenunit.pas"/> - <Caret Line="870" Column="28" TopLine="855"/> + <Caret Line="910" TopLine="882"/> </Position6> <Position7> - <Filename Value="typenunit.pas"/> - <Caret Line="201" Column="62" TopLine="181"/> + <Filename Value="../units/matheunit.pas"/> + <Caret Line="45" TopLine="10"/> </Position7> <Position8> - <Filename Value="typenunit.pas"/> - <Caret Line="875" Column="18" TopLine="855"/> + <Filename Value="../units/matheunit.pas"/> + <Caret Line="458" Column="21" TopLine="418"/> </Position8> <Position9> - <Filename Value="typenunit.pas"/> - <Caret Line="910" TopLine="882"/> + <Filename Value="../units/matheunit.pas"/> + <Caret Line="94" Column="20" TopLine="65"/> </Position9> <Position10> - <Filename Value="../units/matheunit.pas"/> - <Caret Line="45" TopLine="10"/> + <Filename Value="epost.lpr"/> + <Caret Line="65" Column="68" TopLine="46"/> </Position10> <Position11> - <Filename Value="../units/matheunit.pas"/> - <Caret Line="458" Column="21" TopLine="418"/> + <Filename Value="../units/mystringlistunit.pas"/> + <Caret Line="86" Column="96" TopLine="70"/> </Position11> <Position12> - <Filename Value="../units/matheunit.pas"/> - <Caret Line="94" Column="20" TopLine="65"/> + <Filename Value="../units/mystringlistunit.pas"/> </Position12> <Position13> - <Filename Value="epost.lpr"/> - <Caret Line="65" Column="68" TopLine="46"/> + <Filename Value="../units/mystringlistunit.pas"/> + <Caret Line="140" Column="47" TopLine="108"/> </Position13> <Position14> <Filename Value="../units/mystringlistunit.pas"/> - <Caret Line="86" Column="96" TopLine="70"/> + <Caret Line="69" Column="25" TopLine="49"/> </Position14> <Position15> <Filename Value="../units/mystringlistunit.pas"/> + <Caret Line="61" Column="61" TopLine="49"/> </Position15> <Position16> <Filename Value="../units/mystringlistunit.pas"/> - <Caret Line="140" Column="47" TopLine="108"/> </Position16> <Position17> <Filename Value="../units/mystringlistunit.pas"/> - <Caret Line="69" Column="25" TopLine="49"/> + <Caret Line="101" Column="10" TopLine="68"/> </Position17> <Position18> <Filename Value="../units/mystringlistunit.pas"/> - <Caret Line="61" Column="61" TopLine="49"/> + <Caret Line="143" Column="3" TopLine="71"/> </Position18> <Position19> <Filename Value="../units/mystringlistunit.pas"/> + <Caret Line="446" TopLine="406"/> </Position19> <Position20> - <Filename Value="../units/mystringlistunit.pas"/> - <Caret Line="101" Column="10" TopLine="68"/> + <Filename Value="epostunit.pas"/> + <Caret Line="1336" Column="28" TopLine="1307"/> </Position20> <Position21> - <Filename Value="../units/mystringlistunit.pas"/> - <Caret Line="143" Column="3" TopLine="71"/> + <Filename Value="epostunit.pas"/> + <Caret Line="76" Column="43" TopLine="56"/> </Position21> <Position22> - <Filename Value="../units/mystringlistunit.pas"/> - <Caret Line="446" TopLine="406"/> + <Filename Value="epostunit.pas"/> + <Caret Line="693" TopLine="646"/> </Position22> <Position23> <Filename Value="epostunit.pas"/> - <Caret Line="1336" Column="28" TopLine="1307"/> + <Caret Line="873" Column="48" TopLine="855"/> </Position23> <Position24> - <Filename Value="epostunit.pas"/> - <Caret Line="76" Column="43" TopLine="56"/> + <Filename Value="typenunit.pas"/> + <Caret Line="33" Column="27" TopLine="13"/> </Position24> <Position25> - <Filename Value="epostunit.pas"/> - <Caret Line="693" TopLine="646"/> + <Filename Value="typenunit.pas"/> + <Caret Line="87" Column="47" TopLine="54"/> </Position25> <Position26> <Filename Value="epostunit.pas"/> - <Caret Line="873" Column="48" TopLine="855"/> + <Caret Line="890" Column="20" TopLine="867"/> </Position26> <Position27> - <Filename Value="typenunit.pas"/> - <Caret Line="33" Column="27" TopLine="13"/> + <Filename Value="epostunit.pas"/> + <Caret Line="75" Column="30" TopLine="54"/> </Position27> <Position28> - <Filename Value="typenunit.pas"/> - <Caret Line="87" Column="47" TopLine="54"/> + <Filename Value="werteunit.pas"/> + <Caret Line="351" Column="134" TopLine="333"/> </Position28> <Position29> <Filename Value="epostunit.pas"/> - <Caret Line="890" Column="20" TopLine="867"/> + <Caret Line="911" TopLine="911"/> </Position29> <Position30> <Filename Value="epostunit.pas"/> - <Caret Line="75" Column="30" TopLine="54"/> </Position30> </JumpHistory> </ProjectSession> diff --git a/werteunit.pas b/werteunit.pas index 720378b..8b6b996 100644 --- a/werteunit.pas +++ b/werteunit.pas @@ -327,8 +327,8 @@ begin end{of Case}; tmpe:=tmpe*dateien[i].groeszenFaktor; if j=0 then params.transformationen.xstart:=tmpe; - if tmpe<>params.xstart then begin - gibAus('Falscher linker Rand in '''+dateien[i].Name+''' im Schritt '+inttostr(j)+', nämlich '+myfloattostr(tmpe)+' statt '+myfloattostr(params.xstart)+'!',3); + if tmpe<>params.transformationen.xstart then begin + gibAus('Falscher linker Rand in '''+dateien[i].Name+''' im Schritt '+inttostr(j)+', nämlich '+myfloattostr(tmpe)+' statt '+myfloattostr(params.transformationen.xstart)+'!',3); close(f); exit; end; @@ -342,8 +342,8 @@ begin end{of Case}; tmpe:=tmpe*dateien[i].groeszenFaktor; if j=0 then params.transformationen.xstop:=tmpe; - if tmpe<>params.xstop then begin - gibAus('Falscher rechter Rand in '''+dateien[i].Name+''' im Schritt '+inttostr(j)+', nämlich '+myfloattostr(tmpe)+' statt '+myfloattostr(params.xstop)+'!',3); + if tmpe<>params.transformationen.xstop then begin + gibAus('Falscher rechter Rand in '''+dateien[i].Name+''' im Schritt '+inttostr(j)+', nämlich '+myfloattostr(tmpe)+' statt '+myfloattostr(params.transformationen.xstop)+'!',3); close(f); exit; end; |