himXML (gesprochen himix ML)

[franktron]

Diese Zeilen habe ich ausgremt

Delphi-Quellcode:

{rtArray:              Begin
                                    P2 := P;
                                    For i2 := RecInfo._Data[i].Elements - 1 downto 0 do Begin
                                      Serialize_Record(Node2.Nodes.Add('Element'), P2^, RecInfo._Data[i].SubInfo);
                                      Inc(Integer(P2), RecInfo._Data[i].SubInfo._Size);
                                    End;
                                  End;
            rtDynArray:           Begin
                                    P2 := PPointer(P)^;
                                    If Assigned(P2) Then
                                      For i2 := PInteger(Integer(P2) - 4)^ - 1 downto 0 do Begin
                                        Serialize_Record(Node2.Nodes.Add('Element'), P2^, RecInfo._Data[i].SubInfo);
                                        Inc(Integer(P2), RecInfo._Data[i].SubInfo._Size);
                                      End;
                                  End;  }

gibt es 2 mal im Code