region、xld有对应的字符串时，将region、xld按照行或列排序的算法实现

用Halcon解码时，如果一张图里面有多个码，它通常可以把这些码都解出来，并且生成对应的解码结果字符串元组（也就是下面的DecodedDataStrings），如果有多个码，那么该元组就有多个元素。

① find_bar_code(Image : SymbolRegions : BarCodeHandle, CodeType : DecodedDataStrings)

② find_data_code_2d(Image : SymbolXLDs : DataCodeHandle, GenParamName, GenParamValue : ResultHandles, DecodedDataStrings)

一维码和二维码解码的区别是：一维码解码后的显示区域是一个region（SymbolRegions ），而二维码解码后的显示区域是一个xld（SymbolXLDs ）。

码的显示区域和解码字符串是一一对应的。但是有多个码时，不同码的显示区域顺序本身是乱排的，并不是按照“行坐标”或者“列坐标”排序的。如何让它们有序排列，并且字符串和它们的对应关系不变呢？这篇文章即是为了解决这个问题。

先了解一个排序算子：tuple_sort_index( : : Tuple : Indices)

基本上，Halcon中绝大多数的排序问题，都需要用到这个算子。关于这个算子的理解，详见我之前的文章：Halcon选择一堆region中面积第N大的region的算法实现

排序算法设计分析：

① 需排序的数据对假设是(region1, string1)、(region2, string2)、(region3, string3)、(region4, string4)……

② 以一维码、二维码以及它们对应的字符串为例，一维码解码显示区域是region，二维码解码显示区域是xld，所以该排序函数要兼容region和xld两种图形格式。

③ 为简单起见，均只设计为从小到大排序。设计了四种排序规则，分别是'row1'（最小外接矩形左上角行坐标）、'row'（中心点行坐标）、'column1'（最小外接矩形左上角列坐标）、'column'（中心点列坐标）

封装的函数签名为：sort_objects_strings(SourceObjects : SortedObjects : SourceStrings, ObjectType, SortRule : SortedStrings)

sort_objects_strings函数代码为：

 tuple_regexp_replace (ObjectType, ['\\s*','replace_all'], '', ObjectType)
 tuple_regexp_replace (SortRule, ['\\s*','replace_all'], '', SortRule) 

 *是region还是xld
 if (ObjectType == 'region')
     ObjectType := 'region'
 else
     ObjectType := 'xld'
 endif

 *如果SourceStrings为空，或者SourceObjects和SourceStrings个数不同，这些都属异常，需return()
 count_obj (SourceObjects, Num)
 if (|SourceStrings| == or |SourceStrings| != Num)
     SortedObjects := SourceObjects
     SortedStrings := SourceStrings
     return ()
 endif

 *逻辑判断(如果是region)
 if (ObjectType  == 'region')
     *row1  row  column1  column, 看按哪种规则排序(下同)
     if (SortRule == 'row1')
         smallest_rectangle1 (SourceObjects, SortItems, Column1, Row2, Column2)
     elseif(SortRule == 'column1')
         smallest_rectangle1 (SourceObjects, Row1, SortItems, Row2, Column2)

     elseif(SortRule == 'row')
         area_center (SourceObjects, Area, SortItems, Column)
     else
         area_center (SourceObjects, Area, Row, SortItems)
     endif

 *逻辑判断(如果是xld)
 else
     if (SortRule == 'row1')
         smallest_rectangle1_xld (SourceObjects, SortItems, Column1, Row2, Column2)
     elseif(SortRule == 'column1')
         smallest_rectangle1_xld (SourceObjects, Row1, SortItems, Row2, Column2)

     elseif(SortRule == 'row')
         area_center_xld (SourceObjects, Area, SortItems, Column, PointOrder)
     else
         area_center_xld (SourceObjects, Area, Row, SortItems, PointOrder)
     endif

 endif

 * sort_region (SourceObjects, SortedObjects, 'upper_left', 'true', 'row')
 * sort_contours_xld (SourceObjects, SortedObjects, 'upper_left', 'true', 'row')

 tuple_sort_index (SortItems, Indices)

 *SourceStrings和SourceObjects的排序
 SortedStrings := []
 gen_empty_obj (SortedObjects)
 for i :=  to Num- by
     SortedStrings[i] := SourceStrings[Indices[i]]
     select_obj (SourceObjects, ObjectSelected, Indices[i] + 1)
     concat_obj (SortedObjects, ObjectSelected, SortedObjects)
 endfor

 return ()

【示例】

程序是用Halcon 17.12写的，如果是低版本Halcon，那么文本显示和字体设置的语句略有不同。

 dev_set_draw ('margin')
 dev_set_line_width ()
 set_display_font (, , 'Courier', 'true', 'false')

 read_image (Image, 'SortCodes')
 create_data_code_2d_model ('QR Code', 'default_parameters', 'enhanced_recognition', DataCodeHandleQR) 

 *'stop_after_result_num', ：意思是最大可找到10个码，如果不设置该参数，那么只会找到一个码
 find_data_code_2d (Image, SymbolXLDs, DataCodeHandleQR, 'stop_after_result_num', , ResultHandles, SourceStrings)
 sort_objects_strings (SymbolXLDs, SymbolXLDsSort, SourceStrings, 'xld', 'row1', SortedStrings)

 dev_display (Image)
 for Index :=  to |SourceStrings|- by
     select_obj (SymbolXLDsSort, ObjectSelected, Index + )
     dev_display (ObjectSelected)
     area_center_xld (ObjectSelected, Area, Row, Column, PointOrder)
     disp_message (, (Index + ) + '、' + SortedStrings[Index], 'image', Row, Column-, 'black', 'true')
 endfor

 clear_data_code_2d_model (DataCodeHandleQR)

① 按'row1'规格排序，效果图为：

② 按'row'规格排序，效果图为：

③ 按'column1'规格排序，效果图为：

④ 按'column'规格排序，效果图为：

请读者朋友们自己观察一下这四种效果图，体会一下'row1'、'row'、'column1'、'column'这四种排序规则的区别。

值得说明的是：这种排序算法是通用的，它不仅仅局限解码项目中的数据处理，其他类似的排序需求，也是可以用的。