diff options
Diffstat (limited to 'UCore.pas')
| -rw-r--r-- | UCore.pas | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -2186,6 +2186,8 @@ begin Result := False; try AFSymlink := TFSymlink.Create(Application.MainForm); + AFSymLink.FileName := FileName; + AFSymLink.PossibleNewName := PossibleNewName; AFSymlink.FromEntry.Text := StrToUTF8(FileName); AFSymlink.ToEntry.Text := StrToUTF8(PossibleNewName); AFSymlink.ToEntry.SetFocus; @@ -2261,6 +2263,7 @@ begin AFSymlink.FromEntry.Enabled := False; AFSymlink.ToEntry.Text := StrToUTF8(Data^.LnkPointTo); AFSymlink.ToEntry.SelectAll; + AFSymLink.RelativeCheckButton.Visible := False; if AFSymlink.Run = mbOK then Result := HandleEditSymlink(UTF8ToStr(AFSymlink.FromEntry.Text), UTF8ToStr(AFSymlink.ToEntry.Text)); finally AFSymlink.Free; |
