539 |
|
fs := TFileStream.Create(opend.FileName, fmOpenRead); |
540 |
|
if fs.Size <> hex.DataSize then |
541 |
|
begin |
542 |
< |
if (not (CR_ResizeRaw in ConManager.Connection[ConnectionID].ChangeRights)) and (not (CR_AppendRaw in ConManager.Connection[ConnectionID].ChangeRights)) then |
542 |
> |
if |
543 |
> |
(not (CR_ResizeRaw in ConManager.Connection[ConnectionID].ChangeRights)) |
544 |
> |
and (not (CR_AppendRaw in ConManager.Connection[ConnectionID].ChangeRights)) |
545 |
> |
then |
546 |
|
begin |
547 |
|
ShowMessage('Can''t import ' + ExtractFilename(importd.FileName) + |
548 |
|
', file has to have same size as file in .raw with this backend.' + CrLf + |