Bladeren bron

FIX: Check string length in cm_ToggleSelectionInName (fixes #1030) (#1031)

Hermholtz 2 jaren geleden
bovenliggende
commit
5cd1e33cd2
1 gewijzigde bestanden met toevoegingen van 3 en 0 verwijderingen
  1. 3 0
      src/fcopymovedlg.pas

+ 3 - 0
src/fcopymovedlg.pas

@@ -173,6 +173,9 @@ begin
   iInitialStart := edtDst.SelStart;
   iInitialStart := edtDst.SelStart;
   iInitialLength := edtDst.SelLength;
   iInitialLength := edtDst.SelLength;
 
 
+  if iFullLength = 0 then
+    exit;
+
   repeat
   repeat
     FCurrentCopyDlgNameSelectionStep := TCurrentCopyDlgNameSelectionStep((ord(FCurrentCopyDlgNameSelectionStep)+1) mod ord(ccdnssInvalid));
     FCurrentCopyDlgNameSelectionStep := TCurrentCopyDlgNameSelectionStep((ord(FCurrentCopyDlgNameSelectionStep)+1) mod ord(ccdnssInvalid));