Element Delete

Vars
  Self#.tmp dd ?

PointWork doDelete
  \local s1,pos,cnt,L1,sv.t
  DataSave data,data.type,[Self#.tmp],sv.t
  push eax
  ReadStr s1,[Self#.tmp],data.type,Self#.Str,0
  mov_ex eax,s1
  mov edx,esp
  call __strdupnoclear
  mov eax,[esp]
  cmp byte [eax],0
  je L1
  ReadInt pos,[Self#.tmp],data.type,Self#.Position,Self#.prop.Position
  push pos
  ReadInt cnt,[Self#.tmp],data.type,Self#.Count,Self#.prop.Count
  mov_ex ecx,cnt
  pop eax
  mov edx,esp
  call __strdelete
  mov eax,[esp]
  Self#.onDelete eax,data_str
L1:
  mov edx,esp
  call __strclear
  pop eax
  DataClear [Self#.tmp],sv.t
EndPoint

EndElement