Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: TreeView Data freigeben, so ?

    Delphi
    by KrasserChecker, 28. Feb 2005
  Sieht irgendwie merkwürdig aus. Bin nicht sicher, das "Dispose" wirklich das Objekt (bzw. dessen Speicherplatz frei gibt). Ich würde es auf jeden Fall so machen:
  
  for i := 0 to TreeView1.Items.Count-1 do
  if TreeView1.Items.Item.Data <> nil then
  begin
  TObject(TreeView1.Items.Item.Data).Free;
  TreeView1.Items.Item.Data := nil;//diese Zeile erforderlich?
  end;
  
  Ach ja, und...