#pas
TScArray = record
  Items:array of PScData;
  Count:integer;
end;

#pas
function lng_proc(parser:TParser; obj:pointer; index:integer; args:TArgs):TScData;
var i:integer; arg1:PScData; arr: PScArray;
begin
  case lng_indexer(index) of
    
    .......
    
    lng_ArrayTestMethod:
    begin  
      arg1 := args.Values[0];
      if arg1.GetType = data_array then
      begin
        arr := arg1.toArray;
        for i := 0 to arr.Count-1 do
        begin
          //arr.Items[i] - содержит элемент массива типа PScData
        end; 
      end;
    end; 
    
    .......
    
  end;
end;

Add(MainForm,3996542,147,182)
{
}
Add(Edit,8821187,266,126)
{
 Left=10
 Top=5
 Width=350
 Text=""
}
Add(Button,9945948,147,126)
{
 Left=360
 Top=5
 Width=20
 Caption="..."
 link(onClick,14942471:doBrowse,[])
}
Add(Button,9496077,203,182)
{
 Left=325
 Top=30
 Caption="OK"
 link(onClick,5089863:doSearch,[])
}
Add(Browse,14942471,203,126)
{
 link(onBrowse,8821187:doText,[])
}
Add(Hub,10269111,308,182)
{
 OutCount=4
 link(onEvent1,6732671:doLoad,[])
 link(onEvent2,6732671:doBitmap,[(359,195)(359,202)])
 link(onEvent3,2189439:doData,[(354,202)(354,244)])
 link(onEvent4,962923:doPart,[(346,209)(346,307)])
}
Add(FileSearch,5089863,259,182)
{
 Ext="*.ico"
 link(onSearch,10269111:doEvent1,[])
 link(Dir,8821187:Text,[])
}
Add(PNG,5616394,546,224)
{
 Transparent=0
 Point(doLoadFromBitmap)
}
Add(Replace,13109471,420,301)
{
 SubStr=".ico"
 DestStr=".png"
 link(onReplace,1857753:doStrCat,[])
}
Add(FilePartElm,962923,371,301)
{
 link(onPart,13109471:doReplace,[])
}
Add(StrCat,1857753,469,301)
{
 Str1="g:HiAsmAndroidicon"
 link(onStrCat,5616394:doSave,[(523,307)(523,237)])
}
Add(Icon,6732671,371,182)
{
 Transparent=536870911
 Point(doBitmap)
 Point(onBitmap)
 link(onBitmap,16260895:doLoad,[])
}
Add(DoData,2189439,427,238)
{
 link(onEventData,5616394:doLoadFromBitmap,[])
 link(Data,16260895:Bitmap,[])
}
Add(AlphaBitmap,16260895,427,182)
{
}