mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

UPD: Viewer - save image as (default directory and file name)

Browse source
This commit is contained in:
Alexander Koblov 2023-07-11 21:36:58 +03:00
commit b635c03750
1 changed files with 2 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/fviewer.pas
View file

@ -1723,6 +1723,8 @@ begin
else begin
with SavePictureDialog do
begin
FileName:= EmptyStr;
InitialDir:= ExtractFileDir(FileList.Strings[iActiveFile]);
if not Execute then Exit;
sExt:= ExtensionSeparator + GetFilterExt;
sFileName:= ChangeFileExt(FileName, sExt);