Rev 43 | Rev 51 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 43 | Rev 44 | ||
---|---|---|---|
Line 113... | Line 113... | ||
113 | // Da Button bei ungültigen Level deaktiviert wird, ist das nicht mehr nötig. |
113 | // Da Button bei ungültigen Level deaktiviert wird, ist das nicht mehr nötig. |
114 | {if liu.visible or (LevelListBox.items.count=0) then |
114 | {if liu.visible or (LevelListBox.items.count=0) then |
115 | exit;} |
115 | exit;} |
116 | 116 | ||
117 | MainForm.DestroyLevel; |
117 | MainForm.DestroyLevel; |
- | 118 | MainForm.LevData.RasterErzwingen := true; |
|
118 | MainForm.LevData.LoadFromFile( |
119 | MainForm.LevData.LoadFromFile( |
119 | IncludeTrailingPathDelimiter(ExtractFilePath(GetLevelFileName(1)))+ |
120 | IncludeTrailingPathDelimiter(ExtractFilePath(GetLevelFileName(1)))+ |
120 | LevelListBox.Items.strings[LevelListBox.itemindex]+'.lev'); |
121 | LevelListBox.Items.strings[LevelListBox.itemindex]+'.lev'); |
121 | 122 | ||
122 | MainForm.RefreshFromLevData; |
123 | MainForm.RefreshFromLevData; |
Line 199... | Line 200... | ||
199 | LevelNumber.Value := strtoint(RightStr(temp, length(temp)-Length('Level '))); |
200 | LevelNumber.Value := strtoint(RightStr(temp, length(temp)-Length('Level '))); |
200 | 201 | ||
201 | LevelData := TLevelData.Create; |
202 | LevelData := TLevelData.Create; |
202 | try |
203 | try |
203 | try |
204 | try |
- | 205 | LevelData.RasterErzwingen := true; |
|
204 | LevelData.LoadFromFile(IncludeTrailingPathDelimiter(ExtractFilePath(GetLevelFileName(1)))+ |
206 | LevelData.LoadFromFile(IncludeTrailingPathDelimiter(ExtractFilePath(GetLevelFileName(1)))+ |
205 | LevelListBox.Items.strings[LevelListBox.itemindex]+'.lev'); |
207 | LevelListBox.Items.strings[LevelListBox.itemindex]+'.lev'); |
206 | 208 | ||
207 | boss := false; |
209 | boss := false; |
208 | anzahlEinheiten := Length(LevelData.EnemyAdventTable); |
210 | anzahlEinheiten := Length(LevelData.EnemyAdventTable); |