equal
deleted
inserted
replaced
106 //////////////////// |
106 //////////////////// |
107 procedure OnDestroy; |
107 procedure OnDestroy; |
108 begin |
108 begin |
109 {$IFDEF DEBUGFILE}AddFileLog('Freeing resources...');{$ENDIF} |
109 {$IFDEF DEBUGFILE}AddFileLog('Freeing resources...');{$ENDIF} |
110 if isSoundEnabled then ReleaseSound; |
110 if isSoundEnabled then ReleaseSound; |
111 StoreRelease; |
111 StoreRelease;SendKB; |
112 CloseIPC; |
112 CloseIPC; |
113 TTF_Quit; |
113 TTF_Quit; |
114 SDL_Quit; |
114 SDL_Quit; |
115 halt |
115 halt |
116 end; |
116 end; |