Einzelnen Beitrag anzeigen

SearchBot

Registriert seit: 27. Jun 2004
Ort: N-W vom Bodensee
313 Beiträge
 
Delphi 12 Athens
 
#33

AW: Reise von Berlin nach Athens

  Alt 23. Sep 2024, 17:08
Wenn ich jetzt mein Projekt öffne, das ein SynEdit enthält, sagt mir die IDE, bevor noch irgendwas davon erscheint:
Zitat:
Listenindex außerhalb des gültigen Bereichs (0). TList<System.Integer> ist leer
Beim Ausführen meines Programms knallt es mit der selben Meldung in der unit SynEditWordWrap hier...:
Delphi-Quellcode:
function TSynWordWrapPlugin.RowCount: integer;
begin
  if fLineCount > 0 then
    Result := fLineOffsets[fLineCount - 1]; // <--- Exception

  Assert(fRowLengths.Count = Result);
end;
... wie behebe ich das?
Das habe ich soeben selbst gelöst:
Delphi-Quellcode:
function TSynWordWrapPlugin.RowCount: integer;
begin
  if (fLineOffsets.Count > 0) // <-- richtig | falsch --> (fLineCount > 0)
    Result := fLineOffsets[fLineCount - 1]; // <---- da: EArgumentOutOfRangeException

  Assert(fRowLengths.Count = Result);
end;
  Mit Zitat antworten Zitat