Unit 'utility' Package
[Overview][Constants][Types][Procedures and functions][Variables][Index] [#morphunits]

FreeTagItems

Free an allocated tag list.

Declaration

Source position: utility.pas line 170

procedure FreeTagItems(

  TagList: PTagItem

);

Arguments

TagList

  

list to free, must have been obtained from AllocateTagItems() or CloneTagItems() (may be nil)

Description

Frees the memory of a TagItem list allocated either by AllocateTagItems() or CloneTagItems().

var
  tagList: PTagItem;
begin
  tagList := AllocateTagItems(4);
  tagList[0]^.ti_Tag := NA_Name;
  tagList[0]^.ti_Data := IPTR(PChar('A list of tags'));
  tagList[3]^.ti_Tag := TAG_DONE;
// Do what you want with your TagList here ...
  FreeTagItems(tagList);
end;

See also

AllocateTagItems

  

Allocate a tag list.


Documentation generated on: 2021-07-30