[JVCL-Checkins] dev/JVCL3/run JvListComb.pas,1.51,1.52 - Added SortMethod on TJvImageItems, based on CollectionSort i

[Olivier S. <ob...@us...>]

Update of /cvsroot/jvcl/dev/JVCL3/run
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29583/dev/JVCL3/run

Modified Files:
	JvListComb.pas 
Log Message:
Added SortMethod on TJvImageItems, based on CollectionSort in JvJCLUtils


Index: JvListComb.pas
===================================================================
RCS file: /cvsroot/jvcl/dev/JVCL3/run/JvListComb.pas,v
retrieving revision 1.51
retrieving revision 1.52
diff -C2 -d -r1.51 -r1.52
*** JvListComb.pas	9 Aug 2005 09:45:56 -0000	1.51
--- JvListComb.pas	11 Aug 2005 16:07:14 -0000	1.52
***************
*** 145,148 ****
--- 145,149 ----
      procedure InsertObject(Index: Integer; const Text: string; ALinkedObject: TObject);
      procedure Move(CurIndex, NewIndex: Integer);
+     procedure Sort(sortProc: TCollectionSortProc);
  
      function IndexOfLinkedObject(ALinkedObject: TObject): Integer;
***************
*** 745,748 ****
--- 746,754 ----
  end;
  
+ procedure TJvImageItems.Sort(sortProc: TCollectionSortProc);
+ begin
+   CollectionSort(Self, sortProc);
+ end;
+ 
  //=== { TJvImageComboBox } ===================================================