| 151 |  | begin | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 152 |  | ShowMessage('Couldn''t delete file. Aborting'); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 153 |  | Exit; | 
 
 
 
 
 
 
 
 
 
 
 | 154 | < | end else if not DeleteFile(AnsiReplaceStr(Target, '.dat', '.raw')) then | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 155 | < | begin | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 156 | < | ShowMessage('Couldn''t delete file. Aborting'); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 157 | < | Exit; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 158 | < | end else if Connection.DataOS in [DOS_WINDEMO, DOS_MAC, DOS_MACBETA] then | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 159 | < | begin | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 160 | < | if not DeleteFile(AnsiReplaceStr(Target, '.dat', '.sep')) then | 
 
 
 
 
 
 
 
 
 | 154 | > | end; | 
 
 
 
 
 | 155 | > | if FileExists(AnsiReplaceStr(Target, '.dat', '.raw')) then | 
 
 
 
 
 | 156 | > | if not DeleteFile(AnsiReplaceStr(Target, '.dat', '.raw')) then | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 157 |  | begin | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 158 |  | ShowMessage('Couldn''t delete file. Aborting'); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 159 |  | Exit; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 160 |  | end; | 
 
 
 
 
 
 
 
 
 
 
 | 161 | < | end; | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 161 | > | if FileExists(AnsiReplaceStr(Target, '.dat', '.sep')) then | 
 
 
 
 
 | 162 | > | if Connection.DataOS in [DOS_WINDEMO, DOS_MAC, DOS_MACBETA] then | 
 
 
 
 
 | 163 | > | if not DeleteFile(AnsiReplaceStr(Target, '.dat', '.sep')) then | 
 
 
 
 
 | 164 | > | begin | 
 
 
 
 
 | 165 | > | ShowMessage('Couldn''t delete file. Aborting'); | 
 
 
 
 
 | 166 | > | Exit; | 
 
 
 
 
 | 167 | > | end; | 
 
 
 
 
 
 
 
 
 
 
 | 168 |  | end else begin | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 169 |  | ShowMessage('Aborting'); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 170 |  | Exit; |