Rev 90 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 90 | Rev 94 | ||
|---|---|---|---|
| Line 198... | Line 198... | ||
| 198 | end; |
198 | end; |
| 199 | 199 | ||
| 200 | procedure TMainForm.FormCreate(Sender: TObject); |
200 | procedure TMainForm.FormCreate(Sender: TObject); |
| 201 | resourcestring |
201 | resourcestring |
| 202 | SFileError = 'Die Datei kann von SpaceMission nicht geöffnet werden!'; |
202 | SFileError = 'Die Datei kann von SpaceMission nicht geöffnet werden!'; |
| 203 | SCaption = 'SpaceMission %s - Leveleditor'; |
203 | SCaption = 'SpaceMission %s - Level-Editor'; |
| 204 | begin |
204 | begin |
| 205 | { VCL-Ersatz start } |
205 | { VCL-Ersatz start } |
| 206 | dxtimer := tdxtimer.create(self); |
206 | dxtimer := tdxtimer.create(self); |
| 207 | dxtimer.Interval := 100; |
207 | dxtimer.Interval := 100; |
| 208 | dxtimer.ActiveOnly := false; |
208 | dxtimer.ActiveOnly := false; |