mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-31 09:32:41 +02:00
changed use of method TDOMNodeList.Length to TDOMNodeList.Count
most probable cause of http://bugs.freepascal.org/view.php?id=12549 git-svn-id: trunk@17191 -
This commit is contained in:
parent
5745ce4a7c
commit
94f25c24bf
@ -647,7 +647,7 @@ begin
|
||||
//CommitRevision
|
||||
ListItem^.CommitRevision:=StrToInt(SubNode.Attributes.Item[0].NodeValue);
|
||||
|
||||
for i := 0 to SubNode.ChildNodes.Length - 1 do
|
||||
for i := 0 to SubNode.ChildNodes.Count - 1 do
|
||||
begin
|
||||
ActNode := SubNode.ChildNodes.Item[i];
|
||||
|
||||
|
@ -378,7 +378,7 @@ begin
|
||||
ActionItem.CopyRev := '';
|
||||
ActionItem.CopyPath := '';
|
||||
|
||||
for j := 0 to SubNode.ChildNodes.Length - 1 do
|
||||
for j := 0 to SubNode.ChildNodes.Count - 1 do
|
||||
begin
|
||||
tmpNode := SubNode.ChildNodes.Item[j];
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user