AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Delphi Einzelne Objekte einer TObjectlist überschreiben/freigeben
Thema durchsuchen
Ansicht
Themen-Optionen

Einzelne Objekte einer TObjectlist überschreiben/freigeben

Ein Thema von smudo · begonnen am 31. Mai 2006 · letzter Beitrag vom 31. Mai 2006
 
smudo

Registriert seit: 6. Sep 2005
Ort: Cottbus
362 Beiträge
 
Delphi XE2 Professional
 
#1

Einzelne Objekte einer TObjectlist überschreiben/freigeben

  Alt 31. Mai 2006, 10:00
Hallo,

Ich nutze eine Objectliste zum abspeichern von Records:
Delphi-Quellcode:
RSaveRec=Record
  s:String;
  i:Integer;
  b:Boolean;
end;
PSaveRec=^RSaveRec;

function TForm1.GetObject: PSaveRec;
begin
  New(Result);
  Result.s:=edS.Text;
  Result.i:=seI.Value;
  Result.b:=chkb.Checked;
end;

SaveObjectList.ActiveObject:=TObject(GetObject);
ActiveObject ist eine Property der Klasse TSaveObjectList, welche das übergebene Objekt an der aktuellen Position in einer TObjectlist speichert. Das funktioniert auch gut, solange an der Position in der ObjectListe noch nichts gespeichert war.
Möchte ich aber ein Objekt überschreiben, kommt es zu einer Zugriffsverletzung.

Wie kann ich ein einzelnes Object aus einer Objectliste freigeben bzw. überschreiben, ohne das Object selbst zu kennen?

ich habe mit diesem Thread
Speicherverwaltung Objectlisten
versucht, das Problem zu klären, bin aber nicht weitergekommen.

Schon mal Danke im Voraus für eure Anregungen

René
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 14:43 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz