Rev 85 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 85 | Rev 89 | ||
---|---|---|---|
Line 201... | Line 201... | ||
201 | finally |
201 | finally |
202 | FreeAndNil(SavGame); |
202 | FreeAndNil(SavGame); |
203 | end; |
203 | end; |
204 | mainform.playsound(smsSceneMov, false); |
204 | mainform.playsound(smsSceneMov, false); |
205 | mainform.FNextScene := gsNewLevel; |
205 | mainform.FNextScene := gsNewLevel; |
206 | mainform.FCheat := false; |
206 | mainform.FCheats := []; |
207 | close; |
207 | close; |
208 | end; |
208 | end; |
209 | 209 | ||
210 | procedure TSpeicherungForm.SpeichernBtnClick(Sender: TObject); |
210 | procedure TSpeicherungForm.SpeichernBtnClick(Sender: TObject); |
211 | resourcestring |
211 | resourcestring |