Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Fehler bei neuem Eintrag einer TreeView

    Delphi
    by Flocke, 17. Nov 2005
  Das Length+1 beim SetLength war ja auch richtig, du musst nur bei den Indizes High benutzen.
  
  procedure TS3DObject.AddGroup(Name:String; Visible: Boolean);
  begin
  SetLength(self.Groups,Length(self.Groups)+1);
  self.Groups:= TS3DGroup.Create;
  self.Groups.Visible:= Visible;
  self.Groups.Name:= Name;
  end;