#pas
procedure ThiStringTableMT._var_EndIdx;
begin
   if Control.Count = 0 then dtNull(_Data)
   else dtInteger(_Data,Control.Count - 1);
end;