getDroppedFileText(): String; vars msg : String; dbFile : DbFile; begin if droppedFiles.size > 0 then msg := 'The following files were not backed up :' & CrLf; foreach dbFile in droppedFiles do msg := msg & dbFile.name & '.dat' & CrLf; endforeach; endif; return msg; end;