mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-28 10:02:14 +00:00
Code Issues Projects Releases Packages Wiki Activity

UPD: Display a different message if no files have been loaded.

Browse source
This commit is contained in:
cobines 2012-03-13 04:17:09 +00:00
commit 072e6b8947
3 changed files with 9 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/newdesign/ucolumnsfileview.pas
View file

@ -1493,6 +1493,10 @@ begin
begin
lblInfo.Caption := rsMsgLoadingFileList;
end
else if not Assigned(FAllDisplayFiles) or (FAllDisplayFiles.Count = 0) then
begin
lblInfo.Caption := rsMsgNoFiles;
end
else if Assigned(FileSource) then
begin
FilesInDir := 0;

4
src/newdesign/ucolumnsfileviewvtv.pas
View file

@ -1600,6 +1600,10 @@ begin
begin
lblInfo.Caption := rsMsgLoadingFileList;
end
else if not Assigned(FAllDisplayFiles) or (FAllDisplayFiles.Count = 0) then
begin
lblInfo.Caption := rsMsgNoFiles;
end
else if Assigned(FileSource) then
begin
FilesInDir := 0;

1
src/ulng.pas
View file

@ -105,6 +105,7 @@ resourcestring
rsMsgTargetDir = 'Target path:';
rsMsgURL = 'URL:';
rsMsgLoadingFileList = 'Loading file list...';
rsMsgNoFiles = 'No files';
rsMsgErrSetAttribute = 'Can not set attributes for "%s"';
rsMsgErrSetDateTime = 'Can not set date/time for "%s"';
rsMsgErrDateNotSupported = 'Date %s is not supported';