-- Change Panel ShiftF[56] Dialog -- FAR3 build >= 5467 ShiftF5=win.Uuid "502D00DF-EE31-41CF-9028-442D2E352990" ShiftF6=win.Uuid "89664EF4-BB8C-4932-A8C0-59CAFD937ABA" F=far.Flags SetHeader=(param,SFT,APC,TXT)-> Move=TXT\find "[\\/]" Act=SFT[1] and "Copy" or (Move and "Move" or "Rename") far.SendDlgMessage param.hDlg,F.DM_SETTEXT,1,"[Shift] "..Act far.SendDlgMessage param.hDlg,F.DM_SETTEXT,2,Act.." "..APC.." t&o:" Move Event group:"DialogEvent" description:"Panel ShiftF[56] Dialog" action:(event,param)-> if event==F.DE_DLGPROCINIT id=far.SendDlgMessage param.hDlg,F.DM_GETDIALOGINFO id=id and id.Id or "" SFT={id==ShiftF5,id==ShiftF6} if SFT[1] or SFT[2] APC,PPP=APanel.Current,PPanel.Path if param.Msg==F.DN_INITDIALOG Move=SetHeader param,SFT,APC,PPP far.SendDlgMessage param.hDlg,F.DM_SETTEXT,3,Move and PPP or APC elseif param.Msg==F.DN_EDITCHANGE and param.Param1==3 TXT=far.SendDlgMessage param.hDlg,F.DM_GETTEXT,3 SetHeader param,SFT,APC,TXT false |