diff options
| -rw-r--r-- | .gitignore | 1 | ||||
| -rw-r--r-- | raetsel.lpi | 62 | ||||
| -rw-r--r-- | raetsel.lpr | 12 | ||||
| -rw-r--r-- | raetsel.lps | 97 | ||||
| -rw-r--r-- | unit1.pas | 7 |
5 files changed, 131 insertions, 48 deletions
@@ -18,3 +18,4 @@ backup *.bak lib/* raetsel +raetsel-debug diff --git a/raetsel.lpi b/raetsel.lpi index 77e790c..b172cfa 100644 --- a/raetsel.lpi +++ b/raetsel.lpi @@ -13,7 +13,7 @@ <i18n> <EnableI18N LFM="False"/> </i18n> - <BuildModes Count="2"> + <BuildModes Count="4"> <Item1 Name="linux_64bits" Default="True"/> <Item2 Name="win10_64bits"> <CompilerOptions> @@ -39,6 +39,66 @@ </Linking> </CompilerOptions> </Item2> + <Item3 Name="linux_64bits-debug"> + <CompilerOptions> + <Version Value="11"/> + <Target> + <Filename Value="raetsel-debug"/> + </Target> + <SearchPaths> + <IncludeFiles Value="$(ProjOutDir)"/> + <OtherUnitFiles Value="../units"/> + <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/> + </SearchPaths> + <CodeGeneration> + <TargetCPU Value="x86_64"/> + <TargetOS Value="linux"/> + </CodeGeneration> + <Linking> + <Options> + <Win32> + <GraphicApplication Value="True"/> + </Win32> + </Options> + </Linking> + <Other> + <CustomOptions Value="-dDEBUG"/> + <OtherDefines Count="1"> + <Define0 Value="DEBUG"/> + </OtherDefines> + </Other> + </CompilerOptions> + </Item3> + <Item4 Name="win10_64bits-debug"> + <CompilerOptions> + <Version Value="11"/> + <Target> + <Filename Value="raetsel-debug"/> + </Target> + <SearchPaths> + <IncludeFiles Value="$(ProjOutDir)"/> + <OtherUnitFiles Value="../units"/> + <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/> + </SearchPaths> + <CodeGeneration> + <TargetCPU Value="x86_64"/> + <TargetOS Value="win64"/> + </CodeGeneration> + <Linking> + <Options> + <Win32> + <GraphicApplication Value="True"/> + </Win32> + </Options> + </Linking> + <Other> + <CustomOptions Value="-dDEBUG"/> + <OtherDefines Count="1"> + <Define0 Value="DEBUG"/> + </OtherDefines> + </Other> + </CompilerOptions> + </Item4> </BuildModes> <PublishOptions> <Version Value="2"/> diff --git a/raetsel.lpr b/raetsel.lpr index 672f9ca..720aa2b 100644 --- a/raetsel.lpr +++ b/raetsel.lpr @@ -12,9 +12,21 @@ uses {$R *.res} begin + {$IFDEF DEBUG} + writeln('Anfang'); + {$ENDIF} requireDerivedFormResource:=true; application.initialize; + {$IFDEF DEBUG} + writeln('application.initialize;'); + {$ENDIF} application.createForm(tForm1, form1); + {$IFDEF DEBUG} + writeln('application.createForm(tForm1, form1);'); + {$ENDIF} application.run; + {$IFDEF DEBUG} + writeln('application.run;'); + {$ENDIF} end. diff --git a/raetsel.lps b/raetsel.lps index e0413a6..1b7bfc1 100644 --- a/raetsel.lps +++ b/raetsel.lps @@ -7,8 +7,9 @@ <Unit0> <Filename Value="raetsel.lpr"/> <IsPartOfProject Value="True"/> + <IsVisibleTab Value="True"/> <EditorIndex Value="2"/> - <CursorPos X="66" Y="13"/> + <CursorPos X="30" Y="19"/> <UsageCount Value="62"/> <Loaded Value="True"/> </Unit0> @@ -18,8 +19,8 @@ <ComponentName Value="Form1"/> <HasResources Value="True"/> <ResourceBaseClass Value="Form"/> - <TopLine Value="19"/> - <CursorPos X="43" Y="16"/> + <TopLine Value="43"/> + <CursorPos X="59" Y="55"/> <UsageCount Value="62"/> <Loaded Value="True"/> </Unit1> @@ -37,7 +38,6 @@ <Unit3> <Filename Value="raetselunit.pas"/> <IsPartOfProject Value="True"/> - <IsVisibleTab Value="True"/> <EditorIndex Value="1"/> <TopLine Value="812"/> <CursorPos X="50" Y="844"/> @@ -155,125 +155,128 @@ <UsageCount Value="10"/> </Unit19> </Units> + <OtherDefines Count="1"> + <Define0 Value="DEBUG"/> + </OtherDefines> <JumpHistory Count="30" HistoryIndex="29"> <Position1> - <Filename Value="raetselunit.pas"/> - <Caret Line="511" Column="82" TopLine="495"/> + <Filename Value="unit1.pas"/> + <Caret Line="40" Column="19" TopLine="32"/> </Position1> <Position2> <Filename Value="unit1.pas"/> - <Caret Line="40" Column="19" TopLine="32"/> + <Caret Line="16" Column="41"/> </Position2> <Position3> <Filename Value="unit1.pas"/> - <Caret Line="16" Column="41"/> + <Caret Line="17" Column="42"/> </Position3> <Position4> <Filename Value="unit1.pas"/> - <Caret Line="17" Column="42"/> + <Caret Line="18" Column="39"/> </Position4> <Position5> <Filename Value="unit1.pas"/> - <Caret Line="18" Column="39"/> + <Caret Line="46" Column="44" TopLine="13"/> </Position5> <Position6> <Filename Value="unit1.pas"/> - <Caret Line="46" Column="44" TopLine="13"/> + <Caret Line="67" Column="45" TopLine="34"/> </Position6> <Position7> <Filename Value="unit1.pas"/> - <Caret Line="67" Column="45" TopLine="34"/> + <Caret Line="72" Column="42" TopLine="39"/> </Position7> <Position8> - <Filename Value="unit1.pas"/> - <Caret Line="72" Column="42" TopLine="39"/> - </Position8> - <Position9> <Filename Value="raetselunit.pas"/> <Caret Line="824" Column="55" TopLine="808"/> - </Position9> - <Position10> + </Position8> + <Position9> <Filename Value="raetselunit.inc"/> <Caret Line="766" Column="55" TopLine="758"/> + </Position9> + <Position10> + <Filename Value="raetselunit.pas"/> + <Caret Line="555" Column="43" TopLine="547"/> </Position10> <Position11> <Filename Value="raetselunit.pas"/> - <Caret Line="555" Column="43" TopLine="547"/> + <Caret Line="566" Column="21" TopLine="547"/> </Position11> <Position12> - <Filename Value="raetselunit.pas"/> - <Caret Line="566" Column="21" TopLine="547"/> - </Position12> - <Position13> <Filename Value="raetsel.lpr"/> <Caret Line="13" Column="66"/> - </Position13> - <Position14> + </Position12> + <Position13> <Filename Value="unit1.pas"/> <Caret Line="4" Column="57"/> + </Position13> + <Position14> + <Filename Value="raetselunit.inc"/> + <Caret Line="766" Column="55" TopLine="758"/> </Position14> <Position15> <Filename Value="raetselunit.inc"/> - <Caret Line="766" Column="55" TopLine="758"/> </Position15> <Position16> <Filename Value="raetselunit.inc"/> + <Caret Line="738" Column="22" TopLine="706"/> </Position16> <Position17> - <Filename Value="raetselunit.inc"/> - <Caret Line="738" Column="22" TopLine="706"/> - </Position17> - <Position18> <Filename Value="raetsel.lpr"/> <Caret Line="13" Column="66"/> + </Position17> + <Position18> + <Filename Value="raetselunit.pas"/> + <Caret Line="563" Column="62" TopLine="525"/> </Position18> <Position19> <Filename Value="raetselunit.pas"/> - <Caret Line="563" Column="62" TopLine="525"/> + <Caret Line="169" Column="46" TopLine="152"/> </Position19> <Position20> <Filename Value="raetselunit.pas"/> - <Caret Line="169" Column="46" TopLine="152"/> + <Caret Line="170" Column="21" TopLine="152"/> </Position20> <Position21> <Filename Value="raetselunit.pas"/> - <Caret Line="170" Column="21" TopLine="152"/> + <Caret Line="2"/> </Position21> <Position22> - <Filename Value="raetselunit.pas"/> - <Caret Line="2"/> - </Position22> - <Position23> <Filename Value="raetselunit.inc"/> <Caret Line="714" Column="70" TopLine="706"/> + </Position22> + <Position23> + <Filename Value="raetselunit.pas"/> + <Caret Line="170" Column="21" TopLine="138"/> </Position23> <Position24> <Filename Value="raetselunit.pas"/> - <Caret Line="170" Column="21" TopLine="138"/> + <Caret Line="42" Column="38" TopLine="22"/> </Position24> <Position25> <Filename Value="raetselunit.pas"/> - <Caret Line="42" Column="38" TopLine="22"/> + <Caret Line="227" Column="39" TopLine="196"/> </Position25> <Position26> <Filename Value="raetselunit.pas"/> - <Caret Line="227" Column="39" TopLine="196"/> + <Caret Line="732" Column="46" TopLine="701"/> </Position26> <Position27> - <Filename Value="raetselunit.pas"/> - <Caret Line="732" Column="46" TopLine="701"/> + <Filename Value="raetselunit.inc"/> + <Caret Line="714" Column="61" TopLine="706"/> </Position27> <Position28> <Filename Value="raetselunit.inc"/> - <Caret Line="714" Column="61" TopLine="706"/> + <Caret Line="688" Column="63" TopLine="678"/> </Position28> <Position29> - <Filename Value="raetselunit.inc"/> - <Caret Line="688" Column="63" TopLine="678"/> - </Position29> - <Position30> <Filename Value="raetselunit.pas"/> <Caret Line="812" Column="66" TopLine="808"/> + </Position29> + <Position30> + <Filename Value="unit1.pas"/> + <Caret Line="16" Column="43" TopLine="28"/> </Position30> </JumpHistory> </ProjectSession> @@ -45,7 +45,13 @@ end; procedure tForm1.formCreate(sender: tObject); begin + {$IFDEF DEBUG} + writeln('procedure tForm1.formCreate(sender: tObject);'); + {$ENDIF} application.createForm(tForm2, form2); + {$IFDEF DEBUG} + writeln('application.createForm(tForm2, form2);'); + {$ENDIF} case form2.showmodal of mrBuchstabenraetsel: raetsel:=tBuchstabenRaetsel.create(form1); @@ -54,6 +60,7 @@ begin else begin raetsel:=nil; application.terminate; + exit; end; end; raetsel.onSetCaption:=@onSetCaption; |