Código Delphi [-] for I := 0 to Node.Count - 1 do ShowMessage(Node.Item[i].Text);
for I := 0 to Node.Count - 1 do ShowMessage(Node.Item[i].Text);