Sub DeleteElement(ByVal list As Any Ptr,ByVal element As integer32)
Удаляет элемент, указанный в параметре element
list - хендл списка
element - номер элемента в списке (начинаются с 1)
Windows , Linux
#Include "Linked_Lists.bi"
Var list=NewList()
AddElement_D(List,767.676)
AddElement_D(List,8848.36)
AddElement_D(List,66.368)
DeleteElement(List,2)
FirstElement(list)
Do
? GetList_D(list)
Loop Until NextElement(list)=0
Sleep
767.676
8848.360000000001
Created with the Personal Edition of HelpNDoc: Single source CHM, PDF, DOC and HTML Help creation