Does anyone have a delphi (pascal) sample for NWDSScanConnsForTrees?

Thanks in advance

Hello Kevin,

a function that returns the trees for the connections.

function get_current_trees:TStringList;
const trs = 50;
type p = array[1..trs] of pchar;
a = array[1..trs,0..NW_MAX_TREE_NAME_BYTES] of char;
var pp : p;
tr : a;
i: integer;
cnt : nuint;
begin
result:=TStringList.create;
for i:=1 to trs do pp[i]:=@tr[i];
if NWDSScanConnsForTrees(context,trs,cnt,@pp)=0
then for i:= 1 to cnt do result.Add(string(pp[i]));
result.Sort;
end;

Hans