Thema: Delphi TStringList AddObjects

Einzelnen Beitrag anzeigen

Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: Unterhaching
11.412 Beiträge
 
Delphi 12 Athens
 
#2

Re: TStringList AddObjects

  Alt 13. Mai 2004, 12:01
Zitat von MrSpock:
Ich dachte, dass die Objekte nur als Verweise gespeichert werden. Stimmt das nicht?
Doch, das ist korrekt, aber wenn der Speicher noch nicht andersweitig genutzt wurde, dann gibt es oft keinen Fehler Es passiert aber auch nichts Gutes. Es kommt auch auf die genutzte Property an.

Folgendes geht ohne AV
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  L: TLabel;
begin
  L := TLabel.Create(Self);
  L.Tag := 5;
  L.Free;
  L.Tag := 0;
end;
Dieses geht nur mit AV
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  L: TLabel;
begin
  L := TLabel.Create(Self);
  L.Caption := 'Hi Spockie';
  L.Free;
  L.Caption := 'Bye Spockie';
end;
......
Daniel Lizbeth
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat