Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Eigenen Typ in Klasse

    Delphi
    by Hawkeye219, 22. Jul 2006
  Hallo zer00,
  
  wenn du statt einer TList eine TObjectList aus der Unit Contnrs verwendest, übernimmt diese die Freigabe der enthaltenen Elemente. Vielleicht wäre es noch besser, in der Unit 'Termin' eine abgeleitete Klasse zu definieren:
  
  
  // uses Contnrs;
  
  type
  TTerminListe = class (TObjectList)
  private
• Forum: Object-Pascal / Delphi-Language

  Re: Eigenen Typ in Klasse

    Delphi
    by Hawkeye219, 15. Jul 2006
  Auf jeden Fall sollte man nur die gültigen Elemente des Arrays benutzen:
  
  
  procedure tetc.add(foo: Tdeinrecord);
  begin
  setlength(derarray, length(derarray)+1)
  derarray:= foo; // <-- High() statt Length()
  end;
  
  Gruß Hawkeye